Fixed infinite loop bug in parse-error
svn: r839
This commit is contained in:
parent
57e6e0c2b5
commit
6e6e54d411
|
@ -245,7 +245,7 @@
|
||||||
(parse-error
|
(parse-error
|
||||||
(format "~a is close to 'package' but is either miscapitalized or mispelled" (token-value tok))
|
(format "~a is close to 'package' but is either miscapitalized or mispelled" (token-value tok))
|
||||||
srt end)
|
srt end)
|
||||||
(parse-package pre cur-tok 'start getter)))
|
(parse-program pre cur-tok 'start getter)))
|
||||||
(else
|
(else
|
||||||
(parse-program pre cur-tok 'start getter))))
|
(parse-program pre cur-tok 'start getter))))
|
||||||
((semi-colon)
|
((semi-colon)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user