#define YYBISON 1
#define yyparse ast_yyparse
#define yylex ast_yylex
#define yyerror ast_yyerror
#define yylval ast_yylval
#define yychar ast_yychar
#define yydebug ast_yydebug
#define yynerrs ast_yynerrs
#define PROGRAM 257
#define CLASS 258
#define METHOD 259
#define ATTR 260
#define FORMAL 261
#define BRANCH 262
#define ASSIGN 263
#define STATIC_DISPATCH 264
#define DISPATCH 265
#define COND 266
#define LOOP 267
#define TYPCASE 268
#define BLOCK 269
#define LET 270
#define PLUS 271
#define SUB 272
#define MUL 273
#define DIVIDE 274
#define NEG 275
#define LESSTHAN 276
#define EQUAL 277
#define LEQ 278
#define COMP 279
#define INT 280
#define STR 281
#define BOOL 282
#define NEW 283
#define ISVOID 284
#define NO_EXPR 285
#define OBJECT 286
#define NO_TYPE 287
#define STR_CONST 288
#define INT_CONST 289
#define IDENT 290
#define LINENO 291
#line 6 "ast.y"
#include "cool_tree.h"
#include "stringtab.h"
#include "utils.h"
void ast_yyerror(char *);
extern int curr_lineno;
extern int yylex();
Program ast_root;
Classes parse_results;
int omerrs = 0;
#line 21 "ast.y"
#ifndef YYSTYPE
typedef union {
int lineno;
bool boolean;
Symbol symbol;
Program program;
Class_ class_;
Classes classes;
Feature feature;
Features features;
Formal formal;
Formals formals;
Case case_;
Cases cases;
Expression expression;
Expressions expressions;
} yystype;
#define YYSTYPE yystype
#define YYSTYPE_IS_TRIVIAL 1
#endif
#ifndef YYDEBUG
#define YYDEBUG 1
#endif
#define YYFINAL 121
#define YYFLAG -32768
#define YYNTBASE 41
#define YYTRANSLATE(x) ((unsigned)(x) <= 291 ? yytranslate[x] : 56)
static const char yytranslate[] = {
0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 38, 39, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 40, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 3, 4, 5, 6, 7, 8, 9, 10, 11,
12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30,
31, 32, 33, 34, 35, 36, 37};
#if YYDEBUG
static const short yyprhs[] = {
0, 0, 4, 5, 7, 10, 19, 20, 22, 24, 27, 34, 40,
41, 43, 45, 48, 53, 57, 61, 66, 73, 79, 85, 90, 94,
101, 106, 110, 114, 119, 124, 129, 134, 138, 143, 148, 153, 157,
161, 165, 169, 173, 176, 179, 183, 185, 188, 190, 193};
static const short yyrhs[] = {
37, 3, 42, 0, 0, 43, 0, 42, 43, 0, 37, 4, 36, 36, 34, 38, 44, 39, 0,
0, 45, 0, 46, 0, 45, 46, 0, 37, 5, 36, 47, 36, 50, 0, 37, 6, 36, 36,
50, 0, 0, 48, 0, 49, 0, 48, 49, 0, 37, 7, 36, 36, 0, 51, 40, 36, 0,
51, 40, 33, 0, 37, 9, 36, 50, 0, 37, 10, 50, 36, 36, 52, 0, 37, 11, 50,
36, 52, 0, 37, 12, 50, 50, 50, 0, 37, 13, 50, 50, 0, 37, 15, 53, 0, 37,
16, 36, 36, 50, 50, 0, 37, 14, 50, 54, 0, 37, 29, 36, 0, 37, 30, 50, 0,
37, 17, 50, 50, 0, 37, 18, 50, 50, 0, 37, 19, 50, 50, 0, 37, 20, 50, 50,
0, 37, 21, 50, 0, 37, 22, 50, 50, 0, 37, 23, 50, 50, 0, 37, 24, 50, 50,
0, 37, 25, 50, 0, 37, 26, 35, 0, 37, 27, 34, 0, 37, 28, 35, 0, 37, 32,
36, 0, 37, 31, 0, 38, 39, 0, 38, 53, 39, 0, 50, 0, 53, 50, 0, 55, 0,
54, 55, 0, 37, 8, 36, 36, 50, 0};
#endif
#if YYDEBUG
static const short yyrline[] = {
0, 68, 70, 75, 78, 83, 89, 91, 96, 98, 102, 104, 108,
110, 115, 117, 121, 125, 129, 132, 135, 138, 141, 144, 147, 150,
153, 156, 159, 162, 165, 168, 171, 174, 177, 180, 183, 186, 189,
192, 195, 203, 206, 210, 212, 217, 219, 224, 226, 231};
#endif
#if (YYDEBUG) || defined YYERROR_VERBOSE
static const char *const yytname[] = {"$",
"error",
"$undefined.",
"PROGRAM",
"CLASS",
"METHOD",
"ATTR",
"FORMAL",
"BRANCH",
"ASSIGN",
"STATIC_DISPATCH",
"DISPATCH",
"COND",
"LOOP",
"TYPCASE",
"BLOCK",
"LET",
"PLUS",
"SUB",
"MUL",
"DIVIDE",
"NEG",
"LESSTHAN",
"EQUAL",
"LEQ",
"COMP",
"INT",
"STR",
"BOOL",
"NEW",
"ISVOID",
"NO_EXPR",
"OBJECT",
"NO_TYPE",
"STR_CONST",
"INT_CONST",
"IDENT",
"LINENO",
"'('",
"')'",
"':'",
"program",
"class_list",
"class",
"optional_feature_list",
"feature_list",
"feature",
"formals",
"formal_list",
"formal",
"expr",
"expr_aux",
"actuals",
"expr_list",
"case_list",
"simple_case",
0};
#endif
static const short yyr1[] = {0, 41, 41, 42, 42, 43, 44, 44, 45, 45, 46, 46, 47,
47, 48, 48, 49, 50, 50, 51, 51, 51, 51, 51, 51, 51,
51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
51, 51, 51, 51, 52, 52, 53, 53, 54, 54, 55};
static const short yyr2[] = {0, 3, 0, 1, 2, 8, 0, 1, 1, 2, 6, 5, 0, 1, 1, 2, 4,
3, 3, 4, 6, 5, 5, 4, 3, 6, 4, 3, 3, 4, 4, 4, 4, 3,
4, 4, 4, 3, 3, 3, 3, 3, 2, 2, 3, 1, 2, 1, 2, 5};
static const short yydefact[] = {
2, 0, 0, 0, 1, 3, 0, 4, 0, 0, 0, 6, 0, 0, 7, 8, 0, 0,
5, 9, 12, 0, 0, 0, 13, 14, 0, 0, 0, 15, 0, 11, 0, 0, 10, 0,
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
0, 0, 0, 42, 0, 0, 16, 0, 0, 0, 0, 0, 0, 45, 24, 0, 0, 0,
0, 0, 33, 0, 0, 0, 37, 38, 39, 40, 27, 28, 41, 18, 17, 19, 0, 0,
0, 23, 0, 26, 47, 46, 0, 29, 30, 31, 32, 34, 35, 36, 0, 0, 21, 22,
0, 48, 0, 20, 43, 0, 0, 25, 44, 0, 49, 0, 0, 0};
static const short yydefgoto[] = {119, 4, 5, 13, 14, 15, 23, 24,
25, 67, 32, 106, 68, 93, 94};
static const short yypact[] = {
-30, 6, -11, 23, -11, -32768, -8, -32768, -7,
-3, -6, -4, 10, -5, -4, -32768, 0, 1,
-32768, -32768, 3, 5, 36, 12, 3, -32768, 15,
17, 15, -32768, 83, -32768, 14, 19, -32768, 20,
15, 15, 15, 15, 15, 15, 21, 15, 15,
15, 15, 15, 15, 15, 15, 15, 24, 26,
27, 22, 15, -32768, 25, -32, -32768, 15, 29,
30, 15, 15, 31, -32768, 15, 33, 15, 15,
15, 15, -32768, 15, 15, 15, -32768, -32768, -32768,
-32768, -32768, -32768, -32768, -32768, -32768, -32768, 35, 34,
15, -32768, 55, 31, -32768, -32768, 15, -32768, -32768,
-32768, -32768, -32768, -32768, -32768, 34, -34, -32768, -32768,
37, -32768, 15, -32768, -32768, -31, 38, -32768, -32768,
15, -32768, 67, 75, -32768};
static const short yypgoto[] = {-32768, -32768, 72, -32768, -32768,
63, -32768, -32768, 54, -26,
-32768, -25, -24, -32768, -13};
#define YYLAST 115
static const short yytable[] = {
31, 85, 34, 30, 86, 112, 30, 1, 116, 2, 62, 63, 64, 65, 66,
16, 17, 70, 71, 72, 73, 74, 75, 76, 77, 78, 3, 6, 8, 9,
83, 10, 11, 12, 18, 87, 20, 21, 90, 91, 22, 26, 95, 27, 97,
98, 99, 100, 28, 101, 102, 103, 30, 33, 59, 60, 61, 69, 82, 79,
80, 84, 81, 108, 107, 88, 89, 120, 92, 96, 110, 104, 105, 114, 117,
121, 7, 19, 29, 111, 109, 113, 0, 0, 115, 0, 0, 95, 0, 0,
0, 118, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58};
static const short yycheck[] = {
26, 33, 28, 37, 36, 39, 37, 37, 39, 3, 36, 37, 38, 39, 40, 5, 6,
43, 44, 45, 46, 47, 48, 49, 50, 51, 37, 4, 36, 36, 56, 34, 38, 37,
39, 61, 36, 36, 64, 65, 37, 36, 68, 7, 70, 71, 72, 73, 36, 75, 76,
77, 37, 36, 40, 36, 36, 36, 36, 35, 34, 36, 35, 8, 90, 36, 36, 0,
37, 36, 96, 36, 38, 36, 36, 0, 4, 14, 24, 104, 93, 105, -1, -1, 110,
-1, -1, 113, -1, -1, -1, 117, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18,
19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32};
#line 3 "/usr/share/bison/bison.simple"
#if !defined(yyoverflow) || defined(YYERROR_VERBOSE)
#if YYSTACK_USE_ALLOCA
#define YYSTACK_ALLOC alloca
#else
#ifndef YYSTACK_USE_ALLOCA
#if defined(alloca) || defined(_ALLOCA_H)
#define YYSTACK_ALLOC alloca
#else
#ifdef __GNUC__
#define YYSTACK_ALLOC __builtin_alloca
#endif
#endif
#endif
#endif
#ifdef YYSTACK_ALLOC
#define YYSTACK_FREE(Ptr) \
do { \
; \
} while (0)
#else
#if defined(__STDC__) || defined(__cplusplus)
#include <stdlib.h>
#define YYSIZE_T size_t
#endif
#define YYSTACK_ALLOC malloc
#define YYSTACK_FREE free
#endif
#endif
#if (!defined(yyoverflow) && \
(!defined(__cplusplus) || (YYLTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
union yyalloc {
short yyss;
YYSTYPE yyvs;
#if YYLSP_NEEDED
YYLTYPE yyls;
#endif
};
#define YYSTACK_GAP_MAX (sizeof(union yyalloc) - 1)
#if YYLSP_NEEDED
#define YYSTACK_BYTES(N) \
((N) * (sizeof(short) + sizeof(YYSTYPE) + sizeof(YYLTYPE)) + \
2 * YYSTACK_GAP_MAX)
#else
#define YYSTACK_BYTES(N) \
((N) * (sizeof(short) + sizeof(YYSTYPE)) + YYSTACK_GAP_MAX)
#endif
#ifndef YYCOPY
#if 1 < __GNUC__
#define YYCOPY(To, From, Count) \
__builtin_memcpy(To, From, (Count) * sizeof(*(From)))
#else#endif
#endif
#define YYSTACK_RELOCATE(Stack) \
do { \
YYSIZE_T yynewbytes; \
YYCOPY(&yyptr->Stack, Stack, yysize); \
Stack = &yyptr->Stack; \
yynewbytes = yystacksize * sizeof(*Stack) + YYSTACK_GAP_MAX; \
yyptr += yynewbytes / sizeof(*yyptr); \
} while (0)
#endif
#if !defined(YYSIZE_T) && defined(__SIZE_TYPE__)
#define YYSIZE_T __SIZE_TYPE__
#endif
#if !defined(YYSIZE_T) && defined(size_t)
#define YYSIZE_T size_t
#endif
#if !defined(YYSIZE_T)
#if defined(__STDC__) || defined(__cplusplus)
#include <stddef.h>
#define YYSIZE_T size_t
#endif
#endif
#if !defined(YYSIZE_T)
#define YYSIZE_T unsigned int
#endif
#define yyerrok (yyerrstatus = 0)
#define yyclearin (yychar = YYEMPTY)
#define YYEMPTY -2
#define YYEOF 0
#define YYACCEPT goto yyacceptlab
#define YYABORT goto yyabortlab
#define YYERROR goto yyerrlab1
#define YYFAIL goto yyerrlab
#define YYRECOVERING() (!!yyerrstatus)
#define YYBACKUP(Token, Value) \
do \
if (yychar == YYEMPTY && yylen == 1) { \
yychar = (Token); \
yylval = (Value); \
yychar1 = YYTRANSLATE(yychar); \
YYPOPSTACK; \
goto yybackup; \
} else { \
yyerror("syntax error: cannot back up"); \
YYERROR; \
} \
while (0)
#define YYTERROR 1
#define YYERRCODE 256
#ifndef YYLLOC_DEFAULT
#define YYLLOC_DEFAULT(Current, Rhs, N) \
Current.last_line = Rhs[N].last_line; \
Current.last_column = Rhs[N].last_column;
#endif
#if YYPURE
#if YYLSP_NEEDED
#ifdef YYLEX_PARAM
#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM)
#else
#define YYLEX yylex(&yylval, &yylloc)
#endif
#else
#ifdef YYLEX_PARAM
#define YYLEX yylex(&yylval, YYLEX_PARAM)
#else
#define YYLEX yylex(&yylval)
#endif
#endif
#else
#define YYLEX yylex()
#endif
#if YYDEBUG
#ifndef YYFPRINTF
#include <stdio.h>
#define YYFPRINTF fprintf
#endif
#define YYDPRINTF(Args) \
do { \
if (yydebug) \
YYFPRINTF Args; \
} while (0)
int yydebug;
#else
#define YYDPRINTF(Args)
#endif
#ifndef YYINITDEPTH
#define YYINITDEPTH 200
#endif
#if YYMAXDEPTH == 0
#undef YYMAXDEPTH
#endif
#ifndef YYMAXDEPTH
#define YYMAXDEPTH 10000
#endif
#ifdef YYERROR_VERBOSE
#ifndef yystrlen
#if defined(__GLIBC__) && defined(_STRING_H)
#define yystrlen strlen
#else
static YYSIZE_T
#if defined(__STDC__) || defined(__cplusplus)
yystrlen(const char *yystr)
#else
yystrlen(yystr) const char *yystr;
#endif
{
register const char *yys = yystr;
while (*yys++ != '\0')
continue;
return yys - yystr - 1;
}
#endif
#endif
#ifndef yystpcpy
#if defined(__GLIBC__) && defined(_STRING_H) && defined(_GNU_SOURCE)
#define yystpcpy stpcpy
#else
static char *
#if defined(__STDC__) || defined(__cplusplus)
yystpcpy(char *yydest, const char *yysrc)
#else
yystpcpy(yydest, yysrc) char *yydest;
const char *yysrc;
#endif
{
register char *yyd = yydest;
register const char *yys = yysrc;
while ((*yyd++ = *yys++) != '\0')
continue;
return yyd - 1;
}
#endif
#endif
#endif
#line 315 "/usr/share/bison/bison.simple"
#ifdef YYPARSE_PARAM
#if defined(__STDC__) || defined(__cplusplus)
#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM
#define YYPARSE_PARAM_DECL
#else
#define YYPARSE_PARAM_ARG YYPARSE_PARAM
#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM;
#endif
#else
#define YYPARSE_PARAM_ARG
#define YYPARSE_PARAM_DECL
#endif
#ifdef __GNUC__
#ifdef YYPARSE_PARAM
int yyparse(void *);
#else
int yyparse(void);
#endif
#endif
#define YY_DECL_NON_LSP_VARIABLES \
\
int yychar; \
\
\
YYSTYPE yylval; \
\
\
int yynerrs;
#if YYLSP_NEEDED
#define YY_DECL_VARIABLES \
YY_DECL_NON_LSP_VARIABLES \
\
\
YYLTYPE yylloc;
#else
#define YY_DECL_VARIABLES YY_DECL_NON_LSP_VARIABLES
#endif
#if !YYPURE
YY_DECL_VARIABLES
#endif
int yyparse(YYPARSE_PARAM_ARG) YYPARSE_PARAM_DECL {
#if YYPURE
YY_DECL_VARIABLES
#endif
register int yystate;
register int yyn;
int yyresult;
int yyerrstatus;
int yychar1 = 0;
short yyssa[YYINITDEPTH];
short *yyss = yyssa;
register short *yyssp;
YYSTYPE yyvsa[YYINITDEPTH];
YYSTYPE *yyvs = yyvsa;
register YYSTYPE *yyvsp;
#if YYLSP_NEEDED
YYLTYPE yylsa[YYINITDEPTH];
YYLTYPE *yyls = yylsa;
YYLTYPE *yylsp;
#endif
#if YYLSP_NEEDED
#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--)
#else
#define YYPOPSTACK (yyvsp--, yyssp--)
#endif
YYSIZE_T yystacksize = YYINITDEPTH;
YYSTYPE yyval;
#if YYLSP_NEEDED
YYLTYPE yyloc;
#endif
int yylen;
YYDPRINTF((stderr, "Starting parse\n"));
yystate = 0;
yyerrstatus = 0;
yynerrs = 0;
yychar = YYEMPTY;
yyssp = yyss;
yyvsp = yyvs;
#if YYLSP_NEEDED
yylsp = yyls;
#endif
goto yysetstate;
yynewstate:
yyssp++;
yysetstate:
*yyssp = yystate;
if (yyssp >= yyss + yystacksize - 1) {
YYSIZE_T yysize = yyssp - yyss + 1;
#ifdef yyoverflow
{
YYSTYPE *yyvs1 = yyvs;
short *yyss1 = yyss;
#if YYLSP_NEEDED
YYLTYPE *yyls1 = yyls;
yyoverflow("parser stack overflow", &yyss1, yysize * sizeof(*yyssp),
&yyvs1, yysize * sizeof(*yyvsp), &yyls1,
yysize * sizeof(*yylsp), &yystacksize);
yyls = yyls1;
#else
yyoverflow("parser stack overflow", &yyss1, yysize * sizeof(*yyssp),
&yyvs1, yysize * sizeof(*yyvsp), &yystacksize);
#endif
yyss = yyss1;
yyvs = yyvs1;
}
#else
#ifndef YYSTACK_RELOCATE
goto yyoverflowlab;
#else
if (yystacksize >= YYMAXDEPTH)
goto yyoverflowlab;
yystacksize *= 2;
if (yystacksize > YYMAXDEPTH)
yystacksize = YYMAXDEPTH;
{
short *yyss1 = yyss;
union yyalloc *yyptr =
(union yyalloc *)YYSTACK_ALLOC(YYSTACK_BYTES(yystacksize));
if (!yyptr)
goto yyoverflowlab;
YYSTACK_RELOCATE(yyss);
YYSTACK_RELOCATE(yyvs);
#if YYLSP_NEEDED
YYSTACK_RELOCATE(yyls);
#endif
#undef YYSTACK_RELOCATE
if (yyss1 != yyssa)
YYSTACK_FREE(yyss1);
}
#endif
#endif
yyssp = yyss + yysize - 1;
yyvsp = yyvs + yysize - 1;
#if YYLSP_NEEDED
yylsp = yyls + yysize - 1;
#endif
YYDPRINTF((stderr, "Stack size increased to %lu\n",
(unsigned long int)yystacksize));
if (yyssp >= yyss + yystacksize - 1)
YYABORT;
}
YYDPRINTF((stderr, "Entering state %d\n", yystate));
goto yybackup;
yybackup:
yyn = yypact[yystate];
if (yyn == YYFLAG)
goto yydefault;
if (yychar == YYEMPTY) {
YYDPRINTF((stderr, "Reading a token: "));
yychar = YYLEX;
}
if (yychar <= 0)
{
yychar1 = 0;
yychar = YYEOF;
YYDPRINTF((stderr, "Now at end of input.\n"));
} else {
yychar1 = YYTRANSLATE(yychar);
#if YYDEBUG
if (yydebug) {
YYFPRINTF(stderr, "Next token is %d (%s", yychar, yytname[yychar1]);
#ifdef YYPRINT
YYPRINT(stderr, yychar, yylval);
#endif
YYFPRINTF(stderr, ")\n");
}
#endif
}
yyn += yychar1;
if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1)
goto yydefault;
yyn = yytable[yyn];
if (yyn < 0) {
if (yyn == YYFLAG)
goto yyerrlab;
yyn = -yyn;
goto yyreduce;
} else if (yyn == 0)
goto yyerrlab;
if (yyn == YYFINAL)
YYACCEPT;
YYDPRINTF((stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]));
if (yychar != YYEOF)
yychar = YYEMPTY;
*++yyvsp = yylval;
#if YYLSP_NEEDED
*++yylsp = yylloc;
#endif
if (yyerrstatus)
yyerrstatus--;
yystate = yyn;
goto yynewstate;
yydefault:
yyn = yydefact[yystate];
if (yyn == 0)
goto yyerrlab;
goto yyreduce;
yyreduce:
yylen = yyr2[yyn];
yyval = yyvsp[1 - yylen];
#if YYLSP_NEEDED
yyloc = yylsp[1 - yylen];
YYLLOC_DEFAULT(yyloc, (yylsp - yylen), yylen);
#endif
#if YYDEBUG
if (yydebug) {
int yyi;
YYFPRINTF(stderr, "Reducing via rule %d (line %d), ", yyn, yyrline[yyn]);
for (yyi = yyprhs[yyn]; yyrhs[yyi] > 0; yyi++)
YYFPRINTF(stderr, "%s ", yytname[yyrhs[yyi]]);
YYFPRINTF(stderr, " -> %s\n", yytname[yyr1[yyn]]);
}
#endif
switch (yyn) {
case 1:
#line 69 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
ast_root = program(yyvsp[0].classes);
} break;
case 2:
#line 71 "ast.y"
{
exit(1);
} break;
case 3:
#line 76 "ast.y"
{
yyval.classes = single_Classes(yyvsp[0].class_);
parse_results = yyval.classes;
} break;
case 4:
#line 79 "ast.y"
{
yyval.classes =
append_Classes(yyvsp[-1].classes, single_Classes(yyvsp[0].class_));
parse_results = yyval.classes;
} break;
case 5:
#line 84 "ast.y"
{
curr_lineno = yyvsp[-7].lineno;
yyval.class_ = class_(yyvsp[-5].symbol, yyvsp[-4].symbol,
yyvsp[-1].features, yyvsp[-3].symbol);
} break;
case 6:
#line 90 "ast.y"
{
yyval.features = nil_Features();
} break;
case 7:
#line 92 "ast.y"
{
yyval.features = yyvsp[0].features;
} break;
case 8:
#line 97 "ast.y"
{
yyval.features = single_Features(yyvsp[0].feature);
} break;
case 9:
#line 99 "ast.y"
{
yyval.features =
append_Features(yyvsp[-1].features, single_Features(yyvsp[0].feature));
} break;
case 10:
#line 103 "ast.y"
{
curr_lineno = yyvsp[-5].lineno;
yyval.feature = method(yyvsp[-3].symbol, yyvsp[-2].formals,
yyvsp[-1].symbol, yyvsp[0].expression);
} break;
case 11:
#line 105 "ast.y"
{
curr_lineno = yyvsp[-4].lineno;
yyval.feature =
attr(yyvsp[-2].symbol, yyvsp[-1].symbol, yyvsp[0].expression);
} break;
case 12:
#line 109 "ast.y"
{
yyval.formals = nil_Formals();
} break;
case 13:
#line 111 "ast.y"
{
yyval.formals = yyvsp[0].formals;
} break;
case 14:
#line 116 "ast.y"
{
yyval.formals = single_Formals(yyvsp[0].formal);
} break;
case 15:
#line 118 "ast.y"
{
yyval.formals =
append_Formals(yyvsp[-1].formals, single_Formals(yyvsp[0].formal));
} break;
case 16:
#line 122 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.formal = formal(yyvsp[-1].symbol, yyvsp[0].symbol);
} break;
case 17:
#line 126 "ast.y"
{
yyval.expression = yyvsp[-2].expression;
yyval.expression->set_type(yyvsp[0].symbol);
} break;
case 18:
#line 130 "ast.y"
{
yyval.expression = yyvsp[-2].expression;
} break;
case 19:
#line 133 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = assign(yyvsp[-1].symbol, yyvsp[0].expression);
} break;
case 20:
#line 136 "ast.y"
{
curr_lineno = yyvsp[-5].lineno;
yyval.expression = static_dispatch(yyvsp[-3].expression, yyvsp[-2].symbol,
yyvsp[-1].symbol, yyvsp[0].expressions);
} break;
case 21:
#line 139 "ast.y"
{
curr_lineno = yyvsp[-4].lineno;
yyval.expression =
dispatch(yyvsp[-2].expression, yyvsp[-1].symbol, yyvsp[0].expressions);
} break;
case 22:
#line 142 "ast.y"
{
curr_lineno = yyvsp[-4].lineno;
yyval.expression =
cond(yyvsp[-2].expression, yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 23:
#line 145 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = loop(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 24:
#line 148 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = block(yyvsp[0].expressions);
} break;
case 25:
#line 151 "ast.y"
{
curr_lineno = yyvsp[-5].lineno;
yyval.expression = let(yyvsp[-3].symbol, yyvsp[-2].symbol,
yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 26:
#line 154 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = typcase(yyvsp[-1].expression, yyvsp[0].cases);
} break;
case 27:
#line 157 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = new_(yyvsp[0].symbol);
} break;
case 28:
#line 160 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = isvoid(yyvsp[0].expression);
} break;
case 29:
#line 163 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = plus(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 30:
#line 166 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = sub(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 31:
#line 169 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = mul(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 32:
#line 172 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = divide(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 33:
#line 175 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = neg(yyvsp[0].expression);
} break;
case 34:
#line 178 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = lt(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 35:
#line 181 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = eq(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 36:
#line 184 "ast.y"
{
curr_lineno = yyvsp[-3].lineno;
yyval.expression = leq(yyvsp[-1].expression, yyvsp[0].expression);
} break;
case 37:
#line 187 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = comp(yyvsp[0].expression);
} break;
case 38:
#line 190 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = int_const(yyvsp[0].symbol);
} break;
case 39:
#line 193 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = string_const(yyvsp[0].symbol);
} break;
case 40:
#line 196 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
if (yyvsp[0].symbol->get_string() == "1")
yyval.expression = bool_const(1);
else
yyval.expression = bool_const(0);
} break;
case 41:
#line 204 "ast.y"
{
curr_lineno = yyvsp[-2].lineno;
yyval.expression = object(yyvsp[0].symbol);
} break;
case 42:
#line 207 "ast.y"
{
curr_lineno = yyvsp[-1].lineno;
yyval.expression = no_expr();
} break;
case 43:
#line 211 "ast.y"
{
yyval.expressions = nil_Expressions();
} break;
case 44:
#line 213 "ast.y"
{
yyval.expressions = yyvsp[-1].expressions;
} break;
case 45:
#line 218 "ast.y"
{
yyval.expressions = single_Expressions(yyvsp[0].expression);
} break;
case 46:
#line 220 "ast.y"
{
yyval.expressions = append_Expressions(
yyvsp[-1].expressions, single_Expressions(yyvsp[0].expression));
} break;
case 47:
#line 225 "ast.y"
{
yyval.cases = single_Cases(yyvsp[0].case_);
} break;
case 48:
#line 227 "ast.y"
{
yyval.cases = append_Cases(yyvsp[-1].cases, single_Cases(yyvsp[0].case_));
} break;
case 49:
#line 232 "ast.y"
{
curr_lineno = yyvsp[-4].lineno;
yyval.case_ =
branch(yyvsp[-2].symbol, yyvsp[-1].symbol, yyvsp[0].expression);
} break;
}
#line 705 "/usr/share/bison/bison.simple"
yyvsp -= yylen;
yyssp -= yylen;
#if YYLSP_NEEDED
yylsp -= yylen;
#endif
#if YYDEBUG
if (yydebug) {
short *yyssp1 = yyss - 1;
YYFPRINTF(stderr, "state stack now");
while (yyssp1 != yyssp)
YYFPRINTF(stderr, " %d", *++yyssp1);
YYFPRINTF(stderr, "\n");
}
#endif
*++yyvsp = yyval;
#if YYLSP_NEEDED
*++yylsp = yyloc;
#endif
yyn = yyr1[yyn];
yystate = yypgoto[yyn - YYNTBASE] + *yyssp;
if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *yyssp)
yystate = yytable[yystate];
else
yystate = yydefgoto[yyn - YYNTBASE];
goto yynewstate;
yyerrlab:
if (!yyerrstatus) {
++yynerrs;
#ifdef YYERROR_VERBOSE
yyn = yypact[yystate];
if (yyn > YYFLAG && yyn < YYLAST) {
YYSIZE_T yysize = 0;
char *yymsg;
int yyx, yycount;
yycount = 0;
for (yyx = yyn < 0 ? -yyn : 0;
yyx < (int)(sizeof(yytname) / sizeof(char *)); yyx++)
if (yycheck[yyx + yyn] == yyx)
yysize += yystrlen(yytname[yyx]) + 15, yycount++;
yysize += yystrlen("parse error, unexpected ") + 1;
yysize += yystrlen(yytname[YYTRANSLATE(yychar)]);
yymsg = (char *)YYSTACK_ALLOC(yysize);
if (yymsg != 0) {
char *yyp = yystpcpy(yymsg, "parse error, unexpected ");
yyp = yystpcpy(yyp, yytname[YYTRANSLATE(yychar)]);
if (yycount < 5) {
yycount = 0;
for (yyx = yyn < 0 ? -yyn : 0;
yyx < (int)(sizeof(yytname) / sizeof(char *)); yyx++)
if (yycheck[yyx + yyn] == yyx) {
const char *yyq = !yycount ? ", expecting " : " or ";
yyp = yystpcpy(yyp, yyq);
yyp = yystpcpy(yyp, yytname[yyx]);
yycount++;
}
}
yyerror(yymsg);
YYSTACK_FREE(yymsg);
} else
yyerror("parse error; also virtual memory exhausted");
} else
#endif
yyerror("parse error");
}
goto yyerrlab1;
yyerrlab1:
if (yyerrstatus == 3) {
if (yychar == YYEOF)
YYABORT;
YYDPRINTF(
(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]));
yychar = YYEMPTY;
}
yyerrstatus = 3;
goto yyerrhandle;
yyerrdefault:
#if 0#endif
yyerrpop:
if (yyssp == yyss)
YYABORT;
yyvsp--;
yystate = *--yyssp;
#if YYLSP_NEEDED
yylsp--;
#endif
#if YYDEBUG
if (yydebug) {
short *yyssp1 = yyss - 1;
YYFPRINTF(stderr, "Error: state stack now");
while (yyssp1 != yyssp)
YYFPRINTF(stderr, " %d", *++yyssp1);
YYFPRINTF(stderr, "\n");
}
#endif
yyerrhandle:
yyn = yypact[yystate];
if (yyn == YYFLAG)
goto yyerrdefault;
yyn += YYTERROR;
if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != YYTERROR)
goto yyerrdefault;
yyn = yytable[yyn];
if (yyn < 0) {
if (yyn == YYFLAG)
goto yyerrpop;
yyn = -yyn;
goto yyreduce;
} else if (yyn == 0)
goto yyerrpop;
if (yyn == YYFINAL)
YYACCEPT;
YYDPRINTF((stderr, "Shifting error token, "));
*++yyvsp = yylval;
#if YYLSP_NEEDED
*++yylsp = yylloc;
#endif
yystate = yyn;
goto yynewstate;
yyacceptlab:
yyresult = 0;
goto yyreturn;
yyabortlab:
yyresult = 1;
goto yyreturn;
yyoverflowlab:
yyerror("parser stack overflow");
yyresult = 2;
yyreturn:
#ifndef yyoverflow
if (yyss != yyssa)
YYSTACK_FREE(yyss);
#endif
return yyresult;
}
#line 237 "ast.y"
void ast_yyerror(char *) {
std::cerr << "??? unexpected error in ast parsing." << std::endl;
exit(1);
}