*** empty log message ***

original commit: cfa5a469e75af389ba29a18f47e3301555468d2b
tokens
Scott Owens 22 years ago
parent c15b3d72cc
commit 6d940aeba0

@ -45,7 +45,9 @@
(define (parse-grammar enter-term enter-empty-term enter-non-term) (define (parse-grammar enter-term enter-empty-term enter-non-term)
(parser (parser
(tokens x y) (tokens x y)
(error error) (error (lambda (tok-ok tok-name tok-value)
(error "Error parsing yacc grammar at token: tok-name with value: tok-value" 'parse-grammar)))
(end |%%|) (end |%%|)
(start gram) (start gram)
(grammar (grammar

Loading…
Cancel
Save