This is a bug in PS 2.1. It's fixed in 2.2, but that hasn't made it to Quicklisp yet.
Vladimir 2010/10/27 Dmitri Pavlenkov <[email protected]>: > What's wrong with my labels? > > PS[19]> (ps (defun fac (n) (labels ((f (n a) > (if (< n 2) > a > (f (- n 1) (* n a))))) > (f n 1))) > ) > > *** - The object to be destructured should be a list with 0 elements, not > ((- N 1) (* N A)). > The following restarts are available: > ABORT :R1 Abort main loop > Break 1 PS[20]> > > _______________________________________________ > parenscript-devel mailing list > [email protected] > http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel > > _______________________________________________ parenscript-devel mailing list [email protected] http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
