|
|
|
@ -1,7 +1,7 @@
|
|
|
|
|
/* A Bison parser, made by GNU Bison 1.875. */
|
|
|
|
|
/* A Bison parser, made by GNU Bison 1.875d. */
|
|
|
|
|
|
|
|
|
|
/* Skeleton parser for Yacc-like parsing with Bison,
|
|
|
|
|
Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002 Free Software Foundation, Inc.
|
|
|
|
|
Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
|
|
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
@ -135,7 +135,7 @@
|
|
|
|
|
#ifndef SOLARIS
|
|
|
|
|
#include <err.h>
|
|
|
|
|
#else
|
|
|
|
|
#define quad_t uint64_t
|
|
|
|
|
#define quad_t int64_t
|
|
|
|
|
#endif
|
|
|
|
|
#include <errno.h>
|
|
|
|
|
#include <regex.h>
|
|
|
|
@ -260,7 +260,7 @@ typedef union YYSTYPE {
|
|
|
|
|
struct val *val;
|
|
|
|
|
} YYSTYPE;
|
|
|
|
|
/* Line 191 of yacc.c. */
|
|
|
|
|
#line 263 "ast_expr2.c"
|
|
|
|
|
#line 264 "ast_expr2.c"
|
|
|
|
|
# define yystype YYSTYPE /* obsolescent; will be withdrawn */
|
|
|
|
|
# define YYSTYPE_IS_DECLARED 1
|
|
|
|
|
# define YYSTYPE_IS_TRIVIAL 1
|
|
|
|
@ -287,22 +287,29 @@ extern int ast_yylex __P((YYSTYPE *, YYLTYPE *, yyscan_t));
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Line 214 of yacc.c. */
|
|
|
|
|
#line 290 "ast_expr2.c"
|
|
|
|
|
#line 291 "ast_expr2.c"
|
|
|
|
|
|
|
|
|
|
#if ! defined (yyoverflow) || YYERROR_VERBOSE
|
|
|
|
|
|
|
|
|
|
# ifndef YYFREE
|
|
|
|
|
# define YYFREE free
|
|
|
|
|
# endif
|
|
|
|
|
# ifndef YYMALLOC
|
|
|
|
|
# define YYMALLOC malloc
|
|
|
|
|
# endif
|
|
|
|
|
|
|
|
|
|
/* The parser invokes alloca or malloc; define the necessary symbols. */
|
|
|
|
|
|
|
|
|
|
# if YYSTACK_USE_ALLOCA
|
|
|
|
|
# define YYSTACK_ALLOC alloca
|
|
|
|
|
# ifdef YYSTACK_USE_ALLOCA
|
|
|
|
|
# if YYSTACK_USE_ALLOCA
|
|
|
|
|
# define YYSTACK_ALLOC alloca
|
|
|
|
|
# endif
|
|
|
|
|
# else
|
|
|
|
|
# ifndef YYSTACK_USE_ALLOCA
|
|
|
|
|
# if defined (alloca) || defined (_ALLOCA_H)
|
|
|
|
|
# define YYSTACK_ALLOC alloca
|
|
|
|
|
# else
|
|
|
|
|
# ifdef __GNUC__
|
|
|
|
|
# define YYSTACK_ALLOC __builtin_alloca
|
|
|
|
|
# endif
|
|
|
|
|
# if defined (alloca) || defined (_ALLOCA_H)
|
|
|
|
|
# define YYSTACK_ALLOC alloca
|
|
|
|
|
# else
|
|
|
|
|
# ifdef __GNUC__
|
|
|
|
|
# define YYSTACK_ALLOC __builtin_alloca
|
|
|
|
|
# endif
|
|
|
|
|
# endif
|
|
|
|
|
# endif
|
|
|
|
@ -315,20 +322,21 @@ extern int ast_yylex __P((YYSTYPE *, YYLTYPE *, yyscan_t));
|
|
|
|
|
# include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
|
|
|
|
|
# define YYSIZE_T size_t
|
|
|
|
|
# endif
|
|
|
|
|
# define YYSTACK_ALLOC malloc
|
|
|
|
|
# define YYSTACK_FREE free
|
|
|
|
|
# define YYSTACK_ALLOC YYMALLOC
|
|
|
|
|
# define YYSTACK_FREE YYFREE
|
|
|
|
|
# endif
|
|
|
|
|
#endif /* ! defined (yyoverflow) || YYERROR_VERBOSE */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#if (! defined (yyoverflow) \
|
|
|
|
|
&& (! defined (__cplusplus) \
|
|
|
|
|
|| (YYLTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
|
|
|
|
|
|| (defined (YYLTYPE_IS_TRIVIAL) && YYLTYPE_IS_TRIVIAL \
|
|
|
|
|
&& defined (YYSTYPE_IS_TRIVIAL) && YYSTYPE_IS_TRIVIAL)))
|
|
|
|
|
|
|
|
|
|
/* A type that is properly aligned for any stack member. */
|
|
|
|
|
union yyalloc
|
|
|
|
|
{
|
|
|
|
|
short yyss;
|
|
|
|
|
short int yyss;
|
|
|
|
|
YYSTYPE yyvs;
|
|
|
|
|
YYLTYPE yyls;
|
|
|
|
|
};
|
|
|
|
@ -339,13 +347,13 @@ union yyalloc
|
|
|
|
|
/* The size of an array large to enough to hold all stacks, each with
|
|
|
|
|
N elements. */
|
|
|
|
|
# define YYSTACK_BYTES(N) \
|
|
|
|
|
((N) * (sizeof (short) + sizeof (YYSTYPE) + sizeof (YYLTYPE)) \
|
|
|
|
|
((N) * (sizeof (short int) + sizeof (YYSTYPE) + sizeof (YYLTYPE)) \
|
|
|
|
|
+ 2 * YYSTACK_GAP_MAXIMUM)
|
|
|
|
|
|
|
|
|
|
/* Copy COUNT objects from FROM to TO. The source and destination do
|
|
|
|
|
not overlap. */
|
|
|
|
|
# ifndef YYCOPY
|
|
|
|
|
# if 1 < __GNUC__
|
|
|
|
|
# if defined (__GNUC__) && 1 < __GNUC__
|
|
|
|
|
# define YYCOPY(To, From, Count) \
|
|
|
|
|
__builtin_memcpy (To, From, (Count) * sizeof (*(From)))
|
|
|
|
|
# else
|
|
|
|
@ -381,7 +389,7 @@ union yyalloc
|
|
|
|
|
#if defined (__STDC__) || defined (__cplusplus)
|
|
|
|
|
typedef signed char yysigned_char;
|
|
|
|
|
#else
|
|
|
|
|
typedef short yysigned_char;
|
|
|
|
|
typedef short int yysigned_char;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
/* YYFINAL -- State number of the termination state. */
|
|
|
|
@ -476,10 +484,10 @@ static const unsigned char yyrline[] =
|
|
|
|
|
First, the terminals, then, starting at YYNTOKENS, nonterminals. */
|
|
|
|
|
static const char *const yytname[] =
|
|
|
|
|
{
|
|
|
|
|
"$end", "error", "$undefined", "TOK_COLONCOLON", "TOK_COND", "TOK_OR",
|
|
|
|
|
"TOK_AND", "TOK_NE", "TOK_LE", "TOK_GE", "TOK_LT", "TOK_GT", "TOK_EQ",
|
|
|
|
|
"TOK_MINUS", "TOK_PLUS", "TOK_MOD", "TOK_DIV", "TOK_MULT", "TOK_COMPL",
|
|
|
|
|
"TOK_EQTILDE", "TOK_COLON", "TOK_LP", "TOK_RP", "TOKEN", "$accept",
|
|
|
|
|
"$end", "error", "$undefined", "TOK_COLONCOLON", "TOK_COND", "TOK_OR",
|
|
|
|
|
"TOK_AND", "TOK_NE", "TOK_LE", "TOK_GE", "TOK_LT", "TOK_GT", "TOK_EQ",
|
|
|
|
|
"TOK_MINUS", "TOK_PLUS", "TOK_MOD", "TOK_DIV", "TOK_MULT", "TOK_COMPL",
|
|
|
|
|
"TOK_EQTILDE", "TOK_COLON", "TOK_LP", "TOK_RP", "TOKEN", "$accept",
|
|
|
|
|
"start", "expr", 0
|
|
|
|
|
};
|
|
|
|
|
#endif
|
|
|
|
@ -487,7 +495,7 @@ static const char *const yytname[] =
|
|
|
|
|
# ifdef YYPRINT
|
|
|
|
|
/* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to
|
|
|
|
|
token YYLEX-NUM. */
|
|
|
|
|
static const unsigned short yytoknum[] =
|
|
|
|
|
static const unsigned short int yytoknum[] =
|
|
|
|
|
{
|
|
|
|
|
0, 256, 257, 258, 259, 260, 261, 262, 263, 264,
|
|
|
|
|
265, 266, 267, 268, 269, 270, 271, 272, 273, 274,
|
|
|
|
@ -624,7 +632,8 @@ static const unsigned char yystos[] =
|
|
|
|
|
|
|
|
|
|
#define YYACCEPT goto yyacceptlab
|
|
|
|
|
#define YYABORT goto yyabortlab
|
|
|
|
|
#define YYERROR goto yyerrlab1
|
|
|
|
|
#define YYERROR goto yyerrorlab
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Like YYERROR except do call yyerror. This remains here temporarily
|
|
|
|
|
to ease the transition to the new meaning of YYERROR, for GCC.
|
|
|
|
@ -658,11 +667,11 @@ while (0)
|
|
|
|
|
are run). */
|
|
|
|
|
|
|
|
|
|
#ifndef YYLLOC_DEFAULT
|
|
|
|
|
# define YYLLOC_DEFAULT(Current, Rhs, N) \
|
|
|
|
|
Current.first_line = Rhs[1].first_line; \
|
|
|
|
|
Current.first_column = Rhs[1].first_column; \
|
|
|
|
|
Current.last_line = Rhs[N].last_line; \
|
|
|
|
|
Current.last_column = Rhs[N].last_column;
|
|
|
|
|
# define YYLLOC_DEFAULT(Current, Rhs, N) \
|
|
|
|
|
((Current).first_line = (Rhs)[1].first_line, \
|
|
|
|
|
(Current).first_column = (Rhs)[1].first_column, \
|
|
|
|
|
(Current).last_line = (Rhs)[N].last_line, \
|
|
|
|
|
(Current).last_column = (Rhs)[N].last_column)
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
/* YYLEX -- calling `yylex' with the right arguments. */
|
|
|
|
@ -706,17 +715,17 @@ do { \
|
|
|
|
|
|
|
|
|
|
/*------------------------------------------------------------------.
|
|
|
|
|
| yy_stack_print -- Print the state stack from its BOTTOM up to its |
|
|
|
|
|
| TOP (cinluded). |
|
|
|
|
|
| TOP (included). |
|
|
|
|
|
`------------------------------------------------------------------*/
|
|
|
|
|
|
|
|
|
|
#if defined (__STDC__) || defined (__cplusplus)
|
|
|
|
|
static void
|
|
|
|
|
yy_stack_print (short *bottom, short *top)
|
|
|
|
|
yy_stack_print (short int *bottom, short int *top)
|
|
|
|
|
#else
|
|
|
|
|
static void
|
|
|
|
|
yy_stack_print (bottom, top)
|
|
|
|
|
short *bottom;
|
|
|
|
|
short *top;
|
|
|
|
|
short int *bottom;
|
|
|
|
|
short int *top;
|
|
|
|
|
#endif
|
|
|
|
|
{
|
|
|
|
|
YYFPRINTF (stderr, "Stack now");
|
|
|
|
@ -746,9 +755,9 @@ yy_reduce_print (yyrule)
|
|
|
|
|
#endif
|
|
|
|
|
{
|
|
|
|
|
int yyi;
|
|
|
|
|
unsigned int yylineno = yyrline[yyrule];
|
|
|
|
|
unsigned int yylno = yyrline[yyrule];
|
|
|
|
|
YYFPRINTF (stderr, "Reducing stack by rule %d (line %u), ",
|
|
|
|
|
yyrule - 1, yylineno);
|
|
|
|
|
yyrule - 1, yylno);
|
|
|
|
|
/* Print the symbols being reduced, and their result. */
|
|
|
|
|
for (yyi = yyprhs[yyrule]; 0 <= yyrhs[yyi]; yyi++)
|
|
|
|
|
YYFPRINTF (stderr, "%s ", yytname [yyrhs[yyi]]);
|
|
|
|
@ -785,7 +794,7 @@ int yydebug;
|
|
|
|
|
SIZE_MAX < YYSTACK_BYTES (YYMAXDEPTH)
|
|
|
|
|
evaluated with infinite-precision integer arithmetic. */
|
|
|
|
|
|
|
|
|
|
#if YYMAXDEPTH == 0
|
|
|
|
|
#if defined (YYMAXDEPTH) && YYMAXDEPTH == 0
|
|
|
|
|
# undef YYMAXDEPTH
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
@ -989,9 +998,9 @@ YYLTYPE yylloc;
|
|
|
|
|
to reallocate them elsewhere. */
|
|
|
|
|
|
|
|
|
|
/* The state stack. */
|
|
|
|
|
short yyssa[YYINITDEPTH];
|
|
|
|
|
short *yyss = yyssa;
|
|
|
|
|
register short *yyssp;
|
|
|
|
|
short int yyssa[YYINITDEPTH];
|
|
|
|
|
short int *yyss = yyssa;
|
|
|
|
|
register short int *yyssp;
|
|
|
|
|
|
|
|
|
|
/* The semantic value stack. */
|
|
|
|
|
YYSTYPE yyvsa[YYINITDEPTH];
|
|
|
|
@ -1032,6 +1041,7 @@ YYLTYPE yylloc;
|
|
|
|
|
yyssp = yyss;
|
|
|
|
|
yyvsp = yyvs;
|
|
|
|
|
yylsp = yyls;
|
|
|
|
|
|
|
|
|
|
goto yysetstate;
|
|
|
|
|
|
|
|
|
|
/*------------------------------------------------------------.
|
|
|
|
@ -1057,7 +1067,7 @@ YYLTYPE yylloc;
|
|
|
|
|
these so that the &'s don't force the real ones into
|
|
|
|
|
memory. */
|
|
|
|
|
YYSTYPE *yyvs1 = yyvs;
|
|
|
|
|
short *yyss1 = yyss;
|
|
|
|
|
short int *yyss1 = yyss;
|
|
|
|
|
YYLTYPE *yyls1 = yyls;
|
|
|
|
|
|
|
|
|
|
/* Each stack pointer address is followed by the size of the
|
|
|
|
@ -1085,7 +1095,7 @@ YYLTYPE yylloc;
|
|
|
|
|
yystacksize = YYMAXDEPTH;
|
|
|
|
|
|
|
|
|
|
{
|
|
|
|
|
short *yyss1 = yyss;
|
|
|
|
|
short int *yyss1 = yyss;
|
|
|
|
|
union yyalloc *yyptr =
|
|
|
|
|
(union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize));
|
|
|
|
|
if (! yyptr)
|
|
|
|
@ -1214,7 +1224,7 @@ yyreduce:
|
|
|
|
|
yyval = yyvsp[1-yylen];
|
|
|
|
|
|
|
|
|
|
/* Default location. */
|
|
|
|
|
YYLLOC_DEFAULT (yyloc, (yylsp - yylen), yylen);
|
|
|
|
|
YYLLOC_DEFAULT (yyloc, yylsp - yylen, yylen);
|
|
|
|
|
YY_REDUCE_PRINT (yyn);
|
|
|
|
|
switch (yyn)
|
|
|
|
|
{
|
|
|
|
@ -1366,8 +1376,8 @@ yyreduce:
|
|
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Line 991 of yacc.c. */
|
|
|
|
|
#line 1370 "ast_expr2.c"
|
|
|
|
|
/* Line 1010 of yacc.c. */
|
|
|
|
|
#line 1381 "ast_expr2.c"
|
|
|
|
|
|
|
|
|
|
yyvsp -= yylen;
|
|
|
|
|
yyssp -= yylen;
|
|
|
|
@ -1408,18 +1418,33 @@ yyerrlab:
|
|
|
|
|
{
|
|
|
|
|
YYSIZE_T yysize = 0;
|
|
|
|
|
int yytype = YYTRANSLATE (yychar);
|
|
|
|
|
const char* yyprefix;
|
|
|
|
|
char *yymsg;
|
|
|
|
|
int yyx, yycount;
|
|
|
|
|
int yyx;
|
|
|
|
|
|
|
|
|
|
yycount = 0;
|
|
|
|
|
/* Start YYX at -YYN if negative to avoid negative indexes in
|
|
|
|
|
YYCHECK. */
|
|
|
|
|
for (yyx = yyn < 0 ? -yyn : 0;
|
|
|
|
|
yyx < (int) (sizeof (yytname) / sizeof (char *)); yyx++)
|
|
|
|
|
int yyxbegin = yyn < 0 ? -yyn : 0;
|
|
|
|
|
|
|
|
|
|
/* Stay within bounds of both yycheck and yytname. */
|
|
|
|
|
int yychecklim = YYLAST - yyn;
|
|
|
|
|
int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
|
|
|
|
|
int yycount = 0;
|
|
|
|
|
|
|
|
|
|
yyprefix = ", expecting ";
|
|
|
|
|
for (yyx = yyxbegin; yyx < yyxend; ++yyx)
|
|
|
|
|
if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
|
|
|
|
|
yysize += yystrlen (yytname[yyx]) + 15, yycount++;
|
|
|
|
|
yysize += yystrlen ("syntax error, unexpected ") + 1;
|
|
|
|
|
yysize += yystrlen (yytname[yytype]);
|
|
|
|
|
{
|
|
|
|
|
yysize += yystrlen (yyprefix) + yystrlen (yytname [yyx]);
|
|
|
|
|
yycount += 1;
|
|
|
|
|
if (yycount == 5)
|
|
|
|
|
{
|
|
|
|
|
yysize = 0;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
yysize += (sizeof ("syntax error, unexpected ")
|
|
|
|
|
+ yystrlen (yytname[yytype]));
|
|
|
|
|
yymsg = (char *) YYSTACK_ALLOC (yysize);
|
|
|
|
|
if (yymsg != 0)
|
|
|
|
|
{
|
|
|
|
@ -1428,16 +1453,13 @@ yyerrlab:
|
|
|
|
|
|
|
|
|
|
if (yycount < 5)
|
|
|
|
|
{
|
|
|
|
|
yycount = 0;
|
|
|
|
|
for (yyx = yyn < 0 ? -yyn : 0;
|
|
|
|
|
yyx < (int) (sizeof (yytname) / sizeof (char *));
|
|
|
|
|
yyx++)
|
|
|
|
|
yyprefix = ", expecting ";
|
|
|
|
|
for (yyx = yyxbegin; yyx < yyxend; ++yyx)
|
|
|
|
|
if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR)
|
|
|
|
|
{
|
|
|
|
|
const char *yyq = ! yycount ? ", expecting " : " or ";
|
|
|
|
|
yyp = yystpcpy (yyp, yyq);
|
|
|
|
|
yyp = yystpcpy (yyp, yyprefix);
|
|
|
|
|
yyp = yystpcpy (yyp, yytname[yyx]);
|
|
|
|
|
yycount++;
|
|
|
|
|
yyprefix = " or ";
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
yyerror (yymsg);
|
|
|
|
@ -1458,53 +1480,59 @@ yyerrlab:
|
|
|
|
|
/* If just tried and failed to reuse lookahead token after an
|
|
|
|
|
error, discard it. */
|
|
|
|
|
|
|
|
|
|
/* Return failure if at end of input. */
|
|
|
|
|
if (yychar == YYEOF)
|
|
|
|
|
if (yychar <= YYEOF)
|
|
|
|
|
{
|
|
|
|
|
/* Pop the error token. */
|
|
|
|
|
YYPOPSTACK;
|
|
|
|
|
/* Pop the rest of the stack. */
|
|
|
|
|
while (yyss < yyssp)
|
|
|
|
|
{
|
|
|
|
|
YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp);
|
|
|
|
|
yydestruct (yystos[*yyssp], yyvsp, yylsp);
|
|
|
|
|
YYPOPSTACK;
|
|
|
|
|
}
|
|
|
|
|
YYABORT;
|
|
|
|
|
/* If at end of input, pop the error token,
|
|
|
|
|
then the rest of the stack, then return failure. */
|
|
|
|
|
if (yychar == YYEOF)
|
|
|
|
|
for (;;)
|
|
|
|
|
{
|
|
|
|
|
YYPOPSTACK;
|
|
|
|
|
if (yyssp == yyss)
|
|
|
|
|
YYABORT;
|
|
|
|
|
YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp);
|
|
|
|
|
yydestruct (yystos[*yyssp], yyvsp, yylsp);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
YYDSYMPRINTF ("Error: discarding", yytoken, &yylval, &yylloc);
|
|
|
|
|
yydestruct (yytoken, &yylval, &yylloc);
|
|
|
|
|
yychar = YYEMPTY;
|
|
|
|
|
*++yylerrsp = yylloc;
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
YYDSYMPRINTF ("Error: discarding", yytoken, &yylval, &yylloc);
|
|
|
|
|
yydestruct (yytoken, &yylval, &yylloc);
|
|
|
|
|
yychar = YYEMPTY;
|
|
|
|
|
*++yylerrsp = yylloc;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Else will try to reuse lookahead token after shifting the error
|
|
|
|
|
token. */
|
|
|
|
|
goto yyerrlab2;
|
|
|
|
|
goto yyerrlab1;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*----------------------------------------------------.
|
|
|
|
|
| yyerrlab1 -- error raised explicitly by an action. |
|
|
|
|
|
`----------------------------------------------------*/
|
|
|
|
|
yyerrlab1:
|
|
|
|
|
/*---------------------------------------------------.
|
|
|
|
|
| yyerrorlab -- error raised explicitly by YYERROR. |
|
|
|
|
|
`---------------------------------------------------*/
|
|
|
|
|
yyerrorlab:
|
|
|
|
|
|
|
|
|
|
/* Suppress GCC warning that yyerrlab1 is unused when no action
|
|
|
|
|
invokes YYERROR. */
|
|
|
|
|
#if defined (__GNUC_MINOR__) && 2093 <= (__GNUC__ * 1000 + __GNUC_MINOR__) \
|
|
|
|
|
&& !defined __cplusplus
|
|
|
|
|
__attribute__ ((__unused__))
|
|
|
|
|
#ifdef __GNUC__
|
|
|
|
|
/* Pacify GCC when the user code never invokes YYERROR and the label
|
|
|
|
|
yyerrorlab therefore never appears in user code. */
|
|
|
|
|
if (0)
|
|
|
|
|
goto yyerrorlab;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
yyvsp -= yylen;
|
|
|
|
|
yyssp -= yylen;
|
|
|
|
|
yystate = *yyssp;
|
|
|
|
|
yylerrsp = yylsp;
|
|
|
|
|
*++yylerrsp = yyloc;
|
|
|
|
|
goto yyerrlab2;
|
|
|
|
|
yylsp -= yylen;
|
|
|
|
|
goto yyerrlab1;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/*---------------------------------------------------------------.
|
|
|
|
|
| yyerrlab2 -- pop states until the error token can be shifted. |
|
|
|
|
|
`---------------------------------------------------------------*/
|
|
|
|
|
yyerrlab2:
|
|
|
|
|
/*-------------------------------------------------------------.
|
|
|
|
|
| yyerrlab1 -- common code for both syntax error and YYERROR. |
|
|
|
|
|
`-------------------------------------------------------------*/
|
|
|
|
|
yyerrlab1:
|
|
|
|
|
yyerrstatus = 3; /* Each real token shifted decrements this. */
|
|
|
|
|
|
|
|
|
|
for (;;)
|
|
|
|
@ -1527,9 +1555,8 @@ yyerrlab2:
|
|
|
|
|
|
|
|
|
|
YYDSYMPRINTF ("Error: popping", yystos[*yyssp], yyvsp, yylsp);
|
|
|
|
|
yydestruct (yystos[yystate], yyvsp, yylsp);
|
|
|
|
|
yyvsp--;
|
|
|
|
|
yystate = *--yyssp;
|
|
|
|
|
yylsp--;
|
|
|
|
|
YYPOPSTACK;
|
|
|
|
|
yystate = *yyssp;
|
|
|
|
|
YY_STACK_PRINT (yyss, yyssp);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
@ -1539,7 +1566,7 @@ yyerrlab2:
|
|
|
|
|
YYDPRINTF ((stderr, "Shifting error token, "));
|
|
|
|
|
|
|
|
|
|
*++yyvsp = yylval;
|
|
|
|
|
YYLLOC_DEFAULT (yyloc, yylsp, (yylerrsp - yylsp));
|
|
|
|
|
YYLLOC_DEFAULT (yyloc, yylsp, yylerrsp - yylsp);
|
|
|
|
|
*++yylsp = yyloc;
|
|
|
|
|
|
|
|
|
|
yystate = yyn;
|
|
|
|
@ -1707,7 +1734,7 @@ to_string (struct val *vp)
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
sprintf (tmp, "%lld", (long long)vp->u.i);
|
|
|
|
|
sprintf (tmp, "%ld", vp->u.i);
|
|
|
|
|
vp->type = AST_EXPR_string;
|
|
|
|
|
vp->u.s = tmp;
|
|
|
|
|
}
|
|
|
|
|