Fix again

db4
Slava Pestov 2008-06-18 01:18:39 -05:00
parent 83099e01d4
commit e55c674a2b
1 changed files with 2 additions and 2 deletions

View File

@ -571,10 +571,10 @@ M: parse-failed error.
: PEG:
(:)
[let | word [ ] def [ ] |
[let | def [ ] word [ ] |
[
[
[let | compiled-def [ def call compile ]
[let | compiled-def [ def call compile ] |
[
dup compiled-def compiled-parse
[ ast>> ] [ word parse-failed ] ?if