add ellipses to metagrammar

darcs-hash:20070420032332-5007d-32ceba42e8e49c54ec481e0482707a293d650c25.gz

diff --git a/tests/meta.g b/tests/meta.g
index ac72619..b7dc2b8 100644 (file)
--- a/tests/meta.g
+++ b/tests/meta.g
@@ -1,4 +1,4 @@
- //funkanomitron
+//funkanomitron
 s             = ws Grammar ws
 
 Grammar::     = Declaration +/ ws
@@ -45,13 +45,15 @@ e             =                                   e ^"!"
               |                e ^"*/"  e                /ws        
               |                e ^"?"                    /ws
               |                  ^"^"   Quoted
+              |                  ^"`"   e
+              |                  ^"..."
               |                   "(" Word  ^")"
               >                  ^"(" RHS  ")"           /ws
               |                  ^"~" e
               |                  ^"\\{"
               |                  ^"\\}"
 
-Word::        = [.a-zA-Z0-9_]++
+Word::        = [.a-zA-Z0-9_]++ &~ "."+
 Quoted::      = "\"" (~[\"\\] | escaped)+ "\""
               | "\"\""