[parenscript-devel] Bug: latest PS breaks some conditional expressions

[Vladimir Sedach]

Fixed.

On Wed, May 6, 2009 at 2:13 PM, Daniel Gackle <danielgackle at gmail.com> wrote:
> I'll use SETF to force PS to interpret the right-hand side as an expression.
> These are correct:
>
> (ps (setf x (let ((a 1)) a)))
> =>
> "x = (a6872 = 1, a6872);"
>
> (ps (setf x (unless (null a) (1+ a))))
> =>
> "x = a != null ? a + 1 : null;"
>
> But this is wrong:
>
> (ps (setf x (let ((a (foo)))
>                         (unless (null a)
>                           (1+ a)))))
> =>
> "x = (a6874 = foo(), if (a6874 != null) {
>     a6874 + 1;
> });"
>
> Daniel
>
> _______________________________________________
> parenscript-devel mailing list
> parenscript-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
>
>