2014-04-22 22:11:22 +00:00
|
|
|
/* This file generated automatically using
|
|
|
|
* @Id: skel2c,v 1.3 2014/04/06 19:48:04 tom Exp @
|
|
|
|
*/
|
|
|
|
|
2016-10-04 20:54:49 +00:00
|
|
|
/* @Id: yaccpar.skel,v 1.7 2016/06/06 23:35:55 Tom.Shields Exp @ */
|
2012-05-03 09:57:52 +00:00
|
|
|
|
|
|
|
#include "defs.h"
|
|
|
|
|
|
|
|
/* If the skeleton is changed, the banner should be changed so that */
|
|
|
|
/* the altered version can be easily distinguished from the original. */
|
|
|
|
/* */
|
|
|
|
/* The #defines included with the banner are there because they are */
|
|
|
|
/* useful in subsequent code. The macros #defined in the header or */
|
|
|
|
/* the body either are not useful outside of semantic actions or */
|
|
|
|
/* are conditional. */
|
|
|
|
|
|
|
|
const char *const banner[] =
|
|
|
|
{
|
2014-03-30 21:48:49 +00:00
|
|
|
"/* original parser id follows */",
|
2014-04-22 22:11:22 +00:00
|
|
|
"/* yysccsid[] = \"@(#)yaccpar 1.9 (Berkeley) 02/21/93\" */",
|
2014-03-30 21:48:49 +00:00
|
|
|
"/* (use YYMAJOR/YYMINOR for ifdefs dependent on parser version) */",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
|
|
|
"#define YYBYACC 1",
|
|
|
|
CONCAT1("#define YYMAJOR ", YYMAJOR),
|
|
|
|
CONCAT1("#define YYMINOR ", YYMINOR),
|
|
|
|
#ifdef YYPATCH
|
|
|
|
CONCAT1("#define YYPATCH ", YYPATCH),
|
|
|
|
#endif
|
|
|
|
"",
|
|
|
|
"#define YYEMPTY (-1)",
|
|
|
|
"#define yyclearin (yychar = YYEMPTY)",
|
|
|
|
"#define yyerrok (yyerrflag = 0)",
|
|
|
|
"#define YYRECOVERING() (yyerrflag != 0)",
|
2014-04-22 22:11:22 +00:00
|
|
|
"#define YYENOMEM (-2)",
|
|
|
|
"#define YYEOF 0",
|
2012-05-03 09:57:52 +00:00
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const xdecls[] =
|
|
|
|
{
|
|
|
|
"",
|
|
|
|
"extern int YYPARSE_DECL();",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const tables[] =
|
|
|
|
{
|
2014-04-22 22:11:22 +00:00
|
|
|
"extern YYINT yylhs[];",
|
|
|
|
"extern YYINT yylen[];",
|
|
|
|
"extern YYINT yydefred[];",
|
|
|
|
"extern YYINT yydgoto[];",
|
|
|
|
"extern YYINT yysindex[];",
|
|
|
|
"extern YYINT yyrindex[];",
|
|
|
|
"extern YYINT yygindex[];",
|
|
|
|
"extern YYINT yytable[];",
|
|
|
|
"extern YYINT yycheck[];",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
2016-10-04 20:54:49 +00:00
|
|
|
"#if YYDEBUG || defined(yytname)",
|
2012-05-03 09:57:52 +00:00
|
|
|
"extern char *yyname[];",
|
2016-10-04 20:54:49 +00:00
|
|
|
"#endif",
|
|
|
|
"#if YYDEBUG",
|
2012-05-03 09:57:52 +00:00
|
|
|
"extern char *yyrule[];",
|
|
|
|
"#endif",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const global_vars[] =
|
|
|
|
{
|
|
|
|
"",
|
|
|
|
"int yydebug;",
|
|
|
|
"int yynerrs;",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const impure_vars[] =
|
|
|
|
{
|
|
|
|
"",
|
|
|
|
"int yyerrflag;",
|
|
|
|
"int yychar;",
|
|
|
|
"YYSTYPE yyval;",
|
|
|
|
"YYSTYPE yylval;",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const hdr_defs[] =
|
|
|
|
{
|
|
|
|
"",
|
|
|
|
"/* define the initial stack-sizes */",
|
|
|
|
"#ifdef YYSTACKSIZE",
|
|
|
|
"#undef YYMAXDEPTH",
|
|
|
|
"#define YYMAXDEPTH YYSTACKSIZE",
|
|
|
|
"#else",
|
|
|
|
"#ifdef YYMAXDEPTH",
|
|
|
|
"#define YYSTACKSIZE YYMAXDEPTH",
|
|
|
|
"#else",
|
2013-10-29 08:08:57 +00:00
|
|
|
"#define YYSTACKSIZE 10000",
|
|
|
|
"#define YYMAXDEPTH 10000",
|
2012-05-03 09:57:52 +00:00
|
|
|
"#endif",
|
|
|
|
"#endif",
|
|
|
|
"",
|
2013-10-29 08:08:57 +00:00
|
|
|
"#define YYINITSTACKSIZE 200",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
|
|
|
"typedef struct {",
|
|
|
|
" unsigned stacksize;",
|
2014-04-22 22:11:22 +00:00
|
|
|
" YYINT *s_base;",
|
|
|
|
" YYINT *s_mark;",
|
|
|
|
" YYINT *s_last;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" YYSTYPE *l_base;",
|
|
|
|
" YYSTYPE *l_mark;",
|
|
|
|
"} YYSTACKDATA;",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const hdr_vars[] =
|
|
|
|
{
|
|
|
|
"/* variables for the parser stack */",
|
|
|
|
"static YYSTACKDATA yystack;",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const body_vars[] =
|
|
|
|
{
|
|
|
|
" int yyerrflag;",
|
|
|
|
" int yychar;",
|
|
|
|
" YYSTYPE yyval;",
|
|
|
|
" YYSTYPE yylval;",
|
|
|
|
"",
|
|
|
|
" /* variables for the parser stack */",
|
|
|
|
" YYSTACKDATA yystack;",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const body_1[] =
|
|
|
|
{
|
|
|
|
"",
|
|
|
|
"#if YYDEBUG",
|
2016-10-04 20:54:49 +00:00
|
|
|
"#include <stdio.h> /* needed for printf */",
|
2012-05-03 09:57:52 +00:00
|
|
|
"#endif",
|
|
|
|
"",
|
|
|
|
"#include <stdlib.h> /* needed for malloc, etc */",
|
|
|
|
"#include <string.h> /* needed for memset */",
|
|
|
|
"",
|
|
|
|
"/* allocate initial stack or double stack size, up to YYMAXDEPTH */",
|
|
|
|
"static int yygrowstack(YYSTACKDATA *data)",
|
|
|
|
"{",
|
|
|
|
" int i;",
|
|
|
|
" unsigned newsize;",
|
2014-04-22 22:11:22 +00:00
|
|
|
" YYINT *newss;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" YYSTYPE *newvs;",
|
|
|
|
"",
|
|
|
|
" if ((newsize = data->stacksize) == 0)",
|
|
|
|
" newsize = YYINITSTACKSIZE;",
|
|
|
|
" else if (newsize >= YYMAXDEPTH)",
|
2014-04-22 22:11:22 +00:00
|
|
|
" return YYENOMEM;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" else if ((newsize *= 2) > YYMAXDEPTH)",
|
|
|
|
" newsize = YYMAXDEPTH;",
|
|
|
|
"",
|
2013-05-30 13:10:38 +00:00
|
|
|
" i = (int) (data->s_mark - data->s_base);",
|
2014-04-22 22:11:22 +00:00
|
|
|
" newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss));",
|
2012-05-03 09:57:52 +00:00
|
|
|
" if (newss == 0)",
|
2014-04-22 22:11:22 +00:00
|
|
|
" return YYENOMEM;",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
|
|
|
" data->s_base = newss;",
|
|
|
|
" data->s_mark = newss + i;",
|
|
|
|
"",
|
|
|
|
" newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs));",
|
|
|
|
" if (newvs == 0)",
|
2014-04-22 22:11:22 +00:00
|
|
|
" return YYENOMEM;",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
|
|
|
" data->l_base = newvs;",
|
|
|
|
" data->l_mark = newvs + i;",
|
|
|
|
"",
|
|
|
|
" data->stacksize = newsize;",
|
|
|
|
" data->s_last = data->s_base + newsize - 1;",
|
|
|
|
" return 0;",
|
|
|
|
"}",
|
|
|
|
"",
|
|
|
|
"#if YYPURE || defined(YY_NO_LEAKS)",
|
|
|
|
"static void yyfreestack(YYSTACKDATA *data)",
|
|
|
|
"{",
|
|
|
|
" free(data->s_base);",
|
|
|
|
" free(data->l_base);",
|
|
|
|
" memset(data, 0, sizeof(*data));",
|
|
|
|
"}",
|
|
|
|
"#else",
|
|
|
|
"#define yyfreestack(data) /* nothing */",
|
|
|
|
"#endif",
|
|
|
|
"",
|
|
|
|
"#define YYABORT goto yyabort",
|
|
|
|
"#define YYREJECT goto yyabort",
|
|
|
|
"#define YYACCEPT goto yyaccept",
|
|
|
|
"#define YYERROR goto yyerrlab",
|
|
|
|
"",
|
|
|
|
"int",
|
|
|
|
"YYPARSE_DECL()",
|
|
|
|
"{",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const body_2[] =
|
|
|
|
{
|
|
|
|
" int yym, yyn, yystate;",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" const char *yys;",
|
|
|
|
"",
|
|
|
|
" if ((yys = getenv(\"YYDEBUG\")) != 0)",
|
|
|
|
" {",
|
|
|
|
" yyn = *yys;",
|
|
|
|
" if (yyn >= '0' && yyn <= '9')",
|
|
|
|
" yydebug = yyn - '0';",
|
|
|
|
" }",
|
|
|
|
"#endif",
|
|
|
|
"",
|
2016-10-04 20:54:49 +00:00
|
|
|
" yym = 0;",
|
|
|
|
" yyn = 0;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" yynerrs = 0;",
|
|
|
|
" yyerrflag = 0;",
|
|
|
|
" yychar = YYEMPTY;",
|
|
|
|
" yystate = 0;",
|
|
|
|
"",
|
|
|
|
"#if YYPURE",
|
|
|
|
" memset(&yystack, 0, sizeof(yystack));",
|
|
|
|
"#endif",
|
|
|
|
"",
|
2014-04-22 22:11:22 +00:00
|
|
|
" if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" yystack.s_mark = yystack.s_base;",
|
|
|
|
" yystack.l_mark = yystack.l_base;",
|
|
|
|
" yystate = 0;",
|
|
|
|
" *yystack.s_mark = 0;",
|
|
|
|
"",
|
|
|
|
"yyloop:",
|
|
|
|
" if ((yyn = yydefred[yystate]) != 0) goto yyreduce;",
|
|
|
|
" if (yychar < 0)",
|
|
|
|
" {",
|
2016-10-04 20:54:49 +00:00
|
|
|
" yychar = YYLEX;",
|
|
|
|
" if (yychar < 0) yychar = YYEOF;",
|
2012-05-03 09:57:52 +00:00
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" {",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN];",
|
2012-05-03 09:57:52 +00:00
|
|
|
" printf(\"%sdebug: state %d, reading %d (%s)\\n\",",
|
|
|
|
" YYPREFIX, yystate, yychar, yys);",
|
|
|
|
" }",
|
|
|
|
"#endif",
|
|
|
|
" }",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (((yyn = yysindex[yystate]) != 0) && (yyn += yychar) >= 0 &&",
|
|
|
|
" yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar)",
|
2012-05-03 09:57:52 +00:00
|
|
|
" {",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" printf(\"%sdebug: state %d, shifting to state %d\\n\",",
|
|
|
|
" YYPREFIX, yystate, yytable[yyn]);",
|
|
|
|
"#endif",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" yystate = yytable[yyn];",
|
|
|
|
" *++yystack.s_mark = yytable[yyn];",
|
|
|
|
" *++yystack.l_mark = yylval;",
|
|
|
|
" yychar = YYEMPTY;",
|
|
|
|
" if (yyerrflag > 0) --yyerrflag;",
|
|
|
|
" goto yyloop;",
|
|
|
|
" }",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (((yyn = yyrindex[yystate]) != 0) && (yyn += yychar) >= 0 &&",
|
|
|
|
" yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar)",
|
2012-05-03 09:57:52 +00:00
|
|
|
" {",
|
|
|
|
" yyn = yytable[yyn];",
|
|
|
|
" goto yyreduce;",
|
|
|
|
" }",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (yyerrflag != 0) goto yyinrecovery;",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
2014-04-22 22:11:22 +00:00
|
|
|
" YYERROR_CALL(\"syntax error\");",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
2016-10-04 20:54:49 +00:00
|
|
|
" goto yyerrlab; /* redundant goto avoids 'unused label' warning */",
|
2012-05-03 09:57:52 +00:00
|
|
|
"yyerrlab:",
|
|
|
|
" ++yynerrs;",
|
|
|
|
"",
|
|
|
|
"yyinrecovery:",
|
|
|
|
" if (yyerrflag < 3)",
|
|
|
|
" {",
|
|
|
|
" yyerrflag = 3;",
|
|
|
|
" for (;;)",
|
|
|
|
" {",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (((yyn = yysindex[*yystack.s_mark]) != 0) && (yyn += YYERRCODE) >= 0 &&",
|
|
|
|
" yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) YYERRCODE)",
|
2012-05-03 09:57:52 +00:00
|
|
|
" {",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" printf(\"%sdebug: state %d, error recovery shifting\\",
|
|
|
|
" to state %d\\n\", YYPREFIX, *yystack.s_mark, yytable[yyn]);",
|
|
|
|
"#endif",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" yystate = yytable[yyn];",
|
|
|
|
" *++yystack.s_mark = yytable[yyn];",
|
|
|
|
" *++yystack.l_mark = yylval;",
|
|
|
|
" goto yyloop;",
|
|
|
|
" }",
|
|
|
|
" else",
|
|
|
|
" {",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
2014-04-22 22:11:22 +00:00
|
|
|
" printf(\"%sdebug: error recovery discarding state %d\\n\",",
|
2012-05-03 09:57:52 +00:00
|
|
|
" YYPREFIX, *yystack.s_mark);",
|
|
|
|
"#endif",
|
|
|
|
" if (yystack.s_mark <= yystack.s_base) goto yyabort;",
|
|
|
|
" --yystack.s_mark;",
|
|
|
|
" --yystack.l_mark;",
|
|
|
|
" }",
|
|
|
|
" }",
|
|
|
|
" }",
|
|
|
|
" else",
|
|
|
|
" {",
|
2014-04-22 22:11:22 +00:00
|
|
|
" if (yychar == YYEOF) goto yyabort;",
|
2012-05-03 09:57:52 +00:00
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" {",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN];",
|
2014-04-22 22:11:22 +00:00
|
|
|
" printf(\"%sdebug: state %d, error recovery discards token %d (%s)\\n\",",
|
2012-05-03 09:57:52 +00:00
|
|
|
" YYPREFIX, yystate, yychar, yys);",
|
|
|
|
" }",
|
|
|
|
"#endif",
|
|
|
|
" yychar = YYEMPTY;",
|
|
|
|
" goto yyloop;",
|
|
|
|
" }",
|
|
|
|
"",
|
|
|
|
"yyreduce:",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" printf(\"%sdebug: state %d, reducing by rule %d (%s)\\n\",",
|
|
|
|
" YYPREFIX, yystate, yyn, yyrule[yyn]);",
|
|
|
|
"#endif",
|
|
|
|
" yym = yylen[yyn];",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (yym > 0)",
|
2012-05-03 09:57:52 +00:00
|
|
|
" yyval = yystack.l_mark[1-yym];",
|
|
|
|
" else",
|
|
|
|
" memset(&yyval, 0, sizeof yyval);",
|
2016-10-04 20:54:49 +00:00
|
|
|
"",
|
2012-05-03 09:57:52 +00:00
|
|
|
" switch (yyn)",
|
|
|
|
" {",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
const char *const trailer[] =
|
|
|
|
{
|
|
|
|
" }",
|
|
|
|
" yystack.s_mark -= yym;",
|
|
|
|
" yystate = *yystack.s_mark;",
|
|
|
|
" yystack.l_mark -= yym;",
|
|
|
|
" yym = yylhs[yyn];",
|
|
|
|
" if (yystate == 0 && yym == 0)",
|
|
|
|
" {",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" printf(\"%sdebug: after reduction, shifting from state 0 to\\",
|
|
|
|
" state %d\\n\", YYPREFIX, YYFINAL);",
|
|
|
|
"#endif",
|
|
|
|
" yystate = YYFINAL;",
|
|
|
|
" *++yystack.s_mark = YYFINAL;",
|
|
|
|
" *++yystack.l_mark = yyval;",
|
|
|
|
" if (yychar < 0)",
|
|
|
|
" {",
|
2016-10-04 20:54:49 +00:00
|
|
|
" yychar = YYLEX;",
|
|
|
|
" if (yychar < 0) yychar = YYEOF;",
|
2012-05-03 09:57:52 +00:00
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" {",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN];",
|
2012-05-03 09:57:52 +00:00
|
|
|
" printf(\"%sdebug: state %d, reading %d (%s)\\n\",",
|
|
|
|
" YYPREFIX, YYFINAL, yychar, yys);",
|
|
|
|
" }",
|
|
|
|
"#endif",
|
|
|
|
" }",
|
2014-04-22 22:11:22 +00:00
|
|
|
" if (yychar == YYEOF) goto yyaccept;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" goto yyloop;",
|
|
|
|
" }",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (((yyn = yygindex[yym]) != 0) && (yyn += yystate) >= 0 &&",
|
|
|
|
" yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yystate)",
|
2012-05-03 09:57:52 +00:00
|
|
|
" yystate = yytable[yyn];",
|
|
|
|
" else",
|
|
|
|
" yystate = yydgoto[yym];",
|
|
|
|
"#if YYDEBUG",
|
|
|
|
" if (yydebug)",
|
|
|
|
" printf(\"%sdebug: after reduction, shifting from state %d \\",
|
|
|
|
"to state %d\\n\", YYPREFIX, *yystack.s_mark, yystate);",
|
|
|
|
"#endif",
|
2016-10-04 20:54:49 +00:00
|
|
|
" if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow;",
|
2014-04-22 22:11:22 +00:00
|
|
|
" *++yystack.s_mark = (YYINT) yystate;",
|
2012-05-03 09:57:52 +00:00
|
|
|
" *++yystack.l_mark = yyval;",
|
|
|
|
" goto yyloop;",
|
|
|
|
"",
|
|
|
|
"yyoverflow:",
|
2014-04-22 22:11:22 +00:00
|
|
|
" YYERROR_CALL(\"yacc stack overflow\");",
|
2012-05-03 09:57:52 +00:00
|
|
|
"",
|
|
|
|
"yyabort:",
|
|
|
|
" yyfreestack(&yystack);",
|
|
|
|
" return (1);",
|
|
|
|
"",
|
|
|
|
"yyaccept:",
|
|
|
|
" yyfreestack(&yystack);",
|
|
|
|
" return (0);",
|
|
|
|
"}",
|
|
|
|
0
|
|
|
|
};
|
|
|
|
|
|
|
|
void
|
|
|
|
write_section(FILE * fp, const char *const section[])
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
const char *s;
|
|
|
|
|
|
|
|
for (i = 0; (s = section[i]) != 0; ++i)
|
|
|
|
{
|
|
|
|
if (fp == code_file)
|
|
|
|
++outline;
|
2014-04-22 22:11:22 +00:00
|
|
|
fprintf(fp, "%s\n", s);
|
2012-05-03 09:57:52 +00:00
|
|
|
}
|
|
|
|
}
|