diff options
Diffstat (limited to 'src/interp/i-toplev.boot')
-rw-r--r-- | src/interp/i-toplev.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-toplev.boot b/src/interp/i-toplev.boot index 0a9563b3..a71c617b 100644 --- a/src/interp/i-toplev.boot +++ b/src/interp/i-toplev.boot @@ -302,7 +302,7 @@ interpretTopLevel(x, posnForm) == c interpret(x, :restargs) == - posnForm := if CONSP restargs then CAR restargs else restargs + posnForm := if CONSP restargs then first restargs else restargs --type analyzes and evaluates expression x, returns object $env:local := [[nil]] $eval:local := true --generate code-- don't just type analyze |