[parenscript-devel] ps hates my labels

[Dmitri Pavlenkov]

Clisp. The form works without ps.

On Wed, Oct 27, 2010 at 5:14 PM, Daniel Gackle <danielgackle at gmail.com>wrote:

> That form works for me in SBCL. What Lisp are you using?
>
> On Wed, Oct 27, 2010 at 3:08 PM, Dmitri Pavlenkov <
> dmitripavlenkov at gmail.com> wrote:
>
>> 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
>> parenscript-devel at common-lisp.net
>> http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
>>
>>
>
> _______________________________________________
> parenscript-devel mailing list
> parenscript-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/parenscript-devel/attachments/20101027/337bc770/attachment.html>