gawk-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[SCM] gawk branch, gawk-5.1-stable, updated. gawk-4.1.0-3987-gdff45ab


From: Arnold Robbins
Subject: [SCM] gawk branch, gawk-5.1-stable, updated. gawk-4.1.0-3987-gdff45ab
Date: Wed, 10 Jun 2020 02:58:26 -0400 (EDT)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "gawk".

The branch, gawk-5.1-stable has been updated
       via  dff45aba93a56a50d5ad26c5ef1597abc1e2fe79 (commit)
       via  39ab90b6e780e922b49ebe3b83147291bf65fb8c (commit)
      from  23db0769e868c8389aa377a6f9149a014178cafd (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
http://git.sv.gnu.org/cgit/gawk.git/commit/?id=dff45aba93a56a50d5ad26c5ef1597abc1e2fe79

commit dff45aba93a56a50d5ad26c5ef1597abc1e2fe79
Author: Arnold D. Robbins <arnold@skeeve.com>
Date:   Wed Jun 10 09:57:50 2020 +0300

    Improve doc on limits, increase limit on size of a token.

diff --git a/ChangeLog b/ChangeLog
index b8b5311..8e1930d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -7,6 +7,11 @@
        (exec_count): Is now ldl.
        * profile.c (pprint): Fix printf of exec_count.
 
+2020-06-09         Arnold D. Robbins     <arnold@skeeve.com>
+
+       * awkgram.y (tokexpand): Use size_t instead of int for size of
+       buffer.
+
 2020-06-08         Arnold D. Robbins     <arnold@skeeve.com>
 
        * awkgram.y: Fix `print $"2"' case. Thanks to Ed Morton
diff --git a/awkgram.c b/awkgram.c
index 3e497e0..a69612f 100644
--- a/awkgram.c
+++ b/awkgram.c
@@ -1,4 +1,4 @@
-/* A Bison parser, made by GNU Bison 3.6.  */
+/* A Bison parser, made by GNU Bison 3.5.1.  */
 
 /* Bison implementation for Yacc-like parsers in C
 
@@ -34,10 +34,6 @@
 /* C LALR(1) parser skeleton written by Richard Stallman, by
    simplifying the original so-called "semantic" parser.  */
 
-/* DO NOT RELY ON FEATURES THAT ARE NOT DOCUMENTED in the manual,
-   especially those whose name start with YY_ or yy_.  They are
-   private implementation details that can be changed or removed.  */
-
 /* All symbols defined below should begin with yy or YY, to avoid
    infringing on user name space.  This should be done even for local
    variables, as they might otherwise be expanded by user macros.
@@ -45,11 +41,14 @@
    define necessary library symbols; they are noted "INFRINGES ON
    USER NAME SPACE" below.  */
 
+/* Undocumented macros, especially those whose name start with YY_,
+   are private implementation details.  Do not rely on them.  */
+
 /* Identify Bison output.  */
 #define YYBISON 1
 
 /* Bison version.  */
-#define YYBISON_VERSION "3.6"
+#define YYBISON_VERSION "3.5.1"
 
 /* Skeleton name.  */
 #define YYSKELETON_NAME "yacc.c"
@@ -232,7 +231,7 @@ extern double fmod(double x, double y);
 
 #define YYSTYPE INSTRUCTION *
 
-#line 236 "awkgram.c"
+#line 235 "awkgram.c"
 
 # ifndef YY_CAST
 #  ifdef __cplusplus
@@ -255,6 +254,14 @@ extern double fmod(double x, double y);
 #  endif
 # endif
 
+/* Enabling verbose error messages.  */
+#ifdef YYERROR_VERBOSE
+# undef YYERROR_VERBOSE
+# define YYERROR_VERBOSE 1
+#else
+# define YYERROR_VERBOSE 0
+#endif
+
 
 /* Debug traces.  */
 #ifndef YYDEBUG
@@ -264,75 +271,67 @@ extern double fmod(double x, double y);
 extern int yydebug;
 #endif
 
-/* Token kinds.  */
+/* Token type.  */
 #ifndef YYTOKENTYPE
 # define YYTOKENTYPE
   enum yytokentype
   {
-    YYEMPTY = -2,
-    YYEOF = 0,                     /* "end of file"  */
-    YYerror = 256,                 /* error  */
-    YYUNDEF = 257,                 /* "invalid token"  */
-    FUNC_CALL = 258,               /* FUNC_CALL  */
-    NAME = 259,                    /* NAME  */
-    REGEXP = 260,                  /* REGEXP  */
-    FILENAME = 261,                /* FILENAME  */
-    YNUMBER = 262,                 /* YNUMBER  */
-    YSTRING = 263,                 /* YSTRING  */
-    TYPED_REGEXP = 264,            /* TYPED_REGEXP  */
-    RELOP = 265,                   /* RELOP  */
-    IO_OUT = 266,                  /* IO_OUT  */
-    IO_IN = 267,                   /* IO_IN  */
-    ASSIGNOP = 268,                /* ASSIGNOP  */
-    ASSIGN = 269,                  /* ASSIGN  */
-    MATCHOP = 270,                 /* MATCHOP  */
-    CONCAT_OP = 271,               /* CONCAT_OP  */
-    SUBSCRIPT = 272,               /* SUBSCRIPT  */
-    LEX_BEGIN = 273,               /* LEX_BEGIN  */
-    LEX_END = 274,                 /* LEX_END  */
-    LEX_IF = 275,                  /* LEX_IF  */
-    LEX_ELSE = 276,                /* LEX_ELSE  */
-    LEX_RETURN = 277,              /* LEX_RETURN  */
-    LEX_DELETE = 278,              /* LEX_DELETE  */
-    LEX_SWITCH = 279,              /* LEX_SWITCH  */
-    LEX_CASE = 280,                /* LEX_CASE  */
-    LEX_DEFAULT = 281,             /* LEX_DEFAULT  */
-    LEX_WHILE = 282,               /* LEX_WHILE  */
-    LEX_DO = 283,                  /* LEX_DO  */
-    LEX_FOR = 284,                 /* LEX_FOR  */
-    LEX_BREAK = 285,               /* LEX_BREAK  */
-    LEX_CONTINUE = 286,            /* LEX_CONTINUE  */
-    LEX_PRINT = 287,               /* LEX_PRINT  */
-    LEX_PRINTF = 288,              /* LEX_PRINTF  */
-    LEX_NEXT = 289,                /* LEX_NEXT  */
-    LEX_EXIT = 290,                /* LEX_EXIT  */
-    LEX_FUNCTION = 291,            /* LEX_FUNCTION  */
-    LEX_BEGINFILE = 292,           /* LEX_BEGINFILE  */
-    LEX_ENDFILE = 293,             /* LEX_ENDFILE  */
-    LEX_GETLINE = 294,             /* LEX_GETLINE  */
-    LEX_NEXTFILE = 295,            /* LEX_NEXTFILE  */
-    LEX_IN = 296,                  /* LEX_IN  */
-    LEX_AND = 297,                 /* LEX_AND  */
-    LEX_OR = 298,                  /* LEX_OR  */
-    INCREMENT = 299,               /* INCREMENT  */
-    DECREMENT = 300,               /* DECREMENT  */
-    LEX_BUILTIN = 301,             /* LEX_BUILTIN  */
-    LEX_LENGTH = 302,              /* LEX_LENGTH  */
-    LEX_EOF = 303,                 /* LEX_EOF  */
-    LEX_INCLUDE = 304,             /* LEX_INCLUDE  */
-    LEX_EVAL = 305,                /* LEX_EVAL  */
-    LEX_LOAD = 306,                /* LEX_LOAD  */
-    LEX_NAMESPACE = 307,           /* LEX_NAMESPACE  */
-    NEWLINE = 308,                 /* NEWLINE  */
-    SLASH_BEFORE_EQUAL = 309,      /* SLASH_BEFORE_EQUAL  */
-    UNARY = 310                    /* UNARY  */
+    FUNC_CALL = 258,
+    NAME = 259,
+    REGEXP = 260,
+    FILENAME = 261,
+    YNUMBER = 262,
+    YSTRING = 263,
+    TYPED_REGEXP = 264,
+    RELOP = 265,
+    IO_OUT = 266,
+    IO_IN = 267,
+    ASSIGNOP = 268,
+    ASSIGN = 269,
+    MATCHOP = 270,
+    CONCAT_OP = 271,
+    SUBSCRIPT = 272,
+    LEX_BEGIN = 273,
+    LEX_END = 274,
+    LEX_IF = 275,
+    LEX_ELSE = 276,
+    LEX_RETURN = 277,
+    LEX_DELETE = 278,
+    LEX_SWITCH = 279,
+    LEX_CASE = 280,
+    LEX_DEFAULT = 281,
+    LEX_WHILE = 282,
+    LEX_DO = 283,
+    LEX_FOR = 284,
+    LEX_BREAK = 285,
+    LEX_CONTINUE = 286,
+    LEX_PRINT = 287,
+    LEX_PRINTF = 288,
+    LEX_NEXT = 289,
+    LEX_EXIT = 290,
+    LEX_FUNCTION = 291,
+    LEX_BEGINFILE = 292,
+    LEX_ENDFILE = 293,
+    LEX_GETLINE = 294,
+    LEX_NEXTFILE = 295,
+    LEX_IN = 296,
+    LEX_AND = 297,
+    LEX_OR = 298,
+    INCREMENT = 299,
+    DECREMENT = 300,
+    LEX_BUILTIN = 301,
+    LEX_LENGTH = 302,
+    LEX_EOF = 303,
+    LEX_INCLUDE = 304,
+    LEX_EVAL = 305,
+    LEX_LOAD = 306,
+    LEX_NAMESPACE = 307,
+    NEWLINE = 308,
+    SLASH_BEFORE_EQUAL = 309,
+    UNARY = 310
   };
-  typedef enum yytokentype yytoken_kind_t;
 #endif
-/* Token kinds.  */
-#define YYEOF 0
-#define YYerror 256
-#define YYUNDEF 257
+/* Tokens.  */
 #define FUNC_CALL 258
 #define NAME 259
 #define REGEXP 260
@@ -400,162 +399,6 @@ extern YYSTYPE yylval;
 int yyparse (void);
 
 
-/* Symbol kind.  */
-enum yysymbol_kind_t
-{
-  YYSYMBOL_YYEMPTY = -2,
-  YYSYMBOL_YYEOF = 0,                      /* "end of file"  */
-  YYSYMBOL_YYerror = 1,                    /* error  */
-  YYSYMBOL_YYUNDEF = 2,                    /* "invalid token"  */
-  YYSYMBOL_FUNC_CALL = 3,                  /* FUNC_CALL  */
-  YYSYMBOL_NAME = 4,                       /* NAME  */
-  YYSYMBOL_REGEXP = 5,                     /* REGEXP  */
-  YYSYMBOL_FILENAME = 6,                   /* FILENAME  */
-  YYSYMBOL_YNUMBER = 7,                    /* YNUMBER  */
-  YYSYMBOL_YSTRING = 8,                    /* YSTRING  */
-  YYSYMBOL_TYPED_REGEXP = 9,               /* TYPED_REGEXP  */
-  YYSYMBOL_RELOP = 10,                     /* RELOP  */
-  YYSYMBOL_IO_OUT = 11,                    /* IO_OUT  */
-  YYSYMBOL_IO_IN = 12,                     /* IO_IN  */
-  YYSYMBOL_ASSIGNOP = 13,                  /* ASSIGNOP  */
-  YYSYMBOL_ASSIGN = 14,                    /* ASSIGN  */
-  YYSYMBOL_MATCHOP = 15,                   /* MATCHOP  */
-  YYSYMBOL_CONCAT_OP = 16,                 /* CONCAT_OP  */
-  YYSYMBOL_SUBSCRIPT = 17,                 /* SUBSCRIPT  */
-  YYSYMBOL_LEX_BEGIN = 18,                 /* LEX_BEGIN  */
-  YYSYMBOL_LEX_END = 19,                   /* LEX_END  */
-  YYSYMBOL_LEX_IF = 20,                    /* LEX_IF  */
-  YYSYMBOL_LEX_ELSE = 21,                  /* LEX_ELSE  */
-  YYSYMBOL_LEX_RETURN = 22,                /* LEX_RETURN  */
-  YYSYMBOL_LEX_DELETE = 23,                /* LEX_DELETE  */
-  YYSYMBOL_LEX_SWITCH = 24,                /* LEX_SWITCH  */
-  YYSYMBOL_LEX_CASE = 25,                  /* LEX_CASE  */
-  YYSYMBOL_LEX_DEFAULT = 26,               /* LEX_DEFAULT  */
-  YYSYMBOL_LEX_WHILE = 27,                 /* LEX_WHILE  */
-  YYSYMBOL_LEX_DO = 28,                    /* LEX_DO  */
-  YYSYMBOL_LEX_FOR = 29,                   /* LEX_FOR  */
-  YYSYMBOL_LEX_BREAK = 30,                 /* LEX_BREAK  */
-  YYSYMBOL_LEX_CONTINUE = 31,              /* LEX_CONTINUE  */
-  YYSYMBOL_LEX_PRINT = 32,                 /* LEX_PRINT  */
-  YYSYMBOL_LEX_PRINTF = 33,                /* LEX_PRINTF  */
-  YYSYMBOL_LEX_NEXT = 34,                  /* LEX_NEXT  */
-  YYSYMBOL_LEX_EXIT = 35,                  /* LEX_EXIT  */
-  YYSYMBOL_LEX_FUNCTION = 36,              /* LEX_FUNCTION  */
-  YYSYMBOL_LEX_BEGINFILE = 37,             /* LEX_BEGINFILE  */
-  YYSYMBOL_LEX_ENDFILE = 38,               /* LEX_ENDFILE  */
-  YYSYMBOL_LEX_GETLINE = 39,               /* LEX_GETLINE  */
-  YYSYMBOL_LEX_NEXTFILE = 40,              /* LEX_NEXTFILE  */
-  YYSYMBOL_LEX_IN = 41,                    /* LEX_IN  */
-  YYSYMBOL_LEX_AND = 42,                   /* LEX_AND  */
-  YYSYMBOL_LEX_OR = 43,                    /* LEX_OR  */
-  YYSYMBOL_INCREMENT = 44,                 /* INCREMENT  */
-  YYSYMBOL_DECREMENT = 45,                 /* DECREMENT  */
-  YYSYMBOL_LEX_BUILTIN = 46,               /* LEX_BUILTIN  */
-  YYSYMBOL_LEX_LENGTH = 47,                /* LEX_LENGTH  */
-  YYSYMBOL_LEX_EOF = 48,                   /* LEX_EOF  */
-  YYSYMBOL_LEX_INCLUDE = 49,               /* LEX_INCLUDE  */
-  YYSYMBOL_LEX_EVAL = 50,                  /* LEX_EVAL  */
-  YYSYMBOL_LEX_LOAD = 51,                  /* LEX_LOAD  */
-  YYSYMBOL_LEX_NAMESPACE = 52,             /* LEX_NAMESPACE  */
-  YYSYMBOL_NEWLINE = 53,                   /* NEWLINE  */
-  YYSYMBOL_SLASH_BEFORE_EQUAL = 54,        /* SLASH_BEFORE_EQUAL  */
-  YYSYMBOL_55_ = 55,                       /* '?'  */
-  YYSYMBOL_56_ = 56,                       /* ':'  */
-  YYSYMBOL_57_ = 57,                       /* ','  */
-  YYSYMBOL_58_ = 58,                       /* '<'  */
-  YYSYMBOL_59_ = 59,                       /* '>'  */
-  YYSYMBOL_60_ = 60,                       /* '+'  */
-  YYSYMBOL_61_ = 61,                       /* '-'  */
-  YYSYMBOL_62_ = 62,                       /* '*'  */
-  YYSYMBOL_63_ = 63,                       /* '/'  */
-  YYSYMBOL_64_ = 64,                       /* '%'  */
-  YYSYMBOL_65_ = 65,                       /* '!'  */
-  YYSYMBOL_UNARY = 66,                     /* UNARY  */
-  YYSYMBOL_67_ = 67,                       /* '^'  */
-  YYSYMBOL_68_ = 68,                       /* '$'  */
-  YYSYMBOL_69_ = 69,                       /* '('  */
-  YYSYMBOL_70_ = 70,                       /* ')'  */
-  YYSYMBOL_71_ = 71,                       /* '@'  */
-  YYSYMBOL_72_ = 72,                       /* '['  */
-  YYSYMBOL_73_ = 73,                       /* ']'  */
-  YYSYMBOL_74_ = 74,                       /* '{'  */
-  YYSYMBOL_75_ = 75,                       /* '}'  */
-  YYSYMBOL_76_ = 76,                       /* ';'  */
-  YYSYMBOL_YYACCEPT = 77,                  /* $accept  */
-  YYSYMBOL_program = 78,                   /* program  */
-  YYSYMBOL_rule = 79,                      /* rule  */
-  YYSYMBOL_source = 80,                    /* source  */
-  YYSYMBOL_library = 81,                   /* library  */
-  YYSYMBOL_namespace = 82,                 /* namespace  */
-  YYSYMBOL_pattern = 83,                   /* pattern  */
-  YYSYMBOL_action = 84,                    /* action  */
-  YYSYMBOL_func_name = 85,                 /* func_name  */
-  YYSYMBOL_lex_builtin = 86,               /* lex_builtin  */
-  YYSYMBOL_function_prologue = 87,         /* function_prologue  */
-  YYSYMBOL_88_1 = 88,                      /* $@1  */
-  YYSYMBOL_regexp = 89,                    /* regexp  */
-  YYSYMBOL_90_2 = 90,                      /* $@2  */
-  YYSYMBOL_typed_regexp = 91,              /* typed_regexp  */
-  YYSYMBOL_a_slash = 92,                   /* a_slash  */
-  YYSYMBOL_statements = 93,                /* statements  */
-  YYSYMBOL_statement_term = 94,            /* statement_term  */
-  YYSYMBOL_statement = 95,                 /* statement  */
-  YYSYMBOL_non_compound_stmt = 96,         /* non_compound_stmt  */
-  YYSYMBOL_97_3 = 97,                      /* $@3  */
-  YYSYMBOL_simple_stmt = 98,               /* simple_stmt  */
-  YYSYMBOL_99_4 = 99,                      /* $@4  */
-  YYSYMBOL_100_5 = 100,                    /* $@5  */
-  YYSYMBOL_opt_simple_stmt = 101,          /* opt_simple_stmt  */
-  YYSYMBOL_case_statements = 102,          /* case_statements  */
-  YYSYMBOL_case_statement = 103,           /* case_statement  */
-  YYSYMBOL_case_value = 104,               /* case_value  */
-  YYSYMBOL_print = 105,                    /* print  */
-  YYSYMBOL_print_expression_list = 106,    /* print_expression_list  */
-  YYSYMBOL_output_redir = 107,             /* output_redir  */
-  YYSYMBOL_108_6 = 108,                    /* $@6  */
-  YYSYMBOL_if_statement = 109,             /* if_statement  */
-  YYSYMBOL_nls = 110,                      /* nls  */
-  YYSYMBOL_opt_nls = 111,                  /* opt_nls  */
-  YYSYMBOL_input_redir = 112,              /* input_redir  */
-  YYSYMBOL_opt_param_list = 113,           /* opt_param_list  */
-  YYSYMBOL_param_list = 114,               /* param_list  */
-  YYSYMBOL_opt_exp = 115,                  /* opt_exp  */
-  YYSYMBOL_opt_expression_list = 116,      /* opt_expression_list  */
-  YYSYMBOL_expression_list = 117,          /* expression_list  */
-  YYSYMBOL_opt_fcall_expression_list = 118, /* opt_fcall_expression_list  */
-  YYSYMBOL_fcall_expression_list = 119,    /* fcall_expression_list  */
-  YYSYMBOL_fcall_exp = 120,                /* fcall_exp  */
-  YYSYMBOL_opt_fcall_exp = 121,            /* opt_fcall_exp  */
-  YYSYMBOL_exp = 122,                      /* exp  */
-  YYSYMBOL_assign_operator = 123,          /* assign_operator  */
-  YYSYMBOL_relop_or_less = 124,            /* relop_or_less  */
-  YYSYMBOL_a_relop = 125,                  /* a_relop  */
-  YYSYMBOL_common_exp = 126,               /* common_exp  */
-  YYSYMBOL_simp_exp = 127,                 /* simp_exp  */
-  YYSYMBOL_simp_exp_nc = 128,              /* simp_exp_nc  */
-  YYSYMBOL_non_post_simp_exp = 129,        /* non_post_simp_exp  */
-  YYSYMBOL_func_call = 130,                /* func_call  */
-  YYSYMBOL_direct_func_call = 131,         /* direct_func_call  */
-  YYSYMBOL_opt_variable = 132,             /* opt_variable  */
-  YYSYMBOL_delete_subscript_list = 133,    /* delete_subscript_list  */
-  YYSYMBOL_delete_subscript = 134,         /* delete_subscript  */
-  YYSYMBOL_delete_exp_list = 135,          /* delete_exp_list  */
-  YYSYMBOL_bracketed_exp_list = 136,       /* bracketed_exp_list  */
-  YYSYMBOL_subscript = 137,                /* subscript  */
-  YYSYMBOL_subscript_list = 138,           /* subscript_list  */
-  YYSYMBOL_simple_variable = 139,          /* simple_variable  */
-  YYSYMBOL_variable = 140,                 /* variable  */
-  YYSYMBOL_opt_incdec = 141,               /* opt_incdec  */
-  YYSYMBOL_l_brace = 142,                  /* l_brace  */
-  YYSYMBOL_r_brace = 143,                  /* r_brace  */
-  YYSYMBOL_r_paren = 144,                  /* r_paren  */
-  YYSYMBOL_opt_semi = 145,                 /* opt_semi  */
-  YYSYMBOL_semi = 146,                     /* semi  */
-  YYSYMBOL_colon = 147,                    /* colon  */
-  YYSYMBOL_comma = 148                     /* comma  */
-};
-typedef enum yysymbol_kind_t yysymbol_kind_t;
-
 
 
 
@@ -655,7 +498,6 @@ typedef int yytype_uint16;
 
 #define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X))
 
-
 /* Stored state numbers (used for stacks). */
 typedef yytype_int16 yy_state_t;
 
@@ -674,7 +516,6 @@ typedef int yy_state_fast_t;
 # endif
 #endif
 
-
 #ifndef YY_ATTRIBUTE_PURE
 # if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__)
 #  define YY_ATTRIBUTE_PURE __attribute__ ((__pure__))
@@ -732,7 +573,7 @@ typedef int yy_state_fast_t;
 
 #define YY_ASSERT(E) ((void) (0 && (E)))
 
-#if !defined yyoverflow
+#if ! defined yyoverflow || YYERROR_VERBOSE
 
 /* The parser invokes alloca or malloc; define the necessary symbols.  */
 
@@ -797,7 +638,8 @@ void free (void *); /* INFRINGES ON USER NAME SPACE */
 #   endif
 #  endif
 # endif
-#endif /* !defined yyoverflow */
+#endif /* ! defined yyoverflow || YYERROR_VERBOSE */
+
 
 #if (! defined yyoverflow \
      && (! defined __cplusplus \
@@ -873,15 +715,14 @@ union yyalloc
 /* YYNSTATES -- Number of states.  */
 #define YYNSTATES  356
 
+#define YYUNDEFTOK  2
 #define YYMAXUTOK   310
 
 
 /* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM
    as returned by yylex, with out-of-bounds checking.  */
-#define YYTRANSLATE(YYX)                                \
-  (0 <= (YYX) && (YYX) <= YYMAXUTOK                     \
-   ? YY_CAST (yysymbol_kind_t, yytranslate[YYX])        \
-   : YYSYMBOL_YYUNDEF)
+#define YYTRANSLATE(YYX)                                                \
+  (0 <= (YYX) && (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
 
 /* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM
    as returned by yylex.  */
@@ -949,33 +790,26 @@ static const yytype_int16 yyrline[] =
 };
 #endif
 
-/** Accessing symbol of state STATE.  */
-#define YY_ACCESSING_SYMBOL(State) YY_CAST (yysymbol_kind_t, yystos[State])
-
-#if YYDEBUG || 0
-/* The user-facing name of the symbol whose (internal) number is
-   YYSYMBOL.  No bounds checking.  */
-static const char *yysymbol_name (yysymbol_kind_t yysymbol) 
YY_ATTRIBUTE_UNUSED;
-
+#if YYDEBUG || YYERROR_VERBOSE || 0
 /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
    First, the terminals, then, starting at YYNTOKENS, nonterminals.  */
 static const char *const yytname[] =
 {
-  "\"end of file\"", "error", "\"invalid token\"", "FUNC_CALL", "NAME",
-  "REGEXP", "FILENAME", "YNUMBER", "YSTRING", "TYPED_REGEXP", "RELOP",
-  "IO_OUT", "IO_IN", "ASSIGNOP", "ASSIGN", "MATCHOP", "CONCAT_OP",
-  "SUBSCRIPT", "LEX_BEGIN", "LEX_END", "LEX_IF", "LEX_ELSE", "LEX_RETURN",
-  "LEX_DELETE", "LEX_SWITCH", "LEX_CASE", "LEX_DEFAULT", "LEX_WHILE",
-  "LEX_DO", "LEX_FOR", "LEX_BREAK", "LEX_CONTINUE", "LEX_PRINT",
-  "LEX_PRINTF", "LEX_NEXT", "LEX_EXIT", "LEX_FUNCTION", "LEX_BEGINFILE",
-  "LEX_ENDFILE", "LEX_GETLINE", "LEX_NEXTFILE", "LEX_IN", "LEX_AND",
-  "LEX_OR", "INCREMENT", "DECREMENT", "LEX_BUILTIN", "LEX_LENGTH",
-  "LEX_EOF", "LEX_INCLUDE", "LEX_EVAL", "LEX_LOAD", "LEX_NAMESPACE",
-  "NEWLINE", "SLASH_BEFORE_EQUAL", "'?'", "':'", "','", "'<'", "'>'",
-  "'+'", "'-'", "'*'", "'/'", "'%'", "'!'", "UNARY", "'^'", "'$'", "'('",
-  "')'", "'@'", "'['", "']'", "'{'", "'}'", "';'", "$accept", "program",
-  "rule", "source", "library", "namespace", "pattern", "action",
-  "func_name", "lex_builtin", "function_prologue", "$@1", "regexp", "$@2",
+  "$end", "error", "$undefined", "FUNC_CALL", "NAME", "REGEXP",
+  "FILENAME", "YNUMBER", "YSTRING", "TYPED_REGEXP", "RELOP", "IO_OUT",
+  "IO_IN", "ASSIGNOP", "ASSIGN", "MATCHOP", "CONCAT_OP", "SUBSCRIPT",
+  "LEX_BEGIN", "LEX_END", "LEX_IF", "LEX_ELSE", "LEX_RETURN", "LEX_DELETE",
+  "LEX_SWITCH", "LEX_CASE", "LEX_DEFAULT", "LEX_WHILE", "LEX_DO",
+  "LEX_FOR", "LEX_BREAK", "LEX_CONTINUE", "LEX_PRINT", "LEX_PRINTF",
+  "LEX_NEXT", "LEX_EXIT", "LEX_FUNCTION", "LEX_BEGINFILE", "LEX_ENDFILE",
+  "LEX_GETLINE", "LEX_NEXTFILE", "LEX_IN", "LEX_AND", "LEX_OR",
+  "INCREMENT", "DECREMENT", "LEX_BUILTIN", "LEX_LENGTH", "LEX_EOF",
+  "LEX_INCLUDE", "LEX_EVAL", "LEX_LOAD", "LEX_NAMESPACE", "NEWLINE",
+  "SLASH_BEFORE_EQUAL", "'?'", "':'", "','", "'<'", "'>'", "'+'", "'-'",
+  "'*'", "'/'", "'%'", "'!'", "UNARY", "'^'", "'$'", "'('", "')'", "'@'",
+  "'['", "']'", "'{'", "'}'", "';'", "$accept", "program", "rule",
+  "source", "library", "namespace", "pattern", "action", "func_name",
+  "lex_builtin", "function_prologue", "$@1", "regexp", "$@2",
   "typed_regexp", "a_slash", "statements", "statement_term", "statement",
   "non_compound_stmt", "$@3", "simple_stmt", "$@4", "$@5",
   "opt_simple_stmt", "case_statements", "case_statement", "case_value",
@@ -990,15 +824,9 @@ static const char *const yytname[] =
   "subscript_list", "simple_variable", "variable", "opt_incdec", "l_brace",
   "r_brace", "r_paren", "opt_semi", "semi", "colon", "comma", YY_NULLPTR
 };
-
-static const char *
-yysymbol_name (yysymbol_kind_t yysymbol)
-{
-  return yytname[yysymbol];
-}
 #endif
 
-#ifdef YYPRINT
+# ifdef YYPRINT
 /* YYTOKNUM[NUM] -- (External) token number corresponding to the
    (internal) symbol number NUM (which must be that of a token).  */
 static const yytype_int16 yytoknum[] =
@@ -1012,7 +840,7 @@ static const yytype_int16 yytoknum[] =
       43,    45,    42,    47,    37,    33,   310,    94,    36,    40,
       41,    64,    91,    93,   123,   125,    59
 };
-#endif
+# endif
 
 #define YYPACT_NINF (-276)
 
@@ -1483,10 +1311,10 @@ static const yytype_int8 yyr2[] =
 };
 
 
-enum { YYENOMEM = -2 };
-
 #define yyerrok         (yyerrstatus = 0)
 #define yyclearin       (yychar = YYEMPTY)
+#define YYEMPTY         (-2)
+#define YYEOF           0
 
 #define YYACCEPT        goto yyacceptlab
 #define YYABORT         goto yyabortlab
@@ -1512,9 +1340,10 @@ enum { YYENOMEM = -2 };
       }                                                           \
   while (0)
 
-/* Backward compatibility with an undocumented macro.
-   Use YYerror or YYUNDEF. */
-#define YYERRCODE YYUNDEF
+/* Error token number */
+#define YYTERROR        1
+#define YYERRCODE       256
+
 
 
 /* Enable debugging if requested.  */
@@ -1532,18 +1361,18 @@ do {                                            \
 } while (0)
 
 /* This macro is provided for backward compatibility. */
-# ifndef YY_LOCATION_PRINT
-#  define YY_LOCATION_PRINT(File, Loc) ((void) 0)
-# endif
+#ifndef YY_LOCATION_PRINT
+# define YY_LOCATION_PRINT(File, Loc) ((void) 0)
+#endif
 
 
-# define YY_SYMBOL_PRINT(Title, Kind, Value, Location)                    \
+# define YY_SYMBOL_PRINT(Title, Type, Value, Location)                    \
 do {                                                                      \
   if (yydebug)                                                            \
     {                                                                     \
       YYFPRINTF (stderr, "%s ", Title);                                   \
       yy_symbol_print (stderr,                                            \
-                  Kind, Value); \
+                  Type, Value); \
       YYFPRINTF (stderr, "\n");                                           \
     }                                                                     \
 } while (0)
@@ -1554,19 +1383,18 @@ do {                                                    
                  \
 `-----------------------------------*/
 
 static void
-yy_symbol_value_print (FILE *yyo,
-                       yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep)
+yy_symbol_value_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep)
 {
   FILE *yyoutput = yyo;
   YYUSE (yyoutput);
   if (!yyvaluep)
     return;
 # ifdef YYPRINT
-  if (yykind < YYNTOKENS)
-    YYPRINT (yyo, yytoknum[yykind], *yyvaluep);
+  if (yytype < YYNTOKENS)
+    YYPRINT (yyo, yytoknum[yytype], *yyvaluep);
 # endif
   YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
-  YYUSE (yykind);
+  YYUSE (yytype);
   YY_IGNORE_MAYBE_UNINITIALIZED_END
 }
 
