aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-toplev.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-toplev.boot')
-rw-r--r--src/interp/i-toplev.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-toplev.boot b/src/interp/i-toplev.boot
index c7b1231d..0c40b23d 100644
--- a/src/interp/i-toplev.boot
+++ b/src/interp/i-toplev.boot
@@ -305,7 +305,7 @@ interpretTopLevel(x, posnForm) ==
interpret(x, :restargs) ==
posnForm := if PAIRP restargs then CAR restargs else restargs
--type analyzes and evaluates expression x, returns object
- $env:local := [[NIL]]
+ $env:local := [$EmptyEnvironment]
$eval:local := true --generate code-- don't just type analyze
$genValue:local := true --evaluate all generated code
interpret1(x,nil,posnForm)