Re: [Gcl-devel] Possible slight bug in ANSI compatibility

[Paul F. Dietz]

Marc Mertens wrote:
> Hello,
>
>       I am porting Jabberwocky to gcl  and found the following possible ansi 
> bug with gcl.
>
>         - The type 'function' does not seem to be a class:
> 		(defmethod test ((f function)) (princ 'ok)) gives the error "Error in 
> PCL::LOAD-DEFMETHOD [or a callee]: No class named: FUNCTION".  The definition 
> works without problem on other lisp's and if I interpret the hyperspec 
> correctly 'function' should be a class.
>         - I'm using gcl 2.6.1, compiled with ANSI compatibility .
>         
> Thanks a lot for your work on gcl

Did you compile gcl with the configuration option --enable-ansi?

If you do that:

>(defgeneric foo (x))

#<compiled-closure FOO>

>(defmethod foo ((x function)) t)

#<Standard-Method FOO (FUNCTION) 1071351224>


However:

>(class-of #'car)

#<Built-In-Class T 1034565230>

>(typep #'car 'function)

T

>(typep #'car (find-class 'function))

NIL


        Paul