From 31dfbc14ab67bcc4944bc07eab1dcece60a8e977 Mon Sep 17 00:00:00 2001 From: Scott Owens Date: Tue, 20 Aug 2002 17:46:09 +0000 Subject: [PATCH] *** empty log message *** original commit: 80e5fedf010e37f818a72dc2a2a52464dbbcb399 --- collects/parser-tools/private-yacc/table.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/parser-tools/private-yacc/table.ss b/collects/parser-tools/private-yacc/table.ss index 9e85688..58b615e 100644 --- a/collects/parser-tools/private-yacc/table.ss +++ b/collects/parser-tools/private-yacc/table.ss @@ -142,8 +142,8 @@ (loop (car rest) (cdr rest))) ((accept? (car rest)) (fprintf (current-error-port) - "accept/reduce or accept/shift conflicts. Check the grammar for useless cycles of productions~n")) - (loop current-guess (cdr rest)) + "accept/reduce or accept/shift conflicts. Check the grammar for useless cycles of productions~n") + (loop current-guess (cdr rest))) (else (loop current-guess (cdr rest)))))) (else entry))))) (send a for-each-state