projects
/
sbp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
f491592
)
checkpoint
author
adam
<adam@megacz.com>
Tue, 13 Dec 2005 07:27:06 +0000
(
02:27
-0500)
committer
adam
<adam@megacz.com>
Tue, 13 Dec 2005 07:27:06 +0000
(
02:27
-0500)
darcs-hash:
20051213072706
-5007d-
e01306ebfe23ffd63b21eef74cc8886b0e93b715
.gz
tests/meta.g
patch
|
blob
|
history
diff --git
a/tests/meta.g
b/tests/meta.g
index
138ec62
..
55bc02a
100644
(file)
--- a/
tests/meta.g
+++ b/
tests/meta.g
@@
-10,8
+10,8
@@
alternatives ::= equiAlt +/ (ws ">" ws)
equiAlt ::= conjuncts +/ (ws "|" ws) => "alternatives"
sequence ::= Es
equiAlt ::= conjuncts +/ (ws "|" ws) => "alternatives"
sequence ::= Es
- > Es ^"/" E /ws
-Es ::= E+
+ > Es ^"/" e /ws
+Es ::= e+
//es ::= E+/ws
conjuncts ::= rewrite
//es ::= E+/ws
conjuncts ::= rewrite
@@
-24,28
+24,28
@@
rewrite ::= sequence /ws => "rewrite"
| sequence "=>" "()" /ws => "wrap"
range ::= ec => "range0" | ec ^"-" ec => "range0"
| sequence "=>" "()" /ws => "wrap"
range ::= ec => "range0" | ec ^"-" ec => "range0"
-E ::= word => "nonTerminalY"
+e ::= word => "nonTerminalY"
| [(][)] => "epsilon"
| [(][)] => "epsilon"
- | ^"{" alternatives "}"
+ | ^"{" alternatives "}" /ws
| "[" [\~]? range* "]" => "range"
| "[" [\~]? range* "]" => "range"
- | E ^"*/" E
- | E ^"+/" E
- | E ^"?"
- | E ^"~/~"
+ | e ^"*/" e /ws
+ | e ^"+/" e /ws
+ | e ^"?" /ws
+ | e ^"~/~" /ws
- | E ^"-" E
+ | e ^"-" e /ws
- | ^"!" E
- | "^" quoted => "care"
- | ^"`" E
- | E ^"#"
+ | ^"!" e /ws
+ | "^" quoted /ws => "care"
+ | ^"`" e /ws
+ | e ^"#" /ws
| quoted => "literal"
| quoted => "literal"
- | (E ^"**" > E ^"*")
- | (E ^"++" > E ^"+")
+ | (e ws ^"**" > e ws ^"*")
+ | (e ws ^"++" > e ws ^"+")
- | "(" word ^")"
- > ^"(" alternatives ")"
+ | "(" word ^")" /ws
+ > ^"(" alternatives ")" /ws
w !::= " "
| "//" [~\n]* "\n"
w !::= " "
| "//" [~\n]* "\n"