diff options
Diffstat (limited to 'src/boot/strap/tokens.clisp')
| -rw-r--r-- | src/boot/strap/tokens.clisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/strap/tokens.clisp b/src/boot/strap/tokens.clisp index d498edb7..5549b7eb 100644 --- a/src/boot/strap/tokens.clisp +++ b/src/boot/strap/tokens.clisp @@ -160,7 +160,7 @@ (COND ((OR (ATOM |bfVar#6|) (PROGN (SETQ |i| (CAR |bfVar#6|)) NIL)) (RETURN NIL)) - (T (SETF (GET |i| 'SHOEPRE) 'T))) + (T (SETF (GET |i| 'SHOEPRE) T))) (SETQ |bfVar#6| (CDR |bfVar#6|))))) (EVAL-WHEN (:EXECUTE :LOAD-TOPLEVEL) |