X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/dea4d05507e59ab779ed4bb209e05971d87e260c..1f7d590d9c7b87442c8d8b6424ed4f769d377692:/src/lexer-bits.lisp diff --git a/src/lexer-bits.lisp b/src/lexer-bits.lisp index daa533c..b671164 100644 --- 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 ()