Merge branch 'gawk-4.0-stable'. Automake and bison.

1 files changed, 191 insertions, 188 deletions

diff --git a/awkgram.c b/awkgram.c
index d1f18376..e7f1e798 100644
--- a/awkgram.c
+++ b/awkgram.c
@@ -1,4 +1,4 @@
-/* A Bison parser, made by GNU Bison 2.6.5.  */
+/* A Bison parser, made by GNU Bison 2.7.  */
 
 /* Bison implementation for Yacc-like parsers in C
    
@@ -44,7 +44,7 @@
 #define YYBISON 1
 
 /* Bison version.  */
-#define YYBISON_VERSION "2.6.5"
+#define YYBISON_VERSION "2.7"
 
 /* Skeleton name.  */
 #define YYSKELETON_NAME "yacc.c"
@@ -62,7 +62,7 @@
 
 
 /* Copy the first part of user declarations.  */
-/* Line 360 of yacc.c  */
+/* Line 371 of yacc.c  */
 #line 26 "awkgram.y"
 
 #ifdef GAWKDEBUG
@@ -195,7 +195,7 @@ extern double fmod(double x, double y);
 
 #define is_identchar(c)		(isalnum(c) || (c) == '_')
 
-/* Line 360 of yacc.c  */
+/* Line 371 of yacc.c  */
 #line 200 "awkgram.c"
 
 # ifndef YY_NULL
@@ -364,7 +364,7 @@ int yyparse ();
 
 /* Copy the second part of user declarations.  */
 
-/* Line 379 of yacc.c  */
+/* Line 390 of yacc.c  */
 #line 369 "awkgram.c"
 
 #ifdef short
@@ -1361,7 +1361,7 @@ yy_symbol_value_print (yyoutput, yytype, yyvaluep)
   switch (yytype)
     {
       default:
-	break;
+        break;
     }
 }
 
@@ -1598,7 +1598,6 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg,
 {
   YYSIZE_T yysize0 = yytnamerr (YY_NULL, yytname[yytoken]);
   YYSIZE_T yysize = yysize0;
-  YYSIZE_T yysize1;
   enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 };
   /* Internationalized format string. */
   const char *yyformat = YY_NULL;
@@ -1661,11 +1660,13 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg,
                     break;
                   }
                 yyarg[yycount++] = yytname[yyx];
-                yysize1 = yysize + yytnamerr (YY_NULL, yytname[yyx]);
-                if (! (yysize <= yysize1
-                       && yysize1 <= YYSTACK_ALLOC_MAXIMUM))
-                  return 2;
-                yysize = yysize1;
+                {
+                  YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULL, yytname[yyx]);
+                  if (! (yysize <= yysize1
+                         && yysize1 <= YYSTACK_ALLOC_MAXIMUM))
+                    return 2;
+                  yysize = yysize1;
+                }
               }
         }
     }
@@ -1685,10 +1686,12 @@ yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg,
 # undef YYCASE_
     }
 
-  yysize1 = yysize + yystrlen (yyformat);
-  if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM))
-    return 2;
-  yysize = yysize1;
+  {
+    YYSIZE_T yysize1 = yysize + yystrlen (yyformat);
+    if (! (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM))
+      return 2;
+    yysize = yysize1;
+  }
 
   if (*yymsg_alloc < yysize)
     {
@@ -1747,7 +1750,7 @@ yydestruct (yymsg, yytype, yyvaluep)
     {
 
       default:
-	break;
+        break;
     }
 }
 
