diff --git a/beautiful-racket-demo/precalc-demo/main.rkt b/beautiful-racket-demo/precalc-demo/main.rkt
index 70d43df..67c9c48 100644
--- a/beautiful-racket-demo/precalc-demo/main.rkt
+++ b/beautiful-racket-demo/precalc-demo/main.rkt
@@ -16,7 +16,7 @@
    [(:or (from/stop-before "#" "\n")
          (from/to "/*" "*/")) (token 'COMMENT #:skip? #t)]
    [reserved-toks lexeme]
-   [(:seq (:? "-") (:+ digits)) (token 'INT (string->number lexeme))]
+   [(:+ digits) (token 'INT (string->number lexeme))]
    [(:+ alphabetic) (token 'ID (string->symbol lexeme))]))
 
 (define-macro top #'#%module-begin)