Fix broken ebnf actions
parent
a4461ae408
commit
b51e4f642e
|
@ -83,7 +83,7 @@ M: ebnf-rule (generate-parser) ( ast -- id )
|
||||||
|
|
||||||
M: ebnf-action (generate-parser) ( ast -- id )
|
M: ebnf-action (generate-parser) ( ast -- id )
|
||||||
ebnf-action-word search 1quotation
|
ebnf-action-word search 1quotation
|
||||||
last-parser get swap action generate-parser ;
|
last-parser get get-parser swap action store-parser ;
|
||||||
|
|
||||||
M: vector (generate-parser) ( ast -- id )
|
M: vector (generate-parser) ( ast -- id )
|
||||||
[ generate-parser ] map peek ;
|
[ generate-parser ] map peek ;
|
||||||
|
|
Loading…
Reference in New Issue