@@ -1576,13 +1404,12 @@ yy_symbol_value_print (FILE *yyo,
 `---------------------------*/
 
 static void
-yy_symbol_print (FILE *yyo,
-                 yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep)
+yy_symbol_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep)
 {
   YYFPRINTF (yyo, "%s %s (",
-             yykind < YYNTOKENS ? "token" : "nterm", yysymbol_name (yykind));
+             yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]);
 
-  yy_symbol_value_print (yyo, yykind, yyvaluep);
+  yy_symbol_value_print (yyo, yytype, yyvaluep);
   YYFPRINTF (yyo, ")");
 }
 
@@ -1615,8 +1442,7 @@ do {                                                      
      \
 `------------------------------------------------*/
 
 static void
-yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp,
-                 int yyrule)
+yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp, int yyrule)
 {
   int yylno = yyrline[yyrule];
   int yynrhs = yyr2[yyrule];
@@ -1628,8 +1454,9 @@ yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp,
     {
       YYFPRINTF (stderr, "   $%d = ", yyi + 1);
       yy_symbol_print (stderr,
-                       YY_ACCESSING_SYMBOL (+yyssp[yyi + 1 - yynrhs]),
-                       &yyvsp[(yyi + 1) - (yynrhs)]);
+                       yystos[+yyssp[yyi + 1 - yynrhs]],
+                       &yyvsp[(yyi + 1) - (yynrhs)]
+                                              );
       YYFPRINTF (stderr, "\n");
     }
 }
