Opened 2 months ago

#455 new defect

Order of evaluation in expression with BOOLE in compiled code

Reported by: mevenson Owned by:
Priority: major Milestone:
Component: (A)MOP Version:
Keywords: Cc:
Parent Tickets:

Description

(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

Subtickets (add)

Change History (0)

Note: See TracTickets for help on using tickets.