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, 10 insertions, 9 deletions

diff --git a/txr.vim b/txr.vim
index ef1ab970..1f3bbb26 100644
--- a/txr.vim
+++ b/txr.vim
@@ -23,15 +23,16 @@ syn keyword txr_keyword contained accept all and assert
 syn keyword txr_keyword contained bind block cases cat
 syn keyword txr_keyword contained catch choose close coll
 syn keyword txr_keyword contained collect defex deffilter define
-syn keyword txr_keyword contained do end eof eol
-syn keyword txr_keyword contained fail filter finally flatten
-syn keyword txr_keyword contained forget freeform fuzz gather
-syn keyword txr_keyword contained last load local maybe
-syn keyword txr_keyword contained merge next none or
-syn keyword txr_keyword contained output rebind rep repeat
-syn keyword txr_keyword contained require set skip some
-syn keyword txr_keyword contained text throw trailer try
-syn keyword txr_keyword contained until var
+syn keyword txr_keyword contained do elif else end
+syn keyword txr_keyword contained eof eol fail filter
+syn keyword txr_keyword contained finally flatten forget freeform
+syn keyword txr_keyword contained fuzz gather if last
+syn keyword txr_keyword contained load local maybe merge
+syn keyword txr_keyword contained next none or output
+syn keyword txr_keyword contained rebind rep repeat require
+syn keyword txr_keyword contained set skip some text
+syn keyword txr_keyword contained throw trailer try until
+syn keyword txr_keyword contained var
 
 syn keyword txl_keyword contained * *args* *full-args* *gensym-counter*
 syn keyword txl_keyword contained *keyword-package* *random-state* *self-path* *stddebug*