*** empty log message ***

[m17n/m17n-lib-cs.git] / xex.txt

diff --git a/xex.txt b/xex.txt
index 5670662..376ef8c 100644 (file)
--- a/xex.txt
+++ b/xex.txt
@@ -4,13 +4,13 @@ EXPR =
 TERM = [ INT | STRING | SYMBOL | LIST | ERROR | VARREF | FUNCALL ]
 
 DEFUN =
-  '<defun fname="' FNAME ? ">'
+  '<defun fname="' FNAME '">'
   ARGS ?
   TERM *
   '</defun>'
 
 DEFMACRO =
-  '<defmacro fname="' FNAME ? ">'
+  '<defmacro fname="' FNAME '">'
   ARGS ?
   TERM *
   '</defmacro>'
@@ -230,7 +230,7 @@ WHEN = '<when>' TERM TERM * '</when>'
 COND = '<cond>' LIST + '</cond>'
 LOOP = '<loop>' TERM + '</loop>'
 WHILE = '<while>' TERM + '</while>'
-FOREACH = '<foreach vname="' VNAME '">' TERM + '</foreach>'
+FOREACH = '<foreach vname="' VNAME '">' [STRTERM | LISTTERM] TERM + '</foreach>'
 BREAK = '<break>' TERM ? '</break>'
 RETURN = '<return>' TERM ? '</return>'
 QUOTE = '<quote>' TERM '</quote>'