diff --git a/beautiful-racket-demo/basic-demo/lexer.rkt b/beautiful-racket-demo/basic-demo/lexer.rkt index 1983c2c..cb99d7d 100644 --- a/beautiful-racket-demo/basic-demo/lexer.rkt +++ b/beautiful-racket-demo/basic-demo/lexer.rkt @@ -6,9 +6,9 @@ (define basic-lexer (lexer-srcloc [(eof) (return-without-srcloc eof)] - [(from/stop-before "rem" "\n") (token 'REM lexeme)] ["\n" (token 'NEWLINE)] [whitespace (token lexeme #:skip? #t)] + [(from/stop-before "rem" "\n") (token 'REM lexeme)] [(:or "print" "goto" "end" "+" ":") lexeme] [digits (token 'INTEGER (string->number lexeme))] [(:or (:seq (:? digits) "." digits)