@@ -1644,8 +1471,8 @@ do {                                    \
    multiple parsers can coexist.  */
 int yydebug;
 #else /* !YYDEBUG */
-# define YYDPRINTF(Args) ((void) 0)
-# define YY_SYMBOL_PRINT(Title, Kind, Value, Location)
+# define YYDPRINTF(Args)
+# define YY_SYMBOL_PRINT(Title, Type, Value, Location)
 # define YY_STACK_PRINT(Bottom, Top)
 # define YY_REDUCE_PRINT(Rule)
 #endif /* !YYDEBUG */
@@ -1668,29 +1495,258 @@ int yydebug;
 #endif
 
 
+#if YYERROR_VERBOSE
 
+# ifndef yystrlen
+#  if defined __GLIBC__ && defined _STRING_H
+#   define yystrlen(S) (YY_CAST (YYPTRDIFF_T, strlen (S)))
+#  else
+/* Return the length of YYSTR.  */
+static YYPTRDIFF_T
+yystrlen (const char *yystr)
+{
+  YYPTRDIFF_T yylen;
+  for (yylen = 0; yystr[yylen]; yylen++)
+    continue;
+  return yylen;
+}
+#  endif
+# endif
+
+# ifndef yystpcpy
+#  if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE
+#   define yystpcpy stpcpy
+#  else
+/* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in
+   YYDEST.  */
+static char *
+yystpcpy (char *yydest, const char *yysrc)
+{
+  char *yyd = yydest;
+  const char *yys = yysrc;
 
+  while ((*yyd++ = *yys++) != '\0')
+    continue;
 
+  return yyd - 1;
+}
+#  endif
+# endif
+
+# ifndef yytnamerr
+/* Copy to YYRES the contents of YYSTR after stripping away unnecessary
+   quotes and backslashes, so that it's suitable for yyerror.  The
+   heuristic is that double-quoting is unnecessary unless the string
+   contains an apostrophe, a comma, or backslash (other than
+   backslash-backslash).  YYSTR is taken from yytname.  If YYRES is
+   null, do not copy; instead, return the length of what the result
+   would have been.  */
+static YYPTRDIFF_T
+yytnamerr (char *yyres, const char *yystr)
+{
+  if (*yystr == '"')
+    {
+      YYPTRDIFF_T yyn = 0;
+      char const *yyp = yystr;
+
+      for (;;)
+        switch (*++yyp)
+          {
+          case '\'':
+          case ',':
+            goto do_not_strip_quotes;
+
+          case '\\':
+            if (*++yyp != '\\')
+              goto do_not_strip_quotes;
+            else
+              goto append;
+
+          append:
+          default:
+            if (yyres)
+              yyres[yyn] = *yyp;
+            yyn++;
+            break;
+
+          case '"':
+            if (yyres)
+              yyres[yyn] = '\0';
+            return yyn;
+          }
+    do_not_strip_quotes: ;
+    }
+
+  if (yyres)
+    return yystpcpy (yyres, yystr) - yyres;
+  else
+    return yystrlen (yystr);
+}
+# endif
+
+/* Copy into *YYMSG, which is of size *YYMSG_ALLOC, an error message
+   about the unexpected token YYTOKEN for the state stack whose top is
+   YYSSP.
+
+   Return 0 if *YYMSG was successfully written.  Return 1 if *YYMSG is
+   not large enough to hold the message.  In that case, also set
+   *YYMSG_ALLOC to the required number of bytes.  Return 2 if the
+   required number of bytes is too large to store.  */
+static int
+yysyntax_error (YYPTRDIFF_T *yymsg_alloc, char **yymsg,
+                yy_state_t *yyssp, int yytoken)
+{
+  enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 };
+  /* Internationalized format string. */
+  const char *yyformat = YY_NULLPTR;
+  /* Arguments of yyformat: reported tokens (one for the "unexpected",
+     one per "expected"). */
+  char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM];
+  /* Actual size of YYARG. */
+  int yycount = 0;
+  /* Cumulated lengths of YYARG.  */
+  YYPTRDIFF_T yysize = 0;
+
+  /* There are many possibilities here to consider:
+     - If this state is a consistent state with a default action, then
+       the only way this function was invoked is if the default action
+       is an error action.  In that case, don't check for expected
+       tokens because there are none.
+     - The only way there can be no lookahead present (in yychar) is if
+       this state is a consistent state with a default action.  Thus,
+       detecting the absence of a lookahead is sufficient to determine
+       that there is no unexpected or expected token to report.  In that
+       case, just report a simple "syntax error".
+     - Don't assume there isn't a lookahead just because this state is a
+       consistent state with a default action.  There might have been a
+       previous inconsistent state, consistent state with a non-default
+       action, or user semantic action that manipulated yychar.
+     - Of course, the expected token list depends on states to have
+       correct lookahead information, and it depends on the parser not
+       to perform extra reductions after fetching a lookahead from the
+       scanner and before detecting a syntax error.  Thus, state merging
+       (from LALR or IELR) and default reductions corrupt the expected
+       token list.  However, the list is correct for canonical LR with
+       one exception: it will still contain any token that will not be
+       accepted due to an error action in a later state.
+  */
+  if (yytoken != YYEMPTY)
+    {
+      int yyn = yypact[+*yyssp];
+      YYPTRDIFF_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]);
+      yysize = yysize0;
+      yyarg[yycount++] = yytname[yytoken];
+      if (!yypact_value_is_default (yyn))
+        {
+          /* Start YYX at -YYN if negative to avoid negative indexes in
+             YYCHECK.  In other words, skip the first -YYN actions for
+             this state because they are default actions.  */
+          int yyxbegin = yyn < 0 ? -yyn : 0;
+          /* Stay within bounds of both yycheck and yytname.  */
+          int yychecklim = YYLAST - yyn + 1;
+          int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
+          int yyx;
+
+          for (yyx = yyxbegin; yyx < yyxend; ++yyx)
+            if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR
+                && !yytable_value_is_error (yytable[yyx + yyn]))
+              {
+                if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM)
+                  {
+                    yycount = 1;
+                    yysize = yysize0;
+                    break;
+                  }
+                yyarg[yycount++] = yytname[yyx];
+                {
+                  YYPTRDIFF_T yysize1
+                    = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]);
+                  if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)
+                    yysize = yysize1;
+                  else
+                    return 2;
+                }
+              }
+        }
+    }
+
+  switch (yycount)
+    {
+# define YYCASE_(N, S)                      \
+      case N:                               \
+        yyformat = S;                       \
+      break
+    default: /* Avoid compiler warnings. */
+      YYCASE_(0, YY_("syntax error"));
+      YYCASE_(1, YY_("syntax error, unexpected %s"));
+      YYCASE_(2, YY_("syntax error, unexpected %s, expecting %s"));
+      YYCASE_(3, YY_("syntax error, unexpected %s, expecting %s or %s"));
+      YYCASE_(4, YY_("syntax error, unexpected %s, expecting %s or %s or %s"));
+      YYCASE_(5, YY_("syntax error, unexpected %s, expecting %s or %s or %s or 
%s"));
+# undef YYCASE_
+    }
+
+  {
+    /* Don't count the "%s"s in the final size, but reserve room for
+       the terminator.  */
+    YYPTRDIFF_T yysize1 = yysize + (yystrlen (yyformat) - 2 * yycount) + 1;
+    if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)
+      yysize = yysize1;
+    else
+      return 2;
+  }
+
+  if (*yymsg_alloc < yysize)
+    {
+      *yymsg_alloc = 2 * yysize;
+      if (! (yysize <= *yymsg_alloc
+             && *yymsg_alloc <= YYSTACK_ALLOC_MAXIMUM))
+        *yymsg_alloc = YYSTACK_ALLOC_MAXIMUM;
+      return 1;
+    }
+
+  /* Avoid sprintf, as that infringes on the user's name space.
+     Don't have undefined behavior even if the translation
+     produced a string with the wrong number of "%s"s.  */
+  {
+    char *yyp = *yymsg;
+    int yyi = 0;
+    while ((*yyp = *yyformat) != '\0')
+      if (*yyp == '%' && yyformat[1] == 's' && yyi < yycount)
+        {
+          yyp += yytnamerr (yyp, yyarg[yyi++]);
+          yyformat += 2;
+        }
+      else
+        {
+          ++yyp;
+          ++yyformat;
+        }
+  }
+  return 0;
+}
+#endif /* YYERROR_VERBOSE */
 
 /*-----------------------------------------------.
 | Release the memory associated to this symbol.  |
 `-----------------------------------------------*/
 
 static void
