Just pushed a fix for this.

Vladimir

2011/1/11 Daniel Gackle <[email protected]>:
> This generates an incorrect fall-through when A is "a" and FOO returns NIL:
> (defun blah (a)
>   (case a
>     ("a" (when (foo) (return-from blah 111)))
>     ("b" t)))
> Note that if you replace WHEN with IF, it works.
> _______________________________________________
> 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

Reply via email to