diff options
Diffstat (limited to 'src/boot/translator.boot')
| -rw-r--r-- | src/boot/translator.boot | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/boot/translator.boot b/src/boot/translator.boot index e606da82..bc445495 100644 --- a/src/boot/translator.boot +++ b/src/boot/translator.boot @@ -408,11 +408,8 @@ translateToplevelExpression expr == for t in expr' repeat t is ["DECLARE",:.] => t.first := "DECLAIM" - expr' := - #expr' > 1 => ["PROGN",:expr'] - first expr' - $InteractiveMode => expr' - shoeEVALANDFILEACTQ expr' + #expr' > 1 => ["PROGN",:expr'] + first expr' inAllContexts x == ["EVAL-WHEN",[KEYWORD::COMPILE_-TOPLEVEL, |