sof 2002/05/11 09:09:59 PDT Modified files: src machine.c Log: asEVAL(): bad peephole bug. This has been with us for a _long_ time, I'm really surprised it hasn't come up before. Resolved by disabling the peephole optimisation that transformed "LOAD x;EVAL" into "LEVAL x" (see asEVAL() comment for more.) If this proves to be too much of a killer performance-wise, a more fine-grained solution is possible. Fixes the bug reported by Edmund GRIMLEY EVANS: http://www.haskell.org/pipermail/hugs-bugs/2002-May/000708.html Revision Changes Path 1.8 +19 -5 hugs98/src/machine.c