source: trunk/src/kash/generated/arith.c

Last change on this file was 2415, checked in by bird, 15 years ago

kash: trimmed down the arith stuff, making it not drag in libc bits.
  • Property svn:keywords set to Id
File size: 21.3 KB
RevLine 
[631]1#ifndef lint
[2415]2static const char yysccsid[] = "@(#)yaccpar 1.9 (Berkeley) 02/21/93";
[631]3#endif
[2415]4
5#include <stdlib.h>
6#include <string.h>
7
[631]8#define YYBYACC 1
9#define YYMAJOR 1
10#define YYMINOR 9
[2415]11#define YYPATCH 20091027
12
13#define YYEMPTY (-1)
14#define yyclearin (yychar = YYEMPTY)
15#define yyerrok (yyerrflag = 0)
16#define YYRECOVERING() (yyerrflag != 0)
17
18/* compatibility with bison */
19#ifdef YYPARSE_PARAM
20/* compatibility with FreeBSD */
21#ifdef YYPARSE_PARAM_TYPE
22#define YYPARSE_DECL() yyparse(YYPARSE_PARAM_TYPE YYPARSE_PARAM)
23#else
24#define YYPARSE_DECL() yyparse(void *YYPARSE_PARAM)
25#endif
26#else
27#define YYPARSE_DECL() yyparse(void)
28#endif /* YYPARSE_PARAM */
29
30extern int YYPARSE_DECL();
31
32static int yygrowstack(void);
[631]33#define YYPREFIX "yy"
34/* $NetBSD: arith.y,v 1.17 2003/09/17 17:33:36 jmmv Exp $ */
35
36/*-
37 * Copyright (c) 1993
38 * The Regents of the University of California. All rights reserved.
39 *
40 * This code is derived from software contributed to Berkeley by
41 * Kenneth Almquist.
42 *
43 * Redistribution and use in source and binary forms, with or without
44 * modification, are permitted provided that the following conditions
45 * are met:
46 * 1. Redistributions of source code must retain the above copyright
47 * notice, this list of conditions and the following disclaimer.
48 * 2. Redistributions in binary form must reproduce the above copyright
49 * notice, this list of conditions and the following disclaimer in the
50 * documentation and/or other materials provided with the distribution.
51 * 3. Neither the name of the University nor the names of its contributors
52 * may be used to endorse or promote products derived from this software
53 * without specific prior written permission.
54 *
55 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
56 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
57 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
58 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
59 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
60 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
61 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
62 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
63 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
64 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
65 * SUCH DAMAGE.
66 */
67
[1222]68#if 0
[631]69#ifndef lint
70static char sccsid[] = "@(#)arith.y 8.3 (Berkeley) 5/4/95";
71#else
72__RCSID("$NetBSD: arith.y,v 1.17 2003/09/17 17:33:36 jmmv Exp $");
[1222]73#endif /* not lint */
[631]74#endif
75
76#include <stdlib.h>
77#include "expand.h"
78#include "shell.h"
79#include "error.h"
80#include "output.h"
81#include "memalloc.h"
[1222]82#include "shinstance.h"
[631]83
[1222]84shinstance *arith_psh;
[631]85const char *arith_buf, *arith_startbuf;
86
87void yyerror(const char *);
88#ifdef TESTARITH
89int main(int , char *[]);
90int error(char *);
[2415]91#else
92# undef malloc
93# define malloc(cb) sh_malloc(NULL, (cb))
94# undef realloc
95# define realloc(pv,cb) sh_realloc(NULL, (pv), (cb))
96# undef free
97# define free(pv) sh_free(NULL, (pv))
[631]98#endif
99
100#define ARITH_NUM 257
101#define ARITH_LPAREN 258
102#define ARITH_RPAREN 259
103#define ARITH_OR 260
104#define ARITH_AND 261
105#define ARITH_BOR 262
106#define ARITH_BXOR 263
107#define ARITH_BAND 264
108#define ARITH_EQ 265
109#define ARITH_NE 266
110#define ARITH_LT 267
111#define ARITH_GT 268
112#define ARITH_GE 269
113#define ARITH_LE 270
114#define ARITH_LSHIFT 271
115#define ARITH_RSHIFT 272
116#define ARITH_ADD 273
117#define ARITH_SUB 274
118#define ARITH_MUL 275
119#define ARITH_DIV 276
120#define ARITH_REM 277
121#define ARITH_UNARYMINUS 278
122#define ARITH_UNARYPLUS 279
123#define ARITH_NOT 280
124#define ARITH_BNOT 281
125#define YYERRCODE 256
[2415]126static const short yylhs[] = { -1,
[631]127 0, 1, 1, 1, 1, 1, 1, 1, 1, 1,
128 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
129 1, 1, 1, 1, 1,
130};
[2415]131static const short yylen[] = { 2,
[631]132 1, 3, 3, 3, 3, 3, 3, 3, 3, 3,
133 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
134 2, 2, 2, 2, 1,
135};
[2415]136static const short yydefred[] = { 0,
[631]137 25, 0, 0, 0, 0, 0, 0, 0, 0, 24,
138 23, 21, 22, 0, 0, 0, 0, 0, 0, 0,
139 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
140 0, 2, 0, 0, 0, 0, 0, 0, 0, 0,
141 0, 0, 0, 0, 0, 0, 0, 18, 19, 20,
142};
[2415]143static const short yydgoto[] = { 7,
[631]144 8,
145};
[2415]146static const short yysindex[] = { -255,
[631]147 0, -255, -255, -255, -255, -255, 0, -67, -85, 0,
148 0, 0, 0, -255, -255, -255, -255, -255, -255, -255,
149 -255, -255, -255, -255, -255, -255, -255, -255, -255, -255,
150 -255, 0, -50, -34, -19, 141, -261, -233, -233, -223,
151 -223, -223, -223, -253, -253, -248, -248, 0, 0, 0,
152};
[2415]153static const short yyrindex[] = { 0,
[631]154 0, 0, 0, 0, 0, 0, 0, 30, 0, 0,
155 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
156 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
157 0, 0, 143, 140, 136, 131, 125, 109, 117, 61,
158 73, 85, 97, 33, 47, 1, 17, 0, 0, 0,
159};
[2415]160static const short yygindex[] = { 0,
[631]161 142,
162};
163#define YYTABLESIZE 418
[2415]164static const short yytable[] = { 0,
[631]165 16, 1, 2, 19, 20, 21, 22, 23, 24, 25,
166 26, 27, 28, 29, 30, 31, 17, 3, 4, 27,
167 28, 29, 30, 31, 5, 6, 29, 30, 31, 1,
168 0, 0, 14, 21, 22, 23, 24, 25, 26, 27,
169 28, 29, 30, 31, 0, 0, 15, 25, 26, 27,
170 28, 29, 30, 31, 0, 0, 0, 0, 0, 0,
171 11, 0, 0, 0, 0, 0, 0, 0, 0, 0,
172 0, 0, 9, 0, 0, 0, 0, 0, 0, 0,
173 0, 0, 0, 0, 10, 0, 0, 0, 0, 0,
174 0, 0, 0, 0, 0, 0, 12, 0, 0, 0,
175 0, 0, 0, 0, 0, 0, 0, 0, 8, 0,
176 0, 0, 0, 0, 0, 0, 13, 0, 0, 0,
177 0, 0, 0, 0, 7, 0, 0, 0, 0, 0,
178 6, 0, 0, 0, 0, 5, 0, 0, 0, 4,
179 0, 0, 3, 9, 10, 11, 12, 13, 0, 0,
180 0, 0, 0, 0, 0, 33, 34, 35, 36, 37,
181 38, 39, 40, 41, 42, 43, 44, 45, 46, 47,
182 48, 49, 50, 32, 14, 15, 16, 17, 18, 19,
183 20, 21, 22, 23, 24, 25, 26, 27, 28, 29,
184 30, 31, 14, 15, 16, 17, 18, 19, 20, 21,
185 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
186 15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
187 25, 26, 27, 28, 29, 30, 31, 16, 17, 18,
188 19, 20, 21, 22, 23, 24, 25, 26, 27, 28,
189 29, 30, 31, 17, 18, 19, 20, 21, 22, 23,
190 24, 25, 26, 27, 28, 29, 30, 31, 0, 16,
191 16, 16, 16, 16, 16, 16, 16, 16, 16, 16,
192 16, 16, 16, 16, 16, 17, 17, 17, 17, 17,
193 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
194 17, 14, 14, 14, 14, 14, 14, 14, 14, 14,
195 14, 14, 14, 14, 14, 15, 15, 15, 15, 15,
196 15, 15, 15, 15, 15, 15, 15, 15, 15, 11,
197 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
198 11, 9, 9, 9, 9, 9, 9, 9, 9, 9,
199 9, 9, 9, 10, 10, 10, 10, 10, 10, 10,
200 10, 10, 10, 10, 10, 12, 12, 12, 12, 12,
201 12, 12, 12, 12, 12, 12, 12, 8, 8, 8,
202 8, 8, 8, 8, 8, 13, 13, 13, 13, 13,
203 13, 13, 13, 7, 7, 7, 7, 7, 7, 6,
204 6, 6, 6, 6, 5, 5, 5, 5, 4, 4,
205 4, 3, 3, 0, 18, 19, 20, 21, 22, 23,
206 24, 25, 26, 27, 28, 29, 30, 31,
207};
[2415]208static const short yycheck[] = { -1,
[631]209 0, 257, 258, 265, 266, 267, 268, 269, 270, 271,
210 272, 273, 274, 275, 276, 277, 0, 273, 274, 273,
211 274, 275, 276, 277, 280, 281, 275, 276, 277, 0,
212 -1, -1, 0, 267, 268, 269, 270, 271, 272, 273,
213 274, 275, 276, 277, -1, -1, 0, 271, 272, 273,
214 274, 275, 276, 277, -1, -1, -1, -1, -1, -1,
215 0, -1, -1, -1, -1, -1, -1, -1, -1, -1,
216 -1, -1, 0, -1, -1, -1, -1, -1, -1, -1,
217 -1, -1, -1, -1, 0, -1, -1, -1, -1, -1,
218 -1, -1, -1, -1, -1, -1, 0, -1, -1, -1,
219 -1, -1, -1, -1, -1, -1, -1, -1, 0, -1,
220 -1, -1, -1, -1, -1, -1, 0, -1, -1, -1,
221 -1, -1, -1, -1, 0, -1, -1, -1, -1, -1,
222 0, -1, -1, -1, -1, 0, -1, -1, -1, 0,
223 -1, -1, 0, 2, 3, 4, 5, 6, -1, -1,
224 -1, -1, -1, -1, -1, 14, 15, 16, 17, 18,
225 19, 20, 21, 22, 23, 24, 25, 26, 27, 28,
226 29, 30, 31, 259, 260, 261, 262, 263, 264, 265,
227 266, 267, 268, 269, 270, 271, 272, 273, 274, 275,
228 276, 277, 260, 261, 262, 263, 264, 265, 266, 267,
229 268, 269, 270, 271, 272, 273, 274, 275, 276, 277,
230 261, 262, 263, 264, 265, 266, 267, 268, 269, 270,
231 271, 272, 273, 274, 275, 276, 277, 262, 263, 264,
232 265, 266, 267, 268, 269, 270, 271, 272, 273, 274,
233 275, 276, 277, 263, 264, 265, 266, 267, 268, 269,
234 270, 271, 272, 273, 274, 275, 276, 277, -1, 259,
235 260, 261, 262, 263, 264, 265, 266, 267, 268, 269,
236 270, 271, 272, 273, 274, 259, 260, 261, 262, 263,
237 264, 265, 266, 267, 268, 269, 270, 271, 272, 273,
238 274, 259, 260, 261, 262, 263, 264, 265, 266, 267,
239 268, 269, 270, 271, 272, 259, 260, 261, 262, 263,
240 264, 265, 266, 267, 268, 269, 270, 271, 272, 259,
241 260, 261, 262, 263, 264, 265, 266, 267, 268, 269,
242 270, 259, 260, 261, 262, 263, 264, 265, 266, 267,
243 268, 269, 270, 259, 260, 261, 262, 263, 264, 265,
244 266, 267, 268, 269, 270, 259, 260, 261, 262, 263,
245 264, 265, 266, 267, 268, 269, 270, 259, 260, 261,
246 262, 263, 264, 265, 266, 259, 260, 261, 262, 263,
247 264, 265, 266, 259, 260, 261, 262, 263, 264, 259,
248 260, 261, 262, 263, 259, 260, 261, 262, 259, 260,
249 261, 259, 260, -1, 264, 265, 266, 267, 268, 269,
250 270, 271, 272, 273, 274, 275, 276, 277,
251};
252#define YYFINAL 7
253#ifndef YYDEBUG
254#define YYDEBUG 0
255#endif
256#define YYMAXTOKEN 281
257#if YYDEBUG
[2415]258static const char *yyname[] = {
259
[631]260"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,
2610,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
2620,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
2630,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
2640,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
2650,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
2660,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"ARITH_NUM","ARITH_LPAREN",
267"ARITH_RPAREN","ARITH_OR","ARITH_AND","ARITH_BOR","ARITH_BXOR","ARITH_BAND",
268"ARITH_EQ","ARITH_NE","ARITH_LT","ARITH_GT","ARITH_GE","ARITH_LE",
269"ARITH_LSHIFT","ARITH_RSHIFT","ARITH_ADD","ARITH_SUB","ARITH_MUL","ARITH_DIV",
270"ARITH_REM","ARITH_UNARYMINUS","ARITH_UNARYPLUS","ARITH_NOT","ARITH_BNOT",
271};
[2415]272static const char *yyrule[] = {
[631]273"$accept : exp",
274"exp : expr",
275"expr : ARITH_LPAREN expr ARITH_RPAREN",
276"expr : expr ARITH_OR expr",
277"expr : expr ARITH_AND expr",
278"expr : expr ARITH_BOR expr",
279"expr : expr ARITH_BXOR expr",
280"expr : expr ARITH_BAND expr",
281"expr : expr ARITH_EQ expr",
282"expr : expr ARITH_GT expr",
283"expr : expr ARITH_GE expr",
284"expr : expr ARITH_LT expr",
285"expr : expr ARITH_LE expr",
286"expr : expr ARITH_NE expr",
287"expr : expr ARITH_LSHIFT expr",
288"expr : expr ARITH_RSHIFT expr",
289"expr : expr ARITH_ADD expr",
290"expr : expr ARITH_SUB expr",
291"expr : expr ARITH_MUL expr",
292"expr : expr ARITH_DIV expr",
293"expr : expr ARITH_REM expr",
294"expr : ARITH_NOT expr",
295"expr : ARITH_BNOT expr",
296"expr : ARITH_SUB expr",
297"expr : ARITH_ADD expr",
298"expr : ARITH_NUM",
[2415]299
[631]300};
301#endif
302#ifndef YYSTYPE
303typedef int YYSTYPE;
304#endif
[2415]305#if YYDEBUG
306#include <stdio.h>
307#endif
308
309/* define the initial stack-sizes */
[631]310#ifdef YYSTACKSIZE
311#undef YYMAXDEPTH
[2415]312#define YYMAXDEPTH YYSTACKSIZE
[631]313#else
314#ifdef YYMAXDEPTH
315#define YYSTACKSIZE YYMAXDEPTH
316#else
317#define YYSTACKSIZE 500
[2415]318#define YYMAXDEPTH 500
[631]319#endif
320#endif
[2415]321
322#define YYINITSTACKSIZE 500
323
324int yydebug;
325int yynerrs;
326int yyerrflag;
327int yychar;
328short *yyssp;
[631]329YYSTYPE *yyvsp;
[2415]330YYSTYPE yyval;
331YYSTYPE yylval;
332
333/* variables for the parser stack */
334static short *yyss;
335static short *yysslim;
336static YYSTYPE *yyvs;
337static unsigned yystacksize;
[631]338int
[1222]339arith(shinstance *psh, const char *s)
[631]340{
341 long result;
342
[1222]343 INTOFF;
344/* todo lock */
345 arith_psh = psh;
[631]346 arith_buf = arith_startbuf = s;
347 result = yyparse();
348 arith_lex_reset(); /* reprime lex */
[1222]349 arith_psh = NULL;
350/* todo unlock */
[631]351 INTON;
352
353 return (result);
354}
355
356
357/*
358 * The exp(1) builtin.
359 */
360int
[1222]361expcmd(shinstance *psh, int argc, char **argv)
[631]362{
363 const char *p;
364 char *concat;
365 char **ap;
366 long i;
367
368 if (argc > 1) {
369 p = argv[1];
370 if (argc > 2) {
371 /*
372 * concatenate arguments
373 */
[1198]374 STARTSTACKSTR(psh, concat);
[631]375 ap = argv + 2;
376 for (;;) {
377 while (*p)
[1198]378 STPUTC(psh, *p++, concat);
[631]379 if ((p = *ap++) == NULL)
380 break;
[1198]381 STPUTC(psh, ' ', concat);
[631]382 }
[1198]383 STPUTC(psh, '\0', concat);
384 p = grabstackstr(psh, concat);
[631]385 }
386 } else
387 p = "";
388
[1222]389 i = arith(psh, p);
[631]390
[1199]391 out1fmt(psh, "%ld\n", i);
[631]392 return (! i);
393}
394
395/*************************/
396#ifdef TEST_ARITH
397#include <stdio.h>
398main(argc, argv)
399 char *argv[];
400{
401 printf("%d\n", exp(argv[1]));
402}
403error(s)
404 char *s;
405{
406 fprintf(stderr, "exp: %s\n", s);
407 exit(1);
408}
409#endif
410
411void
[1222]412yyerror(const char *s)
[631]413{
[2415]414 shinstance *psh = arith_psh;
415#ifndef YYBISON /* yyerrok references yyerrstatus which is a local variable in yyparse().*/
[631]416 yyerrok;
[2415]417#endif
[631]418 yyclearin;
419 arith_lex_reset(); /* reprime lex */
[1222]420/** @todo unlock */
421 error(psh, "arithmetic expression: %s: \"%s\"", s, arith_startbuf);
[631]422 /* NOTREACHED */
423}
[2415]424/* allocate initial stack or double stack size, up to YYMAXDEPTH */
425static int yygrowstack(void)
426{
427 int i;
428 unsigned newsize;
429 short *newss;
430 YYSTYPE *newvs;
431
432 if ((newsize = yystacksize) == 0)
433 newsize = YYINITSTACKSIZE;
434 else if (newsize >= YYMAXDEPTH)
435 return -1;
436 else if ((newsize *= 2) > YYMAXDEPTH)
437 newsize = YYMAXDEPTH;
438
439 i = yyssp - yyss;
440 newss = (yyss != 0)
441 ? (short *)realloc(yyss, newsize * sizeof(*newss))
442 : (short *)malloc(newsize * sizeof(*newss));
443 if (newss == 0)
444 return -1;
445
446 yyss = newss;
447 yyssp = newss + i;
448 newvs = (yyvs != 0)
449 ? (YYSTYPE *)realloc(yyvs, newsize * sizeof(*newvs))
450 : (YYSTYPE *)malloc(newsize * sizeof(*newvs));
451 if (newvs == 0)
452 return -1;
453
454 yyvs = newvs;
455 yyvsp = newvs + i;
456 yystacksize = newsize;
457 yysslim = yyss + newsize - 1;
458 return 0;
459}
460
461#define YYABORT goto yyabort
[631]462#define YYREJECT goto yyabort
463#define YYACCEPT goto yyaccept
[2415]464#define YYERROR goto yyerrlab
[631]465
466int
[2415]467YYPARSE_DECL()
[631]468{
[2415]469 int yym, yyn, yystate;
[631]470#if YYDEBUG
[2415]471 const char *yys;
[631]472
[2415]473 if ((yys = getenv("YYDEBUG")) != 0)
[631]474 {
475 yyn = *yys;
476 if (yyn >= '0' && yyn <= '9')
477 yydebug = yyn - '0';
478 }
479#endif
480
481 yynerrs = 0;
482 yyerrflag = 0;
[2415]483 yychar = YYEMPTY;
484 yystate = 0;
[631]485
[2415]486 if (yyss == NULL && yygrowstack()) goto yyoverflow;
[631]487 yyssp = yyss;
488 yyvsp = yyvs;
[2415]489 yystate = 0;
490 *yyssp = 0;
[631]491
492yyloop:
493 if ((yyn = yydefred[yystate]) != 0) goto yyreduce;
494 if (yychar < 0)
495 {
496 if ((yychar = yylex()) < 0) yychar = 0;
497#if YYDEBUG
498 if (yydebug)
499 {
500 yys = 0;
501 if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
502 if (!yys) yys = "illegal-symbol";
503 printf("%sdebug: state %d, reading %d (%s)\n",
504 YYPREFIX, yystate, yychar, yys);
505 }
506#endif
507 }
508 if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
509 yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
510 {
511#if YYDEBUG
512 if (yydebug)
513 printf("%sdebug: state %d, shifting to state %d\n",
514 YYPREFIX, yystate, yytable[yyn]);
515#endif
[2415]516 if (yyssp >= yysslim && yygrowstack())
[631]517 {
518 goto yyoverflow;
519 }
[2415]520 yystate = yytable[yyn];
521 *++yyssp = yytable[yyn];
[631]522 *++yyvsp = yylval;
[2415]523 yychar = YYEMPTY;
[631]524 if (yyerrflag > 0) --yyerrflag;
525 goto yyloop;
526 }
527 if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
528 yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
529 {
530 yyn = yytable[yyn];
531 goto yyreduce;
532 }
533 if (yyerrflag) goto yyinrecovery;
[2415]534
[631]535 yyerror("syntax error");
[2415]536
[631]537 goto yyerrlab;
[2415]538
[631]539yyerrlab:
540 ++yynerrs;
[2415]541
[631]542yyinrecovery:
543 if (yyerrflag < 3)
544 {
545 yyerrflag = 3;
546 for (;;)
547 {
548 if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&
549 yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)
550 {
551#if YYDEBUG
552 if (yydebug)
553 printf("%sdebug: state %d, error recovery shifting\
554 to state %d\n", YYPREFIX, *yyssp, yytable[yyn]);
555#endif
[2415]556 if (yyssp >= yysslim && yygrowstack())
[631]557 {
558 goto yyoverflow;
559 }
[2415]560 yystate = yytable[yyn];
561 *++yyssp = yytable[yyn];
[631]562 *++yyvsp = yylval;
563 goto yyloop;
564 }
565 else
566 {
567#if YYDEBUG
568 if (yydebug)
569 printf("%sdebug: error recovery discarding state %d\n",
570 YYPREFIX, *yyssp);
571#endif
572 if (yyssp <= yyss) goto yyabort;
573 --yyssp;
574 --yyvsp;
575 }
576 }
577 }
578 else
579 {
580 if (yychar == 0) goto yyabort;
581#if YYDEBUG
582 if (yydebug)
583 {
584 yys = 0;
585 if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
586 if (!yys) yys = "illegal-symbol";
587 printf("%sdebug: state %d, error recovery discards token %d (%s)\n",
588 YYPREFIX, yystate, yychar, yys);
589 }
590#endif
[2415]591 yychar = YYEMPTY;
[631]592 goto yyloop;
593 }
[2415]594
[631]595yyreduce:
596#if YYDEBUG
597 if (yydebug)
598 printf("%sdebug: state %d, reducing by rule %d (%s)\n",
599 YYPREFIX, yystate, yyn, yyrule[yyn]);
600#endif
601 yym = yylen[yyn];
[2415]602 if (yym)
603 yyval = yyvsp[1-yym];
604 else
605 memset(&yyval, 0, sizeof yyval);
[631]606 switch (yyn)
607 {
608case 1:
[2415]609 {
[631]610 return (yyvsp[0]);
611 }
612break;
613case 2:
[2415]614 { yyval = yyvsp[-1]; }
[631]615break;
616case 3:
[2415]617 { yyval = yyvsp[-2] ? yyvsp[-2] : yyvsp[0] ? yyvsp[0] : 0; }
[631]618break;
619case 4:
[2415]620 { yyval = yyvsp[-2] ? ( yyvsp[0] ? yyvsp[0] : 0 ) : 0; }
[631]621break;
622case 5:
[2415]623 { yyval = yyvsp[-2] | yyvsp[0]; }
[631]624break;
625case 6:
[2415]626 { yyval = yyvsp[-2] ^ yyvsp[0]; }
[631]627break;
628case 7:
[2415]629 { yyval = yyvsp[-2] & yyvsp[0]; }
[631]630break;
631case 8:
[2415]632 { yyval = yyvsp[-2] == yyvsp[0]; }
[631]633break;
634case 9:
[2415]635 { yyval = yyvsp[-2] > yyvsp[0]; }
[631]636break;
637case 10:
[2415]638 { yyval = yyvsp[-2] >= yyvsp[0]; }
[631]639break;
640case 11:
[2415]641 { yyval = yyvsp[-2] < yyvsp[0]; }
[631]642break;
643case 12:
[2415]644 { yyval = yyvsp[-2] <= yyvsp[0]; }
[631]645break;
646case 13:
[2415]647 { yyval = yyvsp[-2] != yyvsp[0]; }
[631]648break;
649case 14:
[2415]650 { yyval = yyvsp[-2] << yyvsp[0]; }
[631]651break;
652case 15:
[2415]653 { yyval = yyvsp[-2] >> yyvsp[0]; }
[631]654break;
655case 16:
[2415]656 { yyval = yyvsp[-2] + yyvsp[0]; }
[631]657break;
658case 17:
[2415]659 { yyval = yyvsp[-2] - yyvsp[0]; }
[631]660break;
661case 18:
[2415]662 { yyval = yyvsp[-2] * yyvsp[0]; }
[631]663break;
664case 19:
[2415]665 {
[631]666 if (yyvsp[0] == 0)
667 yyerror("division by zero");
668 yyval = yyvsp[-2] / yyvsp[0];
669 }
670break;
671case 20:
[2415]672 {
[631]673 if (yyvsp[0] == 0)
674 yyerror("division by zero");
675 yyval = yyvsp[-2] % yyvsp[0];
676 }
677break;
678case 21:
[2415]679 { yyval = !(yyvsp[0]); }
[631]680break;
681case 22:
[2415]682 { yyval = ~(yyvsp[0]); }
[631]683break;
684case 23:
[2415]685 { yyval = -(yyvsp[0]); }
[631]686break;
687case 24:
[2415]688 { yyval = yyvsp[0]; }
[631]689break;
690 }
691 yyssp -= yym;
692 yystate = *yyssp;
693 yyvsp -= yym;
694 yym = yylhs[yyn];
695 if (yystate == 0 && yym == 0)
696 {
697#if YYDEBUG
698 if (yydebug)
699 printf("%sdebug: after reduction, shifting from state 0 to\
700 state %d\n", YYPREFIX, YYFINAL);
701#endif
702 yystate = YYFINAL;
703 *++yyssp = YYFINAL;
704 *++yyvsp = yyval;
705 if (yychar < 0)
706 {
707 if ((yychar = yylex()) < 0) yychar = 0;
708#if YYDEBUG
709 if (yydebug)
710 {
711 yys = 0;
712 if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
713 if (!yys) yys = "illegal-symbol";
714 printf("%sdebug: state %d, reading %d (%s)\n",
715 YYPREFIX, YYFINAL, yychar, yys);
716 }
717#endif
718 }
719 if (yychar == 0) goto yyaccept;
720 goto yyloop;
721 }
722 if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
723 yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
724 yystate = yytable[yyn];
725 else
726 yystate = yydgoto[yym];
727#if YYDEBUG
728 if (yydebug)
729 printf("%sdebug: after reduction, shifting from state %d \
730to state %d\n", YYPREFIX, *yyssp, yystate);
731#endif
[2415]732 if (yyssp >= yysslim && yygrowstack())
[631]733 {
734 goto yyoverflow;
735 }
[2415]736 *++yyssp = (short) yystate;
[631]737 *++yyvsp = yyval;
738 goto yyloop;
[2415]739
[631]740yyoverflow:
741 yyerror("yacc stack overflow");
[2415]742
[631]743yyabort:
744 return (1);
[2415]745
[631]746yyaccept:
747 return (0);
748}
Note: See TracBrowser for help on using the repository browser.