-yydestruct (const char *yymsg,
-            yysymbol_kind_t yykind, YYSTYPE *yyvaluep)
+yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep)
 {
   YYUSE (yyvaluep);
   if (!yymsg)
     yymsg = "Deleting";
-  YY_SYMBOL_PRINT (yymsg, yykind, yyvaluep, yylocationp);
+  YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp);
 
   YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
-  YYUSE (yykind);
+  YYUSE (yytype);
   YY_IGNORE_MAYBE_UNINITIALIZED_END
 }
 
 
+
+
 /* The lookahead symbol.  */
 int yychar;
 
@@ -1700,8 +1756,6 @@ YYSTYPE yylval;
 int yynerrs;
 
 
-
-
 /*----------.
 | yyparse.  |
 `----------*/
@@ -1720,9 +1774,6 @@ yyparse (void)
        Refer to the stacks through separate pointers, to allow yyoverflow
        to reallocate them elsewhere.  */
 
-    /* Their size.  */
-    YYPTRDIFF_T yystacksize;
-
     /* The state stack.  */
     yy_state_t yyssa[YYINITDEPTH];
     yy_state_t *yyss;
@@ -1733,16 +1784,22 @@ yyparse (void)
     YYSTYPE *yyvs;
     YYSTYPE *yyvsp;
 
+    YYPTRDIFF_T yystacksize;
+
   int yyn;
-  /* The return value of yyparse.  */
   int yyresult;
   /* Lookahead token as an internal (translated) token number.  */
-  yysymbol_kind_t yytoken = YYSYMBOL_YYEMPTY;
+  int yytoken = 0;
   /* The variables used to return semantic value and location from the
      action routines.  */
   YYSTYPE yyval;
 
-
+#if YYERROR_VERBOSE
+  /* Buffer for error messages, and its allocated size.  */
+  char yymsgbuf[128];
+  char *yymsg = yymsgbuf;
+  YYPTRDIFF_T yymsg_alloc = sizeof yymsgbuf;
+#endif
 
 #define YYPOPSTACK(N)   (yyvsp -= (N), yyssp -= (N))
 
@@ -1750,17 +1807,15 @@ yyparse (void)
      Keep to zero when no symbol should be popped.  */
   int yylen = 0;
 
-  yynerrs = 0;
-  yystate = 0;
-  yyerrstatus = 0;
-
-  yystacksize = YYINITDEPTH;
   yyssp = yyss = yyssa;
   yyvsp = yyvs = yyvsa;
-
+  yystacksize = YYINITDEPTH;
 
   YYDPRINTF ((stderr, "Starting parse\n"));
 
+  yystate = 0;
+  yyerrstatus = 0;
+  yynerrs = 0;
   yychar = YYEMPTY; /* Cause a token to be read.  */
   goto yysetstate;
 
@@ -1783,7 +1838,6 @@ yysetstate:
   YY_IGNORE_USELESS_CAST_BEGIN
   *yyssp = YY_CAST (yy_state_t, yystate);
   YY_IGNORE_USELESS_CAST_END
-  YY_STACK_PRINT (yyss, yyssp);
 
   if (yyss + yystacksize - 1 <= yyssp)
 #if !defined yyoverflow && !defined YYSTACK_RELOCATE
@@ -1829,7 +1883,7 @@ yysetstate:
           goto yyexhaustedlab;
         YYSTACK_RELOCATE (yyss_alloc, yyss);
         YYSTACK_RELOCATE (yyvs_alloc, yyvs);
-#  undef YYSTACK_RELOCATE
+# undef YYSTACK_RELOCATE
         if (yyss1 != yyssa)
           YYSTACK_FREE (yyss1);
       }
@@ -1868,29 +1922,18 @@ yybackup:
 
   /* Not known => get a lookahead token if don't already have one.  */
 
-  /* YYCHAR is either empty, or end-of-input, or a valid lookahead.  */
+  /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol.  */
   if (yychar == YYEMPTY)
     {
-      YYDPRINTF ((stderr, "Reading a token\n"));
+      YYDPRINTF ((stderr, "Reading a token: "));
       yychar = yylex ();
     }
 
   if (yychar <= YYEOF)
     {
-      yychar = YYEOF;
-      yytoken = YYSYMBOL_YYEOF;
+      yychar = yytoken = YYEOF;
       YYDPRINTF ((stderr, "Now at end of input.\n"));
     }
-  else if (yychar == YYerror)
-    {
-      /* The scanner already issued an error message, process directly
-         to error recovery.  But do not keep the error token as
-         lookahead, it is too special and may lead us to an endless
-         loop in error recovery. */
-      yychar = YYUNDEF;
-      yytoken = YYSYMBOL_YYerror;
-      goto yyerrlab1;
-    }
   else
     {
       yytoken = YYTRANSLATE (yychar);
@@ -1962,7 +2005,7 @@ yyreduce:
   case 2:
 #line 232 "awkgram.y"
           { yyval = NULL; }
-#line 1966 "awkgram.c"
+#line 2009 "awkgram.c"
     break;
 
   case 3:
@@ -1971,7 +2014,7 @@ yyreduce:
                rule = 0;
                yyerrok;
          }
-#line 1975 "awkgram.c"
+#line 2018 "awkgram.c"
     break;
 
   case 4:
@@ -1985,7 +2028,7 @@ yyreduce:
                }
                yyval = yyvsp[-1];
          }
-#line 1989 "awkgram.c"
+#line 2032 "awkgram.c"
     break;
 
   case 5:
@@ -1993,7 +2036,7 @@ yyreduce:
           {
                next_sourcefile();
          }
-#line 1997 "awkgram.c"
+#line 2040 "awkgram.c"
     break;
 
   case 6:
@@ -2006,7 +2049,7 @@ yyreduce:
                 */
                /* yyerrok; */
          }
-#line 2010 "awkgram.c"
+#line 2053 "awkgram.c"
     break;
 
   case 7:
@@ -2018,7 +2061,7 @@ yyreduce:
                        pending_comment = NULL;
                }
          }
-#line 2022 "awkgram.c"
+#line 2065 "awkgram.c"
     break;
 
   case 8:
@@ -2036,7 +2079,7 @@ yyreduce:
                        (void) append_rule(yyvsp[-1], NULL);
                }
          }
-#line 2040 "awkgram.c"
+#line 2083 "awkgram.c"
     break;
 
   case 9:
@@ -2051,7 +2094,7 @@ yyreduce:
                }
                yyerrok;
          }
-#line 2055 "awkgram.c"
+#line 2098 "awkgram.c"
     break;
 
   case 10:
@@ -2065,7 +2108,7 @@ yyreduce:
                }
                yyerrok;
          }
-#line 2069 "awkgram.c"
+#line 2112 "awkgram.c"
     break;
 
   case 11:
@@ -2079,7 +2122,7 @@ yyreduce:
                }
                yyerrok;
          }
-#line 2083 "awkgram.c"
+#line 2126 "awkgram.c"
     break;
 
   case 12:
@@ -2093,7 +2136,7 @@ yyreduce:
 
                yyerrok;
          }
-#line 2097 "awkgram.c"
+#line 2140 "awkgram.c"
     break;
 
   case 13:
@@ -2107,19 +2150,19 @@ yyreduce:
                bcfree(yyvsp[0]);
                yyval = (INSTRUCTION *) srcfile;
          }
-#line 2111 "awkgram.c"
+#line 2154 "awkgram.c"
     break;
 
   case 14:
 #line 341 "awkgram.y"
           { yyval = NULL; }
-#line 2117 "awkgram.c"
+#line 2160 "awkgram.c"
     break;
 
   case 15:
 #line 343 "awkgram.y"
           { yyval = NULL; }
-#line 2123 "awkgram.c"
+#line 2166 "awkgram.c"
     break;
 
   case 16:
@@ -2133,37 +2176,37 @@ yyreduce:
                bcfree(yyvsp[0]);
                yyval = (INSTRUCTION *) srcfile;
          }
-#line 2137 "awkgram.c"
+#line 2180 "awkgram.c"
     break;
 
   case 17:
 #line 358 "awkgram.y"
           { yyval = NULL; }
-#line 2143 "awkgram.c"
+#line 2186 "awkgram.c"
     break;
 
   case 18:
 #line 360 "awkgram.y"
           { yyval = NULL; }
-#line 2149 "awkgram.c"
+#line 2192 "awkgram.c"
     break;
 
   case 19:
 #line 365 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 2155 "awkgram.c"
+#line 2198 "awkgram.c"
     break;
 
   case 20:
 #line 367 "awkgram.y"
           { yyval = NULL; }
-#line 2161 "awkgram.c"
+#line 2204 "awkgram.c"
     break;
 
   case 21:
 #line 369 "awkgram.y"
           { yyval = NULL; }
-#line 2167 "awkgram.c"
+#line 2210 "awkgram.c"
     break;
 
   case 22:
@@ -2172,7 +2215,7 @@ yyreduce:
                rule = Rule;
                yyval = NULL;
          }
-#line 2176 "awkgram.c"
+#line 2219 "awkgram.c"
     break;
 
   case 23:
@@ -2180,7 +2223,7 @@ yyreduce:
           {
                rule = Rule;
          }
-#line 2184 "awkgram.c"
+#line 2227 "awkgram.c"
     break;
 
   case 24:
@@ -2214,7 +2257,7 @@ yyreduce:
                        yyval = list_append(list_merge(yyvsp[-2], yyvsp[0]), 
tp);
                rule = Rule;
          }
-#line 2218 "awkgram.c"
+#line 2261 "awkgram.c"
     break;
 
   case 25:
