*** empty log message ***

original commit: 80e5fedf010e37f818a72dc2a2a52464dbbcb399
23 years ago · 31dfbc14ab
parent a617a3f620
commit 31dfbc14ab
1 changed files with 2 additions and 2 deletions
--- 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