Subject: Re: member :test 'equal
From: rpw3@rpw3.org (Rob Warnock)
Date: Fri, 07 May 2004 21:41:22 -0500
Newsgroups: comp.lang.lisp
Message-ID: <a9-dnYqk5o5P1QHdRVn-vw@speakeasy.net>
Barry Margolin  <barmar@alum.mit.edu> wrote:
+---------------
|  Juliusz Chroboczek <jch@pps.jussieu.fr> wrote:
| > JC> #'(lambda (x y) (member x y :test 'equal))
| > Any suggestions for a good name?
| 
| (defun member-equal (x y)
|   (member x y :test #'equal))
+---------------

In this case that seems quite appropriate, though I often find myself
using "/" rather than "-" to indicate minor variants of functions,
e.g., "member/equal" for the above, especially when the function being
"specialized" (whoo!) already has one or more hyphens in its name, e.g.
JOIN-STRINGS vs. JOIN-STRINGS/SQL-QUOTED or:

	get-bindings
	get-bindings/get
	get-bindings/post
and:
	extract-bindings
	extract-bindings/single

That sort of thing. Comments?


-Rob

-----
Rob Warnock			<rpw3@rpw3.org>
627 26th Avenue			<URL:http://rpw3.org/>
San Mateo, CA 94403		(650)572-2607