@@ -2230,7 +2273,7 @@ yyreduce:
                yyvsp[0]->source_file = source;
                yyval = yyvsp[0];
          }
-#line 2234 "awkgram.c"
+#line 2277 "awkgram.c"
     break;
 
   case 26:
@@ -2246,7 +2289,7 @@ yyreduce:
                yyvsp[0]->source_file = source;
                yyval = yyvsp[0];
          }
-#line 2250 "awkgram.c"
+#line 2293 "awkgram.c"
     break;
 
   case 27:
@@ -2256,7 +2299,7 @@ yyreduce:
                yyvsp[0]->source_file = source;
                yyval = yyvsp[0];
          }
-#line 2260 "awkgram.c"
+#line 2303 "awkgram.c"
     break;
 
   case 28:
@@ -2266,7 +2309,7 @@ yyreduce:
                yyvsp[0]->source_file = source;
                yyval = yyvsp[0];
          }
-#line 2270 "awkgram.c"
+#line 2313 "awkgram.c"
     break;
 
   case 29:
@@ -2285,7 +2328,7 @@ yyreduce:
 
                yyval = ip;
          }
-#line 2289 "awkgram.c"
+#line 2332 "awkgram.c"
     break;
 
   case 31:
@@ -2300,7 +2343,7 @@ yyreduce:
                }
                yyval = yyvsp[0];
          }
-#line 2304 "awkgram.c"
+#line 2347 "awkgram.c"
     break;
 
   case 32:
@@ -2310,7 +2353,7 @@ yyreduce:
                                        tokstart);
                YYABORT;
          }
-#line 2314 "awkgram.c"
+#line 2357 "awkgram.c"
     break;
 
   case 33:
@@ -2319,13 +2362,13 @@ yyreduce:
                yyval = yyvsp[0];
                at_seen = false;
          }
-#line 2323 "awkgram.c"
+#line 2366 "awkgram.c"
     break;
 
   case 36:
 #line 501 "awkgram.y"
                                      { want_param_names = FUNC_HEADER; }
-#line 2329 "awkgram.c"
+#line 2372 "awkgram.c"
     break;
 
   case 37:
@@ -2355,13 +2398,13 @@ yyreduce:
                yyval = yyvsp[-6];
                want_param_names = FUNC_BODY;
          }
-#line 2359 "awkgram.c"
+#line 2402 "awkgram.c"
     break;
 
   case 38:
 #line 535 "awkgram.y"
                 { want_regexp = true; }
-#line 2365 "awkgram.c"
+#line 2408 "awkgram.c"
     break;
 
   case 39:
@@ -2394,7 +2437,7 @@ yyreduce:
                  yyval->opcode = Op_match_rec;
                  yyval->memory = n;
                }
-#line 2398 "awkgram.c"
+#line 2441 "awkgram.c"
     break;
 
   case 40:
@@ -2411,19 +2454,19 @@ yyreduce:
                  yyval->opcode = Op_push_re;
                  yyval->memory = make_typed_regex(re, len);
                }
-#line 2415 "awkgram.c"
+#line 2458 "awkgram.c"
     break;
 
   case 41:
 #line 584 "awkgram.y"
           { bcfree(yyvsp[0]); }
-#line 2421 "awkgram.c"
+#line 2464 "awkgram.c"
     break;
 
   case 43:
 #line 590 "awkgram.y"
           { yyval = NULL; }
-#line 2427 "awkgram.c"
+#line 2470 "awkgram.c"
     break;
 
   case 44:
@@ -2447,25 +2490,25 @@ yyreduce:
 
                yyerrok;
          }
-#line 2451 "awkgram.c"
+#line 2494 "awkgram.c"
     break;
 
   case 45:
 #line 612 "awkgram.y"
           {    yyval = NULL; }
-#line 2457 "awkgram.c"
+#line 2500 "awkgram.c"
     break;
 
   case 46:
 #line 616 "awkgram.y"
                         { yyval = yyvsp[0]; }
-#line 2463 "awkgram.c"
+#line 2506 "awkgram.c"
     break;
 
   case 47:
 #line 617 "awkgram.y"
                         { yyval = yyvsp[0]; }
-#line 2469 "awkgram.c"
+#line 2512 "awkgram.c"
     break;
 
   case 48:
@@ -2480,7 +2523,7 @@ yyreduce:
                } else
                        yyval = NULL;
          }
-#line 2484 "awkgram.c"
+#line 2527 "awkgram.c"
     break;
 
   case 49:
@@ -2489,7 +2532,7 @@ yyreduce:
                trailing_comment = yyvsp[0];    // NULL or comment
                yyval = make_braced_statements(yyvsp[-2], yyvsp[-1], yyvsp[0]);
          }
-#line 2493 "awkgram.c"
+#line 2536 "awkgram.c"
     break;
 
   case 50:
@@ -2500,7 +2543,7 @@ yyreduce:
                else
                        yyval = yyvsp[0];
          }
-#line 2504 "awkgram.c"
+#line 2547 "awkgram.c"
     break;
 
   case 51:
@@ -2612,7 +2655,7 @@ yyreduce:
                break_allowed--;
                fix_break_continue(ip, tbreak, NULL);
          }
-#line 2616 "awkgram.c"
+#line 2659 "awkgram.c"
     break;
 
   case 52:
@@ -2667,7 +2710,7 @@ yyreduce:
                continue_allowed--;
                fix_break_continue(ip, tbreak, tcont);
          }
-#line 2671 "awkgram.c"
+#line 2714 "awkgram.c"
     break;
 
   case 53:
@@ -2721,7 +2764,7 @@ yyreduce:
                /* else
                        $1 and $4 are NULLs */
          }
-#line 2725 "awkgram.c"
+#line 2768 "awkgram.c"
     break;
 
   case 54:
@@ -2851,7 +2894,7 @@ regular_loop:
                break_allowed--;
                continue_allowed--;
          }
-#line 2855 "awkgram.c"
+#line 2898 "awkgram.c"
     break;
 
   case 55:
@@ -2877,7 +2920,7 @@ regular_loop:
                break_allowed--;
                continue_allowed--;
          }
-#line 2881 "awkgram.c"
+#line 2924 "awkgram.c"
     break;
 
   case 56:
@@ -2902,7 +2945,7 @@ regular_loop:
                break_allowed--;
                continue_allowed--;
          }
-#line 2906 "awkgram.c"
+#line 2949 "awkgram.c"
     break;
 
   case 57:
@@ -2913,7 +2956,7 @@ regular_loop:
                else
                        yyval = yyvsp[0];
          }
-#line 2917 "awkgram.c"
+#line 2960 "awkgram.c"
     break;
 
   case 58:
@@ -2927,7 +2970,7 @@ regular_loop:
                if (yyvsp[0] != NULL)
                        yyval = list_append(yyval, yyvsp[0]);
          }
-#line 2931 "awkgram.c"
+#line 2974 "awkgram.c"
     break;
 
   case 59:
@@ -2941,7 +2984,7 @@ regular_loop:
                if (yyvsp[0] != NULL)
                        yyval = list_append(yyval, yyvsp[0]);
          }
-#line 2945 "awkgram.c"
+#line 2988 "awkgram.c"
     break;
 
   case 60:
@@ -2956,7 +2999,7 @@ regular_loop:
                if (yyvsp[0] != NULL)
                        yyval = list_append(yyval, yyvsp[0]);
          }
-#line 2960 "awkgram.c"
+#line 3003 "awkgram.c"
     break;
 
   case 61:
@@ -2973,7 +3016,7 @@ regular_loop:
                if (yyvsp[0] != NULL)
                        yyval = list_append(yyval, yyvsp[0]);
          }
-#line 2977 "awkgram.c"
+#line 3020 "awkgram.c"
     break;
 
   case 62:
@@ -2994,7 +3037,7 @@ regular_loop:
                if (yyvsp[0] != NULL)
                        yyval = list_append(yyval, yyvsp[0]);
          }
-#line 2998 "awkgram.c"
+#line 3041 "awkgram.c"
     break;
 
   case 63:
@@ -3003,7 +3046,7 @@ regular_loop:
                if (! in_function)
                        yyerror(_("`return' used outside function context"));
          }
-#line 3007 "awkgram.c"
+#line 3050 "awkgram.c"
     break;
 
   case 64:
@@ -3021,7 +3064,7 @@ regular_loop:
                if (yyvsp[0] != NULL)
                        yyval = list_append(yyval, yyvsp[0]);
          }
-#line 3025 "awkgram.c"
+#line 3068 "awkgram.c"
     break;
 
   case 65:
@@ -3032,13 +3075,13 @@ regular_loop:
                else
                        yyval = yyvsp[-1];
          }
-#line 3036 "awkgram.c"
+#line 3079 "awkgram.c"
     break;
 
   case 66:
 #line 1128 "awkgram.y"
                 { in_print = true; in_parens = 0; }
-#line 3042 "awkgram.c"
+#line 3085 "awkgram.c"
     break;
 
   case 67:
@@ -3143,13 +3186,13 @@ regular_print:
                        }
                }
          }
-#line 3147 "awkgram.c"
+#line 3190 "awkgram.c"
     break;
 
   case 68:
 #line 1230 "awkgram.y"
                           { sub_counter = 0; }
-#line 3153 "awkgram.c"
+#line 3196 "awkgram.c"
     break;
 
   case 69:
@@ -3186,7 +3229,7 @@ regular_print:
                        yyval = list_append(list_append(yyvsp[0], yyvsp[-2]), 
yyvsp[-3]);
                }
          }
-#line 3190 "awkgram.c"
+#line 3233 "awkgram.c"
     break;
 
   case 70:
@@ -3216,7 +3259,7 @@ regular_print:
                                fatal(_("`delete' is not allowed with 
FUNCTAB"));
                }
          }
-#line 3220 "awkgram.c"
+#line 3263 "awkgram.c"
     break;
 
   case 71:
@@ -3224,25 +3267,25 @@ regular_print:
           {
                yyval = optimize_assignment(yyvsp[0]);
          }
-#line 3228 "awkgram.c"
+#line 3271 "awkgram.c"
     break;
 
   case 72:
 #line 1301 "awkgram.y"
           { yyval = NULL; }
-#line 3234 "awkgram.c"
+#line 3277 "awkgram.c"
     break;
 
   case 73:
 #line 1303 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3240 "awkgram.c"
+#line 3283 "awkgram.c"
     break;
 
   case 74:
 #line 1308 "awkgram.y"
           { yyval = NULL; }
-#line 3246 "awkgram.c"
+#line 3289 "awkgram.c"
     break;
 
   case 75:
@@ -3253,13 +3296,13 @@ regular_print:
                else
                        yyval = list_prepend(yyvsp[-1], yyvsp[0]);
          }
-#line 3257 "awkgram.c"
+#line 3300 "awkgram.c"
     break;
 
   case 76:
 #line 1317 "awkgram.y"
           { yyval = NULL; }
-#line 3263 "awkgram.c"
+#line 3306 "awkgram.c"
     break;
 
   case 77:
@@ -3276,7 +3319,7 @@ regular_print:
                bcfree(yyvsp[-2]);
                yyval = yyvsp[-4];
          }
-#line 3280 "awkgram.c"
+#line 3323 "awkgram.c"
     break;
 
   case 78:
@@ -3292,13 +3335,13 @@ regular_print:
                yyvsp[-3]->comment = yyvsp[-1];
                yyval = yyvsp[-3];
          }
-#line 3296 "awkgram.c"
+#line 3339 "awkgram.c"
     break;
 
   case 79:
 #line 1350 "awkgram.y"
           {    yyval = yyvsp[0]; }
-#line 3302 "awkgram.c"
+#line 3345 "awkgram.c"
     break;
 
   case 80:
@@ -3310,7 +3353,7 @@ regular_print:
                bcfree(yyvsp[-1]);
                yyval = yyvsp[0];
          }
-#line 3314 "awkgram.c"
+#line 3357 "awkgram.c"
     break;
 
   case 81:
@@ -3321,13 +3364,13 @@ regular_print:
                add_sign_to_num(n, '+');
                yyval = yyvsp[0];
          }
-#line 3325 "awkgram.c"
+#line 3368 "awkgram.c"
     break;
 
   case 82:
 #line 1367 "awkgram.y"
           {    yyval = yyvsp[0]; }
-#line 3331 "awkgram.c"
+#line 3374 "awkgram.c"
     break;
 
   case 83:
@@ -3339,7 +3382,7 @@ regular_print:
                        yyvsp[0]->opcode = Op_push;
                yyval = yyvsp[0];
          }
-#line 3343 "awkgram.c"
+#line 3386 "awkgram.c"
     break;
 
   case 84:
@@ -3349,19 +3392,19 @@ regular_print:
                yyvsp[0]->opcode = Op_push_re;
                yyval = yyvsp[0];
          }
-#line 3353 "awkgram.c"
+#line 3396 "awkgram.c"
     break;
 
   case 85:
 #line 1386 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3359 "awkgram.c"
