diff options
Diffstat (limited to 'src/interp/g-timer.boot')
| -rw-r--r-- | src/interp/g-timer.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/g-timer.boot b/src/interp/g-timer.boot index edd7020d..9f1fd02f 100644 --- a/src/interp/g-timer.boot +++ b/src/interp/g-timer.boot @@ -246,9 +246,9 @@ timedAlgebraEvaluation(code) == timedOptimization(code) == startTimingProcess 'optimization $getDomainCode : local := NIL - r := lispize code + r := simplifyVMForm code if $reportOptimization then - sayBrightlyI bright '"Optimized LISP code:" + sayBrightlyI bright '"Optimized intermediate code:" pp r stopTimingProcess 'optimization r |