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

Add seq* and choice* to peg

db4
Chris Double 2008-02-14 10:39:37 +13:00
parent 5e695ea4c3
commit 8542dc5812
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extra/peg/peg.factor
View File

@ -306,9 +306,15 @@ MEMO: range ( min max -- parser )
: seq ( seq -- parser )
seq-parser construct-boa init-parser ;
: seq* ( quot -- paser )
{ } make seq ; inline
: choice ( seq -- parser )
choice-parser construct-boa init-parser ;
: choice* ( quot -- paser )
{ } make choice ; inline
MEMO: repeat0 ( parser -- parser )
repeat0-parser construct-boa init-parser ;