+#line 3402 "awkgram.c"
     break;
 
   case 86:
 #line 1388 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3365 "awkgram.c"
+#line 3408 "awkgram.c"
     break;
 
   case 88:
@@ -3369,7 +3412,7 @@ regular_print:
           {
                yyval = yyvsp[-1];
          }
-#line 3373 "awkgram.c"
+#line 3416 "awkgram.c"
     break;
 
   case 89:
@@ -3379,13 +3422,13 @@ regular_print:
                in_parens = 0;
                yyval = NULL;
          }
-#line 3383 "awkgram.c"
+#line 3426 "awkgram.c"
     break;
 
   case 90:
 #line 1410 "awkgram.y"
                  { in_print = false; in_parens = 0; }
-#line 3389 "awkgram.c"
+#line 3432 "awkgram.c"
     break;
 
   case 91:
@@ -3399,7 +3442,7 @@ regular_print:
                        lintwarn(_("concatenation as I/O `>' redirection target 
is ambiguous"));
                yyval = list_prepend(yyvsp[0], yyvsp[-2]);
          }
-#line 3403 "awkgram.c"
+#line 3446 "awkgram.c"
     break;
 
   case 92:
@@ -3410,7 +3453,7 @@ regular_print:
                add_lint(yyvsp[-3], LINT_assign_in_cond);
                yyval = mk_condition(yyvsp[-3], yyvsp[-5], yyvsp[0], NULL, 
NULL);
          }
-#line 3414 "awkgram.c"
+#line 3457 "awkgram.c"
     break;
 
   case 93:
@@ -3423,7 +3466,7 @@ regular_print:
                add_lint(yyvsp[-6], LINT_assign_in_cond);
                yyval = mk_condition(yyvsp[-6], yyvsp[-8], yyvsp[-3], 
yyvsp[-2], yyvsp[0]);
          }
-#line 3427 "awkgram.c"
+#line 3470 "awkgram.c"
     break;
 
   case 94:
@@ -3431,7 +3474,7 @@ regular_print:
           {
                yyval = yyvsp[0];
          }
-#line 3435 "awkgram.c"
+#line 3478 "awkgram.c"
     break;
 
   case 95:
@@ -3453,25 +3496,25 @@ regular_print:
                } else
                        yyval = NULL;
          }
-#line 3457 "awkgram.c"
+#line 3500 "awkgram.c"
     break;
 
   case 96:
 #line 1469 "awkgram.y"
           { yyval = NULL; }
-#line 3463 "awkgram.c"
+#line 3506 "awkgram.c"
     break;
 
   case 97:
 #line 1471 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3469 "awkgram.c"
+#line 3512 "awkgram.c"
     break;
 
   case 98:
 #line 1476 "awkgram.y"
           { yyval = NULL; }
-#line 3475 "awkgram.c"
+#line 3518 "awkgram.c"
     break;
 
   case 99:
@@ -3480,19 +3523,19 @@ regular_print:
                bcfree(yyvsp[-1]);
                yyval = yyvsp[0];
          }
-#line 3484 "awkgram.c"
+#line 3527 "awkgram.c"
     break;
 
   case 100:
 #line 1486 "awkgram.y"
           { yyval = NULL; }
-#line 3490 "awkgram.c"
+#line 3533 "awkgram.c"
     break;
 
   case 101:
 #line 1488 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3496 "awkgram.c"
+#line 3539 "awkgram.c"
     break;
 
   case 102:
@@ -3501,7 +3544,7 @@ regular_print:
                yyvsp[0]->param_count = 0;
                yyval = list_create(yyvsp[0]);
          }
-#line 3505 "awkgram.c"
+#line 3548 "awkgram.c"
     break;
 
   case 103:
@@ -3522,55 +3565,55 @@ regular_print:
                } else
                        yyval = NULL;
          }
-#line 3526 "awkgram.c"
+#line 3569 "awkgram.c"
     break;
 
   case 104:
 #line 1515 "awkgram.y"
           { yyval = NULL; }
-#line 3532 "awkgram.c"
+#line 3575 "awkgram.c"
     break;
 
   case 105:
 #line 1517 "awkgram.y"
           { yyval = yyvsp[-1]; }
-#line 3538 "awkgram.c"
+#line 3581 "awkgram.c"
     break;
 
   case 106:
 #line 1519 "awkgram.y"
           { yyval = yyvsp[-2]; }
-#line 3544 "awkgram.c"
+#line 3587 "awkgram.c"
     break;
 
   case 107:
 #line 1525 "awkgram.y"
           { yyval = NULL; }
-#line 3550 "awkgram.c"
+#line 3593 "awkgram.c"
     break;
 
   case 108:
 #line 1527 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3556 "awkgram.c"
+#line 3599 "awkgram.c"
     break;
 
   case 109:
 #line 1532 "awkgram.y"
           { yyval = NULL; }
-#line 3562 "awkgram.c"
+#line 3605 "awkgram.c"
     break;
 
   case 110:
 #line 1534 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3568 "awkgram.c"
+#line 3611 "awkgram.c"
     break;
 
   case 111:
 #line 1539 "awkgram.y"
           {    yyval = mk_expression_list(NULL, yyvsp[0]); }
-#line 3574 "awkgram.c"
+#line 3617 "awkgram.c"
     break;
 
   case 112:
@@ -3581,13 +3624,13 @@ regular_print:
                yyval = mk_expression_list(yyvsp[-2], yyvsp[0]);
                yyerrok;
          }
-#line 3585 "awkgram.c"
+#line 3628 "awkgram.c"
     break;
 
   case 113:
 #line 1548 "awkgram.y"
           { yyval = NULL; }
-#line 3591 "awkgram.c"
+#line 3634 "awkgram.c"
     break;
 
   case 114:
@@ -3599,7 +3642,7 @@ regular_print:
                 */
                yyval = yyvsp[-1];
          }
-#line 3603 "awkgram.c"
+#line 3646 "awkgram.c"
     break;
 
   case 115:
@@ -3608,7 +3651,7 @@ regular_print:
                /* Ditto */
                yyval = mk_expression_list(yyvsp[-2], yyvsp[0]);
          }
-#line 3612 "awkgram.c"
+#line 3655 "awkgram.c"
     break;
 
   case 116:
@@ -3619,25 +3662,25 @@ regular_print:
                        yyvsp[-2]->lasti->comment = yyvsp[-1];
                yyval = yyvsp[-2];
          }
-#line 3623 "awkgram.c"
+#line 3666 "awkgram.c"
     break;
 
   case 117:
 #line 1573 "awkgram.y"
           { yyval = NULL; }
-#line 3629 "awkgram.c"
+#line 3672 "awkgram.c"
     break;
 
   case 118:
 #line 1575 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3635 "awkgram.c"
+#line 3678 "awkgram.c"
     break;
 
   case 119:
 #line 1580 "awkgram.y"
           {    yyval = mk_expression_list(NULL, yyvsp[0]); }
-#line 3641 "awkgram.c"
+#line 3684 "awkgram.c"
     break;
 
   case 120:
@@ -3648,13 +3691,13 @@ regular_print:
                yyval = mk_expression_list(yyvsp[-2], yyvsp[0]);
                yyerrok;
          }
-#line 3652 "awkgram.c"
+#line 3695 "awkgram.c"
     break;
 
   case 121:
 #line 1589 "awkgram.y"
           { yyval = NULL; }
-#line 3658 "awkgram.c"
+#line 3701 "awkgram.c"
     break;
 
   case 122:
@@ -3666,7 +3709,7 @@ regular_print:
                 */
                yyval = yyvsp[-1];
          }
-#line 3670 "awkgram.c"
+#line 3713 "awkgram.c"
     break;
 
   case 123:
@@ -3675,7 +3718,7 @@ regular_print:
                /* Ditto */
                yyval = mk_expression_list(yyvsp[-2], yyvsp[0]);
          }
-#line 3679 "awkgram.c"
+#line 3722 "awkgram.c"
     break;
 
   case 124:
@@ -3686,31 +3729,31 @@ regular_print:
                        yyvsp[-2]->comment = yyvsp[-1];
                yyval = yyvsp[-2];
          }
-#line 3690 "awkgram.c"
+#line 3733 "awkgram.c"
     break;
 
   case 125:
 #line 1613 "awkgram.y"
               { yyval = yyvsp[0]; }
-#line 3696 "awkgram.c"
+#line 3739 "awkgram.c"
     break;
 
   case 126:
 #line 1614 "awkgram.y"
                        { yyval = list_create(yyvsp[0]); }
-#line 3702 "awkgram.c"
+#line 3745 "awkgram.c"
     break;
 
   case 127:
 #line 1619 "awkgram.y"
           { yyval = NULL; }
-#line 3708 "awkgram.c"
+#line 3751 "awkgram.c"
     break;
 
   case 128:
 #line 1620 "awkgram.y"
                     { yyval = yyvsp[0]; }
-#line 3714 "awkgram.c"
+#line 3757 "awkgram.c"
     break;
 
   case 129:
@@ -3721,7 +3764,7 @@ regular_print:
                                _("regular expression on right of assignment"));
                yyval = mk_assignment(yyvsp[-2], yyvsp[0], yyvsp[-1]);
          }
-#line 3725 "awkgram.c"
+#line 3768 "awkgram.c"
     break;
 
   case 130:
@@ -3729,19 +3772,19 @@ regular_print:
           {
                yyval = mk_assignment(yyvsp[-2], list_create(yyvsp[0]), 
yyvsp[-1]);
          }
-#line 3733 "awkgram.c"
+#line 3776 "awkgram.c"
     break;
 
   case 131:
 #line 1637 "awkgram.y"
           {    yyval = mk_boolean(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3739 "awkgram.c"
+#line 3782 "awkgram.c"
     break;
 
   case 132:
 #line 1639 "awkgram.y"
           {    yyval = mk_boolean(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3745 "awkgram.c"
+#line 3788 "awkgram.c"
     break;
 
   case 133:
@@ -3758,7 +3801,7 @@ regular_print:
                bcfree(yyvsp[0]);
                yyval = list_append(yyvsp[-2], yyvsp[-1]);
          }
-#line 3762 "awkgram.c"
+#line 3805 "awkgram.c"
     break;
 
   case 134:
@@ -3779,7 +3822,7 @@ regular_print:
                        yyval = list_append(list_merge(yyvsp[-2], yyvsp[0]), 
yyvsp[-1]);
                }
          }
-#line 3783 "awkgram.c"
+#line 3826 "awkgram.c"
     break;
 
   case 135:
@@ -3793,7 +3836,7 @@ regular_print:
                yyvsp[-1]->expr_count = 1;
                yyval = list_append(list_merge(yyvsp[-2], yyvsp[0]), yyvsp[-1]);
          }
-#line 3797 "awkgram.c"
+#line 3840 "awkgram.c"
     break;
 
   case 136:
@@ -3804,31 +3847,31 @@ regular_print:
                                _("regular expression on right of comparison"));
                yyval = list_append(list_merge(yyvsp[-2], yyvsp[0]), yyvsp[-1]);
          }
-#line 3808 "awkgram.c"
+#line 3851 "awkgram.c"
     break;
 
   case 137:
 #line 1688 "awkgram.y"
           { yyval = mk_condition(yyvsp[-4], yyvsp[-3], yyvsp[-2], yyvsp[-1], 
yyvsp[0]); }
-#line 3814 "awkgram.c"
+#line 3857 "awkgram.c"
     break;
 
   case 138:
 #line 1690 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3820 "awkgram.c"
+#line 3863 "awkgram.c"
     break;
 
   case 139:
 #line 1695 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3826 "awkgram.c"
+#line 3869 "awkgram.c"
     break;
 
   case 140:
 #line 1697 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3832 "awkgram.c"
+#line 3875 "awkgram.c"
     break;
 
   case 141:
@@ -3837,43 +3880,43 @@ regular_print:
                yyvsp[0]->opcode = Op_assign_quotient;
                yyval = yyvsp[0];
          }
-#line 3841 "awkgram.c"
+#line 3884 "awkgram.c"
     break;
 
   case 142:
 #line 1707 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3847 "awkgram.c"
+#line 3890 "awkgram.c"
     break;
 
   case 143:
 #line 1709 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3853 "awkgram.c"
+#line 3896 "awkgram.c"
     break;
 
   case 144:
 #line 1714 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3859 "awkgram.c"
+#line 3902 "awkgram.c"
     break;
 
   case 145:
 #line 1716 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3865 "awkgram.c"
+#line 3908 "awkgram.c"
     break;
 
   case 146:
 #line 1721 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3871 "awkgram.c"
+#line 3914 "awkgram.c"
     break;
 
   case 147:
 #line 1723 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 3877 "awkgram.c"
+#line 3920 "awkgram.c"
     break;
 
   case 148:
@@ -3931,43 +3974,43 @@ regular_print:
                                max_args = count;
                }
          }
-#line 3935 "awkgram.c"
+#line 3978 "awkgram.c"
     break;
 
   case 150:
 #line 1784 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3941 "awkgram.c"
