1 /* $NetBSD: pure_error.tab.c,v 1.6 2024/09/14 21:29:05 christos Exp $ */ 2 3 /* original parser id follows */ 4 /* yysccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93" */ 5 /* (use YYMAJOR/YYMINOR for ifdefs dependent on parser version) */ 6 7 #define YYBYACC 1 8 #define YYMAJOR 2 9 #define YYMINOR 0 10 #define YYCHECK "yyyymmdd" 11 12 #define YYEMPTY (-1) 13 #define yyclearin (yychar = YYEMPTY) 14 #define yyerrok (yyerrflag = 0) 15 #define YYRECOVERING() (yyerrflag != 0) 16 #define YYENOMEM (-2) 17 #define YYEOF 0 18 19 #ifndef yyparse 20 #define yyparse error_parse 21 #endif /* yyparse */ 22 23 #ifndef yylex 24 #define yylex error_lex 25 #endif /* yylex */ 26 27 #ifndef yyerror 28 #define yyerror error_error 29 #endif /* yyerror */ 30 31 #ifndef yychar 32 #define yychar error_char 33 #endif /* yychar */ 34 35 #ifndef yyval 36 #define yyval error_val 37 #endif /* yyval */ 38 39 #ifndef yylval 40 #define yylval error_lval 41 #endif /* yylval */ 42 43 #ifndef yydebug 44 #define yydebug error_debug 45 #endif /* yydebug */ 46 47 #ifndef yynerrs 48 #define yynerrs error_nerrs 49 #endif /* yynerrs */ 50 51 #ifndef yyerrflag 52 #define yyerrflag error_errflag 53 #endif /* yyerrflag */ 54 55 #ifndef yylhs 56 #define yylhs error_lhs 57 #endif /* yylhs */ 58 59 #ifndef yylen 60 #define yylen error_len 61 #endif /* yylen */ 62 63 #ifndef yydefred 64 #define yydefred error_defred 65 #endif /* yydefred */ 66 67 #ifndef yydgoto 68 #define yydgoto error_dgoto 69 #endif /* yydgoto */ 70 71 #ifndef yysindex 72 #define yysindex error_sindex 73 #endif /* yysindex */ 74 75 #ifndef yyrindex 76 #define yyrindex error_rindex 77 #endif /* yyrindex */ 78 79 #ifndef yygindex 80 #define yygindex error_gindex 81 #endif /* yygindex */ 82 83 #ifndef yytable 84 #define yytable error_table 85 #endif /* yytable */ 86 87 #ifndef yycheck 88 #define yycheck error_check 89 #endif /* yycheck */ 90 91 #ifndef yyname 92 #define yyname error_name 93 #endif /* yyname */ 94 95 #ifndef yyrule 96 #define yyrule error_rule 97 #endif /* yyrule */ 98 #define YYPREFIX "error_" 99 100 #define YYPURE 1 101 102 #line 2 "pure_error.y" 103 104 #ifdef YYBISON 105 #define YYSTYPE int 106 #define YYLEX_PARAM &yylval 107 #define YYLEX_DECL() yylex(YYSTYPE *yylval) 108 #define YYERROR_DECL() yyerror(const char *s) 109 int YYLEX_DECL(); 110 static void YYERROR_DECL(); 111 #endif 112 113 #line 112 "pure_error.tab.c" 114 115 #if ! defined(YYSTYPE) && ! defined(YYSTYPE_IS_DECLARED) 116 /* Default: YYSTYPE is the semantic value type. */ 117 typedef int YYSTYPE; 118 # define YYSTYPE_IS_DECLARED 1 119 #endif 120 121 /* compatibility with bison */ 122 #ifdef YYPARSE_PARAM 123 /* compatibility with FreeBSD */ 124 # ifdef YYPARSE_PARAM_TYPE 125 # define YYPARSE_DECL() yyparse(YYPARSE_PARAM_TYPE YYPARSE_PARAM) 126 # else 127 # define YYPARSE_DECL() yyparse(void *YYPARSE_PARAM) 128 # endif 129 #else 130 # define YYPARSE_DECL() yyparse(void) 131 #endif 132 133 /* Parameters sent to lex. */ 134 #ifdef YYLEX_PARAM 135 # ifdef YYLEX_PARAM_TYPE 136 # define YYLEX_DECL() yylex(YYSTYPE *yylval, YYLEX_PARAM_TYPE YYLEX_PARAM) 137 # else 138 # define YYLEX_DECL() yylex(YYSTYPE *yylval, void * YYLEX_PARAM) 139 # endif 140 # define YYLEX yylex(&yylval, YYLEX_PARAM) 141 #else 142 # define YYLEX_DECL() yylex(YYSTYPE *yylval) 143 # define YYLEX yylex(&yylval) 144 #endif 145 146 /* Parameters sent to yyerror. */ 147 #ifndef YYERROR_DECL 148 #define YYERROR_DECL() yyerror(const char *s) 149 #endif 150 #ifndef YYERROR_CALL 151 #define YYERROR_CALL(msg) yyerror(msg) 152 #endif 153 154 extern int YYPARSE_DECL(); 155 156 #define YYERRCODE 256 157 typedef int YYINT; 158 static const YYINT error_lhs[] = { -1, 159 0, 160 }; 161 static const YYINT error_len[] = { 2, 162 1, 163 }; 164 static const YYINT error_defred[] = { 0, 165 1, 0, 166 }; 167 static const YYINT error_dgoto[] = { 2, 168 }; 169 static const YYINT error_sindex[] = { -256, 170 0, 0, 171 }; 172 static const YYINT error_rindex[] = { 0, 173 0, 0, 174 }; 175 static const YYINT error_gindex[] = { 0, 176 }; 177 #define YYTABLESIZE 0 178 static const YYINT error_table[] = { 1, 179 }; 180 static const YYINT error_check[] = { 256, 181 }; 182 #define YYFINAL 2 183 #ifndef YYDEBUG 184 #define YYDEBUG 0 185 #endif 186 #define YYMAXTOKEN 256 187 #define YYUNDFTOKEN 259 188 #define YYTRANSLATE(a) ((a) > YYMAXTOKEN ? YYUNDFTOKEN : (a)) 189 #if YYDEBUG 190 static const char *const error_name[] = { 191 192 "end-of-file",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 193 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 194 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 195 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 196 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 197 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 198 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"illegal-symbol", 199 }; 200 static const char *const error_rule[] = { 201 "$accept : S", 202 "S : error", 203 204 }; 205 #endif 206 207 #if YYDEBUG 208 int yydebug; 209 #endif 210 211 /* define the initial stack-sizes */ 212 #ifdef YYSTACKSIZE 213 #undef YYMAXDEPTH 214 #define YYMAXDEPTH YYSTACKSIZE 215 #else 216 #ifdef YYMAXDEPTH 217 #define YYSTACKSIZE YYMAXDEPTH 218 #else 219 #define YYSTACKSIZE 10000 220 #define YYMAXDEPTH 10000 221 #endif 222 #endif 223 224 #define YYINITSTACKSIZE 200 225 226 typedef struct { 227 unsigned stacksize; 228 YYINT *s_base; 229 YYINT *s_mark; 230 YYINT *s_last; 231 YYSTYPE *l_base; 232 YYSTYPE *l_mark; 233 } YYSTACKDATA; 234 #line 17 "pure_error.y" 235 236 #include <stdio.h> 237 238 #ifdef YYBYACC 239 extern int YYLEX_DECL(); 240 #endif 241 242 int 243 main(void) 244 { 245 printf("yyparse() = %d\n", yyparse()); 246 return 0; 247 } 248 249 int 250 yylex(YYSTYPE *value) 251 { 252 return value ? 0 : -1; 253 } 254 255 static void 256 yyerror(const char* s) 257 { 258 printf("%s\n", s); 259 } 260 #line 259 "pure_error.tab.c" 261 262 #if YYDEBUG 263 #include <stdio.h> /* needed for printf */ 264 #endif 265 266 #include <stdlib.h> /* needed for malloc, etc */ 267 #include <string.h> /* needed for memset */ 268 269 /* allocate initial stack or double stack size, up to YYMAXDEPTH */ 270 static int yygrowstack(YYSTACKDATA *data) 271 { 272 int i; 273 unsigned newsize; 274 YYINT *newss; 275 YYSTYPE *newvs; 276 277 if ((newsize = data->stacksize) == 0) 278 newsize = YYINITSTACKSIZE; 279 else if (newsize >= YYMAXDEPTH) 280 return YYENOMEM; 281 else if ((newsize *= 2) > YYMAXDEPTH) 282 newsize = YYMAXDEPTH; 283 284 i = (int) (data->s_mark - data->s_base); 285 newss = (YYINT *)realloc(data->s_base, newsize * sizeof(*newss)); 286 if (newss == 0) 287 return YYENOMEM; 288 289 data->s_base = newss; 290 data->s_mark = newss + i; 291 292 newvs = (YYSTYPE *)realloc(data->l_base, newsize * sizeof(*newvs)); 293 if (newvs == 0) 294 return YYENOMEM; 295 296 data->l_base = newvs; 297 data->l_mark = newvs + i; 298 299 data->stacksize = newsize; 300 data->s_last = data->s_base + newsize - 1; 301 return 0; 302 } 303 304 #if YYPURE || defined(YY_NO_LEAKS) 305 static void yyfreestack(YYSTACKDATA *data) 306 { 307 free(data->s_base); 308 free(data->l_base); 309 memset(data, 0, sizeof(*data)); 310 } 311 #else 312 #define yyfreestack(data) /* nothing */ 313 #endif 314 315 #define YYABORT goto yyabort 316 #define YYREJECT goto yyabort 317 #define YYACCEPT goto yyaccept 318 #define YYERROR goto yyerrlab 319 320 int 321 YYPARSE_DECL() 322 { 323 int yyerrflag; 324 int yychar; 325 YYSTYPE yyval; 326 YYSTYPE yylval; 327 int yynerrs; 328 329 /* variables for the parser stack */ 330 YYSTACKDATA yystack; 331 int yym, yyn, yystate; 332 #if YYDEBUG 333 const char *yys; 334 335 if ((yys = getenv("YYDEBUG")) != 0) 336 { 337 yyn = *yys; 338 if (yyn >= '0' && yyn <= '9') 339 yydebug = yyn - '0'; 340 } 341 #endif 342 343 memset(&yyval, 0, sizeof(yyval)); 344 memset(&yylval, 0, sizeof(yylval)); 345 346 /* yym is set below */ 347 /* yyn is set below */ 348 yynerrs = 0; 349 yyerrflag = 0; 350 yychar = YYEMPTY; 351 yystate = 0; 352 353 #if YYPURE 354 memset(&yystack, 0, sizeof(yystack)); 355 #endif 356 357 if (yystack.s_base == NULL && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 358 yystack.s_mark = yystack.s_base; 359 yystack.l_mark = yystack.l_base; 360 yystate = 0; 361 *yystack.s_mark = 0; 362 363 yyloop: 364 if ((yyn = yydefred[yystate]) != 0) goto yyreduce; 365 if (yychar < 0) 366 { 367 yychar = YYLEX; 368 if (yychar < 0) yychar = YYEOF; 369 #if YYDEBUG 370 if (yydebug) 371 { 372 if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 373 printf("%sdebug: state %d, reading %d (%s)\n", 374 YYPREFIX, yystate, yychar, yys); 375 } 376 #endif 377 } 378 if (((yyn = yysindex[yystate]) != 0) && (yyn += yychar) >= 0 && 379 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 380 { 381 #if YYDEBUG 382 if (yydebug) 383 printf("%sdebug: state %d, shifting to state %d\n", 384 YYPREFIX, yystate, yytable[yyn]); 385 #endif 386 if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 387 yystate = yytable[yyn]; 388 *++yystack.s_mark = yytable[yyn]; 389 *++yystack.l_mark = yylval; 390 yychar = YYEMPTY; 391 if (yyerrflag > 0) --yyerrflag; 392 goto yyloop; 393 } 394 if (((yyn = yyrindex[yystate]) != 0) && (yyn += yychar) >= 0 && 395 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yychar) 396 { 397 yyn = yytable[yyn]; 398 goto yyreduce; 399 } 400 if (yyerrflag != 0) goto yyinrecovery; 401 402 YYERROR_CALL("syntax error"); 403 404 goto yyerrlab; /* redundant goto avoids 'unused label' warning */ 405 yyerrlab: 406 ++yynerrs; 407 408 yyinrecovery: 409 if (yyerrflag < 3) 410 { 411 yyerrflag = 3; 412 for (;;) 413 { 414 if (((yyn = yysindex[*yystack.s_mark]) != 0) && (yyn += YYERRCODE) >= 0 && 415 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) YYERRCODE) 416 { 417 #if YYDEBUG 418 if (yydebug) 419 printf("%sdebug: state %d, error recovery shifting\ 420 to state %d\n", YYPREFIX, *yystack.s_mark, yytable[yyn]); 421 #endif 422 if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 423 yystate = yytable[yyn]; 424 *++yystack.s_mark = yytable[yyn]; 425 *++yystack.l_mark = yylval; 426 goto yyloop; 427 } 428 else 429 { 430 #if YYDEBUG 431 if (yydebug) 432 printf("%sdebug: error recovery discarding state %d\n", 433 YYPREFIX, *yystack.s_mark); 434 #endif 435 if (yystack.s_mark <= yystack.s_base) goto yyabort; 436 --yystack.s_mark; 437 --yystack.l_mark; 438 } 439 } 440 } 441 else 442 { 443 if (yychar == YYEOF) goto yyabort; 444 #if YYDEBUG 445 if (yydebug) 446 { 447 if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 448 printf("%sdebug: state %d, error recovery discards token %d (%s)\n", 449 YYPREFIX, yystate, yychar, yys); 450 } 451 #endif 452 yychar = YYEMPTY; 453 goto yyloop; 454 } 455 456 yyreduce: 457 #if YYDEBUG 458 if (yydebug) 459 printf("%sdebug: state %d, reducing by rule %d (%s)\n", 460 YYPREFIX, yystate, yyn, yyrule[yyn]); 461 #endif 462 yym = yylen[yyn]; 463 if (yym > 0) 464 yyval = yystack.l_mark[1-yym]; 465 else 466 memset(&yyval, 0, sizeof yyval); 467 468 switch (yyn) 469 { 470 } 471 yystack.s_mark -= yym; 472 yystate = *yystack.s_mark; 473 yystack.l_mark -= yym; 474 yym = yylhs[yyn]; 475 if (yystate == 0 && yym == 0) 476 { 477 #if YYDEBUG 478 if (yydebug) 479 printf("%sdebug: after reduction, shifting from state 0 to\ 480 state %d\n", YYPREFIX, YYFINAL); 481 #endif 482 yystate = YYFINAL; 483 *++yystack.s_mark = YYFINAL; 484 *++yystack.l_mark = yyval; 485 if (yychar < 0) 486 { 487 yychar = YYLEX; 488 if (yychar < 0) yychar = YYEOF; 489 #if YYDEBUG 490 if (yydebug) 491 { 492 if ((yys = yyname[YYTRANSLATE(yychar)]) == NULL) yys = yyname[YYUNDFTOKEN]; 493 printf("%sdebug: state %d, reading %d (%s)\n", 494 YYPREFIX, YYFINAL, yychar, yys); 495 } 496 #endif 497 } 498 if (yychar == YYEOF) goto yyaccept; 499 goto yyloop; 500 } 501 if (((yyn = yygindex[yym]) != 0) && (yyn += yystate) >= 0 && 502 yyn <= YYTABLESIZE && yycheck[yyn] == (YYINT) yystate) 503 yystate = yytable[yyn]; 504 else 505 yystate = yydgoto[yym]; 506 #if YYDEBUG 507 if (yydebug) 508 printf("%sdebug: after reduction, shifting from state %d \ 509 to state %d\n", YYPREFIX, *yystack.s_mark, yystate); 510 #endif 511 if (yystack.s_mark >= yystack.s_last && yygrowstack(&yystack) == YYENOMEM) goto yyoverflow; 512 *++yystack.s_mark = (YYINT) yystate; 513 *++yystack.l_mark = yyval; 514 goto yyloop; 515 516 yyoverflow: 517 YYERROR_CALL("yacc stack overflow"); 518 519 yyabort: 520 yyfreestack(&yystack); 521 return (1); 522 523 yyaccept: 524 yyfreestack(&yystack); 525 return (0); 526 } 527