Don't write Lisp symbol names in uppercase: use `...' instead.

[sod] / src / lexer-bits.lisp

diff --git a/src/lexer-bits.lisp b/src/lexer-bits.lisp
index daa533c..b671164 100644 (file)
--- a/src/lexer-bits.lisp
+++ b/src/lexer-bits.lisp
@@ -27,7 +27,7 @@
         ;; Pick out comments.
         ((peek (and #\/ #\*))
          (parse (skip-many ()          ; this may fail at eof; don't worry
-                  (and (skip-many () (not #\*))
+                  (and (skip-many () (not #\*))
                        (skip-many (:min 1) #\*))
                   (not #\/)))
          (if-parse :eof ()