+#line 3984 "awkgram.c"
     break;
 
   case 151:
 #line 1786 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3947 "awkgram.c"
+#line 3990 "awkgram.c"
     break;
 
   case 152:
 #line 1788 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3953 "awkgram.c"
+#line 3996 "awkgram.c"
     break;
 
   case 153:
 #line 1790 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3959 "awkgram.c"
+#line 4002 "awkgram.c"
     break;
 
   case 154:
 #line 1792 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3965 "awkgram.c"
+#line 4008 "awkgram.c"
     break;
 
   case 155:
 #line 1794 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 3971 "awkgram.c"
+#line 4014 "awkgram.c"
     break;
 
   case 156:
@@ -3985,7 +4028,7 @@ regular_print:
                                _("non-redirected `getline' undefined inside 
END action"));
                yyval = mk_getline(yyvsp[-2], yyvsp[-1], yyvsp[0], 
redirect_input);
          }
-#line 3989 "awkgram.c"
+#line 4032 "awkgram.c"
     break;
 
   case 157:
@@ -3994,7 +4037,7 @@ regular_print:
                yyvsp[0]->opcode = Op_postincrement;
                yyval = mk_assignment(yyvsp[-1], NULL, yyvsp[0]);
          }
-#line 3998 "awkgram.c"
+#line 4041 "awkgram.c"
     break;
 
   case 158:
@@ -4003,7 +4046,7 @@ regular_print:
                yyvsp[0]->opcode = Op_postdecrement;
                yyval = mk_assignment(yyvsp[-1], NULL, yyvsp[0]);
          }
-#line 4007 "awkgram.c"
+#line 4050 "awkgram.c"
     break;
 
   case 159:
@@ -4028,7 +4071,7 @@ regular_print:
                        yyval = list_append(list_merge(t, yyvsp[0]), yyvsp[-1]);
                }
          }
-#line 4032 "awkgram.c"
+#line 4075 "awkgram.c"
     break;
 
   case 160:
@@ -4037,43 +4080,43 @@ regular_print:
                  yyval = mk_getline(yyvsp[-1], yyvsp[0], yyvsp[-3], 
yyvsp[-2]->redir_type);
                  bcfree(yyvsp[-2]);
                }
-#line 4041 "awkgram.c"
+#line 4084 "awkgram.c"
     break;
 
   case 161:
 #line 1852 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 4047 "awkgram.c"
+#line 4090 "awkgram.c"
     break;
 
   case 162:
 #line 1854 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 4053 "awkgram.c"
+#line 4096 "awkgram.c"
     break;
 
   case 163:
 #line 1856 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 4059 "awkgram.c"
+#line 4102 "awkgram.c"
     break;
 
   case 164:
 #line 1858 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 4065 "awkgram.c"
+#line 4108 "awkgram.c"
     break;
 
   case 165:
 #line 1860 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 4071 "awkgram.c"
+#line 4114 "awkgram.c"
     break;
 
   case 166:
 #line 1862 "awkgram.y"
           { yyval = mk_binary(yyvsp[-2], yyvsp[0], yyvsp[-1]); }
-#line 4077 "awkgram.c"
+#line 4120 "awkgram.c"
     break;
 
   case 167:
@@ -4081,7 +4124,7 @@ regular_print:
           {
                yyval = list_create(yyvsp[0]);
          }
-#line 4085 "awkgram.c"
+#line 4128 "awkgram.c"
     break;
 
   case 168:
@@ -4117,7 +4160,7 @@ regular_print:
                        }
                }
           }
-#line 4121 "awkgram.c"
+#line 4164 "awkgram.c"
     break;
 
   case 169:
@@ -4129,7 +4172,7 @@ regular_print:
                // print "foo" > ("bar" 1)
                yyval = list_append(yyvsp[-1], bcalloc(Op_parens, 1, 
sourceline));
          }
-#line 4133 "awkgram.c"
+#line 4176 "awkgram.c"
     break;
 
   case 170:
@@ -4139,7 +4182,7 @@ regular_print:
                if (yyval == NULL)
                        YYABORT;
          }
-#line 4143 "awkgram.c"
+#line 4186 "awkgram.c"
     break;
 
   case 171:
@@ -4149,7 +4192,7 @@ regular_print:
                if (yyval == NULL)
                        YYABORT;
          }
-#line 4153 "awkgram.c"
+#line 4196 "awkgram.c"
     break;
 
   case 172:
@@ -4166,7 +4209,7 @@ regular_print:
                if (yyval == NULL)
                        YYABORT;
          }
-#line 4170 "awkgram.c"
+#line 4213 "awkgram.c"
     break;
 
   case 175:
@@ -4175,7 +4218,7 @@ regular_print:
                yyvsp[-1]->opcode = Op_preincrement;
                yyval = mk_assignment(yyvsp[0], NULL, yyvsp[-1]);
          }
-#line 4179 "awkgram.c"
+#line 4222 "awkgram.c"
     break;
 
   case 176:
@@ -4184,7 +4227,7 @@ regular_print:
                yyvsp[-1]->opcode = Op_predecrement;
                yyval = mk_assignment(yyvsp[0], NULL, yyvsp[-1]);
          }
-#line 4188 "awkgram.c"
+#line 4231 "awkgram.c"
     break;
 
   case 177:
@@ -4192,7 +4235,7 @@ regular_print:
           {
                yyval = list_create(yyvsp[0]);
          }
-#line 4196 "awkgram.c"
+#line 4239 "awkgram.c"
     break;
 
   case 178:
@@ -4200,7 +4243,7 @@ regular_print:
           {
                yyval = list_create(yyvsp[0]);
          }
-#line 4204 "awkgram.c"
+#line 4247 "awkgram.c"
     break;
 
   case 179:
@@ -4219,7 +4262,7 @@ regular_print:
                        yyval = list_append(yyvsp[0], yyvsp[-1]);
                }
          }
-#line 4223 "awkgram.c"
+#line 4266 "awkgram.c"
     break;
 
   case 180:
@@ -4241,7 +4284,7 @@ regular_print:
                        yyval = list_append(yyvsp[0], yyvsp[-1]);
                }
          }
-#line 4245 "awkgram.c"
+#line 4288 "awkgram.c"
     break;
 
   case 181:
@@ -4250,7 +4293,7 @@ regular_print:
                func_use(yyvsp[0]->lasti->func_name, FUNC_USE);
                yyval = yyvsp[0];
          }
-#line 4254 "awkgram.c"
+#line 4297 "awkgram.c"
     break;
 
   case 182:
@@ -4288,7 +4331,7 @@ regular_print:
                yyval = list_prepend(yyvsp[0], t);
                at_seen = false;
          }
-#line 4292 "awkgram.c"
+#line 4335 "awkgram.c"
     break;
 
   case 183:
@@ -4325,37 +4368,37 @@ regular_print:
                        yyval = list_append(t, yyvsp[-3]);
                }
          }
-#line 4329 "awkgram.c"
+#line 4372 "awkgram.c"
     break;
 
   case 184:
 #line 2070 "awkgram.y"
           { yyval = NULL; }
-#line 4335 "awkgram.c"
+#line 4378 "awkgram.c"
     break;
 
   case 185:
 #line 2072 "awkgram.y"
           { yyval = yyvsp[0]; }
-#line 4341 "awkgram.c"
+#line 4384 "awkgram.c"
     break;
 
   case 186:
 #line 2077 "awkgram.y"
           { yyval = NULL; }
-#line 4347 "awkgram.c"
+#line 4390 "awkgram.c"
     break;
 
   case 187:
 #line 2079 "awkgram.y"
           { yyval = yyvsp[-1]; }
-#line 4353 "awkgram.c"
+#line 4396 "awkgram.c"
     break;
 
   case 188:
 #line 2084 "awkgram.y"
           {    yyval = yyvsp[0]; }
-#line 4359 "awkgram.c"
+#line 4402 "awkgram.c"
     break;
 
   case 189:
@@ -4363,7 +4406,7 @@ regular_print:
           {
                yyval = list_merge(yyvsp[-1], yyvsp[0]);
          }
-#line 4367 "awkgram.c"
+#line 4410 "awkgram.c"
     break;
 
   case 190:
@@ -4381,7 +4424,7 @@ regular_print:
                sub_counter++;  /* count # of dimensions */
                yyval = yyvsp[0];
          }
-#line 4385 "awkgram.c"
+#line 4428 "awkgram.c"
     break;
 
   case 191:
@@ -4399,13 +4442,13 @@ regular_print:
                        yyvsp[0]->sub_count = count_expressions(&t, false);
                yyval = list_append(t, yyvsp[0]);
          }
-#line 4403 "awkgram.c"
+#line 4446 "awkgram.c"
     break;
 
   case 192:
 #line 2127 "awkgram.y"
           {    yyval = yyvsp[0]; }
-#line 4409 "awkgram.c"
+#line 4452 "awkgram.c"
     break;
 
   case 193:
@@ -4413,13 +4456,13 @@ regular_print:
           {
                yyval = list_merge(yyvsp[-1], yyvsp[0]);
          }
-#line 4417 "awkgram.c"
+#line 4460 "awkgram.c"
     break;
 
   case 194:
 #line 2136 "awkgram.y"
           { yyval = yyvsp[-1]; }
-#line 4423 "awkgram.c"
+#line 4466 "awkgram.c"
     break;
 
   case 195:
@@ -4429,7 +4472,7 @@ regular_print:
                yyvsp[0]->memory = variable(yyvsp[0]->source_line, 
yyvsp[0]->lextok, Node_var_new);
                yyval = list_create(yyvsp[0]);
          }
-#line 4433 "awkgram.c"
+#line 4476 "awkgram.c"
     break;
 
   case 196:
@@ -4441,7 +4484,7 @@ regular_print:
                yyvsp[-1]->opcode = Op_push_array;
                yyval = list_prepend(yyvsp[0], yyvsp[-1]);
          }
-#line 4445 "awkgram.c"
+#line 4488 "awkgram.c"
     break;
 
   case 197:
@@ -4457,7 +4500,7 @@ regular_print:
                } else
                        yyval = yyvsp[0];
          }
-#line 4461 "awkgram.c"
+#line 4504 "awkgram.c"
     break;
 
   case 198:
@@ -4467,7 +4510,7 @@ regular_print:
                if (yyvsp[0] != NULL)
                        mk_assignment(yyvsp[-1], NULL, yyvsp[0]);
          }
-#line 4471 "awkgram.c"
+#line 4514 "awkgram.c"
     break;
 
   case 199:
@@ -4475,7 +4518,7 @@ regular_print:
           {
                yyvsp[0]->opcode = Op_postincrement;
          }
-#line 4479 "awkgram.c"
+#line 4522 "awkgram.c"
     break;
 
   case 200:
@@ -4483,59 +4526,59 @@ regular_print:
           {
                yyvsp[0]->opcode = Op_postdecrement;
          }
-#line 4487 "awkgram.c"
+#line 4530 "awkgram.c"
     break;
 
   case 201:
 #line 2187 "awkgram.y"
           { yyval = NULL; }
-#line 4493 "awkgram.c"
+#line 4536 "awkgram.c"
     break;
 
   case 202:
 #line 2191 "awkgram.y"
                       { yyval = yyvsp[0]; }
-#line 4499 "awkgram.c"
+#line 4542 "awkgram.c"
     break;
 
   case 203:
 #line 2195 "awkgram.y"
                         { yyval = yyvsp[0]; yyerrok; }
-#line 4505 "awkgram.c"
+#line 4548 "awkgram.c"
     break;
 
   case 204:
 #line 2199 "awkgram.y"
               { yyerrok; }
-#line 4511 "awkgram.c"
+#line 4554 "awkgram.c"
     break;
 
   case 205:
 #line 2204 "awkgram.y"
           { yyval = NULL; }
-#line 4517 "awkgram.c"
+#line 4560 "awkgram.c"
     break;
 
   case 207:
 #line 2209 "awkgram.y"
                 { yyerrok; }
-#line 4523 "awkgram.c"
+#line 4566 "awkgram.c"
     break;
 
   case 208:
 #line 2213 "awkgram.y"
                 { yyval = yyvsp[0]; yyerrok; }
-#line 4529 "awkgram.c"
+#line 4572 "awkgram.c"
     break;
 
   case 209:
 #line 2217 "awkgram.y"
                         { yyval = yyvsp[0]; yyerrok; }
-#line 4535 "awkgram.c"
+#line 4578 "awkgram.c"
     break;
 
 
-#line 4539 "awkgram.c"
+#line 4582 "awkgram.c"
 
       default: break;
     }
@@ -4550,10 +4593,11 @@ regular_print:
      case of YYERROR or YYBACKUP, subsequent parser actions might lead
      to an incorrect destructor call or verbose syntax error message
      before the lookahead is translated.  */
-  YY_SYMBOL_PRINT ("-> $$ =", YY_CAST (yysymbol_kind_t, yyr1[yyn]), &yyval, 
&yyloc);
+  YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc);
 
   YYPOPSTACK (yylen);
   yylen = 0;
