steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix PEG:

db4
Chris Double 2008-03-29 18:33:37 +13:00
parent 8105e66aec
commit ca4f775756
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/peg/peg.factor
View File

@ -572,7 +572,7 @@ PRIVATE>
: PEG: : PEG:
(:) [ (:) [
[ [
call compile 1quotation call compile [ compiled-parse ] curry
[ dup [ parse-result-ast ] [ "Parse failed" throw ] if ] [ dup [ parse-result-ast ] [ "Parse failed" throw ] if ]
append define append define
] with-compilation-unit ] with-compilation-unit