[closer-devel] Re: [Ecls-list] Closer to MOP for ecl

[Gary King]

I'm not sure what to do. Some Lisps (such as OpenMCL and SBCL) define  
eql-specializer as a class. Others (such as LispWorks) do not  
(AFAICT). Also, I don't see eql-specializer-p being exported or  
defined in Closer to MOP. It's used in ECL and LispWorks but not  
defined. I think what I want is

> (defgeneric eql-specializer-p (thing)
>   (:documentation "If thing is an eql-specializer, returns a  
> representation of thing as \(eql <object>\).")
>   #-(or lispworks ecl)
>   (:method ((thing eql-specializer))
>            (list 'eql (eql-specializer-object thing)))
>   (:method ((thing t))
>            #-(or lispworks ecl)
>            (values nil)
>            #+(or lispworks ecl)
>            (typep obj 'eql-specializer))
>   #+digitool
>   (:method ((thing cons))
>            ;; don't ask, don't tell
>            thing))

comments?


On May 11, 2006, at 4:53 AM, Pascal Costanza wrote:

> I have used the type definition for eql-specializer already in  
> other CLOS MOP implementations, so Moptilities probably already has  
> the conditionalization that would only be needed to be switched on  
> for ecl. (But I am just guessing.) Maybe ask Gary King about this.
>


-- 
Gary Warren King
metabang.com
http://www.metabang.com/
(413) 210 7511
gwking on #lisp (occasionally)