#455: Order of evaluation in expression with BOOLE in compiled code ----------------------+---------------------- Reporter: mevenson | Owner: Type: defect | Status: new Priority: major | Milestone: Component: (A)MOP | Version: Keywords: | Parent Tickets: ----------------------+---------------------- {{{ (eval '(let ((a 15)) (boole boole-2 (logior 0 (setf a 14)) a))) ==> 14 (eval (funcall (compile nil '(lambda () (let ((a 15)) (boole boole-2 (logior 0 (setf a 14)) a)))))) ==> 15 }}} -- Ticket URL: <http://abcl.org/trac/ticket/455> armedbear <http://abcl.org> armedbear