@@ -2030,7 +2033,7 @@ yyreduce:
   switch (yyn)
     {
         case 3:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 200 "awkgram.y"
     {
 		rule = 0;
@@ -2039,7 +2042,7 @@ yyreduce:
     break;
 
   case 5:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 206 "awkgram.y"
     {
 		next_sourcefile();
@@ -2049,7 +2052,7 @@ yyreduce:
     break;
 
   case 6:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 212 "awkgram.y"
     {
 		rule = 0;
@@ -2062,7 +2065,7 @@ yyreduce:
     break;
 
   case 7:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 224 "awkgram.y"
     {
 		(void) append_rule((yyvsp[(1) - (2)]), (yyvsp[(2) - (2)]));
@@ -2070,7 +2073,7 @@ yyreduce:
     break;
 
   case 8:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 228 "awkgram.y"
     {
 		if (rule != Rule) {
@@ -2085,7 +2088,7 @@ yyreduce:
     break;
 
   case 9:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 239 "awkgram.y"
     {
 		in_function = NULL;
@@ -2095,7 +2098,7 @@ yyreduce:
     break;
 
   case 10:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 245 "awkgram.y"
     {
 		want_source = false;
@@ -2104,7 +2107,7 @@ yyreduce:
     break;
 
   case 11:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 250 "awkgram.y"
     {
 		want_source = false;
@@ -2113,7 +2116,7 @@ yyreduce:
     break;
 
   case 12:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 258 "awkgram.y"
     {
 		if (include_source((yyvsp[(1) - (1)])) < 0)
@@ -2125,19 +2128,19 @@ yyreduce:
     break;
 
   case 13:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 266 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 14:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 268 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 15:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 273 "awkgram.y"
     {
 		if (load_library((yyvsp[(1) - (1)])) < 0)
@@ -2149,31 +2152,31 @@ yyreduce:
     break;
 
   case 16:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 281 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 17:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 283 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 18:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 288 "awkgram.y"
     {	(yyval) = NULL; rule = Rule; }
     break;
 
   case 19:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 290 "awkgram.y"
     {	(yyval) = (yyvsp[(1) - (1)]); rule = Rule; }
     break;
 
   case 20:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 292 "awkgram.y"
     {
 		INSTRUCTION *tp;
@@ -2203,7 +2206,7 @@ yyreduce:
     break;
 
   case 21:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 318 "awkgram.y"
     {
 		static int begin_seen = 0;
@@ -2218,7 +2221,7 @@ yyreduce:
     break;
 
   case 22:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 329 "awkgram.y"
     {
 		static int end_seen = 0;
@@ -2233,7 +2236,7 @@ yyreduce:
     break;
 
   case 23:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 340 "awkgram.y"
     {
 		(yyvsp[(1) - (1)])->in_rule = rule = BEGINFILE;
@@ -2243,7 +2246,7 @@ yyreduce:
     break;
 
   case 24:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 346 "awkgram.y"
     {
 		(yyvsp[(1) - (1)])->in_rule = rule = ENDFILE;
@@ -2253,7 +2256,7 @@ yyreduce:
     break;
 
   case 25:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 355 "awkgram.y"
     {
 		if ((yyvsp[(2) - (5)]) == NULL)
@@ -2264,19 +2267,19 @@ yyreduce:
     break;
 
   case 26:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 365 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 27:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 367 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 28:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 369 "awkgram.y"
     {
 		yyerror(_("`%s' is a built-in function, it cannot be redefined"),
@@ -2286,13 +2289,13 @@ yyreduce:
     break;
 
   case 29:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 375 "awkgram.y"
     { (yyval) = (yyvsp[(2) - (2)]); }
     break;
 
   case 32:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 385 "awkgram.y"
     {
 		(yyvsp[(1) - (6)])->source_file = source;
@@ -2307,13 +2310,13 @@ yyreduce:
     break;
 
   case 33:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 403 "awkgram.y"
     { want_regexp = true; }
     break;
 
   case 34:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 405 "awkgram.y"
     {
 		  NODE *n, *exp;
@@ -2346,19 +2349,19 @@ yyreduce:
     break;
 
   case 35:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 437 "awkgram.y"
     { bcfree((yyvsp[(1) - (1)])); }
     break;
 
   case 37:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 443 "awkgram.y"
     {	(yyval) = NULL; }
     break;
 
   case 38:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 445 "awkgram.y"
     {
 		if ((yyvsp[(2) - (2)]) == NULL)
@@ -2375,25 +2378,25 @@ yyreduce:
     break;
 
   case 39:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 458 "awkgram.y"
     {	(yyval) = NULL; }
     break;
 
   case 42:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 468 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 43:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 470 "awkgram.y"
     { (yyval) = (yyvsp[(2) - (3)]); }
     break;
 
   case 44:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 472 "awkgram.y"
     {
 		if (do_pretty_print)
@@ -2404,7 +2407,7 @@ yyreduce:
     break;
 
   case 45:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 479 "awkgram.y"
     {
 		INSTRUCTION *dflt, *curr = NULL, *cexp, *cstmt;
@@ -2498,7 +2501,7 @@ yyreduce:
     break;
 
   case 46:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 569 "awkgram.y"
     { 
 		/*
@@ -2544,7 +2547,7 @@ yyreduce:
     break;
 
   case 47:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 611 "awkgram.y"
     {
 		/*
@@ -2590,7 +2593,7 @@ yyreduce:
     break;
 
   case 48:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 653 "awkgram.y"
     {
 		INSTRUCTION *ip;
@@ -2707,7 +2710,7 @@ regular_loop:
     break;
 
   case 49:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 766 "awkgram.y"
     {
 		(yyval) = mk_for_loop((yyvsp[(1) - (12)]), (yyvsp[(3) - (12)]), (yyvsp[(6) - (12)]), (yyvsp[(9) - (12)]), (yyvsp[(12) - (12)]));
@@ -2718,7 +2721,7 @@ regular_loop:
     break;
 
   case 50:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 773 "awkgram.y"
     {
 		(yyval) = mk_for_loop((yyvsp[(1) - (11)]), (yyvsp[(3) - (11)]), (INSTRUCTION *) NULL, (yyvsp[(8) - (11)]), (yyvsp[(11) - (11)]));
@@ -2729,7 +2732,7 @@ regular_loop:
     break;
 
   case 51:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 780 "awkgram.y"
     {
 		if (do_pretty_print)
@@ -2740,7 +2743,7 @@ regular_loop:
     break;
 
   case 52:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 790 "awkgram.y"
     { 
 		if (! break_allowed)
@@ -2753,7 +2756,7 @@ regular_loop:
     break;
 
   case 53:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 799 "awkgram.y"
     {
 		if (! continue_allowed)
@@ -2766,7 +2769,7 @@ regular_loop:
     break;
 
   case 54:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 808 "awkgram.y"
     {
 		/* if inside function (rule = 0), resolve context at run-time */
@@ -2779,7 +2782,7 @@ regular_loop:
     break;
 
   case 55:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 817 "awkgram.y"
     {
 		/* if inside function (rule = 0), resolve context at run-time */
@@ -2794,7 +2797,7 @@ regular_loop:
     break;
 
   case 56:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 828 "awkgram.y"
     {
 		/* Initialize the two possible jump targets, the actual target
@@ -2813,7 +2816,7 @@ regular_loop:
     break;
 
   case 57:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 843 "awkgram.y"
     {
 		if (! in_function)
@@ -2822,7 +2825,7 @@ regular_loop:
     break;
 
   case 58:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 846 "awkgram.y"
     {
 		if ((yyvsp[(3) - (4)]) == NULL) {
@@ -2847,13 +2850,13 @@ regular_loop:
     break;
 
   case 60:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 878 "awkgram.y"
     { in_print = true; in_parens = 0; }
     break;
 
   case 61:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 879 "awkgram.y"
     {
 		/*
@@ -2954,13 +2957,13 @@ regular_print:
     break;
 
   case 62:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 976 "awkgram.y"
     { sub_counter = 0; }
     break;
 
   case 63:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 977 "awkgram.y"
     {
 		char *arr = (yyvsp[(2) - (4)])->lextok;
@@ -2997,7 +3000,7 @@ regular_print:
     break;
 
   case 64:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1014 "awkgram.y"
     {
 		static bool warned = false;
@@ -3027,31 +3030,31 @@ regular_print:
     break;
 
   case 65:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1040 "awkgram.y"
     {	(yyval) = optimize_assignment((yyvsp[(1) - (1)])); }
     break;
 
   case 66:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1045 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 67:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1047 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 68:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1052 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 69:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1054 "awkgram.y"
     {
 		if ((yyvsp[(1) - (2)]) == NULL)
@@ -3062,13 +3065,13 @@ regular_print:
     break;
 
   case 70:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1061 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 71:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1066 "awkgram.y"
     {
 		INSTRUCTION *casestmt = (yyvsp[(5) - (5)]);
@@ -3084,7 +3087,7 @@ regular_print:
     break;
 
   case 72:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1078 "awkgram.y"
     {
 		INSTRUCTION *casestmt = (yyvsp[(4) - (4)]);
@@ -3099,13 +3102,13 @@ regular_print:
     break;
 
   case 73:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1092 "awkgram.y"
     {	(yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 74:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1094 "awkgram.y"
     { 
 		NODE *n = (yyvsp[(2) - (2)])->memory;
@@ -3117,7 +3120,7 @@ regular_print:
     break;
 
   case 75:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1102 "awkgram.y"
     {
 		bcfree((yyvsp[(1) - (2)]));
@@ -3126,13 +3129,13 @@ regular_print:
     break;
 
   case 76:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1107 "awkgram.y"
     {	(yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 77:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1109 "awkgram.y"
     {
 		(yyvsp[(1) - (1)])->opcode = Op_push_re;
@@ -3141,19 +3144,19 @@ regular_print:
     break;
 
   case 78:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1117 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 79:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1119 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 81:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1129 "awkgram.y"
     {
 		(yyval) = (yyvsp[(2) - (3)]);
@@ -3161,7 +3164,7 @@ regular_print:
     break;
 
   case 82:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1136 "awkgram.y"
     {
 		in_print = false;
@@ -3171,13 +3174,13 @@ regular_print:
     break;
 
   case 83:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1141 "awkgram.y"
     { in_print = false; in_parens = 0; }
     break;
 
   case 84:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1142 "awkgram.y"
     {
 		if ((yyvsp[(1) - (3)])->redir_type == redirect_twoway
@@ -3189,7 +3192,7 @@ regular_print:
     break;
 
   case 85:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1153 "awkgram.y"
     {
 		(yyval) = mk_condition((yyvsp[(3) - (6)]), (yyvsp[(1) - (6)]), (yyvsp[(6) - (6)]), NULL, NULL);
@@ -3197,7 +3200,7 @@ regular_print:
     break;
 
   case 86:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1158 "awkgram.y"
     {
 		(yyval) = mk_condition((yyvsp[(3) - (9)]), (yyvsp[(1) - (9)]), (yyvsp[(6) - (9)]), (yyvsp[(7) - (9)]), (yyvsp[(9) - (9)]));
@@ -3205,13 +3208,13 @@ regular_print:
     break;
 
   case 91:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1175 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 92:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1177 "awkgram.y"
     {
 		bcfree((yyvsp[(1) - (2)]));
@@ -3220,19 +3223,19 @@ regular_print:
     break;
 
   case 93:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1185 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 94:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1187 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]) ; }
     break;
 
   case 95:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1192 "awkgram.y"
     {
 		(yyvsp[(1) - (1)])->param_count = 0;
@@ -3241,7 +3244,7 @@ regular_print:
     break;
 
   case 96:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1197 "awkgram.y"
     {
 		(yyvsp[(3) - (3)])->param_count =  (yyvsp[(1) - (3)])->lasti->param_count + 1;
@@ -3251,55 +3254,55 @@ regular_print:
     break;
 
   case 97:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1203 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 98:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1205 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (2)]); }
     break;
 
   case 99:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1207 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (3)]); }
     break;
 
   case 100:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1213 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 101:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1215 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 102:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1220 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 103:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1222 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 104:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1227 "awkgram.y"
     {	(yyval) = mk_expression_list(NULL, (yyvsp[(1) - (1)])); }
     break;
 
   case 105:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1229 "awkgram.y"
     {
 		(yyval) = mk_expression_list((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]));
@@ -3308,31 +3311,31 @@ regular_print:
     break;
 
   case 106:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1234 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 107:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1236 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 108:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1238 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 109:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1240 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 110:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1246 "awkgram.y"
     {
 		if (do_lint && (yyvsp[(3) - (3)])->lasti->opcode == Op_match_rec)
@@ -3343,19 +3346,19 @@ regular_print:
     break;
 
   case 111:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1253 "awkgram.y"
     {	(yyval) = mk_boolean((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 112:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1255 "awkgram.y"
     {	(yyval) = mk_boolean((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 113:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1257 "awkgram.y"
     {
 		if ((yyvsp[(1) - (3)])->lasti->opcode == Op_match_rec)
@@ -3375,7 +3378,7 @@ regular_print:
     break;
 
   case 114:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1273 "awkgram.y"
     {
 		if (do_lint_old)
@@ -3389,7 +3392,7 @@ regular_print:
     break;
 
   case 115:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1283 "awkgram.y"
     {
 		if (do_lint && (yyvsp[(3) - (3)])->lasti->opcode == Op_match_rec)
@@ -3400,31 +3403,31 @@ regular_print:
     break;
 
   case 116:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1290 "awkgram.y"
     { (yyval) = mk_condition((yyvsp[(1) - (5)]), (yyvsp[(2) - (5)]), (yyvsp[(3) - (5)]), (yyvsp[(4) - (5)]), (yyvsp[(5) - (5)])); }
     break;
 
   case 117:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1292 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 118:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1297 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 119:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1299 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 120:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1301 "awkgram.y"
     {	
 		(yyvsp[(2) - (2)])->opcode = Op_assign_quotient;
@@ -3433,43 +3436,43 @@ regular_print:
     break;
 
   case 121:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1309 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 122:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1311 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 123:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1316 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 124:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1318 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 125:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1323 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 126:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1325 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 127:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1327 "awkgram.y"
     {
 		int count = 2;
@@ -3520,43 +3523,43 @@ regular_print:
     break;
 
   case 129:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1379 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 130:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1381 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 131:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1383 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 132:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1385 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 133:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1387 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 134:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1389 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 135:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1391 "awkgram.y"
     {
 		/*
@@ -3583,7 +3586,7 @@ regular_print:
     break;
 
   case 136:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1414 "awkgram.y"
     {
 		(yyvsp[(2) - (2)])->opcode = Op_postincrement;
@@ -3592,7 +3595,7 @@ regular_print:
     break;
 
   case 137:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1419 "awkgram.y"
     {
 		(yyvsp[(2) - (2)])->opcode = Op_postdecrement;
@@ -3601,7 +3604,7 @@ regular_print:
     break;
 
   case 138:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1424 "awkgram.y"
     {
 		if (do_lint_old) {
@@ -3625,7 +3628,7 @@ regular_print:
     break;
 
   case 139:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1449 "awkgram.y"
     {
 		  (yyval) = mk_getline((yyvsp[(3) - (4)]), (yyvsp[(4) - (4)]), (yyvsp[(1) - (4)]), (yyvsp[(2) - (4)])->redir_type);
@@ -3634,43 +3637,43 @@ regular_print:
     break;
 
   case 140:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1455 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 141:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1457 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 142:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1459 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 143:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1461 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 144:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1463 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 145:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1465 "awkgram.y"
     { (yyval) = mk_binary((yyvsp[(1) - (3)]), (yyvsp[(3) - (3)]), (yyvsp[(2) - (3)])); }
     break;
 
   case 146:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1470 "awkgram.y"
     {
 		(yyval) = list_create((yyvsp[(1) - (1)]));
@@ -3678,7 +3681,7 @@ regular_print:
     break;
 
   case 147:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1474 "awkgram.y"
     {
 		if ((yyvsp[(2) - (2)])->opcode == Op_match_rec) {
@@ -3714,13 +3717,13 @@ regular_print:
     break;
 
   case 148:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1506 "awkgram.y"
     { (yyval) = (yyvsp[(2) - (3)]); }
     break;
 
   case 149:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1508 "awkgram.y"
     {
 		(yyval) = snode((yyvsp[(3) - (4)]), (yyvsp[(1) - (4)]));
@@ -3730,7 +3733,7 @@ regular_print:
     break;
 
   case 150:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1514 "awkgram.y"
     {
 		(yyval) = snode((yyvsp[(3) - (4)]), (yyvsp[(1) - (4)]));
@@ -3740,7 +3743,7 @@ regular_print:
     break;
 
   case 151:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1520 "awkgram.y"
     {
 		static bool warned = false;
@@ -3757,7 +3760,7 @@ regular_print:
     break;
 
   case 154:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1535 "awkgram.y"
     {
 		(yyvsp[(1) - (2)])->opcode = Op_preincrement;
@@ -3766,7 +3769,7 @@ regular_print:
     break;
 
   case 155:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1540 "awkgram.y"
     {
 		(yyvsp[(1) - (2)])->opcode = Op_predecrement;
@@ -3775,7 +3778,7 @@ regular_print:
     break;
 
   case 156:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1545 "awkgram.y"
     {
 		(yyval) = list_create((yyvsp[(1) - (1)]));
@@ -3783,7 +3786,7 @@ regular_print:
     break;
 
   case 157:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1549 "awkgram.y"
     {
 		(yyval) = list_create((yyvsp[(1) - (1)]));
@@ -3791,7 +3794,7 @@ regular_print:
     break;
 
   case 158:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1553 "awkgram.y"
     {
 		if ((yyvsp[(2) - (2)])->lasti->opcode == Op_push_i
@@ -3810,7 +3813,7 @@ regular_print:
     break;
 
   case 159:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1568 "awkgram.y"
     {
 	    /*
@@ -3824,7 +3827,7 @@ regular_print:
     break;
 
   case 160:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1581 "awkgram.y"
     {
 		func_use((yyvsp[(1) - (1)])->lasti->func_name, FUNC_USE);
@@ -3833,7 +3836,7 @@ regular_print:
     break;
 
   case 161:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1586 "awkgram.y"
     {
 		/* indirect function call */
@@ -3870,7 +3873,7 @@ regular_print:
     break;
 
   case 162:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1622 "awkgram.y"
     {
 		param_sanity((yyvsp[(3) - (4)]));
@@ -3888,37 +3891,37 @@ regular_print:
     break;
 
   case 163:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1639 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 164:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1641 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 165:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1646 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 166:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1648 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (2)]); }
     break;
 
   case 167:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1653 "awkgram.y"
     {	(yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 168:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1655 "awkgram.y"
     {
 		(yyval) = list_merge((yyvsp[(1) - (2)]), (yyvsp[(2) - (2)]));
@@ -3926,7 +3929,7 @@ regular_print:
     break;
 
   case 169:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1662 "awkgram.y"
     {
 		INSTRUCTION *ip = (yyvsp[(1) - (1)])->lasti; 
@@ -3944,7 +3947,7 @@ regular_print:
     break;
 
   case 170:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1679 "awkgram.y"
     {
 		INSTRUCTION *t = (yyvsp[(2) - (3)]);
@@ -3962,13 +3965,13 @@ regular_print:
     break;
 
   case 171:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1696 "awkgram.y"
     {	(yyval) = (yyvsp[(1) - (1)]); }
     break;
 
   case 172:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1698 "awkgram.y"
     {
 		(yyval) = list_merge((yyvsp[(1) - (2)]), (yyvsp[(2) - (2)]));
@@ -3976,13 +3979,13 @@ regular_print:
     break;
 
   case 173:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1705 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (2)]); }
     break;
 
   case 174:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1710 "awkgram.y"
     {
 		char *var_name = (yyvsp[(1) - (1)])->lextok;
@@ -3994,7 +3997,7 @@ regular_print:
     break;
 
   case 175:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1718 "awkgram.y"
     {
 		char *arr = (yyvsp[(1) - (2)])->lextok;
@@ -4005,7 +4008,7 @@ regular_print:
     break;
 
   case 176:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1728 "awkgram.y"
     {
 		INSTRUCTION *ip = (yyvsp[(1) - (1)])->nexti;
@@ -4021,7 +4024,7 @@ regular_print:
     break;
 
   case 177:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1740 "awkgram.y"
     {
 		(yyval) = list_append((yyvsp[(2) - (3)]), (yyvsp[(1) - (3)]));
@@ -4031,7 +4034,7 @@ regular_print:
     break;
 
   case 178:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1749 "awkgram.y"
     {
 		(yyvsp[(1) - (1)])->opcode = Op_postincrement;
@@ -4039,7 +4042,7 @@ regular_print:
     break;
 
   case 179:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1753 "awkgram.y"
     {
 		(yyvsp[(1) - (1)])->opcode = Op_postdecrement;
@@ -4047,44 +4050,44 @@ regular_print:
     break;
 
   case 180:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1756 "awkgram.y"
     { (yyval) = NULL; }
     break;
 
   case 182:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1764 "awkgram.y"
     { yyerrok; }
     break;
 
   case 183:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1768 "awkgram.y"
     { yyerrok; }
     break;
 
   case 186:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1777 "awkgram.y"
     { yyerrok; }
     break;
 
   case 187:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1781 "awkgram.y"
     { (yyval) = (yyvsp[(1) - (1)]); yyerrok; }
     break;
 
   case 188:
-/* Line 1778 of yacc.c  */
+/* Line 1792 of yacc.c  */
 #line 1785 "awkgram.y"
     { yyerrok; }
     break;
 
 
-/* Line 1778 of yacc.c  */
-#line 4100 "awkgram.c"
+/* Line 1792 of yacc.c  */
+#line 4103 "awkgram.c"
       default: break;
     }
   /* User semantic actions sometimes alter yychar, and that requires
@@ -4315,7 +4318,7 @@ yyreturn:
 }
 
 
-/* Line 2041 of yacc.c  */
+/* Line 2055 of yacc.c  */
 #line 1787 "awkgram.y"