From 96a612aa59fbdbfc2028512bf6c5395bfb833fc6 Mon Sep 17 00:00:00 2001 From: Dave Abrahams Date: Fri, 18 Jan 2002 13:04:16 +0000 Subject: [PATCH] use byacc instead of bison to relieve dependence on alloca [SVN r12345] --- historic/jam/src/jamgram.c | 1803 ++++++++++++----------------- historic/jam/src/jamgram.h | 92 +- historic/jam/src/makedebugjam.bat | 2 +- historic/jam/src/makedebugjam.sh | 3 +- jam_src/jamgram.c | 1803 ++++++++++++----------------- jam_src/jamgram.h | 92 +- jam_src/makedebugjam.bat | 2 +- jam_src/makedebugjam.sh | 3 +- 8 files changed, 1560 insertions(+), 2240 deletions(-) diff --git a/historic/jam/src/jamgram.c b/historic/jam/src/jamgram.c index d91f5af03..57818047b 100644 --- a/historic/jam/src/jamgram.c +++ b/historic/jam/src/jamgram.c @@ -1,54 +1,19 @@ - -/* A Bison parser, made from jamgram.y - by GNU Bison version 1.28 */ - -#define YYBISON 1 /* Identify Bison output. */ - -#define _BANG 257 -#define _BANG_EQUALS 258 -#define _AMPERAMPER 259 -#define _LPAREN 260 -#define _RPAREN 261 -#define _PLUS_EQUALS 262 -#define _COLON 263 -#define _SEMIC 264 -#define _LANGLE 265 -#define _LANGLE_EQUALS 266 -#define _EQUALS 267 -#define _RANGLE 268 -#define _RANGLE_EQUALS 269 -#define _QUESTION_EQUALS 270 -#define _LBRACKET 271 -#define _RBRACKET 272 -#define ACTIONS 273 -#define BIND 274 -#define CASE 275 -#define DEFAULT 276 -#define ELSE 277 -#define EXISTING 278 -#define FOR 279 -#define IF 280 -#define IGNORE 281 -#define IN 282 -#define INCLUDE 283 -#define LOCAL 284 -#define MODULE 285 -#define ON 286 -#define PIECEMEAL 287 -#define QUIETLY 288 -#define RETURN 289 -#define RULE 290 -#define SWITCH 291 -#define TOGETHER 292 -#define UPDATED 293 -#define WHILE 294 -#define _LBRACE 295 -#define _BARBAR 296 -#define _RBRACE 297 -#define ARG 298 -#define STRING 299 - - +#ifndef lint +static char const +yyrcsid[] = "$FreeBSD: src/usr.bin/yacc/skeleton.c,v 1.28 2000/01/17 02:04:06 bde Exp $"; +#endif +#include +#define YYBYACC 1 +#define YYMAJOR 1 +#define YYMINOR 9 +#define YYLEX yylex() +#define YYEMPTY -1 +#define yyclearin (yychar=(YYEMPTY)) +#define yyerrok (yyerrflag=0) +#define YYRECOVERING() (yyerrflag!=0) +static int yygrowstack(); +#define YYPREFIX "yy" +#line 94 "jamgram.y" #include "jam.h" #include "lists.h" @@ -83,1133 +48,829 @@ # define pcnode( c,l,r ) parse_make( F0,l,r,P0,S0,S0,c ) # define psnode( s,l ) parse_make( F0,l,P0,P0,s,S0,0 ) -#ifndef YYSTYPE -#define YYSTYPE int -#endif +#line 52 "y.tab.c" +#define YYERRCODE 256 +#define _BANG 257 +#define _BANG_EQUALS 258 +#define _AMPERAMPER 259 +#define _LPAREN 260 +#define _RPAREN 261 +#define _PLUS_EQUALS 262 +#define _COLON 263 +#define _SEMIC 264 +#define _LANGLE 265 +#define _LANGLE_EQUALS 266 +#define _EQUALS 267 +#define _RANGLE 268 +#define _RANGLE_EQUALS 269 +#define _QUESTION_EQUALS 270 +#define _LBRACKET 271 +#define _RBRACKET 272 +#define ACTIONS 273 +#define BIND 274 +#define CASE 275 +#define DEFAULT 276 +#define ELSE 277 +#define EXISTING 278 +#define FOR 279 +#define IF 280 +#define IGNORE 281 +#define IN 282 +#define INCLUDE 283 +#define LOCAL 284 +#define MODULE 285 +#define ON 286 +#define PIECEMEAL 287 +#define QUIETLY 288 +#define RETURN 289 +#define RULE 290 +#define SWITCH 291 +#define TOGETHER 292 +#define UPDATED 293 +#define WHILE 294 +#define _LBRACE 295 +#define _BARBAR 296 +#define _RBRACE 297 +#define ARG 298 +#define STRING 299 +const short yylhs[] = { -1, + 0, 0, 2, 2, 1, 1, 1, 3, 6, 6, + 7, 7, 9, 9, 4, 4, 4, 4, 4, 4, + 4, 4, 4, 4, 4, 4, 4, 4, 16, 17, + 4, 11, 11, 11, 11, 13, 13, 13, 13, 13, + 13, 13, 13, 13, 13, 13, 13, 12, 12, 18, + 8, 8, 5, 19, 19, 10, 10, 14, 14, 20, + 20, 20, 20, 20, 20, 15, 15, +}; +const short yylen[] = { 2, + 0, 1, 1, 1, 1, 2, 5, 0, 2, 1, + 3, 0, 1, 0, 3, 3, 3, 4, 5, 6, + 3, 8, 5, 5, 5, 5, 7, 5, 0, 0, + 9, 1, 1, 1, 2, 1, 3, 3, 3, 3, + 3, 3, 3, 2, 3, 3, 3, 0, 2, 4, + 1, 3, 1, 0, 2, 1, 4, 0, 2, 1, + 1, 1, 1, 1, 1, 0, 2, +}; +const short yydefred[] = { 0, + 0, 58, 0, 0, 54, 0, 0, 54, 54, 0, + 0, 0, 0, 2, 0, 0, 0, 54, 0, 13, + 0, 0, 0, 56, 0, 0, 0, 0, 0, 54, + 0, 0, 0, 0, 4, 0, 3, 0, 0, 6, + 0, 33, 32, 34, 0, 54, 54, 0, 65, 62, + 64, 63, 61, 60, 0, 59, 0, 44, 0, 0, + 0, 0, 0, 0, 0, 54, 0, 0, 0, 16, + 55, 54, 10, 0, 0, 0, 21, 0, 0, 15, + 54, 17, 0, 35, 0, 0, 57, 54, 0, 54, + 47, 38, 39, 40, 37, 41, 42, 43, 45, 0, + 0, 9, 0, 0, 0, 0, 0, 0, 0, 52, + 54, 0, 54, 18, 67, 29, 0, 0, 7, 19, + 25, 0, 23, 49, 26, 0, 28, 0, 0, 0, + 0, 0, 11, 20, 30, 0, 27, 50, 0, 22, + 31, +}; +const short yydgoto[] = { 13, + 35, 36, 37, 15, 38, 74, 112, 39, 16, 17, + 47, 107, 26, 19, 89, 129, 139, 108, 28, 56, +}; +const short yysindex[] = { -120, + -282, 0, -267, -234, 0, 0, -259, 0, 0, -234, + -120, 0, 0, 0, -120, -261, -83, 0, -131, 0, + -236, -234, -234, 0, -69, -250, -181, -244, -188, 0, + -210, -175, -204, -209, 0, -205, 0, -157, -154, 0, + -184, 0, 0, 0, -152, 0, 0, -156, 0, 0, + 0, 0, 0, 0, -153, 0, -158, 0, -185, -244, + -244, -244, -244, -244, -244, 0, -234, -120, -234, 0, + 0, 0, 0, -135, -188, -120, 0, -144, -120, 0, + 0, 0, -128, 0, -150, -124, 0, 0, -149, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, -155, + -118, 0, -120, -110, -139, -143, -125, -144, -114, 0, + 0, -103, 0, 0, 0, 0, -129, -104, 0, 0, + 0, -78, 0, 0, 0, -71, 0, -70, -98, -120, + -103, -120, 0, 0, 0, -95, 0, 0, -93, 0, + 0, +}; +const short yyrindex[] = { 7, + 0, 0, -92, 0, 0, -162, -201, 0, 0, 0, + -275, -163, 0, 0, 3, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -229, 0, 0, -223, -59, 0, + 0, 0, 0, 0, 0, 0, 0, -142, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -88, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, -275, 0, 0, + 0, 0, 0, 0, -59, -275, 0, -89, -275, 0, + 0, 0, -146, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -253, 0, 4, 0, 0, 0, 0, -89, 0, 0, + 0, -81, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, -275, + -81, -194, 0, 0, 0, 0, 0, 0, 0, 0, + 0, +}; +const short yygindex[] = { 0, + 75, -48, -27, -43, 5, 135, 0, -13, 208, -4, + 127, 106, 11, 0, 0, 0, 0, 0, 0, 0, +}; +#define YYTABLESIZE 301 +const short yytable[] = { 25, + 24, 73, 5, 8, 48, 25, 1, 46, 67, 27, + 29, 31, 32, 33, 14, 18, 20, 25, 25, 100, + 34, 8, 22, 71, 30, 23, 1, 105, 41, 36, + 109, 36, 58, 59, 75, 53, 1, 53, 53, 53, + 53, 46, 46, 53, 68, 69, 53, 73, 53, 67, + 85, 86, 53, 24, 119, 92, 93, 94, 95, 96, + 97, 57, 25, 24, 25, 36, 36, 110, 127, 54, + 98, 53, 53, 67, 14, 91, 102, 99, 72, 101, + 8, 136, 70, 138, 76, 79, 69, 137, 77, 40, + 78, 80, 115, 54, 117, 14, 54, 126, 56, 54, + 54, 54, 8, 56, 54, 81, 56, 54, 54, 82, + 69, 42, 56, 83, 84, 87, 43, 128, 51, 44, + 88, 51, 56, 90, 12, 45, 12, 13, 103, 51, + 106, 111, 12, 12, 54, 54, 12, 12, 12, 114, + 67, 118, 12, 12, 12, 116, 49, 12, 12, 50, + 1, 12, 2, 120, 122, 51, 52, 121, 3, 4, + 53, 54, 5, 6, 7, 130, 55, 1, 8, 2, + 9, 123, 131, 10, 11, 3, 4, 12, 42, 5, + 20, 7, 125, 43, 132, 8, 44, 9, 60, 133, + 10, 11, 45, 134, 12, 61, 62, 63, 64, 65, + 135, 140, 46, 141, 8, 14, 66, 48, 14, 104, + 21, 113, 66, 124, 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, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 24, 0, 24, 0, 24, 0, 5, 8, 24, + 24, 0, 0, 24, 24, 24, 0, 0, 0, 24, + 24, 24, 14, 14, 24, 24, 14, 24, 24, 5, + 8, +}; +const short yycheck[] = { 4, + 0, 29, 0, 0, 18, 10, 0, 261, 259, 5, + 6, 7, 8, 9, 290, 298, 284, 22, 23, 68, + 10, 297, 257, 28, 284, 260, 271, 76, 290, 259, + 79, 261, 22, 23, 30, 259, 271, 261, 262, 263, + 264, 295, 296, 267, 295, 296, 270, 75, 272, 259, + 46, 47, 276, 298, 103, 60, 61, 62, 63, 64, + 65, 298, 67, 298, 69, 295, 296, 81, 112, 271, + 66, 295, 296, 259, 0, 261, 72, 67, 267, 69, + 275, 130, 264, 132, 295, 295, 296, 131, 264, 15, + 295, 297, 88, 295, 90, 290, 298, 111, 262, 263, + 264, 264, 297, 267, 267, 263, 270, 271, 271, 264, + 296, 262, 276, 298, 267, 272, 267, 113, 261, 270, + 274, 264, 286, 282, 271, 276, 273, 290, 264, 272, + 275, 260, 279, 280, 298, 298, 283, 284, 285, 264, + 259, 297, 289, 290, 291, 295, 278, 294, 295, 281, + 271, 298, 273, 264, 298, 287, 288, 297, 279, 280, + 292, 293, 283, 284, 285, 295, 298, 271, 289, 273, + 291, 297, 277, 294, 295, 279, 280, 298, 262, 283, + 284, 285, 297, 267, 263, 289, 270, 291, 258, 261, + 294, 295, 276, 264, 298, 265, 266, 267, 268, 269, + 299, 297, 286, 297, 264, 298, 295, 297, 290, 75, + 3, 85, 282, 108, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 271, -1, 273, -1, 275, -1, 275, 275, 279, + 280, -1, -1, 283, 284, 285, -1, -1, -1, 289, + 290, 291, 290, 290, 294, 295, 290, 297, 298, 297, + 297, +}; +#define YYFINAL 13 #ifndef YYDEBUG -#define YYDEBUG 1 +#define YYDEBUG 0 #endif - -#include - -#ifndef __cplusplus -#ifndef __STDC__ -#define const -#endif -#endif - - - -#define YYFINAL 143 -#define YYFLAG -32768 -#define YYNTBASE 46 - -#define YYTRANSLATE(x) ((unsigned)(x) <= 299 ? yytranslate[x] : 67) - -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, 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, 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, 38, 39, 40, 41, 42, 43, 44, 45 -}; - -#if YYDEBUG != 0 -static const short yyprhs[] = { 0, - 0, 1, 3, 5, 7, 9, 12, 18, 19, 22, - 24, 28, 29, 31, 32, 36, 40, 44, 49, 55, - 62, 66, 75, 81, 87, 93, 99, 107, 113, 114, - 115, 125, 127, 129, 131, 134, 136, 140, 144, 148, - 152, 156, 160, 164, 167, 171, 175, 179, 180, 183, - 188, 190, 194, 196, 197, 200, 202, 207, 208, 211, - 213, 215, 217, 219, 221, 223, 224 -}; - -static const short yyrhs[] = { -1, - 48, 0, 49, 0, 48, 0, 53, 0, 53, 48, - 0, 30, 61, 50, 10, 47, 0, 0, 13, 61, - 0, 49, 0, 6, 60, 7, 0, 0, 30, 0, - 0, 41, 47, 43, 0, 29, 61, 10, 0, 44, - 60, 10, 0, 63, 56, 61, 10, 0, 31, 30, - 61, 50, 10, 0, 63, 32, 61, 56, 61, 10, - 0, 35, 61, 10, 0, 25, 52, 44, 28, 61, - 41, 47, 43, 0, 37, 61, 41, 58, 43, 0, - 26, 57, 41, 47, 43, 0, 31, 61, 41, 47, - 43, 0, 40, 57, 41, 47, 43, 0, 26, 57, - 41, 47, 43, 23, 53, 0, 52, 36, 44, 51, - 53, 0, 0, 0, 19, 64, 44, 66, 41, 54, - 45, 55, 43, 0, 13, 0, 8, 0, 16, 0, - 22, 13, 0, 63, 0, 63, 13, 63, 0, 63, - 4, 63, 0, 63, 11, 63, 0, 63, 12, 63, - 0, 63, 14, 63, 0, 63, 15, 63, 0, 63, - 28, 61, 0, 3, 57, 0, 57, 5, 57, 0, - 57, 42, 57, 0, 6, 57, 7, 0, 0, 59, - 58, 0, 21, 44, 9, 47, 0, 61, 0, 61, - 9, 60, 0, 62, 0, 0, 62, 63, 0, 44, - 0, 17, 44, 60, 18, 0, 0, 64, 65, 0, - 39, 0, 38, 0, 27, 0, 34, 0, 33, 0, - 24, 0, 0, 20, 61, 0 -}; - -#endif - -#if YYDEBUG != 0 -static const short yyrline[] = { 0, - 132, 134, 145, 147, 151, 153, 155, 159, 163, 165, - 169, 171, 175, 177, 181, 183, 185, 187, 189, 191, - 193, 195, 197, 199, 201, 203, 205, 207, 209, 212, - 214, 221, 223, 225, 227, 235, 237, 239, 241, 243, - 245, 247, 249, 251, 253, 255, 257, 267, 269, 273, - 282, 284, 294, 298, 300, 304, 306, 316, 318, 322, - 324, 326, 328, 330, 332, 341, 343 -}; -#endif - - -#if YYDEBUG != 0 || defined (YYERROR_VERBOSE) - -static const char * const yytname[] = { "$","error","$undefined.","_BANG", -"_BANG_EQUALS","_AMPERAMPER","_LPAREN","_RPAREN","_PLUS_EQUALS","_COLON","_SEMIC", -"_LANGLE","_LANGLE_EQUALS","_EQUALS","_RANGLE","_RANGLE_EQUALS","_QUESTION_EQUALS", +#define YYMAXTOKEN 299 +#if YYDEBUG +const char * const yyname[] = { +"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, +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, +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, +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, +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, +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, +0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"_BANG","_BANG_EQUALS", +"_AMPERAMPER","_LPAREN","_RPAREN","_PLUS_EQUALS","_COLON","_SEMIC","_LANGLE", +"_LANGLE_EQUALS","_EQUALS","_RANGLE","_RANGLE_EQUALS","_QUESTION_EQUALS", "_LBRACKET","_RBRACKET","ACTIONS","BIND","CASE","DEFAULT","ELSE","EXISTING", "FOR","IF","IGNORE","IN","INCLUDE","LOCAL","MODULE","ON","PIECEMEAL","QUIETLY", -"RETURN","RULE","SWITCH","TOGETHER","UPDATED","WHILE","_LBRACE","_BARBAR","_RBRACE", -"ARG","STRING","run","block","rules","null","assign_list_opt","arglist_opt", -"local_opt","rule","@1","@2","assign","cond","cases","case","lol","list","listp", -"arg","eflags","eflag","bindlist", NULL +"RETURN","RULE","SWITCH","TOGETHER","UPDATED","WHILE","_LBRACE","_BARBAR", +"_RBRACE","ARG","STRING", +}; +const char * const yyrule[] = { +"$accept : run", +"run :", +"run : rules", +"block : null", +"block : rules", +"rules : rule", +"rules : rule rules", +"rules : LOCAL list assign_list_opt _SEMIC block", +"null :", +"assign_list_opt : _EQUALS list", +"assign_list_opt : null", +"arglist_opt : _LPAREN lol _RPAREN", +"arglist_opt :", +"local_opt : LOCAL", +"local_opt :", +"rule : _LBRACE block _RBRACE", +"rule : INCLUDE list _SEMIC", +"rule : ARG lol _SEMIC", +"rule : arg assign list _SEMIC", +"rule : MODULE LOCAL list assign_list_opt _SEMIC", +"rule : arg ON list assign list _SEMIC", +"rule : RETURN list _SEMIC", +"rule : FOR local_opt ARG IN list _LBRACE block _RBRACE", +"rule : SWITCH list _LBRACE cases _RBRACE", +"rule : IF cond _LBRACE block _RBRACE", +"rule : MODULE list _LBRACE block _RBRACE", +"rule : WHILE cond _LBRACE block _RBRACE", +"rule : IF cond _LBRACE block _RBRACE ELSE rule", +"rule : local_opt RULE ARG arglist_opt rule", +"$$1 :", +"$$2 :", +"rule : ACTIONS eflags ARG bindlist _LBRACE $$1 STRING $$2 _RBRACE", +"assign : _EQUALS", +"assign : _PLUS_EQUALS", +"assign : _QUESTION_EQUALS", +"assign : DEFAULT _EQUALS", +"cond : arg", +"cond : arg _EQUALS arg", +"cond : arg _BANG_EQUALS arg", +"cond : arg _LANGLE arg", +"cond : arg _LANGLE_EQUALS arg", +"cond : arg _RANGLE arg", +"cond : arg _RANGLE_EQUALS arg", +"cond : arg IN list", +"cond : _BANG cond", +"cond : cond _AMPERAMPER cond", +"cond : cond _BARBAR cond", +"cond : _LPAREN cond _RPAREN", +"cases :", +"cases : case cases", +"case : CASE ARG _COLON block", +"lol : list", +"lol : list _COLON lol", +"list : listp", +"listp :", +"listp : listp arg", +"arg : ARG", +"arg : _LBRACKET ARG lol _RBRACKET", +"eflags :", +"eflags : eflags eflag", +"eflag : UPDATED", +"eflag : TOGETHER", +"eflag : IGNORE", +"eflag : QUIETLY", +"eflag : PIECEMEAL", +"eflag : EXISTING", +"bindlist :", +"bindlist : BIND list", }; #endif - -static const short yyr1[] = { 0, - 46, 46, 47, 47, 48, 48, 48, 49, 50, 50, - 51, 51, 52, 52, 53, 53, 53, 53, 53, 53, - 53, 53, 53, 53, 53, 53, 53, 53, 54, 55, - 53, 56, 56, 56, 56, 57, 57, 57, 57, 57, - 57, 57, 57, 57, 57, 57, 57, 58, 58, 59, - 60, 60, 61, 62, 62, 63, 63, 64, 64, 65, - 65, 65, 65, 65, 65, 66, 66 -}; - -static const short yyr2[] = { 0, - 0, 1, 1, 1, 1, 2, 5, 0, 2, 1, - 3, 0, 1, 0, 3, 3, 3, 4, 5, 6, - 3, 8, 5, 5, 5, 5, 7, 5, 0, 0, - 9, 1, 1, 1, 2, 1, 3, 3, 3, 3, - 3, 3, 3, 2, 3, 3, 3, 0, 2, 4, - 1, 3, 1, 0, 2, 1, 4, 0, 2, 1, - 1, 1, 1, 1, 1, 0, 2 -}; - -static const short yydefact[] = { 1, - 0, 58, 14, 0, 54, 54, 54, 54, 54, 0, - 8, 56, 2, 0, 5, 0, 54, 0, 13, 0, - 0, 0, 56, 0, 36, 0, 53, 8, 54, 0, - 0, 0, 0, 0, 4, 3, 0, 51, 0, 6, - 33, 32, 34, 0, 54, 54, 0, 65, 62, 64, - 63, 61, 60, 66, 59, 0, 44, 0, 0, 8, - 0, 0, 0, 0, 0, 0, 0, 54, 16, 55, - 54, 10, 0, 8, 8, 21, 48, 8, 15, 17, - 54, 12, 35, 0, 0, 57, 54, 0, 54, 47, - 45, 0, 46, 38, 39, 40, 37, 41, 42, 43, - 9, 8, 0, 0, 0, 0, 48, 0, 52, 54, - 14, 54, 18, 67, 29, 0, 24, 7, 19, 25, - 0, 23, 49, 26, 0, 28, 0, 0, 8, 14, - 8, 11, 20, 30, 0, 27, 50, 0, 22, 31, - 0, 0, 0 -}; - -static const short yydefgoto[] = { 141, - 34, 35, 36, 73, 111, 14, 15, 128, 138, 46, - 24, 106, 107, 37, 38, 27, 16, 18, 55, 88 -}; - -static const short yypact[] = { 75, - -34,-32768, -16, 6,-32768, -21, -10,-32768,-32768, 6, - 75, 20,-32768, -3, 75, 121,-32768, 127,-32768, -18, - 6, 6,-32768, 11, 135, 25, -6, 23,-32768, -2, - 33, 3, 26, 4,-32768,-32768, 38, 49, 15,-32768, --32768,-32768,-32768, 47,-32768,-32768, 43,-32768,-32768,-32768, --32768,-32768,-32768, 42,-32768, 44,-32768, 14, 6, 75, - 6, -6, -6, -6, -6, -6, -6,-32768,-32768,-32768, --32768,-32768, 61, 23, 75,-32768, 53, 75,-32768,-32768, --32768, 69,-32768, 57, 67,-32768,-32768, 39,-32768,-32768, --32768, 50, 76,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768, 75, 85, 54, 52, 56, 53, 59,-32768,-32768, - 101,-32768,-32768,-32768,-32768, 62, 86,-32768,-32768,-32768, - 99,-32768,-32768,-32768, 106,-32768, 104, 72, 75, 101, - 75,-32768,-32768,-32768, 78,-32768,-32768, 79,-32768,-32768, - 123, 124,-32768 -}; - -static const short yypgoto[] = {-32768, - -53, 27, -20, 51,-32768, 125, -98,-32768,-32768, 60, - -4, 28,-32768, -12, -5,-32768, 24,-32768,-32768,-32768 -}; - - -#define YYLAST 171 - - -static const short yytable[] = { 26, - 28, 30, 31, 32, 47, 33, 92, 72, 21, 17, - 1, 22, 126, 19, -13, 59, 57, 58, 59, 29, - 90, 104, 1, 74, 108, 56, 13, 25, -54, -54, - 59, 136, 39, 25, 69, 71, -54, 23, 75, 84, - 85, 40, 76, 77, 25, 25, 79, 80, 118, 23, - 70, 60, 61, 72, 91, 61, 93, 81, 82, 83, - 86, 87, 100, -54, 41, 101, 78, 61, 109, 42, - 102, 89, 43, 105, 110, 135, 113, 137, 44, 115, - 59, 114, 25, 116, 25, 94, 95, 96, 97, 98, - 99, 1, 117, 2, 119, 121, 120, 125, 122, 3, - 4, 124, 129, 5, 6, 7, 127, 131, 130, 8, - -14, 9, 132, 133, 10, 11, 134, 1, 12, 2, - 139, 140, 142, 143, 103, 3, 4, 20, 41, 5, - 19, 7, 0, 42, 123, 8, 43, 9, 62, 0, - 10, 11, 44, 112, 12, 63, 64, 65, 66, 67, - 48, 0, 45, 49, 0, 0, 0, 0, 0, 50, - 51, 0, 68, 0, 52, 53, 0, 0, 0, 0, - 54 -}; - -static const short yycheck[] = { 5, - 6, 7, 8, 9, 17, 10, 60, 28, 3, 44, - 17, 6, 111, 30, 36, 5, 21, 22, 5, 30, - 7, 75, 17, 29, 78, 44, 0, 4, 9, 10, - 5, 130, 36, 10, 10, 13, 17, 44, 41, 45, - 46, 15, 10, 41, 21, 22, 43, 10, 102, 44, - 27, 41, 42, 74, 59, 42, 61, 9, 44, 13, - 18, 20, 68, 44, 8, 71, 41, 42, 81, 13, - 10, 28, 16, 21, 6, 129, 10, 131, 22, 41, - 5, 87, 59, 89, 61, 62, 63, 64, 65, 66, - 67, 17, 43, 19, 10, 44, 43, 110, 43, 25, - 26, 43, 41, 29, 30, 31, 112, 9, 23, 35, - 36, 37, 7, 10, 40, 41, 45, 17, 44, 19, - 43, 43, 0, 0, 74, 25, 26, 3, 8, 29, - 30, 31, -1, 13, 107, 35, 16, 37, 4, -1, - 40, 41, 22, 84, 44, 11, 12, 13, 14, 15, - 24, -1, 32, 27, -1, -1, -1, -1, -1, 33, - 34, -1, 28, -1, 38, 39, -1, -1, -1, -1, - 44 -}; -/* -*-C-*- Note some compilers choke on comments on `#line' lines. */ - - -/* Skeleton output parser for bison, - Copyright (C) 1984, 1989, 1990 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 - the Free Software Foundation; either version 2, or (at your option) - any later version. - - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. - - You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ - -/* As a special exception, when this file is copied by Bison into a - Bison output file, you may use that output file without restriction. - This special exception was added by the Free Software Foundation - in version 1.24 of Bison. */ - -#ifndef alloca -#ifdef __GNUC__ -#define alloca __builtin_alloca -#else /* not GNU C. */ -#if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) -#include -#else /* not sparc */ -#if defined (MSDOS) && !defined (__TURBOC__) -#include -#else /* not MSDOS, or __TURBOC__ */ -#if defined(_AIX) -#include - #pragma alloca -#else /* not MSDOS, __TURBOC__, or _AIX */ -#ifdef __hpux -#ifdef __cplusplus -extern "C" { -void *alloca (unsigned int); -}; -#else /* not __cplusplus */ -void *alloca (); -#endif /* not __cplusplus */ -#endif /* __hpux */ -#endif /* not _AIX */ -#endif /* not MSDOS, or __TURBOC__ */ -#endif /* not sparc. */ -#endif /* not GNU C. */ -#endif /* alloca not defined. */ - -/* This is the parser code that is written into each bison parser - when the %semantic_parser declaration is not specified in the grammar. - It was written by Richard Stallman by simplifying the hairy parser - used when %semantic_parser is specified. */ - -/* Note: there must be only one dollar sign in this file. - It is replaced by the list of actions, each action - as one case of the switch. */ - -#define yyerrok (yyerrstatus = 0) -#define yyclearin (yychar = YYEMPTY) -#define YYEMPTY -2 -#define YYEOF 0 -#define YYACCEPT return(0) -#define YYABORT return(1) -#define YYERROR goto yyerrlab1 -/* Like YYERROR except do call yyerror. - This remains here temporarily to ease the - transition to the new meaning of YYERROR, for GCC. - Once GCC version 2 has supplanted version 1, this can go. */ -#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 YYPURE -#define YYLEX yylex() +#ifndef YYSTYPE +typedef int YYSTYPE; #endif - -#ifdef YYPURE -#ifdef YYLSP_NEEDED -#ifdef YYLEX_PARAM -#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM) -#else -#define YYLEX yylex(&yylval, &yylloc) +#if YYDEBUG +#include #endif -#else /* not YYLSP_NEEDED */ -#ifdef YYLEX_PARAM -#define YYLEX yylex(&yylval, YYLEX_PARAM) -#else -#define YYLEX yylex(&yylval) -#endif -#endif /* not YYLSP_NEEDED */ -#endif - -/* If nonreentrant, generate the variables here */ - -#ifndef YYPURE - -int yychar; /* the lookahead symbol */ -YYSTYPE yylval; /* the semantic value of the */ - /* lookahead symbol */ - -#ifdef YYLSP_NEEDED -YYLTYPE yylloc; /* location data for the lookahead */ - /* symbol */ -#endif - -int yynerrs; /* number of parse errors so far */ -#endif /* not YYPURE */ - -#if YYDEBUG != 0 -int yydebug; /* nonzero means print parse trace */ -/* Since this is uninitialized, it does not stop multiple parsers - from coexisting. */ -#endif - -/* YYINITDEPTH indicates the initial size of the parser's stacks */ - -#ifndef YYINITDEPTH -#define YYINITDEPTH 200 -#endif - -/* YYMAXDEPTH is the maximum size the stacks can grow to - (effective only if the built-in stack extension method is used). */ - -#if YYMAXDEPTH == 0 +#ifdef YYSTACKSIZE #undef YYMAXDEPTH -#endif - -#ifndef YYMAXDEPTH +#define YYMAXDEPTH YYSTACKSIZE +#else +#ifdef YYMAXDEPTH +#define YYSTACKSIZE YYMAXDEPTH +#else +#define YYSTACKSIZE 10000 #define YYMAXDEPTH 10000 #endif - -/* Prevent warning if -Wstrict-prototypes. */ -#ifdef __GNUC__ -int yyparse (void); #endif - -#if __GNUC__ > 1 /* GNU C and GNU C++ define this. */ -#define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT) -#else /* not GNU C or C++ */ -#ifndef __cplusplus - -/* This is the most reliable way to avoid incompatibilities - in available built-in functions on various systems. */ -static void -__yy_memcpy (to, from, count) - char *to; - char *from; - int count; +#define YYINITSTACKSIZE 200 +int yydebug; +int yynerrs; +int yyerrflag; +int yychar; +short *yyssp; +YYSTYPE *yyvsp; +YYSTYPE yyval; +YYSTYPE yylval; +short *yyss; +short *yysslim; +YYSTYPE *yyvs; +int yystacksize; +/* allocate initial stack or double stack size, up to YYMAXDEPTH */ +static int yygrowstack() { - register char *f = from; - register char *t = to; - register int i = count; + int newsize, i; + short *newss; + YYSTYPE *newvs; - while (i-- > 0) - *t++ = *f++; + if ((newsize = yystacksize) == 0) + newsize = YYINITSTACKSIZE; + else if (newsize >= YYMAXDEPTH) + return -1; + else if ((newsize *= 2) > YYMAXDEPTH) + newsize = YYMAXDEPTH; + i = yyssp - yyss; + newss = yyss ? (short *)realloc(yyss, newsize * sizeof *newss) : + (short *)malloc(newsize * sizeof *newss); + if (newss == NULL) + return -1; + yyss = newss; + yyssp = newss + i; + newvs = yyvs ? (YYSTYPE *)realloc(yyvs, newsize * sizeof *newvs) : + (YYSTYPE *)malloc(newsize * sizeof *newvs); + if (newvs == NULL) + return -1; + yyvs = newvs; + yyvsp = newvs + i; + yystacksize = newsize; + yysslim = yyss + newsize - 1; + return 0; } -#else /* __cplusplus */ +#define YYABORT goto yyabort +#define YYREJECT goto yyabort +#define YYACCEPT goto yyaccept +#define YYERROR goto yyerrlab -/* This is the most reliable way to avoid incompatibilities - in available built-in functions on various systems. */ -static void -__yy_memcpy (char *to, char *from, int count) -{ - register char *f = from; - register char *t = to; - register int i = count; - - while (i-- > 0) - *t++ = *f++; -} - -#endif -#endif - - - -/* The user can define YYPARSE_PARAM as the name of an argument to be passed - into yyparse. The argument should have type void *. - It should actually point to an object. - Grammar actions can access the variable by casting it - to the proper pointer type. */ - -#ifdef YYPARSE_PARAM -#ifdef __cplusplus -#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM +#ifndef YYPARSE_PARAM +#if defined(__cplusplus) || __STDC__ +#define YYPARSE_PARAM_ARG void #define YYPARSE_PARAM_DECL -#else /* not __cplusplus */ -#define YYPARSE_PARAM_ARG YYPARSE_PARAM -#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM; -#endif /* not __cplusplus */ -#else /* not YYPARSE_PARAM */ +#else /* ! ANSI-C/C++ */ #define YYPARSE_PARAM_ARG #define YYPARSE_PARAM_DECL -#endif /* not YYPARSE_PARAM */ +#endif /* ANSI-C/C++ */ +#else /* YYPARSE_PARAM */ +#ifndef YYPARSE_PARAM_TYPE +#define YYPARSE_PARAM_TYPE void * +#endif +#if defined(__cplusplus) || __STDC__ +#define YYPARSE_PARAM_ARG YYPARSE_PARAM_TYPE YYPARSE_PARAM +#define YYPARSE_PARAM_DECL +#else /* ! ANSI-C/C++ */ +#define YYPARSE_PARAM_ARG YYPARSE_PARAM +#define YYPARSE_PARAM_DECL YYPARSE_PARAM_TYPE YYPARSE_PARAM; +#endif /* ANSI-C/C++ */ +#endif /* ! YYPARSE_PARAM */ int -yyparse(YYPARSE_PARAM_ARG) - YYPARSE_PARAM_DECL +yyparse (YYPARSE_PARAM_ARG) + YYPARSE_PARAM_DECL { - register int yystate; - register int yyn; - register short *yyssp; - register YYSTYPE *yyvsp; - int yyerrstatus; /* number of tokens to shift before error messages enabled */ - int yychar1 = 0; /* lookahead token as an internal (translated) token number */ + register int yym, yyn, yystate; +#if YYDEBUG + register const char *yys; - short yyssa[YYINITDEPTH]; /* the state stack */ - YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */ - - short *yyss = yyssa; /* refer to the stacks thru separate pointers */ - YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */ - -#ifdef YYLSP_NEEDED - YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ - YYLTYPE *yyls = yylsa; - YYLTYPE *yylsp; - -#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--) -#else -#define YYPOPSTACK (yyvsp--, yyssp--) -#endif - - int yystacksize = YYINITDEPTH; - -#ifdef YYPURE - int yychar; - YYSTYPE yylval; - int yynerrs; -#ifdef YYLSP_NEEDED - YYLTYPE yylloc; -#endif -#endif - - YYSTYPE yyval; /* the variable used to return */ - /* semantic values from the action */ - /* routines */ - - int yylen; - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Starting parse\n"); -#endif - - yystate = 0; - yyerrstatus = 0; - yynerrs = 0; - yychar = YYEMPTY; /* Cause a token to be read. */ - - /* Initialize stack pointers. - Waste one element of value and location stack - so that they stay on the same level as the state stack. - The wasted elements are never initialized. */ - - yyssp = yyss; - yyvsp = yyvs; -#ifdef YYLSP_NEEDED - yylsp = yyls; -#endif - -/* Push a new state, which is found in yystate . */ -/* In all cases, when you get here, the value and location stacks - have just been pushed. so pushing a state here evens the stacks. */ -yynewstate: - - *yyssp++ = yystate; - - if (yyssp >= yyss + yystacksize) + if ((yys = getenv("YYDEBUG"))) { - /* Give user a chance to reallocate the stack */ - /* Use copies of these so that the &'s don't force the real ones into memory. */ - YYSTYPE *yyvs1 = yyvs; - short *yyss1 = yyss; -#ifdef YYLSP_NEEDED - YYLTYPE *yyls1 = yyls; -#endif - - /* Get the current used size of the three stacks, in elements. */ - int size = yyssp - yyss; - -#ifdef yyoverflow - /* Each stack pointer address is followed by the size of - the data in use in that stack, in bytes. */ -#ifdef YYLSP_NEEDED - /* This used to be a conditional around just the two extra args, - but that might be undefined if yyoverflow is a macro. */ - yyoverflow("parser stack overflow", - &yyss1, size * sizeof (*yyssp), - &yyvs1, size * sizeof (*yyvsp), - &yyls1, size * sizeof (*yylsp), - &yystacksize); -#else - yyoverflow("parser stack overflow", - &yyss1, size * sizeof (*yyssp), - &yyvs1, size * sizeof (*yyvsp), - &yystacksize); -#endif - - yyss = yyss1; yyvs = yyvs1; -#ifdef YYLSP_NEEDED - yyls = yyls1; -#endif -#else /* no yyoverflow */ - /* Extend the stack our own way. */ - if (yystacksize >= YYMAXDEPTH) - { - yyerror("parser stack overflow"); - return 2; - } - yystacksize *= 2; - if (yystacksize > YYMAXDEPTH) - yystacksize = YYMAXDEPTH; - yyss = (short *) alloca (yystacksize * sizeof (*yyssp)); - __yy_memcpy ((char *)yyss, (char *)yyss1, size * sizeof (*yyssp)); - yyvs = (YYSTYPE *) alloca (yystacksize * sizeof (*yyvsp)); - __yy_memcpy ((char *)yyvs, (char *)yyvs1, size * sizeof (*yyvsp)); -#ifdef YYLSP_NEEDED - yyls = (YYLTYPE *) alloca (yystacksize * sizeof (*yylsp)); - __yy_memcpy ((char *)yyls, (char *)yyls1, size * sizeof (*yylsp)); -#endif -#endif /* no yyoverflow */ - - yyssp = yyss + size; - yyvsp = yyvs + size - 1; -#ifdef YYLSP_NEEDED - yylsp = yyls + size - 1; -#endif - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Stack size increased to %d\n", yystacksize); -#endif - - if (yyssp >= yyss + yystacksize) - YYABORT; + yyn = *yys; + if (yyn >= '0' && yyn <= '9') + yydebug = yyn - '0'; } - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Entering state %d\n", yystate); #endif - goto yybackup; - yybackup: + yynerrs = 0; + yyerrflag = 0; + yychar = (-1); -/* Do appropriate processing given the current state. */ -/* Read a lookahead token if we need one and don't already have one. */ -/* yyresume: */ + if (yyss == NULL && yygrowstack()) goto yyoverflow; + yyssp = yyss; + yyvsp = yyvs; + *yyssp = yystate = 0; - /* First try to decide what to do without reference to lookahead token. */ - - yyn = yypact[yystate]; - if (yyn == YYFLAG) - goto yydefault; - - /* Not known => get a lookahead token if don't already have one. */ - - /* yychar is either YYEMPTY or YYEOF - or a valid token in external form. */ - - if (yychar == YYEMPTY) +yyloop: + if ((yyn = yydefred[yystate])) goto yyreduce; + if (yychar < 0) { -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Reading a token: "); -#endif - yychar = YYLEX; - } - - /* Convert token to internal form (in yychar1) for indexing tables with */ - - if (yychar <= 0) /* This means end of input. */ - { - yychar1 = 0; - yychar = YYEOF; /* Don't call YYLEX any more */ - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Now at end of input.\n"); + if ((yychar = yylex()) < 0) yychar = 0; +#if YYDEBUG + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + printf("%sdebug: state %d, reading %d (%s)\n", + YYPREFIX, yystate, yychar, yys); + } #endif } - else + if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yychar) { - yychar1 = YYTRANSLATE(yychar); - -#if YYDEBUG != 0 - if (yydebug) - { - fprintf (stderr, "Next token is %d (%s", yychar, yytname[yychar1]); - /* Give the individual parser a way to print the precise meaning - of a token, for further debugging info. */ -#ifdef YYPRINT - YYPRINT (stderr, yychar, yylval); -#endif - fprintf (stderr, ")\n"); - } +#if YYDEBUG + if (yydebug) + printf("%sdebug: state %d, shifting to state %d\n", + YYPREFIX, yystate, yytable[yyn]); #endif + if (yyssp >= yysslim && yygrowstack()) + { + goto yyoverflow; + } + *++yyssp = yystate = yytable[yyn]; + *++yyvsp = yylval; + yychar = (-1); + if (yyerrflag > 0) --yyerrflag; + goto yyloop; } - - yyn += yychar1; - if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1) - goto yydefault; - - yyn = yytable[yyn]; - - /* yyn is what to do for this token type in this state. - Negative => reduce, -yyn is rule number. - Positive => shift, yyn is new state. - New state is final state => don't bother to shift, - just return success. - 0, or most negative number => error. */ - - if (yyn < 0) + if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yychar) { - if (yyn == YYFLAG) - goto yyerrlab; - yyn = -yyn; - goto yyreduce; + yyn = yytable[yyn]; + goto yyreduce; } - else if (yyn == 0) + if (yyerrflag) goto yyinrecovery; +#if defined(lint) || defined(__GNUC__) + goto yynewerror; +#endif +yynewerror: + yyerror("syntax error"); +#if defined(lint) || defined(__GNUC__) goto yyerrlab; - - if (yyn == YYFINAL) - YYACCEPT; - - /* Shift the lookahead token. */ - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]); #endif - - /* Discard the token being shifted unless it is eof. */ - if (yychar != YYEOF) - yychar = YYEMPTY; - - *++yyvsp = yylval; -#ifdef YYLSP_NEEDED - *++yylsp = yylloc; +yyerrlab: + ++yynerrs; +yyinrecovery: + if (yyerrflag < 3) + { + yyerrflag = 3; + for (;;) + { + if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE) + { +#if YYDEBUG + if (yydebug) + printf("%sdebug: state %d, error recovery shifting\ + to state %d\n", YYPREFIX, *yyssp, yytable[yyn]); #endif - - /* count tokens shifted since error; after three, turn off error status. */ - if (yyerrstatus) yyerrstatus--; - - yystate = yyn; - goto yynewstate; - -/* Do the default action for the current state. */ -yydefault: - - yyn = yydefact[yystate]; - if (yyn == 0) - goto yyerrlab; - -/* Do a reduction. yyn is the number of a rule to reduce with. */ + if (yyssp >= yysslim && yygrowstack()) + { + goto yyoverflow; + } + *++yyssp = yystate = yytable[yyn]; + *++yyvsp = yylval; + goto yyloop; + } + else + { +#if YYDEBUG + if (yydebug) + printf("%sdebug: error recovery discarding state %d\n", + YYPREFIX, *yyssp); +#endif + if (yyssp <= yyss) goto yyabort; + --yyssp; + --yyvsp; + } + } + } + else + { + if (yychar == 0) goto yyabort; +#if YYDEBUG + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + printf("%sdebug: state %d, error recovery discards token %d (%s)\n", + YYPREFIX, yystate, yychar, yys); + } +#endif + yychar = (-1); + goto yyloop; + } yyreduce: - yylen = yyr2[yyn]; - if (yylen > 0) - yyval = yyvsp[1-yylen]; /* implement default value of the action */ - -#if YYDEBUG != 0 - if (yydebug) - { - int i; - - fprintf (stderr, "Reducing via rule %d (line %d), ", - yyn, yyrline[yyn]); - - /* Print the symbols being reduced, and their result. */ - for (i = yyprhs[yyn]; yyrhs[i] > 0; i++) - fprintf (stderr, "%s ", yytname[yyrhs[i]]); - fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]); - } +#if YYDEBUG + if (yydebug) + printf("%sdebug: state %d, reducing by rule %d (%s)\n", + YYPREFIX, yystate, yyn, yyrule[yyn]); #endif - - - switch (yyn) { - + yym = yylen[yyn]; + yyval = yyvsp[1-yym]; + switch (yyn) + { case 2: -{ parse_save( yyvsp[0].parse ); ; - break;} +#line 135 "jamgram.y" +{ parse_save( yyvsp[0].parse ); } +break; case 3: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 146 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; case 4: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 148 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; case 5: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 152 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; case 6: -{ yyval.parse = prules( yyvsp[-1].parse, yyvsp[0].parse ); ; - break;} +#line 154 "jamgram.y" +{ yyval.parse = prules( yyvsp[-1].parse, yyvsp[0].parse ); } +break; case 7: -{ yyval.parse = plocal( yyvsp[-3].parse, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 156 "jamgram.y" +{ yyval.parse = plocal( yyvsp[-3].parse, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 8: -{ yyval.parse = pnull(); ; - break;} +#line 160 "jamgram.y" +{ yyval.parse = pnull(); } +break; case 9: -{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_SET; ; - break;} +#line 164 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_SET; } +break; case 10: -{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_APPEND; ; - break;} +#line 166 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_APPEND; } +break; case 11: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 170 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 12: -{ yyval.parse = P0; ; - break;} +#line 172 "jamgram.y" +{ yyval.parse = P0; } +break; case 13: -{ yyval.number = 1; ; - break;} +#line 176 "jamgram.y" +{ yyval.number = 1; } +break; case 14: -{ yyval.number = 0; ; - break;} +#line 178 "jamgram.y" +{ yyval.number = 0; } +break; case 15: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 182 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 16: -{ yyval.parse = pincl( yyvsp[-1].parse ); ; - break;} +#line 184 "jamgram.y" +{ yyval.parse = pincl( yyvsp[-1].parse ); } +break; case 17: -{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); ; - break;} +#line 186 "jamgram.y" +{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); } +break; case 18: -{ yyval.parse = pset( yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); ; - break;} +#line 188 "jamgram.y" +{ yyval.parse = pset( yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); } +break; case 19: -{ yyval.parse = psetmodule( yyvsp[-2].parse, yyvsp[-1].parse, yyvsp[-1].number ); ; - break;} +#line 190 "jamgram.y" +{ yyval.parse = psetmodule( yyvsp[-2].parse, yyvsp[-1].parse, yyvsp[-1].number ); } +break; case 20: -{ yyval.parse = pset1( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); ; - break;} +#line 192 "jamgram.y" +{ yyval.parse = pset1( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); } +break; case 21: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 194 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 22: -{ yyval.parse = pfor( yyvsp[-5].string, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-6].number ); ; - break;} +#line 196 "jamgram.y" +{ yyval.parse = pfor( yyvsp[-5].string, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-6].number ); } +break; case 23: -{ yyval.parse = pswitch( yyvsp[-3].parse, yyvsp[-1].parse ); ; - break;} +#line 198 "jamgram.y" +{ yyval.parse = pswitch( yyvsp[-3].parse, yyvsp[-1].parse ); } +break; case 24: -{ yyval.parse = pif( yyvsp[-3].parse, yyvsp[-1].parse, pnull() ); ; - break;} +#line 200 "jamgram.y" +{ yyval.parse = pif( yyvsp[-3].parse, yyvsp[-1].parse, pnull() ); } +break; case 25: -{ yyval.parse = pmodule( yyvsp[-3].parse, yyvsp[-1].parse ); ; - break;} +#line 202 "jamgram.y" +{ yyval.parse = pmodule( yyvsp[-3].parse, yyvsp[-1].parse ); } +break; case 26: -{ yyval.parse = pwhile( yyvsp[-3].parse, yyvsp[-1].parse ); ; - break;} +#line 204 "jamgram.y" +{ yyval.parse = pwhile( yyvsp[-3].parse, yyvsp[-1].parse ); } +break; case 27: -{ yyval.parse = pif( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[0].parse ); ; - break;} +#line 206 "jamgram.y" +{ yyval.parse = pif( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[0].parse ); } +break; case 28: -{ yyval.parse = psetc( yyvsp[-2].string, yyvsp[0].parse, yyvsp[-1].parse, yyvsp[-4].number ); ; - break;} +#line 208 "jamgram.y" +{ yyval.parse = psetc( yyvsp[-2].string, yyvsp[0].parse, yyvsp[-1].parse, yyvsp[-4].number ); } +break; case 29: -{ yymode( SCAN_STRING ); ; - break;} +#line 210 "jamgram.y" +{ yymode( SCAN_STRING ); } +break; case 30: -{ yymode( SCAN_NORMAL ); ; - break;} +#line 212 "jamgram.y" +{ yymode( SCAN_NORMAL ); } +break; case 31: -{ yyval.parse = psete( yyvsp[-6].string,yyvsp[-5].parse,yyvsp[-2].string,yyvsp[-7].number ); ; - break;} +#line 214 "jamgram.y" +{ yyval.parse = psete( yyvsp[-6].string,yyvsp[-5].parse,yyvsp[-2].string,yyvsp[-7].number ); } +break; case 32: -{ yyval.number = ASSIGN_SET; ; - break;} +#line 222 "jamgram.y" +{ yyval.number = ASSIGN_SET; } +break; case 33: -{ yyval.number = ASSIGN_APPEND; ; - break;} +#line 224 "jamgram.y" +{ yyval.number = ASSIGN_APPEND; } +break; case 34: -{ yyval.number = ASSIGN_DEFAULT; ; - break;} +#line 226 "jamgram.y" +{ yyval.number = ASSIGN_DEFAULT; } +break; case 35: -{ yyval.number = ASSIGN_DEFAULT; ; - break;} +#line 228 "jamgram.y" +{ yyval.number = ASSIGN_DEFAULT; } +break; case 36: -{ yyval.parse = pcnode( COND_EXISTS, yyvsp[0].parse, pnull() ); ; - break;} +#line 236 "jamgram.y" +{ yyval.parse = pcnode( COND_EXISTS, yyvsp[0].parse, pnull() ); } +break; case 37: -{ yyval.parse = pcnode( COND_EQUALS, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 238 "jamgram.y" +{ yyval.parse = pcnode( COND_EQUALS, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 38: -{ yyval.parse = pcnode( COND_NOTEQ, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 240 "jamgram.y" +{ yyval.parse = pcnode( COND_NOTEQ, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 39: -{ yyval.parse = pcnode( COND_LESS, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 242 "jamgram.y" +{ yyval.parse = pcnode( COND_LESS, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 40: -{ yyval.parse = pcnode( COND_LESSEQ, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 244 "jamgram.y" +{ yyval.parse = pcnode( COND_LESSEQ, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 41: -{ yyval.parse = pcnode( COND_MORE, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 246 "jamgram.y" +{ yyval.parse = pcnode( COND_MORE, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 42: -{ yyval.parse = pcnode( COND_MOREEQ, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 248 "jamgram.y" +{ yyval.parse = pcnode( COND_MOREEQ, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 43: -{ yyval.parse = pcnode( COND_IN, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 250 "jamgram.y" +{ yyval.parse = pcnode( COND_IN, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 44: -{ yyval.parse = pcnode( COND_NOT, yyvsp[0].parse, P0 ); ; - break;} +#line 252 "jamgram.y" +{ yyval.parse = pcnode( COND_NOT, yyvsp[0].parse, P0 ); } +break; case 45: -{ yyval.parse = pcnode( COND_AND, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 254 "jamgram.y" +{ yyval.parse = pcnode( COND_AND, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 46: -{ yyval.parse = pcnode( COND_OR, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 256 "jamgram.y" +{ yyval.parse = pcnode( COND_OR, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 47: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 258 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 48: -{ yyval.parse = P0; ; - break;} +#line 268 "jamgram.y" +{ yyval.parse = P0; } +break; case 49: -{ yyval.parse = pnode( yyvsp[-1].parse, yyvsp[0].parse ); ; - break;} +#line 270 "jamgram.y" +{ yyval.parse = pnode( yyvsp[-1].parse, yyvsp[0].parse ); } +break; case 50: -{ yyval.parse = psnode( yyvsp[-2].string, yyvsp[0].parse ); ; - break;} +#line 274 "jamgram.y" +{ yyval.parse = psnode( yyvsp[-2].string, yyvsp[0].parse ); } +break; case 51: -{ yyval.parse = pnode( P0, yyvsp[0].parse ); ; - break;} +#line 283 "jamgram.y" +{ yyval.parse = pnode( P0, yyvsp[0].parse ); } +break; case 52: -{ yyval.parse = pnode( yyvsp[0].parse, yyvsp[-2].parse ); ; - break;} +#line 285 "jamgram.y" +{ yyval.parse = pnode( yyvsp[0].parse, yyvsp[-2].parse ); } +break; case 53: -{ yyval.parse = yyvsp[0].parse; yymode( SCAN_NORMAL ); ; - break;} +#line 295 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; yymode( SCAN_NORMAL ); } +break; case 54: -{ yyval.parse = pnull(); yymode( SCAN_PUNCT ); ; - break;} +#line 299 "jamgram.y" +{ yyval.parse = pnull(); yymode( SCAN_PUNCT ); } +break; case 55: -{ yyval.parse = pappend( yyvsp[-1].parse, yyvsp[0].parse ); ; - break;} +#line 301 "jamgram.y" +{ yyval.parse = pappend( yyvsp[-1].parse, yyvsp[0].parse ); } +break; case 56: -{ yyval.parse = plist( yyvsp[0].string ); ; - break;} +#line 305 "jamgram.y" +{ yyval.parse = plist( yyvsp[0].string ); } +break; case 57: -{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); ; - break;} +#line 307 "jamgram.y" +{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); } +break; case 58: -{ yyval.number = 0; ; - break;} +#line 317 "jamgram.y" +{ yyval.number = 0; } +break; case 59: -{ yyval.number = yyvsp[-1].number | yyvsp[0].number; ; - break;} +#line 319 "jamgram.y" +{ yyval.number = yyvsp[-1].number | yyvsp[0].number; } +break; case 60: -{ yyval.number = EXEC_UPDATED; ; - break;} +#line 323 "jamgram.y" +{ yyval.number = EXEC_UPDATED; } +break; case 61: -{ yyval.number = EXEC_TOGETHER; ; - break;} +#line 325 "jamgram.y" +{ yyval.number = EXEC_TOGETHER; } +break; case 62: -{ yyval.number = EXEC_IGNORE; ; - break;} +#line 327 "jamgram.y" +{ yyval.number = EXEC_IGNORE; } +break; case 63: -{ yyval.number = EXEC_QUIETLY; ; - break;} +#line 329 "jamgram.y" +{ yyval.number = EXEC_QUIETLY; } +break; case 64: -{ yyval.number = EXEC_PIECEMEAL; ; - break;} +#line 331 "jamgram.y" +{ yyval.number = EXEC_PIECEMEAL; } +break; case 65: -{ yyval.number = EXEC_EXISTING; ; - break;} +#line 333 "jamgram.y" +{ yyval.number = EXEC_EXISTING; } +break; case 66: -{ yyval.parse = pnull(); ; - break;} +#line 342 "jamgram.y" +{ yyval.parse = pnull(); } +break; case 67: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 344 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; +#line 821 "y.tab.c" + } + yyssp -= yym; + yystate = *yyssp; + yyvsp -= 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; + *++yyssp = YYFINAL; + *++yyvsp = yyval; + if (yychar < 0) + { + if ((yychar = yylex()) < 0) yychar = 0; +#if YYDEBUG + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + printf("%sdebug: state %d, reading %d (%s)\n", + YYPREFIX, YYFINAL, yychar, yys); + } +#endif + } + if (yychar == 0) goto yyaccept; + goto yyloop; + } + if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yystate) + yystate = yytable[yyn]; + else + yystate = yydgoto[yym]; +#if YYDEBUG + if (yydebug) + printf("%sdebug: after reduction, shifting from state %d \ +to state %d\n", YYPREFIX, *yyssp, yystate); +#endif + if (yyssp >= yysslim && yygrowstack()) + { + goto yyoverflow; + } + *++yyssp = yystate; + *++yyvsp = yyval; + goto yyloop; +yyoverflow: + yyerror("yacc stack overflow"); +yyabort: + return (1); +yyaccept: + return (0); } - /* the action file gets copied in in place of this dollarsign */ - - - yyvsp -= yylen; - yyssp -= yylen; -#ifdef YYLSP_NEEDED - yylsp -= yylen; -#endif - -#if YYDEBUG != 0 - if (yydebug) - { - short *ssp1 = yyss; - fprintf (stderr, "state stack now"); - while (ssp1 != yyssp) - fprintf (stderr, " %d", *ssp1++); - fprintf (stderr, "\n"); - } -#endif - - *++yyvsp = yyval; - -#ifdef YYLSP_NEEDED - yylsp++; - if (yylen == 0) - { - yylsp->first_line = yylloc.first_line; - yylsp->first_column = yylloc.first_column; - yylsp->last_line = (yylsp-1)->last_line; - yylsp->last_column = (yylsp-1)->last_column; - yylsp->text = 0; - } - else - { - yylsp->last_line = (yylsp+yylen-1)->last_line; - yylsp->last_column = (yylsp+yylen-1)->last_column; - } -#endif - - /* Now "shift" the result of the reduction. - Determine what state that goes to, - based on the state we popped back to - and the rule number reduced by. */ - - yyn = yyr1[yyn]; - - yystate = yypgoto[yyn - YYNTBASE] + *(yyssp - 1); - if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *(yyssp - 1)) - yystate = yytable[yystate]; - else - yystate = yydefgoto[yyn - YYNTBASE]; - - goto yynewstate; - -yyerrlab: /* here on detecting error */ - - if (! yyerrstatus) - /* If not already recovering from an error, report this error. */ - { - ++yynerrs; - -#ifdef YYERROR_VERBOSE - yyn = yypact[yystate]; - - if (yyn > YYFLAG && yyn < YYLAST) - { - int size = 0; - char *msg; - int x, count; - - count = 0; - /* Start X at -yyn if nec to avoid negative indexes in yycheck. */ - for (x = (yyn < 0 ? -yyn : 0); - x < (sizeof(yytname) / sizeof(char *)); x++) - if (yycheck[x + yyn] == x) - size += strlen(yytname[x]) + 15, count++; - msg = (char *) malloc(size + 15); - if (msg != 0) - { - strcpy(msg, "parse error"); - - if (count < 5) - { - count = 0; - for (x = (yyn < 0 ? -yyn : 0); - x < (sizeof(yytname) / sizeof(char *)); x++) - if (yycheck[x + yyn] == x) - { - strcat(msg, count == 0 ? ", expecting `" : " or `"); - strcat(msg, yytname[x]); - strcat(msg, "'"); - count++; - } - } - yyerror(msg); - free(msg); - } - else - yyerror ("parse error; also virtual memory exceeded"); - } - else -#endif /* YYERROR_VERBOSE */ - yyerror("parse error"); - } - - goto yyerrlab1; -yyerrlab1: /* here on error raised explicitly by an action */ - - if (yyerrstatus == 3) - { - /* if just tried and failed to reuse lookahead token after an error, discard it. */ - - /* return failure if at end of input */ - if (yychar == YYEOF) - YYABORT; - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); -#endif - - yychar = YYEMPTY; - } - - /* Else will try to reuse lookahead token - after shifting the error token. */ - - yyerrstatus = 3; /* Each real token shifted decrements this */ - - goto yyerrhandle; - -yyerrdefault: /* current state does not do anything special for the error token. */ - -#if 0 - /* This is wrong; only states that explicitly want error tokens - should shift them. */ - yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/ - if (yyn) goto yydefault; -#endif - -yyerrpop: /* pop the current state because it cannot handle the error token */ - - if (yyssp - 1 == yyss) YYABORT; - yyvsp--; - yyssp--; - yystate = *(yyssp - 1); -#ifdef YYLSP_NEEDED - yylsp--; -#endif - -#if YYDEBUG != 0 - if (yydebug) - { - short *ssp1 = yyss; - fprintf (stderr, "Error: state stack now"); - while (ssp1 != yyssp) - fprintf (stderr, " %d", *ssp1++); - fprintf (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; - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Shifting error token, "); -#endif - - *++yyvsp = yylval; -#ifdef YYLSP_NEEDED - *++yylsp = yylloc; -#endif - - yystate = yyn; - goto yynewstate; -} - - diff --git a/historic/jam/src/jamgram.h b/historic/jam/src/jamgram.h index 74acdd439..c31089bc9 100644 --- a/historic/jam/src/jamgram.h +++ b/historic/jam/src/jamgram.h @@ -1,49 +1,47 @@ -#ifndef YYSTYPE -#define YYSTYPE int +#ifndef YYERRCODE +#define YYERRCODE 256 #endif -#define _BANG 257 -#define _BANG_EQUALS 258 -#define _AMPERAMPER 259 -#define _LPAREN 260 -#define _RPAREN 261 -#define _PLUS_EQUALS 262 -#define _COLON 263 -#define _SEMIC 264 -#define _LANGLE 265 -#define _LANGLE_EQUALS 266 -#define _EQUALS 267 -#define _RANGLE 268 -#define _RANGLE_EQUALS 269 -#define _QUESTION_EQUALS 270 -#define _LBRACKET 271 -#define _RBRACKET 272 -#define ACTIONS 273 -#define BIND 274 -#define CASE 275 -#define DEFAULT 276 -#define ELSE 277 -#define EXISTING 278 -#define FOR 279 -#define IF 280 -#define IGNORE 281 -#define IN 282 -#define INCLUDE 283 -#define LOCAL 284 -#define MODULE 285 -#define ON 286 -#define PIECEMEAL 287 -#define QUIETLY 288 -#define RETURN 289 -#define RULE 290 -#define SWITCH 291 -#define TOGETHER 292 -#define UPDATED 293 -#define WHILE 294 -#define _LBRACE 295 -#define _BARBAR 296 -#define _RBRACE 297 -#define ARG 298 -#define STRING 299 - -extern YYSTYPE yylval; +#define _BANG 257 +#define _BANG_EQUALS 258 +#define _AMPERAMPER 259 +#define _LPAREN 260 +#define _RPAREN 261 +#define _PLUS_EQUALS 262 +#define _COLON 263 +#define _SEMIC 264 +#define _LANGLE 265 +#define _LANGLE_EQUALS 266 +#define _EQUALS 267 +#define _RANGLE 268 +#define _RANGLE_EQUALS 269 +#define _QUESTION_EQUALS 270 +#define _LBRACKET 271 +#define _RBRACKET 272 +#define ACTIONS 273 +#define BIND 274 +#define CASE 275 +#define DEFAULT 276 +#define ELSE 277 +#define EXISTING 278 +#define FOR 279 +#define IF 280 +#define IGNORE 281 +#define IN 282 +#define INCLUDE 283 +#define LOCAL 284 +#define MODULE 285 +#define ON 286 +#define PIECEMEAL 287 +#define QUIETLY 288 +#define RETURN 289 +#define RULE 290 +#define SWITCH 291 +#define TOGETHER 292 +#define UPDATED 293 +#define WHILE 294 +#define _LBRACE 295 +#define _BARBAR 296 +#define _RBRACE 297 +#define ARG 298 +#define STRING 299 diff --git a/historic/jam/src/makedebugjam.bat b/historic/jam/src/makedebugjam.bat index 39e760e35..3da69d3c8 100755 --- a/historic/jam/src/makedebugjam.bat +++ b/historic/jam/src/makedebugjam.bat @@ -2,4 +2,4 @@ call c:\tools\msvc6\vc98\bin\vcvars32.bat set VISUALC=c:\tools\msvc6\vc98 set JAM_TOOLSET=VISUALC rm -rf bin.ntx86/jam.exe bin.ntx86/*.obj bin.ntx86/*.lib -nmake -fbuilds/win32-visualc.mk JAMBASE= BOOST_ROOT= BOOST_BUILD_PATH= CFLAGS="/GZ /Zi /MLd -DNT" CCFLAGS="/GZ /Zi /MLd" LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" YACC="bison -t -d -l -v --debug --yacc" YACCFILES="y.tab" %* +nmake -fbuilds/win32-visualc.mk JAMBASE= BOOST_ROOT= BOOST_BUILD_PATH= CFLAGS="/GZ /Zi /MLd -DNT" CCFLAGS="/GZ /Zi /MLd" LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" YACC="byacc" YACCFILES="y.tab" YACCFLAGS=-vd %* diff --git a/historic/jam/src/makedebugjam.sh b/historic/jam/src/makedebugjam.sh index b4dfed0af..187418234 100644 --- a/historic/jam/src/makedebugjam.sh +++ b/historic/jam/src/makedebugjam.sh @@ -3,4 +3,5 @@ export VISUALC=c:\tools\msvc6\vc98 export JAM_TOOLSET=VISUALC rm -rf bin.ntx86 -nmake -fbuilds/win32-visualc.mk CFLAGS="/GZ /Zi /MLd -DNT" CCFLAGS="/GZ /Zi /MLd" YACC="bison -t -d -l -v --debug --yacc" LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" +nmake -fbuilds/win32-visualc.mk CFLAGS="/GZ /Zi /MLd -DNT" +CCFLAGS="/GZ /Zi /MLd" YACC="byacc" YACCFLAGS=-vd LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" diff --git a/jam_src/jamgram.c b/jam_src/jamgram.c index d91f5af03..57818047b 100644 --- a/jam_src/jamgram.c +++ b/jam_src/jamgram.c @@ -1,54 +1,19 @@ - -/* A Bison parser, made from jamgram.y - by GNU Bison version 1.28 */ - -#define YYBISON 1 /* Identify Bison output. */ - -#define _BANG 257 -#define _BANG_EQUALS 258 -#define _AMPERAMPER 259 -#define _LPAREN 260 -#define _RPAREN 261 -#define _PLUS_EQUALS 262 -#define _COLON 263 -#define _SEMIC 264 -#define _LANGLE 265 -#define _LANGLE_EQUALS 266 -#define _EQUALS 267 -#define _RANGLE 268 -#define _RANGLE_EQUALS 269 -#define _QUESTION_EQUALS 270 -#define _LBRACKET 271 -#define _RBRACKET 272 -#define ACTIONS 273 -#define BIND 274 -#define CASE 275 -#define DEFAULT 276 -#define ELSE 277 -#define EXISTING 278 -#define FOR 279 -#define IF 280 -#define IGNORE 281 -#define IN 282 -#define INCLUDE 283 -#define LOCAL 284 -#define MODULE 285 -#define ON 286 -#define PIECEMEAL 287 -#define QUIETLY 288 -#define RETURN 289 -#define RULE 290 -#define SWITCH 291 -#define TOGETHER 292 -#define UPDATED 293 -#define WHILE 294 -#define _LBRACE 295 -#define _BARBAR 296 -#define _RBRACE 297 -#define ARG 298 -#define STRING 299 - - +#ifndef lint +static char const +yyrcsid[] = "$FreeBSD: src/usr.bin/yacc/skeleton.c,v 1.28 2000/01/17 02:04:06 bde Exp $"; +#endif +#include +#define YYBYACC 1 +#define YYMAJOR 1 +#define YYMINOR 9 +#define YYLEX yylex() +#define YYEMPTY -1 +#define yyclearin (yychar=(YYEMPTY)) +#define yyerrok (yyerrflag=0) +#define YYRECOVERING() (yyerrflag!=0) +static int yygrowstack(); +#define YYPREFIX "yy" +#line 94 "jamgram.y" #include "jam.h" #include "lists.h" @@ -83,1133 +48,829 @@ # define pcnode( c,l,r ) parse_make( F0,l,r,P0,S0,S0,c ) # define psnode( s,l ) parse_make( F0,l,P0,P0,s,S0,0 ) -#ifndef YYSTYPE -#define YYSTYPE int -#endif +#line 52 "y.tab.c" +#define YYERRCODE 256 +#define _BANG 257 +#define _BANG_EQUALS 258 +#define _AMPERAMPER 259 +#define _LPAREN 260 +#define _RPAREN 261 +#define _PLUS_EQUALS 262 +#define _COLON 263 +#define _SEMIC 264 +#define _LANGLE 265 +#define _LANGLE_EQUALS 266 +#define _EQUALS 267 +#define _RANGLE 268 +#define _RANGLE_EQUALS 269 +#define _QUESTION_EQUALS 270 +#define _LBRACKET 271 +#define _RBRACKET 272 +#define ACTIONS 273 +#define BIND 274 +#define CASE 275 +#define DEFAULT 276 +#define ELSE 277 +#define EXISTING 278 +#define FOR 279 +#define IF 280 +#define IGNORE 281 +#define IN 282 +#define INCLUDE 283 +#define LOCAL 284 +#define MODULE 285 +#define ON 286 +#define PIECEMEAL 287 +#define QUIETLY 288 +#define RETURN 289 +#define RULE 290 +#define SWITCH 291 +#define TOGETHER 292 +#define UPDATED 293 +#define WHILE 294 +#define _LBRACE 295 +#define _BARBAR 296 +#define _RBRACE 297 +#define ARG 298 +#define STRING 299 +const short yylhs[] = { -1, + 0, 0, 2, 2, 1, 1, 1, 3, 6, 6, + 7, 7, 9, 9, 4, 4, 4, 4, 4, 4, + 4, 4, 4, 4, 4, 4, 4, 4, 16, 17, + 4, 11, 11, 11, 11, 13, 13, 13, 13, 13, + 13, 13, 13, 13, 13, 13, 13, 12, 12, 18, + 8, 8, 5, 19, 19, 10, 10, 14, 14, 20, + 20, 20, 20, 20, 20, 15, 15, +}; +const short yylen[] = { 2, + 0, 1, 1, 1, 1, 2, 5, 0, 2, 1, + 3, 0, 1, 0, 3, 3, 3, 4, 5, 6, + 3, 8, 5, 5, 5, 5, 7, 5, 0, 0, + 9, 1, 1, 1, 2, 1, 3, 3, 3, 3, + 3, 3, 3, 2, 3, 3, 3, 0, 2, 4, + 1, 3, 1, 0, 2, 1, 4, 0, 2, 1, + 1, 1, 1, 1, 1, 0, 2, +}; +const short yydefred[] = { 0, + 0, 58, 0, 0, 54, 0, 0, 54, 54, 0, + 0, 0, 0, 2, 0, 0, 0, 54, 0, 13, + 0, 0, 0, 56, 0, 0, 0, 0, 0, 54, + 0, 0, 0, 0, 4, 0, 3, 0, 0, 6, + 0, 33, 32, 34, 0, 54, 54, 0, 65, 62, + 64, 63, 61, 60, 0, 59, 0, 44, 0, 0, + 0, 0, 0, 0, 0, 54, 0, 0, 0, 16, + 55, 54, 10, 0, 0, 0, 21, 0, 0, 15, + 54, 17, 0, 35, 0, 0, 57, 54, 0, 54, + 47, 38, 39, 40, 37, 41, 42, 43, 45, 0, + 0, 9, 0, 0, 0, 0, 0, 0, 0, 52, + 54, 0, 54, 18, 67, 29, 0, 0, 7, 19, + 25, 0, 23, 49, 26, 0, 28, 0, 0, 0, + 0, 0, 11, 20, 30, 0, 27, 50, 0, 22, + 31, +}; +const short yydgoto[] = { 13, + 35, 36, 37, 15, 38, 74, 112, 39, 16, 17, + 47, 107, 26, 19, 89, 129, 139, 108, 28, 56, +}; +const short yysindex[] = { -120, + -282, 0, -267, -234, 0, 0, -259, 0, 0, -234, + -120, 0, 0, 0, -120, -261, -83, 0, -131, 0, + -236, -234, -234, 0, -69, -250, -181, -244, -188, 0, + -210, -175, -204, -209, 0, -205, 0, -157, -154, 0, + -184, 0, 0, 0, -152, 0, 0, -156, 0, 0, + 0, 0, 0, 0, -153, 0, -158, 0, -185, -244, + -244, -244, -244, -244, -244, 0, -234, -120, -234, 0, + 0, 0, 0, -135, -188, -120, 0, -144, -120, 0, + 0, 0, -128, 0, -150, -124, 0, 0, -149, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, -155, + -118, 0, -120, -110, -139, -143, -125, -144, -114, 0, + 0, -103, 0, 0, 0, 0, -129, -104, 0, 0, + 0, -78, 0, 0, 0, -71, 0, -70, -98, -120, + -103, -120, 0, 0, 0, -95, 0, 0, -93, 0, + 0, +}; +const short yyrindex[] = { 7, + 0, 0, -92, 0, 0, -162, -201, 0, 0, 0, + -275, -163, 0, 0, 3, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -229, 0, 0, -223, -59, 0, + 0, 0, 0, 0, 0, 0, 0, -142, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, -88, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, -275, 0, 0, + 0, 0, 0, 0, -59, -275, 0, -89, -275, 0, + 0, 0, -146, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + -253, 0, 4, 0, 0, 0, 0, -89, 0, 0, + 0, -81, 0, 0, 0, 0, 0, 1, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, -275, + -81, -194, 0, 0, 0, 0, 0, 0, 0, 0, + 0, +}; +const short yygindex[] = { 0, + 75, -48, -27, -43, 5, 135, 0, -13, 208, -4, + 127, 106, 11, 0, 0, 0, 0, 0, 0, 0, +}; +#define YYTABLESIZE 301 +const short yytable[] = { 25, + 24, 73, 5, 8, 48, 25, 1, 46, 67, 27, + 29, 31, 32, 33, 14, 18, 20, 25, 25, 100, + 34, 8, 22, 71, 30, 23, 1, 105, 41, 36, + 109, 36, 58, 59, 75, 53, 1, 53, 53, 53, + 53, 46, 46, 53, 68, 69, 53, 73, 53, 67, + 85, 86, 53, 24, 119, 92, 93, 94, 95, 96, + 97, 57, 25, 24, 25, 36, 36, 110, 127, 54, + 98, 53, 53, 67, 14, 91, 102, 99, 72, 101, + 8, 136, 70, 138, 76, 79, 69, 137, 77, 40, + 78, 80, 115, 54, 117, 14, 54, 126, 56, 54, + 54, 54, 8, 56, 54, 81, 56, 54, 54, 82, + 69, 42, 56, 83, 84, 87, 43, 128, 51, 44, + 88, 51, 56, 90, 12, 45, 12, 13, 103, 51, + 106, 111, 12, 12, 54, 54, 12, 12, 12, 114, + 67, 118, 12, 12, 12, 116, 49, 12, 12, 50, + 1, 12, 2, 120, 122, 51, 52, 121, 3, 4, + 53, 54, 5, 6, 7, 130, 55, 1, 8, 2, + 9, 123, 131, 10, 11, 3, 4, 12, 42, 5, + 20, 7, 125, 43, 132, 8, 44, 9, 60, 133, + 10, 11, 45, 134, 12, 61, 62, 63, 64, 65, + 135, 140, 46, 141, 8, 14, 66, 48, 14, 104, + 21, 113, 66, 124, 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, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 24, 0, 24, 0, 24, 0, 5, 8, 24, + 24, 0, 0, 24, 24, 24, 0, 0, 0, 24, + 24, 24, 14, 14, 24, 24, 14, 24, 24, 5, + 8, +}; +const short yycheck[] = { 4, + 0, 29, 0, 0, 18, 10, 0, 261, 259, 5, + 6, 7, 8, 9, 290, 298, 284, 22, 23, 68, + 10, 297, 257, 28, 284, 260, 271, 76, 290, 259, + 79, 261, 22, 23, 30, 259, 271, 261, 262, 263, + 264, 295, 296, 267, 295, 296, 270, 75, 272, 259, + 46, 47, 276, 298, 103, 60, 61, 62, 63, 64, + 65, 298, 67, 298, 69, 295, 296, 81, 112, 271, + 66, 295, 296, 259, 0, 261, 72, 67, 267, 69, + 275, 130, 264, 132, 295, 295, 296, 131, 264, 15, + 295, 297, 88, 295, 90, 290, 298, 111, 262, 263, + 264, 264, 297, 267, 267, 263, 270, 271, 271, 264, + 296, 262, 276, 298, 267, 272, 267, 113, 261, 270, + 274, 264, 286, 282, 271, 276, 273, 290, 264, 272, + 275, 260, 279, 280, 298, 298, 283, 284, 285, 264, + 259, 297, 289, 290, 291, 295, 278, 294, 295, 281, + 271, 298, 273, 264, 298, 287, 288, 297, 279, 280, + 292, 293, 283, 284, 285, 295, 298, 271, 289, 273, + 291, 297, 277, 294, 295, 279, 280, 298, 262, 283, + 284, 285, 297, 267, 263, 289, 270, 291, 258, 261, + 294, 295, 276, 264, 298, 265, 266, 267, 268, 269, + 299, 297, 286, 297, 264, 298, 295, 297, 290, 75, + 3, 85, 282, 108, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, + -1, 271, -1, 273, -1, 275, -1, 275, 275, 279, + 280, -1, -1, 283, 284, 285, -1, -1, -1, 289, + 290, 291, 290, 290, 294, 295, 290, 297, 298, 297, + 297, +}; +#define YYFINAL 13 #ifndef YYDEBUG -#define YYDEBUG 1 +#define YYDEBUG 0 #endif - -#include - -#ifndef __cplusplus -#ifndef __STDC__ -#define const -#endif -#endif - - - -#define YYFINAL 143 -#define YYFLAG -32768 -#define YYNTBASE 46 - -#define YYTRANSLATE(x) ((unsigned)(x) <= 299 ? yytranslate[x] : 67) - -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, 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, 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, 38, 39, 40, 41, 42, 43, 44, 45 -}; - -#if YYDEBUG != 0 -static const short yyprhs[] = { 0, - 0, 1, 3, 5, 7, 9, 12, 18, 19, 22, - 24, 28, 29, 31, 32, 36, 40, 44, 49, 55, - 62, 66, 75, 81, 87, 93, 99, 107, 113, 114, - 115, 125, 127, 129, 131, 134, 136, 140, 144, 148, - 152, 156, 160, 164, 167, 171, 175, 179, 180, 183, - 188, 190, 194, 196, 197, 200, 202, 207, 208, 211, - 213, 215, 217, 219, 221, 223, 224 -}; - -static const short yyrhs[] = { -1, - 48, 0, 49, 0, 48, 0, 53, 0, 53, 48, - 0, 30, 61, 50, 10, 47, 0, 0, 13, 61, - 0, 49, 0, 6, 60, 7, 0, 0, 30, 0, - 0, 41, 47, 43, 0, 29, 61, 10, 0, 44, - 60, 10, 0, 63, 56, 61, 10, 0, 31, 30, - 61, 50, 10, 0, 63, 32, 61, 56, 61, 10, - 0, 35, 61, 10, 0, 25, 52, 44, 28, 61, - 41, 47, 43, 0, 37, 61, 41, 58, 43, 0, - 26, 57, 41, 47, 43, 0, 31, 61, 41, 47, - 43, 0, 40, 57, 41, 47, 43, 0, 26, 57, - 41, 47, 43, 23, 53, 0, 52, 36, 44, 51, - 53, 0, 0, 0, 19, 64, 44, 66, 41, 54, - 45, 55, 43, 0, 13, 0, 8, 0, 16, 0, - 22, 13, 0, 63, 0, 63, 13, 63, 0, 63, - 4, 63, 0, 63, 11, 63, 0, 63, 12, 63, - 0, 63, 14, 63, 0, 63, 15, 63, 0, 63, - 28, 61, 0, 3, 57, 0, 57, 5, 57, 0, - 57, 42, 57, 0, 6, 57, 7, 0, 0, 59, - 58, 0, 21, 44, 9, 47, 0, 61, 0, 61, - 9, 60, 0, 62, 0, 0, 62, 63, 0, 44, - 0, 17, 44, 60, 18, 0, 0, 64, 65, 0, - 39, 0, 38, 0, 27, 0, 34, 0, 33, 0, - 24, 0, 0, 20, 61, 0 -}; - -#endif - -#if YYDEBUG != 0 -static const short yyrline[] = { 0, - 132, 134, 145, 147, 151, 153, 155, 159, 163, 165, - 169, 171, 175, 177, 181, 183, 185, 187, 189, 191, - 193, 195, 197, 199, 201, 203, 205, 207, 209, 212, - 214, 221, 223, 225, 227, 235, 237, 239, 241, 243, - 245, 247, 249, 251, 253, 255, 257, 267, 269, 273, - 282, 284, 294, 298, 300, 304, 306, 316, 318, 322, - 324, 326, 328, 330, 332, 341, 343 -}; -#endif - - -#if YYDEBUG != 0 || defined (YYERROR_VERBOSE) - -static const char * const yytname[] = { "$","error","$undefined.","_BANG", -"_BANG_EQUALS","_AMPERAMPER","_LPAREN","_RPAREN","_PLUS_EQUALS","_COLON","_SEMIC", -"_LANGLE","_LANGLE_EQUALS","_EQUALS","_RANGLE","_RANGLE_EQUALS","_QUESTION_EQUALS", +#define YYMAXTOKEN 299 +#if YYDEBUG +const char * const yyname[] = { +"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, +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, +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, +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, +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, +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, +0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"_BANG","_BANG_EQUALS", +"_AMPERAMPER","_LPAREN","_RPAREN","_PLUS_EQUALS","_COLON","_SEMIC","_LANGLE", +"_LANGLE_EQUALS","_EQUALS","_RANGLE","_RANGLE_EQUALS","_QUESTION_EQUALS", "_LBRACKET","_RBRACKET","ACTIONS","BIND","CASE","DEFAULT","ELSE","EXISTING", "FOR","IF","IGNORE","IN","INCLUDE","LOCAL","MODULE","ON","PIECEMEAL","QUIETLY", -"RETURN","RULE","SWITCH","TOGETHER","UPDATED","WHILE","_LBRACE","_BARBAR","_RBRACE", -"ARG","STRING","run","block","rules","null","assign_list_opt","arglist_opt", -"local_opt","rule","@1","@2","assign","cond","cases","case","lol","list","listp", -"arg","eflags","eflag","bindlist", NULL +"RETURN","RULE","SWITCH","TOGETHER","UPDATED","WHILE","_LBRACE","_BARBAR", +"_RBRACE","ARG","STRING", +}; +const char * const yyrule[] = { +"$accept : run", +"run :", +"run : rules", +"block : null", +"block : rules", +"rules : rule", +"rules : rule rules", +"rules : LOCAL list assign_list_opt _SEMIC block", +"null :", +"assign_list_opt : _EQUALS list", +"assign_list_opt : null", +"arglist_opt : _LPAREN lol _RPAREN", +"arglist_opt :", +"local_opt : LOCAL", +"local_opt :", +"rule : _LBRACE block _RBRACE", +"rule : INCLUDE list _SEMIC", +"rule : ARG lol _SEMIC", +"rule : arg assign list _SEMIC", +"rule : MODULE LOCAL list assign_list_opt _SEMIC", +"rule : arg ON list assign list _SEMIC", +"rule : RETURN list _SEMIC", +"rule : FOR local_opt ARG IN list _LBRACE block _RBRACE", +"rule : SWITCH list _LBRACE cases _RBRACE", +"rule : IF cond _LBRACE block _RBRACE", +"rule : MODULE list _LBRACE block _RBRACE", +"rule : WHILE cond _LBRACE block _RBRACE", +"rule : IF cond _LBRACE block _RBRACE ELSE rule", +"rule : local_opt RULE ARG arglist_opt rule", +"$$1 :", +"$$2 :", +"rule : ACTIONS eflags ARG bindlist _LBRACE $$1 STRING $$2 _RBRACE", +"assign : _EQUALS", +"assign : _PLUS_EQUALS", +"assign : _QUESTION_EQUALS", +"assign : DEFAULT _EQUALS", +"cond : arg", +"cond : arg _EQUALS arg", +"cond : arg _BANG_EQUALS arg", +"cond : arg _LANGLE arg", +"cond : arg _LANGLE_EQUALS arg", +"cond : arg _RANGLE arg", +"cond : arg _RANGLE_EQUALS arg", +"cond : arg IN list", +"cond : _BANG cond", +"cond : cond _AMPERAMPER cond", +"cond : cond _BARBAR cond", +"cond : _LPAREN cond _RPAREN", +"cases :", +"cases : case cases", +"case : CASE ARG _COLON block", +"lol : list", +"lol : list _COLON lol", +"list : listp", +"listp :", +"listp : listp arg", +"arg : ARG", +"arg : _LBRACKET ARG lol _RBRACKET", +"eflags :", +"eflags : eflags eflag", +"eflag : UPDATED", +"eflag : TOGETHER", +"eflag : IGNORE", +"eflag : QUIETLY", +"eflag : PIECEMEAL", +"eflag : EXISTING", +"bindlist :", +"bindlist : BIND list", }; #endif - -static const short yyr1[] = { 0, - 46, 46, 47, 47, 48, 48, 48, 49, 50, 50, - 51, 51, 52, 52, 53, 53, 53, 53, 53, 53, - 53, 53, 53, 53, 53, 53, 53, 53, 54, 55, - 53, 56, 56, 56, 56, 57, 57, 57, 57, 57, - 57, 57, 57, 57, 57, 57, 57, 58, 58, 59, - 60, 60, 61, 62, 62, 63, 63, 64, 64, 65, - 65, 65, 65, 65, 65, 66, 66 -}; - -static const short yyr2[] = { 0, - 0, 1, 1, 1, 1, 2, 5, 0, 2, 1, - 3, 0, 1, 0, 3, 3, 3, 4, 5, 6, - 3, 8, 5, 5, 5, 5, 7, 5, 0, 0, - 9, 1, 1, 1, 2, 1, 3, 3, 3, 3, - 3, 3, 3, 2, 3, 3, 3, 0, 2, 4, - 1, 3, 1, 0, 2, 1, 4, 0, 2, 1, - 1, 1, 1, 1, 1, 0, 2 -}; - -static const short yydefact[] = { 1, - 0, 58, 14, 0, 54, 54, 54, 54, 54, 0, - 8, 56, 2, 0, 5, 0, 54, 0, 13, 0, - 0, 0, 56, 0, 36, 0, 53, 8, 54, 0, - 0, 0, 0, 0, 4, 3, 0, 51, 0, 6, - 33, 32, 34, 0, 54, 54, 0, 65, 62, 64, - 63, 61, 60, 66, 59, 0, 44, 0, 0, 8, - 0, 0, 0, 0, 0, 0, 0, 54, 16, 55, - 54, 10, 0, 8, 8, 21, 48, 8, 15, 17, - 54, 12, 35, 0, 0, 57, 54, 0, 54, 47, - 45, 0, 46, 38, 39, 40, 37, 41, 42, 43, - 9, 8, 0, 0, 0, 0, 48, 0, 52, 54, - 14, 54, 18, 67, 29, 0, 24, 7, 19, 25, - 0, 23, 49, 26, 0, 28, 0, 0, 8, 14, - 8, 11, 20, 30, 0, 27, 50, 0, 22, 31, - 0, 0, 0 -}; - -static const short yydefgoto[] = { 141, - 34, 35, 36, 73, 111, 14, 15, 128, 138, 46, - 24, 106, 107, 37, 38, 27, 16, 18, 55, 88 -}; - -static const short yypact[] = { 75, - -34,-32768, -16, 6,-32768, -21, -10,-32768,-32768, 6, - 75, 20,-32768, -3, 75, 121,-32768, 127,-32768, -18, - 6, 6,-32768, 11, 135, 25, -6, 23,-32768, -2, - 33, 3, 26, 4,-32768,-32768, 38, 49, 15,-32768, --32768,-32768,-32768, 47,-32768,-32768, 43,-32768,-32768,-32768, --32768,-32768,-32768, 42,-32768, 44,-32768, 14, 6, 75, - 6, -6, -6, -6, -6, -6, -6,-32768,-32768,-32768, --32768,-32768, 61, 23, 75,-32768, 53, 75,-32768,-32768, --32768, 69,-32768, 57, 67,-32768,-32768, 39,-32768,-32768, --32768, 50, 76,-32768,-32768,-32768,-32768,-32768,-32768,-32768, --32768, 75, 85, 54, 52, 56, 53, 59,-32768,-32768, - 101,-32768,-32768,-32768,-32768, 62, 86,-32768,-32768,-32768, - 99,-32768,-32768,-32768, 106,-32768, 104, 72, 75, 101, - 75,-32768,-32768,-32768, 78,-32768,-32768, 79,-32768,-32768, - 123, 124,-32768 -}; - -static const short yypgoto[] = {-32768, - -53, 27, -20, 51,-32768, 125, -98,-32768,-32768, 60, - -4, 28,-32768, -12, -5,-32768, 24,-32768,-32768,-32768 -}; - - -#define YYLAST 171 - - -static const short yytable[] = { 26, - 28, 30, 31, 32, 47, 33, 92, 72, 21, 17, - 1, 22, 126, 19, -13, 59, 57, 58, 59, 29, - 90, 104, 1, 74, 108, 56, 13, 25, -54, -54, - 59, 136, 39, 25, 69, 71, -54, 23, 75, 84, - 85, 40, 76, 77, 25, 25, 79, 80, 118, 23, - 70, 60, 61, 72, 91, 61, 93, 81, 82, 83, - 86, 87, 100, -54, 41, 101, 78, 61, 109, 42, - 102, 89, 43, 105, 110, 135, 113, 137, 44, 115, - 59, 114, 25, 116, 25, 94, 95, 96, 97, 98, - 99, 1, 117, 2, 119, 121, 120, 125, 122, 3, - 4, 124, 129, 5, 6, 7, 127, 131, 130, 8, - -14, 9, 132, 133, 10, 11, 134, 1, 12, 2, - 139, 140, 142, 143, 103, 3, 4, 20, 41, 5, - 19, 7, 0, 42, 123, 8, 43, 9, 62, 0, - 10, 11, 44, 112, 12, 63, 64, 65, 66, 67, - 48, 0, 45, 49, 0, 0, 0, 0, 0, 50, - 51, 0, 68, 0, 52, 53, 0, 0, 0, 0, - 54 -}; - -static const short yycheck[] = { 5, - 6, 7, 8, 9, 17, 10, 60, 28, 3, 44, - 17, 6, 111, 30, 36, 5, 21, 22, 5, 30, - 7, 75, 17, 29, 78, 44, 0, 4, 9, 10, - 5, 130, 36, 10, 10, 13, 17, 44, 41, 45, - 46, 15, 10, 41, 21, 22, 43, 10, 102, 44, - 27, 41, 42, 74, 59, 42, 61, 9, 44, 13, - 18, 20, 68, 44, 8, 71, 41, 42, 81, 13, - 10, 28, 16, 21, 6, 129, 10, 131, 22, 41, - 5, 87, 59, 89, 61, 62, 63, 64, 65, 66, - 67, 17, 43, 19, 10, 44, 43, 110, 43, 25, - 26, 43, 41, 29, 30, 31, 112, 9, 23, 35, - 36, 37, 7, 10, 40, 41, 45, 17, 44, 19, - 43, 43, 0, 0, 74, 25, 26, 3, 8, 29, - 30, 31, -1, 13, 107, 35, 16, 37, 4, -1, - 40, 41, 22, 84, 44, 11, 12, 13, 14, 15, - 24, -1, 32, 27, -1, -1, -1, -1, -1, 33, - 34, -1, 28, -1, 38, 39, -1, -1, -1, -1, - 44 -}; -/* -*-C-*- Note some compilers choke on comments on `#line' lines. */ - - -/* Skeleton output parser for bison, - Copyright (C) 1984, 1989, 1990 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 - the Free Software Foundation; either version 2, or (at your option) - any later version. - - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. - - You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ - -/* As a special exception, when this file is copied by Bison into a - Bison output file, you may use that output file without restriction. - This special exception was added by the Free Software Foundation - in version 1.24 of Bison. */ - -#ifndef alloca -#ifdef __GNUC__ -#define alloca __builtin_alloca -#else /* not GNU C. */ -#if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) -#include -#else /* not sparc */ -#if defined (MSDOS) && !defined (__TURBOC__) -#include -#else /* not MSDOS, or __TURBOC__ */ -#if defined(_AIX) -#include - #pragma alloca -#else /* not MSDOS, __TURBOC__, or _AIX */ -#ifdef __hpux -#ifdef __cplusplus -extern "C" { -void *alloca (unsigned int); -}; -#else /* not __cplusplus */ -void *alloca (); -#endif /* not __cplusplus */ -#endif /* __hpux */ -#endif /* not _AIX */ -#endif /* not MSDOS, or __TURBOC__ */ -#endif /* not sparc. */ -#endif /* not GNU C. */ -#endif /* alloca not defined. */ - -/* This is the parser code that is written into each bison parser - when the %semantic_parser declaration is not specified in the grammar. - It was written by Richard Stallman by simplifying the hairy parser - used when %semantic_parser is specified. */ - -/* Note: there must be only one dollar sign in this file. - It is replaced by the list of actions, each action - as one case of the switch. */ - -#define yyerrok (yyerrstatus = 0) -#define yyclearin (yychar = YYEMPTY) -#define YYEMPTY -2 -#define YYEOF 0 -#define YYACCEPT return(0) -#define YYABORT return(1) -#define YYERROR goto yyerrlab1 -/* Like YYERROR except do call yyerror. - This remains here temporarily to ease the - transition to the new meaning of YYERROR, for GCC. - Once GCC version 2 has supplanted version 1, this can go. */ -#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 YYPURE -#define YYLEX yylex() +#ifndef YYSTYPE +typedef int YYSTYPE; #endif - -#ifdef YYPURE -#ifdef YYLSP_NEEDED -#ifdef YYLEX_PARAM -#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM) -#else -#define YYLEX yylex(&yylval, &yylloc) +#if YYDEBUG +#include #endif -#else /* not YYLSP_NEEDED */ -#ifdef YYLEX_PARAM -#define YYLEX yylex(&yylval, YYLEX_PARAM) -#else -#define YYLEX yylex(&yylval) -#endif -#endif /* not YYLSP_NEEDED */ -#endif - -/* If nonreentrant, generate the variables here */ - -#ifndef YYPURE - -int yychar; /* the lookahead symbol */ -YYSTYPE yylval; /* the semantic value of the */ - /* lookahead symbol */ - -#ifdef YYLSP_NEEDED -YYLTYPE yylloc; /* location data for the lookahead */ - /* symbol */ -#endif - -int yynerrs; /* number of parse errors so far */ -#endif /* not YYPURE */ - -#if YYDEBUG != 0 -int yydebug; /* nonzero means print parse trace */ -/* Since this is uninitialized, it does not stop multiple parsers - from coexisting. */ -#endif - -/* YYINITDEPTH indicates the initial size of the parser's stacks */ - -#ifndef YYINITDEPTH -#define YYINITDEPTH 200 -#endif - -/* YYMAXDEPTH is the maximum size the stacks can grow to - (effective only if the built-in stack extension method is used). */ - -#if YYMAXDEPTH == 0 +#ifdef YYSTACKSIZE #undef YYMAXDEPTH -#endif - -#ifndef YYMAXDEPTH +#define YYMAXDEPTH YYSTACKSIZE +#else +#ifdef YYMAXDEPTH +#define YYSTACKSIZE YYMAXDEPTH +#else +#define YYSTACKSIZE 10000 #define YYMAXDEPTH 10000 #endif - -/* Prevent warning if -Wstrict-prototypes. */ -#ifdef __GNUC__ -int yyparse (void); #endif - -#if __GNUC__ > 1 /* GNU C and GNU C++ define this. */ -#define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT) -#else /* not GNU C or C++ */ -#ifndef __cplusplus - -/* This is the most reliable way to avoid incompatibilities - in available built-in functions on various systems. */ -static void -__yy_memcpy (to, from, count) - char *to; - char *from; - int count; +#define YYINITSTACKSIZE 200 +int yydebug; +int yynerrs; +int yyerrflag; +int yychar; +short *yyssp; +YYSTYPE *yyvsp; +YYSTYPE yyval; +YYSTYPE yylval; +short *yyss; +short *yysslim; +YYSTYPE *yyvs; +int yystacksize; +/* allocate initial stack or double stack size, up to YYMAXDEPTH */ +static int yygrowstack() { - register char *f = from; - register char *t = to; - register int i = count; + int newsize, i; + short *newss; + YYSTYPE *newvs; - while (i-- > 0) - *t++ = *f++; + if ((newsize = yystacksize) == 0) + newsize = YYINITSTACKSIZE; + else if (newsize >= YYMAXDEPTH) + return -1; + else if ((newsize *= 2) > YYMAXDEPTH) + newsize = YYMAXDEPTH; + i = yyssp - yyss; + newss = yyss ? (short *)realloc(yyss, newsize * sizeof *newss) : + (short *)malloc(newsize * sizeof *newss); + if (newss == NULL) + return -1; + yyss = newss; + yyssp = newss + i; + newvs = yyvs ? (YYSTYPE *)realloc(yyvs, newsize * sizeof *newvs) : + (YYSTYPE *)malloc(newsize * sizeof *newvs); + if (newvs == NULL) + return -1; + yyvs = newvs; + yyvsp = newvs + i; + yystacksize = newsize; + yysslim = yyss + newsize - 1; + return 0; } -#else /* __cplusplus */ +#define YYABORT goto yyabort +#define YYREJECT goto yyabort +#define YYACCEPT goto yyaccept +#define YYERROR goto yyerrlab -/* This is the most reliable way to avoid incompatibilities - in available built-in functions on various systems. */ -static void -__yy_memcpy (char *to, char *from, int count) -{ - register char *f = from; - register char *t = to; - register int i = count; - - while (i-- > 0) - *t++ = *f++; -} - -#endif -#endif - - - -/* The user can define YYPARSE_PARAM as the name of an argument to be passed - into yyparse. The argument should have type void *. - It should actually point to an object. - Grammar actions can access the variable by casting it - to the proper pointer type. */ - -#ifdef YYPARSE_PARAM -#ifdef __cplusplus -#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM +#ifndef YYPARSE_PARAM +#if defined(__cplusplus) || __STDC__ +#define YYPARSE_PARAM_ARG void #define YYPARSE_PARAM_DECL -#else /* not __cplusplus */ -#define YYPARSE_PARAM_ARG YYPARSE_PARAM -#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM; -#endif /* not __cplusplus */ -#else /* not YYPARSE_PARAM */ +#else /* ! ANSI-C/C++ */ #define YYPARSE_PARAM_ARG #define YYPARSE_PARAM_DECL -#endif /* not YYPARSE_PARAM */ +#endif /* ANSI-C/C++ */ +#else /* YYPARSE_PARAM */ +#ifndef YYPARSE_PARAM_TYPE +#define YYPARSE_PARAM_TYPE void * +#endif +#if defined(__cplusplus) || __STDC__ +#define YYPARSE_PARAM_ARG YYPARSE_PARAM_TYPE YYPARSE_PARAM +#define YYPARSE_PARAM_DECL +#else /* ! ANSI-C/C++ */ +#define YYPARSE_PARAM_ARG YYPARSE_PARAM +#define YYPARSE_PARAM_DECL YYPARSE_PARAM_TYPE YYPARSE_PARAM; +#endif /* ANSI-C/C++ */ +#endif /* ! YYPARSE_PARAM */ int -yyparse(YYPARSE_PARAM_ARG) - YYPARSE_PARAM_DECL +yyparse (YYPARSE_PARAM_ARG) + YYPARSE_PARAM_DECL { - register int yystate; - register int yyn; - register short *yyssp; - register YYSTYPE *yyvsp; - int yyerrstatus; /* number of tokens to shift before error messages enabled */ - int yychar1 = 0; /* lookahead token as an internal (translated) token number */ + register int yym, yyn, yystate; +#if YYDEBUG + register const char *yys; - short yyssa[YYINITDEPTH]; /* the state stack */ - YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */ - - short *yyss = yyssa; /* refer to the stacks thru separate pointers */ - YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */ - -#ifdef YYLSP_NEEDED - YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ - YYLTYPE *yyls = yylsa; - YYLTYPE *yylsp; - -#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--) -#else -#define YYPOPSTACK (yyvsp--, yyssp--) -#endif - - int yystacksize = YYINITDEPTH; - -#ifdef YYPURE - int yychar; - YYSTYPE yylval; - int yynerrs; -#ifdef YYLSP_NEEDED - YYLTYPE yylloc; -#endif -#endif - - YYSTYPE yyval; /* the variable used to return */ - /* semantic values from the action */ - /* routines */ - - int yylen; - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Starting parse\n"); -#endif - - yystate = 0; - yyerrstatus = 0; - yynerrs = 0; - yychar = YYEMPTY; /* Cause a token to be read. */ - - /* Initialize stack pointers. - Waste one element of value and location stack - so that they stay on the same level as the state stack. - The wasted elements are never initialized. */ - - yyssp = yyss; - yyvsp = yyvs; -#ifdef YYLSP_NEEDED - yylsp = yyls; -#endif - -/* Push a new state, which is found in yystate . */ -/* In all cases, when you get here, the value and location stacks - have just been pushed. so pushing a state here evens the stacks. */ -yynewstate: - - *yyssp++ = yystate; - - if (yyssp >= yyss + yystacksize) + if ((yys = getenv("YYDEBUG"))) { - /* Give user a chance to reallocate the stack */ - /* Use copies of these so that the &'s don't force the real ones into memory. */ - YYSTYPE *yyvs1 = yyvs; - short *yyss1 = yyss; -#ifdef YYLSP_NEEDED - YYLTYPE *yyls1 = yyls; -#endif - - /* Get the current used size of the three stacks, in elements. */ - int size = yyssp - yyss; - -#ifdef yyoverflow - /* Each stack pointer address is followed by the size of - the data in use in that stack, in bytes. */ -#ifdef YYLSP_NEEDED - /* This used to be a conditional around just the two extra args, - but that might be undefined if yyoverflow is a macro. */ - yyoverflow("parser stack overflow", - &yyss1, size * sizeof (*yyssp), - &yyvs1, size * sizeof (*yyvsp), - &yyls1, size * sizeof (*yylsp), - &yystacksize); -#else - yyoverflow("parser stack overflow", - &yyss1, size * sizeof (*yyssp), - &yyvs1, size * sizeof (*yyvsp), - &yystacksize); -#endif - - yyss = yyss1; yyvs = yyvs1; -#ifdef YYLSP_NEEDED - yyls = yyls1; -#endif -#else /* no yyoverflow */ - /* Extend the stack our own way. */ - if (yystacksize >= YYMAXDEPTH) - { - yyerror("parser stack overflow"); - return 2; - } - yystacksize *= 2; - if (yystacksize > YYMAXDEPTH) - yystacksize = YYMAXDEPTH; - yyss = (short *) alloca (yystacksize * sizeof (*yyssp)); - __yy_memcpy ((char *)yyss, (char *)yyss1, size * sizeof (*yyssp)); - yyvs = (YYSTYPE *) alloca (yystacksize * sizeof (*yyvsp)); - __yy_memcpy ((char *)yyvs, (char *)yyvs1, size * sizeof (*yyvsp)); -#ifdef YYLSP_NEEDED - yyls = (YYLTYPE *) alloca (yystacksize * sizeof (*yylsp)); - __yy_memcpy ((char *)yyls, (char *)yyls1, size * sizeof (*yylsp)); -#endif -#endif /* no yyoverflow */ - - yyssp = yyss + size; - yyvsp = yyvs + size - 1; -#ifdef YYLSP_NEEDED - yylsp = yyls + size - 1; -#endif - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Stack size increased to %d\n", yystacksize); -#endif - - if (yyssp >= yyss + yystacksize) - YYABORT; + yyn = *yys; + if (yyn >= '0' && yyn <= '9') + yydebug = yyn - '0'; } - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Entering state %d\n", yystate); #endif - goto yybackup; - yybackup: + yynerrs = 0; + yyerrflag = 0; + yychar = (-1); -/* Do appropriate processing given the current state. */ -/* Read a lookahead token if we need one and don't already have one. */ -/* yyresume: */ + if (yyss == NULL && yygrowstack()) goto yyoverflow; + yyssp = yyss; + yyvsp = yyvs; + *yyssp = yystate = 0; - /* First try to decide what to do without reference to lookahead token. */ - - yyn = yypact[yystate]; - if (yyn == YYFLAG) - goto yydefault; - - /* Not known => get a lookahead token if don't already have one. */ - - /* yychar is either YYEMPTY or YYEOF - or a valid token in external form. */ - - if (yychar == YYEMPTY) +yyloop: + if ((yyn = yydefred[yystate])) goto yyreduce; + if (yychar < 0) { -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Reading a token: "); -#endif - yychar = YYLEX; - } - - /* Convert token to internal form (in yychar1) for indexing tables with */ - - if (yychar <= 0) /* This means end of input. */ - { - yychar1 = 0; - yychar = YYEOF; /* Don't call YYLEX any more */ - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Now at end of input.\n"); + if ((yychar = yylex()) < 0) yychar = 0; +#if YYDEBUG + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + printf("%sdebug: state %d, reading %d (%s)\n", + YYPREFIX, yystate, yychar, yys); + } #endif } - else + if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yychar) { - yychar1 = YYTRANSLATE(yychar); - -#if YYDEBUG != 0 - if (yydebug) - { - fprintf (stderr, "Next token is %d (%s", yychar, yytname[yychar1]); - /* Give the individual parser a way to print the precise meaning - of a token, for further debugging info. */ -#ifdef YYPRINT - YYPRINT (stderr, yychar, yylval); -#endif - fprintf (stderr, ")\n"); - } +#if YYDEBUG + if (yydebug) + printf("%sdebug: state %d, shifting to state %d\n", + YYPREFIX, yystate, yytable[yyn]); #endif + if (yyssp >= yysslim && yygrowstack()) + { + goto yyoverflow; + } + *++yyssp = yystate = yytable[yyn]; + *++yyvsp = yylval; + yychar = (-1); + if (yyerrflag > 0) --yyerrflag; + goto yyloop; } - - yyn += yychar1; - if (yyn < 0 || yyn > YYLAST || yycheck[yyn] != yychar1) - goto yydefault; - - yyn = yytable[yyn]; - - /* yyn is what to do for this token type in this state. - Negative => reduce, -yyn is rule number. - Positive => shift, yyn is new state. - New state is final state => don't bother to shift, - just return success. - 0, or most negative number => error. */ - - if (yyn < 0) + if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yychar) { - if (yyn == YYFLAG) - goto yyerrlab; - yyn = -yyn; - goto yyreduce; + yyn = yytable[yyn]; + goto yyreduce; } - else if (yyn == 0) + if (yyerrflag) goto yyinrecovery; +#if defined(lint) || defined(__GNUC__) + goto yynewerror; +#endif +yynewerror: + yyerror("syntax error"); +#if defined(lint) || defined(__GNUC__) goto yyerrlab; - - if (yyn == YYFINAL) - YYACCEPT; - - /* Shift the lookahead token. */ - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Shifting token %d (%s), ", yychar, yytname[yychar1]); #endif - - /* Discard the token being shifted unless it is eof. */ - if (yychar != YYEOF) - yychar = YYEMPTY; - - *++yyvsp = yylval; -#ifdef YYLSP_NEEDED - *++yylsp = yylloc; +yyerrlab: + ++yynerrs; +yyinrecovery: + if (yyerrflag < 3) + { + yyerrflag = 3; + for (;;) + { + if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE) + { +#if YYDEBUG + if (yydebug) + printf("%sdebug: state %d, error recovery shifting\ + to state %d\n", YYPREFIX, *yyssp, yytable[yyn]); #endif - - /* count tokens shifted since error; after three, turn off error status. */ - if (yyerrstatus) yyerrstatus--; - - yystate = yyn; - goto yynewstate; - -/* Do the default action for the current state. */ -yydefault: - - yyn = yydefact[yystate]; - if (yyn == 0) - goto yyerrlab; - -/* Do a reduction. yyn is the number of a rule to reduce with. */ + if (yyssp >= yysslim && yygrowstack()) + { + goto yyoverflow; + } + *++yyssp = yystate = yytable[yyn]; + *++yyvsp = yylval; + goto yyloop; + } + else + { +#if YYDEBUG + if (yydebug) + printf("%sdebug: error recovery discarding state %d\n", + YYPREFIX, *yyssp); +#endif + if (yyssp <= yyss) goto yyabort; + --yyssp; + --yyvsp; + } + } + } + else + { + if (yychar == 0) goto yyabort; +#if YYDEBUG + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + printf("%sdebug: state %d, error recovery discards token %d (%s)\n", + YYPREFIX, yystate, yychar, yys); + } +#endif + yychar = (-1); + goto yyloop; + } yyreduce: - yylen = yyr2[yyn]; - if (yylen > 0) - yyval = yyvsp[1-yylen]; /* implement default value of the action */ - -#if YYDEBUG != 0 - if (yydebug) - { - int i; - - fprintf (stderr, "Reducing via rule %d (line %d), ", - yyn, yyrline[yyn]); - - /* Print the symbols being reduced, and their result. */ - for (i = yyprhs[yyn]; yyrhs[i] > 0; i++) - fprintf (stderr, "%s ", yytname[yyrhs[i]]); - fprintf (stderr, " -> %s\n", yytname[yyr1[yyn]]); - } +#if YYDEBUG + if (yydebug) + printf("%sdebug: state %d, reducing by rule %d (%s)\n", + YYPREFIX, yystate, yyn, yyrule[yyn]); #endif - - - switch (yyn) { - + yym = yylen[yyn]; + yyval = yyvsp[1-yym]; + switch (yyn) + { case 2: -{ parse_save( yyvsp[0].parse ); ; - break;} +#line 135 "jamgram.y" +{ parse_save( yyvsp[0].parse ); } +break; case 3: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 146 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; case 4: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 148 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; case 5: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 152 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; case 6: -{ yyval.parse = prules( yyvsp[-1].parse, yyvsp[0].parse ); ; - break;} +#line 154 "jamgram.y" +{ yyval.parse = prules( yyvsp[-1].parse, yyvsp[0].parse ); } +break; case 7: -{ yyval.parse = plocal( yyvsp[-3].parse, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 156 "jamgram.y" +{ yyval.parse = plocal( yyvsp[-3].parse, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 8: -{ yyval.parse = pnull(); ; - break;} +#line 160 "jamgram.y" +{ yyval.parse = pnull(); } +break; case 9: -{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_SET; ; - break;} +#line 164 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_SET; } +break; case 10: -{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_APPEND; ; - break;} +#line 166 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; yyval.number = ASSIGN_APPEND; } +break; case 11: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 170 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 12: -{ yyval.parse = P0; ; - break;} +#line 172 "jamgram.y" +{ yyval.parse = P0; } +break; case 13: -{ yyval.number = 1; ; - break;} +#line 176 "jamgram.y" +{ yyval.number = 1; } +break; case 14: -{ yyval.number = 0; ; - break;} +#line 178 "jamgram.y" +{ yyval.number = 0; } +break; case 15: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 182 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 16: -{ yyval.parse = pincl( yyvsp[-1].parse ); ; - break;} +#line 184 "jamgram.y" +{ yyval.parse = pincl( yyvsp[-1].parse ); } +break; case 17: -{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); ; - break;} +#line 186 "jamgram.y" +{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); } +break; case 18: -{ yyval.parse = pset( yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); ; - break;} +#line 188 "jamgram.y" +{ yyval.parse = pset( yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); } +break; case 19: -{ yyval.parse = psetmodule( yyvsp[-2].parse, yyvsp[-1].parse, yyvsp[-1].number ); ; - break;} +#line 190 "jamgram.y" +{ yyval.parse = psetmodule( yyvsp[-2].parse, yyvsp[-1].parse, yyvsp[-1].number ); } +break; case 20: -{ yyval.parse = pset1( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); ; - break;} +#line 192 "jamgram.y" +{ yyval.parse = pset1( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-2].number ); } +break; case 21: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 194 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 22: -{ yyval.parse = pfor( yyvsp[-5].string, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-6].number ); ; - break;} +#line 196 "jamgram.y" +{ yyval.parse = pfor( yyvsp[-5].string, yyvsp[-3].parse, yyvsp[-1].parse, yyvsp[-6].number ); } +break; case 23: -{ yyval.parse = pswitch( yyvsp[-3].parse, yyvsp[-1].parse ); ; - break;} +#line 198 "jamgram.y" +{ yyval.parse = pswitch( yyvsp[-3].parse, yyvsp[-1].parse ); } +break; case 24: -{ yyval.parse = pif( yyvsp[-3].parse, yyvsp[-1].parse, pnull() ); ; - break;} +#line 200 "jamgram.y" +{ yyval.parse = pif( yyvsp[-3].parse, yyvsp[-1].parse, pnull() ); } +break; case 25: -{ yyval.parse = pmodule( yyvsp[-3].parse, yyvsp[-1].parse ); ; - break;} +#line 202 "jamgram.y" +{ yyval.parse = pmodule( yyvsp[-3].parse, yyvsp[-1].parse ); } +break; case 26: -{ yyval.parse = pwhile( yyvsp[-3].parse, yyvsp[-1].parse ); ; - break;} +#line 204 "jamgram.y" +{ yyval.parse = pwhile( yyvsp[-3].parse, yyvsp[-1].parse ); } +break; case 27: -{ yyval.parse = pif( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[0].parse ); ; - break;} +#line 206 "jamgram.y" +{ yyval.parse = pif( yyvsp[-5].parse, yyvsp[-3].parse, yyvsp[0].parse ); } +break; case 28: -{ yyval.parse = psetc( yyvsp[-2].string, yyvsp[0].parse, yyvsp[-1].parse, yyvsp[-4].number ); ; - break;} +#line 208 "jamgram.y" +{ yyval.parse = psetc( yyvsp[-2].string, yyvsp[0].parse, yyvsp[-1].parse, yyvsp[-4].number ); } +break; case 29: -{ yymode( SCAN_STRING ); ; - break;} +#line 210 "jamgram.y" +{ yymode( SCAN_STRING ); } +break; case 30: -{ yymode( SCAN_NORMAL ); ; - break;} +#line 212 "jamgram.y" +{ yymode( SCAN_NORMAL ); } +break; case 31: -{ yyval.parse = psete( yyvsp[-6].string,yyvsp[-5].parse,yyvsp[-2].string,yyvsp[-7].number ); ; - break;} +#line 214 "jamgram.y" +{ yyval.parse = psete( yyvsp[-6].string,yyvsp[-5].parse,yyvsp[-2].string,yyvsp[-7].number ); } +break; case 32: -{ yyval.number = ASSIGN_SET; ; - break;} +#line 222 "jamgram.y" +{ yyval.number = ASSIGN_SET; } +break; case 33: -{ yyval.number = ASSIGN_APPEND; ; - break;} +#line 224 "jamgram.y" +{ yyval.number = ASSIGN_APPEND; } +break; case 34: -{ yyval.number = ASSIGN_DEFAULT; ; - break;} +#line 226 "jamgram.y" +{ yyval.number = ASSIGN_DEFAULT; } +break; case 35: -{ yyval.number = ASSIGN_DEFAULT; ; - break;} +#line 228 "jamgram.y" +{ yyval.number = ASSIGN_DEFAULT; } +break; case 36: -{ yyval.parse = pcnode( COND_EXISTS, yyvsp[0].parse, pnull() ); ; - break;} +#line 236 "jamgram.y" +{ yyval.parse = pcnode( COND_EXISTS, yyvsp[0].parse, pnull() ); } +break; case 37: -{ yyval.parse = pcnode( COND_EQUALS, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 238 "jamgram.y" +{ yyval.parse = pcnode( COND_EQUALS, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 38: -{ yyval.parse = pcnode( COND_NOTEQ, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 240 "jamgram.y" +{ yyval.parse = pcnode( COND_NOTEQ, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 39: -{ yyval.parse = pcnode( COND_LESS, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 242 "jamgram.y" +{ yyval.parse = pcnode( COND_LESS, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 40: -{ yyval.parse = pcnode( COND_LESSEQ, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 244 "jamgram.y" +{ yyval.parse = pcnode( COND_LESSEQ, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 41: -{ yyval.parse = pcnode( COND_MORE, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 246 "jamgram.y" +{ yyval.parse = pcnode( COND_MORE, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 42: -{ yyval.parse = pcnode( COND_MOREEQ, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 248 "jamgram.y" +{ yyval.parse = pcnode( COND_MOREEQ, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 43: -{ yyval.parse = pcnode( COND_IN, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 250 "jamgram.y" +{ yyval.parse = pcnode( COND_IN, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 44: -{ yyval.parse = pcnode( COND_NOT, yyvsp[0].parse, P0 ); ; - break;} +#line 252 "jamgram.y" +{ yyval.parse = pcnode( COND_NOT, yyvsp[0].parse, P0 ); } +break; case 45: -{ yyval.parse = pcnode( COND_AND, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 254 "jamgram.y" +{ yyval.parse = pcnode( COND_AND, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 46: -{ yyval.parse = pcnode( COND_OR, yyvsp[-2].parse, yyvsp[0].parse ); ; - break;} +#line 256 "jamgram.y" +{ yyval.parse = pcnode( COND_OR, yyvsp[-2].parse, yyvsp[0].parse ); } +break; case 47: -{ yyval.parse = yyvsp[-1].parse; ; - break;} +#line 258 "jamgram.y" +{ yyval.parse = yyvsp[-1].parse; } +break; case 48: -{ yyval.parse = P0; ; - break;} +#line 268 "jamgram.y" +{ yyval.parse = P0; } +break; case 49: -{ yyval.parse = pnode( yyvsp[-1].parse, yyvsp[0].parse ); ; - break;} +#line 270 "jamgram.y" +{ yyval.parse = pnode( yyvsp[-1].parse, yyvsp[0].parse ); } +break; case 50: -{ yyval.parse = psnode( yyvsp[-2].string, yyvsp[0].parse ); ; - break;} +#line 274 "jamgram.y" +{ yyval.parse = psnode( yyvsp[-2].string, yyvsp[0].parse ); } +break; case 51: -{ yyval.parse = pnode( P0, yyvsp[0].parse ); ; - break;} +#line 283 "jamgram.y" +{ yyval.parse = pnode( P0, yyvsp[0].parse ); } +break; case 52: -{ yyval.parse = pnode( yyvsp[0].parse, yyvsp[-2].parse ); ; - break;} +#line 285 "jamgram.y" +{ yyval.parse = pnode( yyvsp[0].parse, yyvsp[-2].parse ); } +break; case 53: -{ yyval.parse = yyvsp[0].parse; yymode( SCAN_NORMAL ); ; - break;} +#line 295 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; yymode( SCAN_NORMAL ); } +break; case 54: -{ yyval.parse = pnull(); yymode( SCAN_PUNCT ); ; - break;} +#line 299 "jamgram.y" +{ yyval.parse = pnull(); yymode( SCAN_PUNCT ); } +break; case 55: -{ yyval.parse = pappend( yyvsp[-1].parse, yyvsp[0].parse ); ; - break;} +#line 301 "jamgram.y" +{ yyval.parse = pappend( yyvsp[-1].parse, yyvsp[0].parse ); } +break; case 56: -{ yyval.parse = plist( yyvsp[0].string ); ; - break;} +#line 305 "jamgram.y" +{ yyval.parse = plist( yyvsp[0].string ); } +break; case 57: -{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); ; - break;} +#line 307 "jamgram.y" +{ yyval.parse = prule( yyvsp[-2].string, yyvsp[-1].parse ); } +break; case 58: -{ yyval.number = 0; ; - break;} +#line 317 "jamgram.y" +{ yyval.number = 0; } +break; case 59: -{ yyval.number = yyvsp[-1].number | yyvsp[0].number; ; - break;} +#line 319 "jamgram.y" +{ yyval.number = yyvsp[-1].number | yyvsp[0].number; } +break; case 60: -{ yyval.number = EXEC_UPDATED; ; - break;} +#line 323 "jamgram.y" +{ yyval.number = EXEC_UPDATED; } +break; case 61: -{ yyval.number = EXEC_TOGETHER; ; - break;} +#line 325 "jamgram.y" +{ yyval.number = EXEC_TOGETHER; } +break; case 62: -{ yyval.number = EXEC_IGNORE; ; - break;} +#line 327 "jamgram.y" +{ yyval.number = EXEC_IGNORE; } +break; case 63: -{ yyval.number = EXEC_QUIETLY; ; - break;} +#line 329 "jamgram.y" +{ yyval.number = EXEC_QUIETLY; } +break; case 64: -{ yyval.number = EXEC_PIECEMEAL; ; - break;} +#line 331 "jamgram.y" +{ yyval.number = EXEC_PIECEMEAL; } +break; case 65: -{ yyval.number = EXEC_EXISTING; ; - break;} +#line 333 "jamgram.y" +{ yyval.number = EXEC_EXISTING; } +break; case 66: -{ yyval.parse = pnull(); ; - break;} +#line 342 "jamgram.y" +{ yyval.parse = pnull(); } +break; case 67: -{ yyval.parse = yyvsp[0].parse; ; - break;} +#line 344 "jamgram.y" +{ yyval.parse = yyvsp[0].parse; } +break; +#line 821 "y.tab.c" + } + yyssp -= yym; + yystate = *yyssp; + yyvsp -= 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; + *++yyssp = YYFINAL; + *++yyvsp = yyval; + if (yychar < 0) + { + if ((yychar = yylex()) < 0) yychar = 0; +#if YYDEBUG + if (yydebug) + { + yys = 0; + if (yychar <= YYMAXTOKEN) yys = yyname[yychar]; + if (!yys) yys = "illegal-symbol"; + printf("%sdebug: state %d, reading %d (%s)\n", + YYPREFIX, YYFINAL, yychar, yys); + } +#endif + } + if (yychar == 0) goto yyaccept; + goto yyloop; + } + if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 && + yyn <= YYTABLESIZE && yycheck[yyn] == yystate) + yystate = yytable[yyn]; + else + yystate = yydgoto[yym]; +#if YYDEBUG + if (yydebug) + printf("%sdebug: after reduction, shifting from state %d \ +to state %d\n", YYPREFIX, *yyssp, yystate); +#endif + if (yyssp >= yysslim && yygrowstack()) + { + goto yyoverflow; + } + *++yyssp = yystate; + *++yyvsp = yyval; + goto yyloop; +yyoverflow: + yyerror("yacc stack overflow"); +yyabort: + return (1); +yyaccept: + return (0); } - /* the action file gets copied in in place of this dollarsign */ - - - yyvsp -= yylen; - yyssp -= yylen; -#ifdef YYLSP_NEEDED - yylsp -= yylen; -#endif - -#if YYDEBUG != 0 - if (yydebug) - { - short *ssp1 = yyss; - fprintf (stderr, "state stack now"); - while (ssp1 != yyssp) - fprintf (stderr, " %d", *ssp1++); - fprintf (stderr, "\n"); - } -#endif - - *++yyvsp = yyval; - -#ifdef YYLSP_NEEDED - yylsp++; - if (yylen == 0) - { - yylsp->first_line = yylloc.first_line; - yylsp->first_column = yylloc.first_column; - yylsp->last_line = (yylsp-1)->last_line; - yylsp->last_column = (yylsp-1)->last_column; - yylsp->text = 0; - } - else - { - yylsp->last_line = (yylsp+yylen-1)->last_line; - yylsp->last_column = (yylsp+yylen-1)->last_column; - } -#endif - - /* Now "shift" the result of the reduction. - Determine what state that goes to, - based on the state we popped back to - and the rule number reduced by. */ - - yyn = yyr1[yyn]; - - yystate = yypgoto[yyn - YYNTBASE] + *(yyssp - 1); - if (yystate >= 0 && yystate <= YYLAST && yycheck[yystate] == *(yyssp - 1)) - yystate = yytable[yystate]; - else - yystate = yydefgoto[yyn - YYNTBASE]; - - goto yynewstate; - -yyerrlab: /* here on detecting error */ - - if (! yyerrstatus) - /* If not already recovering from an error, report this error. */ - { - ++yynerrs; - -#ifdef YYERROR_VERBOSE - yyn = yypact[yystate]; - - if (yyn > YYFLAG && yyn < YYLAST) - { - int size = 0; - char *msg; - int x, count; - - count = 0; - /* Start X at -yyn if nec to avoid negative indexes in yycheck. */ - for (x = (yyn < 0 ? -yyn : 0); - x < (sizeof(yytname) / sizeof(char *)); x++) - if (yycheck[x + yyn] == x) - size += strlen(yytname[x]) + 15, count++; - msg = (char *) malloc(size + 15); - if (msg != 0) - { - strcpy(msg, "parse error"); - - if (count < 5) - { - count = 0; - for (x = (yyn < 0 ? -yyn : 0); - x < (sizeof(yytname) / sizeof(char *)); x++) - if (yycheck[x + yyn] == x) - { - strcat(msg, count == 0 ? ", expecting `" : " or `"); - strcat(msg, yytname[x]); - strcat(msg, "'"); - count++; - } - } - yyerror(msg); - free(msg); - } - else - yyerror ("parse error; also virtual memory exceeded"); - } - else -#endif /* YYERROR_VERBOSE */ - yyerror("parse error"); - } - - goto yyerrlab1; -yyerrlab1: /* here on error raised explicitly by an action */ - - if (yyerrstatus == 3) - { - /* if just tried and failed to reuse lookahead token after an error, discard it. */ - - /* return failure if at end of input */ - if (yychar == YYEOF) - YYABORT; - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Discarding token %d (%s).\n", yychar, yytname[yychar1]); -#endif - - yychar = YYEMPTY; - } - - /* Else will try to reuse lookahead token - after shifting the error token. */ - - yyerrstatus = 3; /* Each real token shifted decrements this */ - - goto yyerrhandle; - -yyerrdefault: /* current state does not do anything special for the error token. */ - -#if 0 - /* This is wrong; only states that explicitly want error tokens - should shift them. */ - yyn = yydefact[yystate]; /* If its default is to accept any token, ok. Otherwise pop it.*/ - if (yyn) goto yydefault; -#endif - -yyerrpop: /* pop the current state because it cannot handle the error token */ - - if (yyssp - 1 == yyss) YYABORT; - yyvsp--; - yyssp--; - yystate = *(yyssp - 1); -#ifdef YYLSP_NEEDED - yylsp--; -#endif - -#if YYDEBUG != 0 - if (yydebug) - { - short *ssp1 = yyss; - fprintf (stderr, "Error: state stack now"); - while (ssp1 != yyssp) - fprintf (stderr, " %d", *ssp1++); - fprintf (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; - -#if YYDEBUG != 0 - if (yydebug) - fprintf(stderr, "Shifting error token, "); -#endif - - *++yyvsp = yylval; -#ifdef YYLSP_NEEDED - *++yylsp = yylloc; -#endif - - yystate = yyn; - goto yynewstate; -} - - diff --git a/jam_src/jamgram.h b/jam_src/jamgram.h index 74acdd439..c31089bc9 100644 --- a/jam_src/jamgram.h +++ b/jam_src/jamgram.h @@ -1,49 +1,47 @@ -#ifndef YYSTYPE -#define YYSTYPE int +#ifndef YYERRCODE +#define YYERRCODE 256 #endif -#define _BANG 257 -#define _BANG_EQUALS 258 -#define _AMPERAMPER 259 -#define _LPAREN 260 -#define _RPAREN 261 -#define _PLUS_EQUALS 262 -#define _COLON 263 -#define _SEMIC 264 -#define _LANGLE 265 -#define _LANGLE_EQUALS 266 -#define _EQUALS 267 -#define _RANGLE 268 -#define _RANGLE_EQUALS 269 -#define _QUESTION_EQUALS 270 -#define _LBRACKET 271 -#define _RBRACKET 272 -#define ACTIONS 273 -#define BIND 274 -#define CASE 275 -#define DEFAULT 276 -#define ELSE 277 -#define EXISTING 278 -#define FOR 279 -#define IF 280 -#define IGNORE 281 -#define IN 282 -#define INCLUDE 283 -#define LOCAL 284 -#define MODULE 285 -#define ON 286 -#define PIECEMEAL 287 -#define QUIETLY 288 -#define RETURN 289 -#define RULE 290 -#define SWITCH 291 -#define TOGETHER 292 -#define UPDATED 293 -#define WHILE 294 -#define _LBRACE 295 -#define _BARBAR 296 -#define _RBRACE 297 -#define ARG 298 -#define STRING 299 - -extern YYSTYPE yylval; +#define _BANG 257 +#define _BANG_EQUALS 258 +#define _AMPERAMPER 259 +#define _LPAREN 260 +#define _RPAREN 261 +#define _PLUS_EQUALS 262 +#define _COLON 263 +#define _SEMIC 264 +#define _LANGLE 265 +#define _LANGLE_EQUALS 266 +#define _EQUALS 267 +#define _RANGLE 268 +#define _RANGLE_EQUALS 269 +#define _QUESTION_EQUALS 270 +#define _LBRACKET 271 +#define _RBRACKET 272 +#define ACTIONS 273 +#define BIND 274 +#define CASE 275 +#define DEFAULT 276 +#define ELSE 277 +#define EXISTING 278 +#define FOR 279 +#define IF 280 +#define IGNORE 281 +#define IN 282 +#define INCLUDE 283 +#define LOCAL 284 +#define MODULE 285 +#define ON 286 +#define PIECEMEAL 287 +#define QUIETLY 288 +#define RETURN 289 +#define RULE 290 +#define SWITCH 291 +#define TOGETHER 292 +#define UPDATED 293 +#define WHILE 294 +#define _LBRACE 295 +#define _BARBAR 296 +#define _RBRACE 297 +#define ARG 298 +#define STRING 299 diff --git a/jam_src/makedebugjam.bat b/jam_src/makedebugjam.bat index 39e760e35..3da69d3c8 100755 --- a/jam_src/makedebugjam.bat +++ b/jam_src/makedebugjam.bat @@ -2,4 +2,4 @@ call c:\tools\msvc6\vc98\bin\vcvars32.bat set VISUALC=c:\tools\msvc6\vc98 set JAM_TOOLSET=VISUALC rm -rf bin.ntx86/jam.exe bin.ntx86/*.obj bin.ntx86/*.lib -nmake -fbuilds/win32-visualc.mk JAMBASE= BOOST_ROOT= BOOST_BUILD_PATH= CFLAGS="/GZ /Zi /MLd -DNT" CCFLAGS="/GZ /Zi /MLd" LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" YACC="bison -t -d -l -v --debug --yacc" YACCFILES="y.tab" %* +nmake -fbuilds/win32-visualc.mk JAMBASE= BOOST_ROOT= BOOST_BUILD_PATH= CFLAGS="/GZ /Zi /MLd -DNT" CCFLAGS="/GZ /Zi /MLd" LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" YACC="byacc" YACCFILES="y.tab" YACCFLAGS=-vd %* diff --git a/jam_src/makedebugjam.sh b/jam_src/makedebugjam.sh index b4dfed0af..187418234 100644 --- a/jam_src/makedebugjam.sh +++ b/jam_src/makedebugjam.sh @@ -3,4 +3,5 @@ export VISUALC=c:\tools\msvc6\vc98 export JAM_TOOLSET=VISUALC rm -rf bin.ntx86 -nmake -fbuilds/win32-visualc.mk CFLAGS="/GZ /Zi /MLd -DNT" CCFLAGS="/GZ /Zi /MLd" YACC="bison -t -d -l -v --debug --yacc" LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG" +nmake -fbuilds/win32-visualc.mk CFLAGS="/GZ /Zi /MLd -DNT" +CCFLAGS="/GZ /Zi /MLd" YACC="byacc" YACCFLAGS=-vd LINKLIBS="c:\tools\msvc6\vc98\lib\advapi32.lib c:\tools\msvc6\vc98\lib\oldnames.lib c:\tools\msvc6\vc98\lib\gdi32.lib c:\tools\msvc6\vc98\lib\user32.lib c:\tools\msvc6\vc98\lib\kernel32.lib" LINKFLAGS="/DEBUG"