[parenscript-devel] Bug in setf

[Daniel Gackle]

There's a bug when using setf to decrement a variable:

  (ps (setf x (- x 1 2)))
    =>  "x -= 1 - 2;"

Note that this works correctly:

  (ps (setf x (- 1 x 2)))
    => "x = 1 - x - 2;"

Dan
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/parenscript-devel/attachments/20071231/ba478f19/attachment.html>