projects
/
sbp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
1981ad8
)
checkpoint
author
adam
<adam@megacz.com>
Tue, 13 Dec 2005 03:30:59 +0000
(22:30 -0500)
committer
adam
<adam@megacz.com>
Tue, 13 Dec 2005 03:30:59 +0000
(22:30 -0500)
darcs-hash:
20051213033059
-5007d-
671f80c4e608085ad7ca44a41d8aee4271592f77
.gz
tests/meta.g
patch
|
blob
|
history
diff --git
a/tests/meta.g
b/tests/meta.g
index
beda61b
..
4c02201
100644
(file)
--- a/
tests/meta.g
+++ b/
tests/meta.g
@@
-1,10
+1,11
@@
s ::= w* Grammar w* => "gram"
Grammar ::= R+ => "grammar"
s ::= w* Grammar w* => "gram"
Grammar ::= R+ => "grammar"
-R ::= word ^"::=" Class+/">"
- | word ^"!::=" Class+/">"
+R ::= word ^"::=" Sequence
+ | word ^"!::=" Sequence
ec ::= [~\]\\\-\~] | escaped
ec ::= [~\]\\\-\~] | escaped
+Sequence ::= Class +/ ">"
Class ::= Rewrite +/ "|" => "alternatives"
Rewrite ::= Rewritex
Class ::= Rewrite +/ "|" => "alternatives"
Rewrite ::= Rewritex
@@
-19,7
+20,7
@@
Rewritex ::= E+ => "rewrite"
range ::= ec => "range0" | ec ^"-" ec => "range0"
E ::= word => "nonTerminalY"
| [(][)] => "epsilon"
range ::= ec => "range0" | ec ^"-" ec => "range0"
E ::= word => "nonTerminalY"
| [(][)] => "epsilon"
- | ^"{" Class+/">" "}"
+ | ^"{" Sequence "}"
| "[" [\~]? range* "]" => "range"
| E ^"*/" E
| E ^"+/" E
| "[" [\~]? range* "]" => "range"
| E ^"*/" E
| E ^"+/" E
@@
-38,7
+39,7
@@
E ::= word => "nonTerminalY"
| (E ^"++" > E ^"+")
| "(" word ^")"
| (E ^"++" > E ^"+")
| "(" word ^")"
- > ^"(" Class+/">" ")"
+ > ^"(" Sequence ")"
w !::= " "
| "//" [~\n]* "\n"
w !::= " "
| "//" [~\n]* "\n"