author | Alan Dipert
<alan@dipert.org> 2020-02-03 19:49:01 UTC |
committer | Alan Dipert
<alan@dipert.org> 2020-02-03 19:49:01 UTC |
parent | 7caf79506add167ea95540a6b0fa35528cf65d21 |
boot.lisp | +1 | -1 |
diff --git a/boot.lisp b/boot.lisp index 6e6a5d8..0461dfb 100644 --- a/boot.lisp +++ b/boot.lisp @@ -148,7 +148,7 @@ ((numberp x) (jacl:%new (jacl:%js "LispSymbol") (jacl:%js "'G'+~{}.toString()" x))) - ((not x) + ((not x?) (let ((sym (jacl:%new (jacl:%js "LispSymbol") (jacl:%js "'G'+~{}.toString()" *gensym-counter*)))) (set '*gensym-counter* (1+ *gensym-counter*))