diff options
Diffstat (limited to 'src/boot/strap/translator.clisp')
| -rw-r--r-- | src/boot/strap/translator.clisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/boot/strap/translator.clisp b/src/boot/strap/translator.clisp index e3bab9c4..5f88927f 100644 --- a/src/boot/strap/translator.clisp +++ b/src/boot/strap/translator.clisp @@ -916,6 +916,9 @@ (LET ((|n| (CAR |bfVar#35|)) (|e| (CADR |bfVar#35|))) (|bpPush| (LIST (LIST 'DEFCONSTANT |n| |e|))))) + (|namespace| + (LET ((|n| (CAR |bfVar#35|))) + (|bpPush| (LIST (LIST 'IN-PACKAGE (STRING |n|)))))) (T (|bpPush| (LIST (|translateToplevelExpression| |b|)))))))))))) (DEFUN |shoeAddbootIfNec| (|s|) (|shoeAddStringIfNec| ".boot" |s|)) |