* match.c (counter_k): New keyword symbol variable.

(do_output_line): Process new :counter argument of rep.
(do_output): Ditto, for repeat.
(syms_init): Intern new keyword symbol.

* match.h (counter_k): Declared.

* parser.l (REPEAT, REP): Lexical syntax changed to
allow arguments.

* parser.y (repeat_rep_helper): Takes extra argument, representing
the repeat/rep args. This is inserted into the second position
of the output list.
(repeat_clause, rep_elem): Extract repeat/rep arguments and
pass to repeat_rep_helper.
(yybadtoken): Do not put quotes around the word "number".

* txr.1: Updated.

1 files changed, 1 insertions, 1 deletions

diff --git a/match.h b/match.h
index 55deef7a..bb69a030 100644
--- a/match.h
+++ b/match.h
@@ -24,7 +24,7 @@
  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  */
 
-extern val text_s, choose_s, gather_s, do_s, mod_s, modlast_s;
+extern val text_s, choose_s, gather_s, do_s, mod_s, modlast_s, counter_k;
 val format_field(val string_or_list, val modifier, val filter);
 val match_funcall(val name, val arg, val other_args);
 int extract(val spec, val filenames, val bindings);