From e706f6444c20a089cad2bd3aeb207e9429221c1c Mon Sep 17 00:00:00 2001 From: haskal Date: Fri, 18 Dec 2020 00:43:38 -0500 Subject: [PATCH] day 18: minor cleanups --- 18.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/18.rkt b/18.rkt index fb5c433..ec97293 100644 --- a/18.rkt +++ b/18.rkt @@ -1,6 +1,6 @@ #lang curly-fn racket -(require "scripts/aoc.rkt" parser-tools/lex parser-tools/yacc (prefix-in : parser-tools/lex-sre)) +(require "scripts/aoc.rkt" parser-tools/lex parser-tools/yacc) ;; solution for day 18 @@ -14,7 +14,7 @@ ["*" (token-*)] ["(" (token-lp)] [")" (token-rp)] - [(:+ (char-set "0123456789")) (token-number (string->number lexeme))] + [numeric (token-number (string->number lexeme))] [(eof) (token-eof)])) (define-simple-macro (make-oo-parser/precs needed-precs ...)