diff --git a/extra/peg/ebnf/ebnf.factor b/extra/peg/ebnf/ebnf.factor index 6812aefee0..3d48665c8c 100644 --- a/extra/peg/ebnf/ebnf.factor +++ b/extra/peg/ebnf/ebnf.factor @@ -23,7 +23,7 @@ TUPLE: tokenizer any one many ; : parser-tokenizer ( parser -- tokenizer ) [ 1quotation ] keep - [ swap [ = ] curry semantic ] curry dup tokenizer boa ; + [ swap [ = ] curry semantic ] curry dup \ tokenizer boa ; : rule-tokenizer ( name word -- tokenizer ) rule parser-tokenizer ;