diff --git a/extra/peg/ebnf/ebnf.factor b/extra/peg/ebnf/ebnf.factor
index 2f71ff961b..5061e9ee3c 100644
--- a/extra/peg/ebnf/ebnf.factor
+++ b/extra/peg/ebnf/ebnf.factor
@@ -108,11 +108,13 @@ DEFER: 'rhs'
   3array seq [ first2 <ebnf-rule> ] action ;
 
 : 'ebnf' ( -- parser )
-  'rule' sp ";" token sp hide list-of [ <ebnf> ] action ;
+  'rule' sp "." token sp hide list-of [ <ebnf> ] action ;
 
 : ebnf>quot ( string -- quot )
   'ebnf' parse [
      parse-result-ast ebnf-compile  
    ] [
     f
-   ] if* ;
\ No newline at end of file
+   ] if* ;
+
+: EBNF: ";" parse-tokens "" join ebnf>quot call ; parsing
\ No newline at end of file