Implementing @(if)/@(elif)/@(else) in the pattern language.

Input side for now; output later.

* parser.y (if_clause, elif_clauses_opt, else_clause_opt): New nonterminals.
(IF, ELIF, ELSE): New tokens.
(yybadtoken): Handle IF, ELIF, ELSE.

* parser.l: Recognize and return new tokens IF, ELIF and ELSE.

* txr.1: Documented.

* genvim.txr: Updated with if, elsif and else directive keywords.

* txr.vim: Regenerated

1 files changed, 2 insertions, 1 deletions

diff --git a/genvim.txr b/genvim.txr
index c134884e..1fabcb91 100644
--- a/genvim.txr
+++ b/genvim.txr
@@ -41,7 +41,8 @@ static void dir_tables_init(void)
        [sort (hash-values hash) string-lt])))
 @(do (set [txr-sym 0..0] '("rep" "end" "and" "or"
                            "catch" "finally"
-                           "until" "last")))
+                           "until" "last"
+                           "if" "else" "elif")))
 @(do (set [txl-sym 0..0] '("macro-time" "macrolet" "symacrolet")))
 @(set (txr-sym txl-sym) (@(sortuniq txr-sym) @(sortuniq txl-sym)))
 @(output)