Custom Query (1030 matches)

? (compile nil '(lambda () (typep nil '(or none-such null)))) 
> Error: Unknown type specifier: NONE-SUCH 
> While executing: CCL::%%TYPEP, in process listener(1). 
> Type :POP to abort, :R for a list of available restarts. 
> Type :? for other options. 
1 >  

I'm working on a fix, just entering the bug for the record.

? (defmethod frotz (x) (print x))
#<STANDARD-METHOD FROTZ (T)>
? (trace frotz)
NIL
? (frotz 17)
0> Calling (FROTZ 17) 
> Error: Too many arguments in call to #<METHOD-FUNCTION FROTZ (T)>:
>        2 arguments provided, at most 1 accepted. 
> While executing: #<STANDARD-METHOD FROTZ (T)>, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
1 > 

Compiling a file with this contents:

(prog1
    (declare (ignore foo)))

yields a confusing error message

Welcome to Clozure Common Lisp Version 1.2-r9226-RC1  (LinuxX8664)!
? (compile-file "foo.lisp")
;Compiler warnings for "/home/hans/profiler/foo.lisp" :
;   In an anonymous lambda form: DECLARE not expected in (DECLARE (IGNORE FOO))
> Error: No MAKE-LOAD-FORM method is defined for #<CCL::SIMPLE-PROGRAM-ERROR #x
00040CFAF3D>

The "DECLARE not expected" is clear, but the MAKE-LOAD-FORM thing is really confusing. It seems as if the compiler continues when it can't.