+  YY_STACK_PRINT (yyss, yyssp);
 
   *++yyvsp = yyval;
 
@@ -4577,14 +4621,50 @@ regular_print:
 yyerrlab:
   /* Make sure we have latest lookahead translation.  See comments at
      user semantic actions for why this is necessary.  */
-  yytoken = yychar == YYEMPTY ? YYSYMBOL_YYEMPTY : YYTRANSLATE (yychar);
+  yytoken = yychar == YYEMPTY ? YYEMPTY : YYTRANSLATE (yychar);
+
   /* If not already recovering from an error, report this error.  */
   if (!yyerrstatus)
     {
       ++yynerrs;
+#if ! YYERROR_VERBOSE
       yyerror (YY_("syntax error"));
+#else
+# define YYSYNTAX_ERROR yysyntax_error (&yymsg_alloc, &yymsg, \
+                                        yyssp, yytoken)
+      {
+        char const *yymsgp = YY_("syntax error");
+        int yysyntax_error_status;
+        yysyntax_error_status = YYSYNTAX_ERROR;
+        if (yysyntax_error_status == 0)
+          yymsgp = yymsg;
+        else if (yysyntax_error_status == 1)
+          {
+            if (yymsg != yymsgbuf)
+              YYSTACK_FREE (yymsg);
+            yymsg = YY_CAST (char *, YYSTACK_ALLOC (YY_CAST (YYSIZE_T, 
yymsg_alloc)));
+            if (!yymsg)
+              {
+                yymsg = yymsgbuf;
+                yymsg_alloc = sizeof yymsgbuf;
+                yysyntax_error_status = 2;
+              }
+            else
+              {
+                yysyntax_error_status = YYSYNTAX_ERROR;
+                yymsgp = yymsg;
+              }
+          }
+        yyerror (yymsgp);
+        if (yysyntax_error_status == 2)
+          goto yyexhaustedlab;
+      }
+# undef YYSYNTAX_ERROR
+#endif
     }
 
+
+
   if (yyerrstatus == 3)
     {
       /* If just tried and failed to reuse lookahead token after an
@@ -4633,14 +4713,13 @@ yyerrorlab:
 yyerrlab1:
   yyerrstatus = 3;      /* Each real token shifted decrements this.  */
 
-  // Pop stack until we find a state that shifts the error token.
   for (;;)
     {
       yyn = yypact[yystate];
       if (!yypact_value_is_default (yyn))
         {
-          yyn += YYSYMBOL_YYerror;
-          if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYSYMBOL_YYerror)
+          yyn += YYTERROR;
+          if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
             {
               yyn = yytable[yyn];
               if (0 < yyn)
@@ -4654,7 +4733,7 @@ yyerrlab1:
 
 
       yydestruct ("Error: popping",
-                  YY_ACCESSING_SYMBOL (yystate), yyvsp);
+                  yystos[yystate], yyvsp);
       YYPOPSTACK (1);
       yystate = *yyssp;
       YY_STACK_PRINT (yyss, yyssp);
@@ -4666,7 +4745,7 @@ yyerrlab1:
 
 
   /* Shift the error token.  */
-  YY_SYMBOL_PRINT ("Shifting", YY_ACCESSING_SYMBOL (yyn), yyvsp, yylsp);
+  YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);
 
   yystate = yyn;
   goto yynewstate;
@@ -4688,7 +4767,7 @@ yyabortlab:
   goto yyreturn;
 
 
-#if !defined yyoverflow
+#if !defined yyoverflow || YYERROR_VERBOSE
 /*-------------------------------------------------.
 | yyexhaustedlab -- memory exhaustion comes here.  |
 `-------------------------------------------------*/
@@ -4718,17 +4797,19 @@ yyreturn:
   while (yyssp != yyss)
     {
       yydestruct ("Cleanup: popping",
-                  YY_ACCESSING_SYMBOL (+*yyssp), yyvsp);
+                  yystos[+*yyssp], yyvsp);
       YYPOPSTACK (1);
     }
 #ifndef yyoverflow
   if (yyss != yyssa)
     YYSTACK_FREE (yyss);
 #endif
-
+#if YYERROR_VERBOSE
+  if (yymsg != yymsgbuf)
+    YYSTACK_FREE (yymsg);
+#endif
   return yyresult;
 }
-
 #line 2219 "awkgram.y"
 
 
@@ -5784,7 +5865,7 @@ get_src_buf()
 static char *
 tokexpand()
 {
-       static int toksize;
+       static size_t toksize;
        int tokoffset;
 
        if (tokstart != NULL) {
diff --git a/awkgram.y b/awkgram.y
index 2a141d3..0eb9694 100644
--- a/awkgram.y
+++ b/awkgram.y
@@ -3270,7 +3270,7 @@ get_src_buf()
 static char *
 tokexpand()
 {
-       static int toksize;
+       static size_t toksize;
        int tokoffset;
 
        if (tokstart != NULL) {
diff --git a/doc/ChangeLog b/doc/ChangeLog
index 2b6ccc4..b7d145e 100644
--- a/doc/ChangeLog
+++ b/doc/ChangeLog
@@ -1,3 +1,9 @@
+2020-06-09         Arnold D. Robbins     <arnold@skeeve.com>
+
+       * gawktexi.in (Implementation Limits): Update the table to be more
+       accurate and up to date. Note units of limits, per request from
+       Ed Morton <mortoneccc@comcast.net>.
+
 2020-06-07         Arnold D. Robbins     <arnold@skeeve.com>
 
        * texinfo.tex: Updated from GNULIB.
diff --git a/doc/gawk.info b/doc/gawk.info
index c54eeff..31892f4 100644
--- a/doc/gawk.info
+++ b/doc/gawk.info
@@ -31448,10 +31448,11 @@ Item                          Limit
 --------------------------------------------------------------------------
 Characters in a character     2^(number of bits per byte)
 class
-Length of input record        'MAX_INT'
+Length of input record in     'ULONG_MAX'
+bytes
 Length of output record       Unlimited
 Length of source line         Unlimited
-Number of fields in a         'MAX_LONG'
+Number of fields in a         'ULONG_MAX'
 record
 Number of file redirections   Unlimited
 Number of input records in    'MAX_LONG'
@@ -31462,9 +31463,11 @@ Number of pipe redirections   min(number of processes 
per user, number
                               of open files)
 Numeric values                Double-precision floating point (if not
                               using MPFR)
-Size of a field               'MAX_INT'
-Size of a literal string      'MAX_INT'
-Size of a printf string       'MAX_INT'
+Size of a field in bytes      'ULONG_MAX'
+Size of a literal string in   'ULONG_MAX'
+bytes
+Size of a printf string in    'ULONG_MAX'
+bytes
 
 
 File: gawk.info,  Node: Extension Design,  Next: Notes summary,  Prev: 
Implementation Limitations,  Up: Notes
@@ -37891,24 +37894,24 @@ Ref: Derived Files-Footnote-21268917
 Ref: Derived Files-Footnote-31269515
 Node: Future Extensions1269629
 Node: Implementation Limitations1270287
-Node: Extension Design1271470
-Node: Old Extension Problems1272614
-Ref: Old Extension Problems-Footnote-11274132
-Node: Extension New Mechanism Goals1274189
-Ref: Extension New Mechanism Goals-Footnote-11277553
-Node: Extension Other Design Decisions1277742
-Node: Extension Future Growth1279855
-Node: Notes summary1280461
-Node: Basic Concepts1281619
-Node: Basic High Level1282300
-Ref: figure-general-flow1282582
-Ref: figure-process-flow1283267
-Ref: Basic High Level-Footnote-11286568
-Node: Basic Data Typing1286753
-Node: Glossary1290081
-Node: Copying1321966
-Node: GNU Free Documentation License1359509
-Node: Index1384629
+Node: Extension Design1271497
+Node: Old Extension Problems1272641
+Ref: Old Extension Problems-Footnote-11274159
+Node: Extension New Mechanism Goals1274216
+Ref: Extension New Mechanism Goals-Footnote-11277580
+Node: Extension Other Design Decisions1277769
+Node: Extension Future Growth1279882
+Node: Notes summary1280488
+Node: Basic Concepts1281646
+Node: Basic High Level1282327
+Ref: figure-general-flow1282609
+Ref: figure-process-flow1283294
+Ref: Basic High Level-Footnote-11286595
+Node: Basic Data Typing1286780
+Node: Glossary1290108
+Node: Copying1321993
+Node: GNU Free Documentation License1359536
+Node: Index1384656
 
 End Tag Table
 
diff --git a/doc/gawk.texi b/doc/gawk.texi
index 6141347..e844afc 100644
--- a/doc/gawk.texi
+++ b/doc/gawk.texi
@@ -42850,18 +42850,18 @@ different limits.
 @multitable @columnfractions .40 .60
 @headitem Item @tab Limit
 @item Characters in a character class @tab 2^(number of bits per byte)
-@item Length of input record @tab @code{MAX_INT}
+@item Length of input record in bytes @tab @code{ULONG_MAX}
 @item Length of output record @tab Unlimited
 @item Length of source line @tab Unlimited
-@item Number of fields in a record @tab @code{MAX_LONG}
+@item Number of fields in a record @tab @code{ULONG_MAX}
 @item Number of file redirections @tab Unlimited
 @item Number of input records in one file @tab @code{MAX_LONG}
 @item Number of input records total @tab @code{MAX_LONG}
 @item Number of pipe redirections @tab min(number of processes per user, 
number of open files)
 @item Numeric values @tab Double-precision floating point (if not using MPFR)
-@item Size of a field @tab @code{MAX_INT}
-@item Size of a literal string @tab @code{MAX_INT}
-@item Size of a printf string @tab @code{MAX_INT}
+@item Size of a field in bytes @tab @code{ULONG_MAX}
+@item Size of a literal string in bytes @tab @code{ULONG_MAX}
+@item Size of a printf string in bytes @tab @code{ULONG_MAX}
 @end multitable
 
 @node Extension Design
diff --git a/doc/gawktexi.in b/doc/gawktexi.in
index 0d14c87..2916de7 100644
--- a/doc/gawktexi.in
+++ b/doc/gawktexi.in
@@ -41821,18 +41821,18 @@ different limits.
 @multitable @columnfractions .40 .60
 @headitem Item @tab Limit
 @item Characters in a character class @tab 2^(number of bits per byte)
-@item Length of input record @tab @code{MAX_INT}
+@item Length of input record in bytes @tab @code{ULONG_MAX}
 @item Length of output record @tab Unlimited
 @item Length of source line @tab Unlimited
-@item Number of fields in a record @tab @code{MAX_LONG}
+@item Number of fields in a record @tab @code{ULONG_MAX}
 @item Number of file redirections @tab Unlimited
 @item Number of input records in one file @tab @code{MAX_LONG}
 @item Number of input records total @tab @code{MAX_LONG}
 @item Number of pipe redirections @tab min(number of processes per user, 
number of open files)
 @item Numeric values @tab Double-precision floating point (if not using MPFR)
-@item Size of a field @tab @code{MAX_INT}
-@item Size of a literal string @tab @code{MAX_INT}
-@item Size of a printf string @tab @code{MAX_INT}
+@item Size of a field in bytes @tab @code{ULONG_MAX}
+@item Size of a literal string in bytes @tab @code{ULONG_MAX}
+@item Size of a printf string in bytes @tab @code{ULONG_MAX}
 @end multitable
 
 @node Extension Design

http://git.sv.gnu.org/cgit/gawk.git/commit/?id=39ab90b6e780e922b49ebe3b83147291bf65fb8c

commit 39ab90b6e780e922b49ebe3b83147291bf65fb8c
Author: Arnold D. Robbins <arnold@skeeve.com>
Date:   Wed Jun 10 09:52:39 2020 +0300

    Fix another printf in profile.c.

diff --git a/profile.c b/profile.c
index 0e00b63..e9c9053 100644
--- a/profile.c
+++ b/profile.c
@@ -1043,7 +1043,7 @@ cleanup:
 
                        ip1 = pc->branch_if;
                        if (ip1->exec_count > 0)
-                               fprintf(prof_fp, " # %ld", ip1->exec_count);
+                               fprintf(prof_fp, " # %lld", ip1->exec_count);
                        ip1 = end_line(ip1);
                        indent_in();
                        if (pc->comment != NULL)

-----------------------------------------------------------------------

Summary of changes:
 ChangeLog       |    5 +
 awkgram.c       | 1153 +++++++++++++++++++++++++++++--------------------------
 awkgram.y       |    2 +-
 doc/ChangeLog   |    6 +
 doc/gawk.info   |   49 +--
 doc/gawk.texi   |   10 +-
 doc/gawktexi.in |   10 +-
 profile.c       |    2 +-
 8 files changed, 666 insertions(+), 571 deletions(-)


hooks/post-receive
-- 
gawk



reply via email to

[Prev in Thread] Current Thread [Next in Thread]