tests/meta.g

   1 s         ::=  w* Grammar w*                  => "gram"
   2 Grammar   ::=  R+ => "grammar"
   3 R         ::=  word  ^"::=" Class+/gt
   4             |  word ^"!::=" Class+/gt
   5
   6 ec        ::=  [~\]\\\-\~] | escaped
   7
   8 Class     ::=  Rewrite +/ bar                 => "alternatives"
   9
  10 Rewrite   ::=  Rewritex
  11             |  Rewritex ^"&"  E+
  12             |  Rewritex ^"&~" E+
  13
  14 Rewritex  ::=  E+                             => "rewrite"
  15             |  E+ ^"=>" word
  16             |  E+ ^"=>" quoted
  17             |  E+  "=>" "()"                  => "wrap"
  18
  19 range    ::= ec => "range0" | ec ^"-" ec      => "range0"
  20 gt   !::= ">"
  21 bar  !::= "|"
  22 E        ::= word                             => "nonTerminalY"
  23            |    [(][)] => "epsilon"
  24            |    ^"{" Class+/gt "}"
  25            |     "[" [\~]?  range* "]"        => "range"
  26            |  E ^"*/" E
  27            |  E ^"+/" E
  28            |  E ^"?"
  29            |  E ^"~/~"
  30
  31            |  E ^"-"  E
  32
  33            |    ^"!" E
  34            |     "^" quoted => "care"
  35            |    ^"`" E
  36            |  E ^"#"
  37            |  quoted                        => "literal"
  38
  39            |  (E ^"**" > E ^"*")
  40            |  (E ^"++" > E ^"+")
  41
  42            |     "(" word ^")"
  43            >    ^"(" Class+/gt ")"
  44
  45 w       !::= " "
  46            | "//" [~\n]* "\n"
  47            | "\n"
  48            | "\r"
  49 an       ::= [a-zA-Z0-9_]
  50 word     ::= an++                           => "sify"
  51 quoted   ::= "\"" ([~\"\\] | escaped)* "\"" => "sify"
  52 escaped  ::= "\\n" => "\n"
  53            | "\\r" => "\r"
  54            | "\\" [~nr]