31 Dec
2007
31 Dec
'07
10:57 p.m.
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