Mercurial > audlegacy
annotate Plugins/Visualization/paranormal/pn/pnscriptparser.c @ 1585:a898e415ad8f trunk
[svn] An include a day keeps the implicit declaration at bay.
author | chainsaw |
---|---|
date | Sat, 19 Aug 2006 14:51:13 -0700 |
parents | aa1e05d66f6d |
children |
rev | line source |
---|---|
1523
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1 /* A Bison parser, made by GNU Bison 2.1. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
3 /* Skeleton parser for Yacc-like parsing with Bison, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
4 Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
5 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
6 This program is free software; you can redistribute it and/or modify |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
7 it under the terms of the GNU General Public License as published by |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
8 the Free Software Foundation; either version 2, or (at your option) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
9 any later version. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
10 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
11 This program is distributed in the hope that it will be useful, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
14 GNU General Public License for more details. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
15 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
16 You should have received a copy of the GNU General Public License |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
17 along with this program; if not, write to the Free Software |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
18 Foundation, Inc., 51 Franklin Street, Fifth Floor, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
19 Boston, MA 02110-1301, USA. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
20 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
21 /* As a special exception, when this file is copied by Bison into a |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
22 Bison output file, you may use that output file without restriction. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
23 This special exception was added by the Free Software Foundation |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
24 in version 1.24 of Bison. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
25 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
26 /* Written by Richard Stallman by simplifying the original so called |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
27 ``semantic'' parser. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
28 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
29 /* All symbols defined below should begin with yy or YY, to avoid |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
30 infringing on user name space. This should be done even for local |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
31 variables, as they might otherwise be expanded by user macros. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
32 There are some unavoidable exceptions within include files to |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
33 define necessary library symbols; they are noted "INFRINGES ON |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
34 USER NAME SPACE" below. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
35 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
36 /* Identify Bison output. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
37 #define YYBISON 1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
38 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
39 /* Bison version. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
40 #define YYBISON_VERSION "2.1" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
41 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
42 /* Skeleton name. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
43 #define YYSKELETON_NAME "yacc.c" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
44 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
45 /* Pure parsers. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
46 #define YYPURE 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
47 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
48 /* Using locations. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
49 #define YYLSP_NEEDED 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
50 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
51 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
52 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
53 /* Tokens. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
54 #ifndef YYTOKENTYPE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
55 # define YYTOKENTYPE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
56 /* Put the tokens into the symbol table, so that GDB and other debuggers |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
57 know about them. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
58 enum yytokentype { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
59 CONSTANT = 258, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
60 VARIABLE = 259, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
61 ABS_FUNC = 260, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
62 MAX_FUNC = 261, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
63 MIN_FUNC = 262, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
64 SIN_FUNC = 263, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
65 COS_FUNC = 264, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
66 TAN_FUNC = 265, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
67 ASIN_FUNC = 266, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
68 ACOS_FUNC = 267, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
69 ATAN_FUNC = 268, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
70 NEG = 269 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
71 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
72 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
73 /* Tokens. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
74 #define CONSTANT 258 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
75 #define VARIABLE 259 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
76 #define ABS_FUNC 260 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
77 #define MAX_FUNC 261 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
78 #define MIN_FUNC 262 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
79 #define SIN_FUNC 263 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
80 #define COS_FUNC 264 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
81 #define TAN_FUNC 265 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
82 #define ASIN_FUNC 266 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
83 #define ACOS_FUNC 267 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
84 #define ATAN_FUNC 268 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
85 #define NEG 269 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
86 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
87 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
88 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
89 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
90 /* Copy the first part of user declarations. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
91 #line 1 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
92 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
93 #define yymaxdepth pn_script_parser_maxdepth |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
94 #define yyparse pn_script_parser_parse |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
95 #define yylex pn_script_parser_lex |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
96 #define yyerror pn_script_parser_error |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
97 #define yylval pn_script_parser_lval |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
98 #define yychar pn_script_parser_char |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
99 #define yydebug pn_script_parser_debug |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
100 #define yypact pn_script_parser_pact |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
101 #define yyr1 pn_script_parser_r1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
102 #define yyr2 pn_script_parser_r2 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
103 #define yydef pn_script_parser_def |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
104 #define yychk pn_script_parser_chk |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
105 #define yypgo pn_script_parser_pgo |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
106 #define yyact pn_script_parser_act |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
107 #define yyexca pn_script_parser_exca |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
108 #define yyerrflag pn_script_parser_errflag |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
109 #define ynerrs pn_script_parser_nerrs |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
110 #define yyps pn_script_parser_ps |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
111 #define yypv pn_script_parser_pv |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
112 #define yys pn_script_parser_s |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
113 #define yy_yys pn_script_parser_yys |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
114 #define yystate pn_script_parser_state |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
115 #define yytmp pn_script_parser_tmp |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
116 #define yyv pn_script_parser_v |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
117 #define yy_yyv pn_script_parser_yyv |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
118 #define yyval pn_script_parser_val |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
119 #define yylloc pn_script_parser_lloc |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
120 #define yyreds pn_script_parser_reds |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
121 #define yytoks pn_script_parser_toks |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
122 #define yylhs pn_script_parser_yylhs |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
123 #define yylen pn_script_parser_yylen |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
124 #define yydefred pn_script_parser_yydefred |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
125 #define yydgoto pn_script_parser_yydgoto |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
126 #define yysindex pn_script_parser_yysindex |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
127 #define yyrindex pn_script_parser_yyrindex |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
128 #define yygindex pn_script_parser_yygindex |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
129 #define yytable pn_script_parser_yytable |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
130 #define yycheck pn_script_parser_yycheck |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
131 #define yyname pn_script_parser_yyname |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
132 #define yyrule pn_script_parser_yyrule |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
133 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
134 #include <ctype.h> |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
135 #include <stdlib.h> |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
136 #include <glib.h> |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
137 #include <pn/pnscript.h> |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
138 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
139 /* define this to dump the parser output to stdout */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
140 /* #define PN_PRINT_OPS 1 */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
141 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
142 int yyerror (char *s); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
143 int yylex (void); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
144 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
145 static gboolean parse_failed; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
146 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
147 /* Are we on the size-determining pass? */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
148 static gboolean size_pass; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
149 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
150 /* Used during the size pass to determine the size of the constant table */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
151 static GArray *temp_constant_table = NULL; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
152 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
153 /* The code size */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
154 static guint code_size; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
155 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
156 /* The current code byte */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
157 static guint *code_ptr; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
158 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
159 /* Input variables used during parsing */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
160 static PnScript *parse_script; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
161 static const gchar *parse_string; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
162 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
163 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
164 /* Enabling traces. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
165 #ifndef YYDEBUG |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
166 # define YYDEBUG 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
167 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
168 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
169 /* Enabling verbose error messages. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
170 #ifdef YYERROR_VERBOSE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
171 # undef YYERROR_VERBOSE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
172 # define YYERROR_VERBOSE 1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
173 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
174 # define YYERROR_VERBOSE 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
175 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
176 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
177 /* Enabling the token table. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
178 #ifndef YYTOKEN_TABLE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
179 # define YYTOKEN_TABLE 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
180 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
181 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
182 #if ! defined (YYSTYPE) && ! defined (YYSTYPE_IS_DECLARED) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
183 #line 73 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
184 typedef union YYSTYPE { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
185 gdouble *constant; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
186 PnVariable *variable; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
187 } YYSTYPE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
188 /* Line 196 of yacc.c. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
189 #line 190 "pnscriptparser.tab.c" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
190 # define yystype YYSTYPE /* obsolescent; will be withdrawn */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
191 # define YYSTYPE_IS_DECLARED 1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
192 # define YYSTYPE_IS_TRIVIAL 1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
193 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
194 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
195 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
196 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
197 /* Copy the second part of user declarations. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
198 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
199 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
200 /* Line 219 of yacc.c. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
201 #line 202 "pnscriptparser.tab.c" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
202 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
203 #if ! defined (YYSIZE_T) && defined (__SIZE_TYPE__) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
204 # define YYSIZE_T __SIZE_TYPE__ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
205 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
206 #if ! defined (YYSIZE_T) && defined (size_t) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
207 # define YYSIZE_T size_t |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
208 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
209 #if ! defined (YYSIZE_T) && (defined (__STDC__) || defined (__cplusplus)) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
210 # include <stddef.h> /* INFRINGES ON USER NAME SPACE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
211 # define YYSIZE_T size_t |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
212 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
213 #if ! defined (YYSIZE_T) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
214 # define YYSIZE_T unsigned int |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
215 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
216 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
217 #ifndef YY_ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
218 # if YYENABLE_NLS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
219 # if ENABLE_NLS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
220 # include <libintl.h> /* INFRINGES ON USER NAME SPACE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
221 # define YY_(msgid) dgettext ("bison-runtime", msgid) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
222 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
223 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
224 # ifndef YY_ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
225 # define YY_(msgid) msgid |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
226 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
227 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
228 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
229 #if ! defined (yyoverflow) || YYERROR_VERBOSE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
230 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
231 /* The parser invokes alloca or malloc; define the necessary symbols. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
232 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
233 # ifdef YYSTACK_USE_ALLOCA |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
234 # if YYSTACK_USE_ALLOCA |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
235 # ifdef __GNUC__ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
236 # define YYSTACK_ALLOC __builtin_alloca |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
237 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
238 # define YYSTACK_ALLOC alloca |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
239 # if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
240 # include <stdlib.h> /* INFRINGES ON USER NAME SPACE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
241 # define YYINCLUDED_STDLIB_H |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
242 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
243 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
244 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
245 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
246 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
247 # ifdef YYSTACK_ALLOC |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
248 /* Pacify GCC's `empty if-body' warning. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
249 # define YYSTACK_FREE(Ptr) do { /* empty */; } while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
250 # ifndef YYSTACK_ALLOC_MAXIMUM |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
251 /* The OS might guarantee only one guard page at the bottom of the stack, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
252 and a page size can be as small as 4096 bytes. So we cannot safely |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
253 invoke alloca (N) if N exceeds 4096. Use a slightly smaller number |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
254 to allow for a few compiler-allocated temporary stack slots. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
255 # define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2005 */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
256 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
257 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
258 # define YYSTACK_ALLOC YYMALLOC |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
259 # define YYSTACK_FREE YYFREE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
260 # ifndef YYSTACK_ALLOC_MAXIMUM |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
261 # define YYSTACK_ALLOC_MAXIMUM ((YYSIZE_T) -1) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
262 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
263 # ifdef __cplusplus |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
264 extern "C" { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
265 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
266 # ifndef YYMALLOC |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
267 # define YYMALLOC malloc |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
268 # if (! defined (malloc) && ! defined (YYINCLUDED_STDLIB_H) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
269 && (defined (__STDC__) || defined (__cplusplus))) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
270 void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
271 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
272 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
273 # ifndef YYFREE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
274 # define YYFREE free |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
275 # if (! defined (free) && ! defined (YYINCLUDED_STDLIB_H) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
276 && (defined (__STDC__) || defined (__cplusplus))) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
277 void free (void *); /* INFRINGES ON USER NAME SPACE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
278 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
279 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
280 # ifdef __cplusplus |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
281 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
282 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
283 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
284 #endif /* ! defined (yyoverflow) || YYERROR_VERBOSE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
285 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
286 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
287 #if (! defined (yyoverflow) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
288 && (! defined (__cplusplus) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
289 || (defined (YYSTYPE_IS_TRIVIAL) && YYSTYPE_IS_TRIVIAL))) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
290 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
291 /* A type that is properly aligned for any stack member. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
292 union yyalloc |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
293 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
294 short int yyss; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
295 YYSTYPE yyvs; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
296 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
297 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
298 /* The size of the maximum gap between one aligned stack and the next. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
299 # define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
300 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
301 /* The size of an array large to enough to hold all stacks, each with |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
302 N elements. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
303 # define YYSTACK_BYTES(N) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
304 ((N) * (sizeof (short int) + sizeof (YYSTYPE)) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
305 + YYSTACK_GAP_MAXIMUM) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
306 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
307 /* Copy COUNT objects from FROM to TO. The source and destination do |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
308 not overlap. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
309 # ifndef YYCOPY |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
310 # if defined (__GNUC__) && 1 < __GNUC__ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
311 # define YYCOPY(To, From, Count) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
312 __builtin_memcpy (To, From, (Count) * sizeof (*(From))) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
313 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
314 # define YYCOPY(To, From, Count) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
315 do \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
316 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
317 YYSIZE_T yyi; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
318 for (yyi = 0; yyi < (Count); yyi++) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
319 (To)[yyi] = (From)[yyi]; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
320 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
321 while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
322 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
323 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
324 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
325 /* Relocate STACK from its old location to the new one. The |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
326 local variables YYSIZE and YYSTACKSIZE give the old and new number of |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
327 elements in the stack, and YYPTR gives the new location of the |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
328 stack. Advance YYPTR to a properly aligned location for the next |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
329 stack. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
330 # define YYSTACK_RELOCATE(Stack) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
331 do \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
332 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
333 YYSIZE_T yynewbytes; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
334 YYCOPY (&yyptr->Stack, Stack, yysize); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
335 Stack = &yyptr->Stack; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
336 yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
337 yyptr += yynewbytes / sizeof (*yyptr); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
338 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
339 while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
340 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
341 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
342 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
343 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
344 typedef signed char yysigned_char; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
345 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
346 typedef short int yysigned_char; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
347 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
348 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
349 /* YYFINAL -- State number of the termination state. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
350 #define YYFINAL 2 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
351 /* YYLAST -- Last index in YYTABLE. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
352 #define YYLAST 159 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
353 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
354 /* YYNTOKENS -- Number of terminals. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
355 #define YYNTOKENS 25 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
356 /* YYNNTS -- Number of nonterminals. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
357 #define YYNNTS 5 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
358 /* YYNRULES -- Number of rules. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
359 #define YYNRULES 24 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
360 /* YYNRULES -- Number of states. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
361 #define YYNSTATES 67 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
362 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
363 /* YYTRANSLATE(YYLEX) -- Bison symbol number corresponding to YYLEX. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
364 #define YYUNDEFTOK 2 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
365 #define YYMAXUTOK 269 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
366 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
367 #define YYTRANSLATE(YYX) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
368 ((unsigned int) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
369 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
370 /* YYTRANSLATE[YYLEX] -- Bison symbol number corresponding to YYLEX. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
371 static const unsigned char yytranslate[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
372 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
373 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
374 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
375 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
376 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
377 22, 23, 17, 16, 24, 15, 2, 18, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
378 2, 2, 2, 2, 2, 2, 2, 2, 2, 21, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
379 2, 14, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
380 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
381 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
382 2, 2, 2, 2, 20, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
383 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
384 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
385 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
386 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
387 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
388 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
389 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
390 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
391 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
392 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
393 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
394 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
395 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
396 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
397 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
398 2, 2, 2, 2, 2, 2, 1, 2, 3, 4, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
399 5, 6, 7, 8, 9, 10, 11, 12, 13, 19 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
400 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
401 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
402 #if YYDEBUG |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
403 /* YYPRHS[YYN] -- Index of the first RHS symbol of rule number YYN in |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
404 YYRHS. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
405 static const unsigned char yyprhs[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
406 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
407 0, 0, 3, 4, 7, 10, 14, 16, 18, 20, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
408 25, 32, 39, 44, 49, 54, 59, 64, 69, 73, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
409 77, 81, 85, 88, 92 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
410 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
411 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
412 /* YYRHS -- A `-1'-separated list of the rules' RHS. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
413 static const yysigned_char yyrhs[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
414 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
415 26, 0, -1, -1, 26, 27, -1, 28, 21, -1, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
416 4, 14, 29, -1, 3, -1, 4, -1, 28, -1, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
417 5, 22, 29, 23, -1, 6, 22, 29, 24, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
418 23, -1, 7, 22, 29, 24, 29, 23, -1, 8, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
419 22, 29, 23, -1, 9, 22, 29, 23, -1, 10, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
420 22, 29, 23, -1, 11, 22, 29, 23, -1, 12, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
421 22, 29, 23, -1, 13, 22, 29, 23, -1, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
422 16, 29, -1, 29, 15, 29, -1, 29, 17, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
423 -1, 29, 18, 29, -1, 15, 29, -1, 29, 20, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
424 29, -1, 22, 29, 23, -1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
425 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
426 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
427 /* YYRLINE[YYN] -- source line where rule number YYN was defined. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
428 static const unsigned short int yyrline[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
429 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
430 0, 100, 100, 102, 106, 122, 138, 152, 166, 167, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
431 179, 191, 205, 219, 233, 247, 261, 275, 289, 302, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
432 314, 327, 340, 353, 366 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
433 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
434 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
435 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
436 #if YYDEBUG || YYERROR_VERBOSE || YYTOKEN_TABLE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
437 /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
438 First, the terminals, then, starting at YYNTOKENS, nonterminals. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
439 static const char *const yytname[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
440 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
441 "$end", "error", "$undefined", "CONSTANT", "VARIABLE", "ABS_FUNC", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
442 "MAX_FUNC", "MIN_FUNC", "SIN_FUNC", "COS_FUNC", "TAN_FUNC", "ASIN_FUNC", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
443 "ACOS_FUNC", "ATAN_FUNC", "'='", "'-'", "'+'", "'*'", "'/'", "NEG", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
444 "'^'", "';'", "'('", "')'", "','", "$accept", "script", "statement", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
445 "equation", "expression", 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
446 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
447 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
448 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
449 # ifdef YYPRINT |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
450 /* YYTOKNUM[YYLEX-NUM] -- Internal token number corresponding to |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
451 token YYLEX-NUM. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
452 static const unsigned short int yytoknum[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
453 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
454 0, 256, 257, 258, 259, 260, 261, 262, 263, 264, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
455 265, 266, 267, 268, 61, 45, 43, 42, 47, 269, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
456 94, 59, 40, 41, 44 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
457 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
458 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
459 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
460 /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
461 static const unsigned char yyr1[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
462 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
463 0, 25, 26, 26, 27, 28, 29, 29, 29, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
464 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
465 29, 29, 29, 29, 29 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
466 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
467 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
468 /* YYR2[YYN] -- Number of symbols composing right hand side of rule YYN. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
469 static const unsigned char yyr2[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
470 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
471 0, 2, 0, 2, 2, 3, 1, 1, 1, 4, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
472 6, 6, 4, 4, 4, 4, 4, 4, 3, 3, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
473 3, 3, 2, 3, 3 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
474 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
475 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
476 /* YYDEFACT[STATE-NAME] -- Default rule to reduce with in state |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
477 STATE-NUM when YYTABLE doesn't specify something else to do. Zero |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
478 means the default is an error. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
479 static const unsigned char yydefact[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
480 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
481 2, 0, 1, 0, 3, 0, 0, 4, 6, 7, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
482 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
483 0, 8, 5, 0, 0, 0, 0, 0, 0, 0, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
484 0, 0, 22, 0, 0, 0, 0, 0, 0, 0, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
485 0, 0, 0, 0, 0, 0, 0, 0, 24, 19, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
486 18, 20, 21, 23, 9, 0, 0, 12, 13, 14, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
487 15, 16, 17, 0, 0, 10, 11 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
488 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
489 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
490 /* YYDEFGOTO[NTERM-NUM]. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
491 static const yysigned_char yydefgoto[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
492 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
493 -1, 1, 4, 21, 22 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
494 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
495 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
496 /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
497 STATE-NUM. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
498 #define YYPACT_NINF -20 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
499 static const short int yypact[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
500 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
501 -20, 31, -20, -12, -20, -18, 17, -20, -20, -12, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
502 -9, -8, 11, 12, 16, 22, 24, 26, 32, 17, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
503 17, -20, 135, 17, 17, 17, 17, 17, 17, 17, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
504 17, 17, 27, 45, 17, 17, 17, 17, 17, 54, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
505 25, 35, 63, 72, 81, 90, 99, 108, -20, 139, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
506 139, 27, 27, 27, -20, 17, 17, -20, -20, -20, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
507 -20, -20, -20, 117, 126, -20, -20 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
508 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
509 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
510 /* YYPGOTO[NTERM-NUM]. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
511 static const yysigned_char yypgoto[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
512 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
513 -20, -20, -20, 55, -19 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
514 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
515 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
516 /* YYTABLE[YYPACT[STATE-NUM]]. What to do in state STATE-NUM. If |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
517 positive, shift that token. If negative, reduce the rule which |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
518 number is the opposite. If zero, do what YYDEFACT says. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
519 If YYTABLE_NINF, syntax error. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
520 #define YYTABLE_NINF -1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
521 static const unsigned char yytable[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
522 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
523 32, 33, 6, 7, 39, 40, 41, 42, 43, 44, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
524 45, 46, 47, 23, 24, 49, 50, 51, 52, 53, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
525 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
526 18, 2, 19, 25, 26, 3, 63, 64, 27, 20, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
527 34, 35, 36, 37, 28, 38, 29, 38, 30, 55, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
528 34, 35, 36, 37, 31, 38, 5, 0, 0, 56, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
529 34, 35, 36, 37, 0, 38, 0, 0, 48, 34, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
530 35, 36, 37, 0, 38, 0, 0, 54, 34, 35, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
531 36, 37, 0, 38, 0, 0, 57, 34, 35, 36, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
532 37, 0, 38, 0, 0, 58, 34, 35, 36, 37, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
533 0, 38, 0, 0, 59, 34, 35, 36, 37, 0, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
534 38, 0, 0, 60, 34, 35, 36, 37, 0, 38, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
535 0, 0, 61, 34, 35, 36, 37, 0, 38, 0, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
536 0, 62, 34, 35, 36, 37, 0, 38, 0, 0, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
537 65, 34, 35, 36, 37, 0, 38, 0, 0, 66, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
538 34, 35, 36, 37, 0, 38, 36, 37, 0, 38 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
539 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
540 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
541 static const yysigned_char yycheck[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
542 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
543 19, 20, 14, 21, 23, 24, 25, 26, 27, 28, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
544 29, 30, 31, 22, 22, 34, 35, 36, 37, 38, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
545 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
546 13, 0, 15, 22, 22, 4, 55, 56, 22, 22, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
547 15, 16, 17, 18, 22, 20, 22, 20, 22, 24, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
548 15, 16, 17, 18, 22, 20, 1, -1, -1, 24, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
549 15, 16, 17, 18, -1, 20, -1, -1, 23, 15, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
550 16, 17, 18, -1, 20, -1, -1, 23, 15, 16, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
551 17, 18, -1, 20, -1, -1, 23, 15, 16, 17, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
552 18, -1, 20, -1, -1, 23, 15, 16, 17, 18, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
553 -1, 20, -1, -1, 23, 15, 16, 17, 18, -1, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
554 20, -1, -1, 23, 15, 16, 17, 18, -1, 20, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
555 -1, -1, 23, 15, 16, 17, 18, -1, 20, -1, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
556 -1, 23, 15, 16, 17, 18, -1, 20, -1, -1, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
557 23, 15, 16, 17, 18, -1, 20, -1, -1, 23, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
558 15, 16, 17, 18, -1, 20, 17, 18, -1, 20 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
559 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
560 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
561 /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
562 symbol of state STATE-NUM. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
563 static const unsigned char yystos[] = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
564 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
565 0, 26, 0, 4, 27, 28, 14, 21, 3, 4, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
566 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
567 22, 28, 29, 22, 22, 22, 22, 22, 22, 22, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
568 22, 22, 29, 29, 15, 16, 17, 18, 20, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
569 29, 29, 29, 29, 29, 29, 29, 29, 23, 29, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
570 29, 29, 29, 29, 23, 24, 24, 23, 23, 23, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
571 23, 23, 23, 29, 29, 23, 23 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
572 }; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
573 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
574 #define yyerrok (yyerrstatus = 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
575 #define yyclearin (yychar = YYEMPTY) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
576 #define YYEMPTY (-2) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
577 #define YYEOF 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
578 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
579 #define YYACCEPT goto yyacceptlab |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
580 #define YYABORT goto yyabortlab |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
581 #define YYERROR goto yyerrorlab |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
582 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
583 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
584 /* Like YYERROR except do call yyerror. This remains here temporarily |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
585 to ease the transition to the new meaning of YYERROR, for GCC. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
586 Once GCC version 2 has supplanted version 1, this can go. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
587 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
588 #define YYFAIL goto yyerrlab |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
589 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
590 #define YYRECOVERING() (!!yyerrstatus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
591 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
592 #define YYBACKUP(Token, Value) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
593 do \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
594 if (yychar == YYEMPTY && yylen == 1) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
595 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
596 yychar = (Token); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
597 yylval = (Value); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
598 yytoken = YYTRANSLATE (yychar); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
599 YYPOPSTACK; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
600 goto yybackup; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
601 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
602 else \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
603 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
604 yyerror (YY_("syntax error: cannot back up")); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
605 YYERROR; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
606 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
607 while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
608 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
609 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
610 #define YYTERROR 1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
611 #define YYERRCODE 256 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
612 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
613 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
614 /* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N]. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
615 If N is 0, then set CURRENT to the empty location which ends |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
616 the previous symbol: RHS[0] (always defined). */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
617 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
618 #define YYRHSLOC(Rhs, K) ((Rhs)[K]) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
619 #ifndef YYLLOC_DEFAULT |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
620 # define YYLLOC_DEFAULT(Current, Rhs, N) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
621 do \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
622 if (N) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
623 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
624 (Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
625 (Current).first_column = YYRHSLOC (Rhs, 1).first_column; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
626 (Current).last_line = YYRHSLOC (Rhs, N).last_line; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
627 (Current).last_column = YYRHSLOC (Rhs, N).last_column; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
628 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
629 else \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
630 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
631 (Current).first_line = (Current).last_line = \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
632 YYRHSLOC (Rhs, 0).last_line; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
633 (Current).first_column = (Current).last_column = \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
634 YYRHSLOC (Rhs, 0).last_column; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
635 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
636 while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
637 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
638 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
639 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
640 /* YY_LOCATION_PRINT -- Print the location on the stream. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
641 This macro was not mandated originally: define only if we know |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
642 we won't break user code: when these are the locations we know. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
643 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
644 #ifndef YY_LOCATION_PRINT |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
645 # if YYLTYPE_IS_TRIVIAL |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
646 # define YY_LOCATION_PRINT(File, Loc) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
647 fprintf (File, "%d.%d-%d.%d", \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
648 (Loc).first_line, (Loc).first_column, \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
649 (Loc).last_line, (Loc).last_column) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
650 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
651 # define YY_LOCATION_PRINT(File, Loc) ((void) 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
652 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
653 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
654 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
655 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
656 /* YYLEX -- calling `yylex' with the right arguments. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
657 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
658 #ifdef YYLEX_PARAM |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
659 # define YYLEX yylex (YYLEX_PARAM) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
660 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
661 # define YYLEX yylex () |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
662 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
663 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
664 /* Enable debugging if requested. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
665 #if YYDEBUG |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
666 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
667 # ifndef YYFPRINTF |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
668 # include <stdio.h> /* INFRINGES ON USER NAME SPACE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
669 # define YYFPRINTF fprintf |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
670 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
671 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
672 # define YYDPRINTF(Args) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
673 do { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
674 if (yydebug) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
675 YYFPRINTF Args; \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
676 } while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
677 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
678 # define YY_SYMBOL_PRINT(Title, Type, Value, Location) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
679 do { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
680 if (yydebug) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
681 { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
682 YYFPRINTF (stderr, "%s ", Title); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
683 yysymprint (stderr, \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
684 Type, Value); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
685 YYFPRINTF (stderr, "\n"); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
686 } \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
687 } while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
688 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
689 /*------------------------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
690 | yy_stack_print -- Print the state stack from its BOTTOM up to its | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
691 | TOP (included). | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
692 `------------------------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
693 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
694 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
695 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
696 yy_stack_print (short int *bottom, short int *top) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
697 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
698 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
699 yy_stack_print (bottom, top) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
700 short int *bottom; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
701 short int *top; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
702 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
703 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
704 YYFPRINTF (stderr, "Stack now"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
705 for (/* Nothing. */; bottom <= top; ++bottom) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
706 YYFPRINTF (stderr, " %d", *bottom); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
707 YYFPRINTF (stderr, "\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
708 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
709 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
710 # define YY_STACK_PRINT(Bottom, Top) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
711 do { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
712 if (yydebug) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
713 yy_stack_print ((Bottom), (Top)); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
714 } while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
715 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
716 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
717 /*------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
718 | Report that the YYRULE is going to be reduced. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
719 `------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
720 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
721 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
722 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
723 yy_reduce_print (int yyrule) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
724 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
725 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
726 yy_reduce_print (yyrule) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
727 int yyrule; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
728 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
729 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
730 int yyi; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
731 unsigned long int yylno = yyrline[yyrule]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
732 YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu), ", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
733 yyrule - 1, yylno); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
734 /* Print the symbols being reduced, and their result. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
735 for (yyi = yyprhs[yyrule]; 0 <= yyrhs[yyi]; yyi++) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
736 YYFPRINTF (stderr, "%s ", yytname[yyrhs[yyi]]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
737 YYFPRINTF (stderr, "-> %s\n", yytname[yyr1[yyrule]]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
738 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
739 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
740 # define YY_REDUCE_PRINT(Rule) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
741 do { \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
742 if (yydebug) \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
743 yy_reduce_print (Rule); \ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
744 } while (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
745 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
746 /* Nonzero means print parse trace. It is left uninitialized so that |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
747 multiple parsers can coexist. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
748 int yydebug; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
749 #else /* !YYDEBUG */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
750 # define YYDPRINTF(Args) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
751 # define YY_SYMBOL_PRINT(Title, Type, Value, Location) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
752 # define YY_STACK_PRINT(Bottom, Top) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
753 # define YY_REDUCE_PRINT(Rule) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
754 #endif /* !YYDEBUG */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
755 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
756 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
757 /* YYINITDEPTH -- initial size of the parser's stacks. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
758 #ifndef YYINITDEPTH |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
759 # define YYINITDEPTH 200 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
760 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
761 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
762 /* YYMAXDEPTH -- maximum size the stacks can grow to (effective only |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
763 if the built-in stack extension method is used). |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
764 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
765 Do not make this value too large; the results are undefined if |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
766 YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
767 evaluated with infinite-precision integer arithmetic. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
768 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
769 #ifndef YYMAXDEPTH |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
770 # define YYMAXDEPTH 10000 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
771 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
772 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
773 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
774 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
775 #if YYERROR_VERBOSE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
776 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
777 # ifndef yystrlen |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
778 # if defined (__GLIBC__) && defined (_STRING_H) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
779 # define yystrlen strlen |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
780 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
781 /* Return the length of YYSTR. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
782 static YYSIZE_T |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
783 # if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
784 yystrlen (const char *yystr) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
785 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
786 yystrlen (yystr) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
787 const char *yystr; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
788 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
789 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
790 const char *yys = yystr; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
791 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
792 while (*yys++ != '\0') |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
793 continue; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
794 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
795 return yys - yystr - 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
796 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
797 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
798 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
799 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
800 # ifndef yystpcpy |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
801 # if defined (__GLIBC__) && defined (_STRING_H) && defined (_GNU_SOURCE) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
802 # define yystpcpy stpcpy |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
803 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
804 /* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
805 YYDEST. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
806 static char * |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
807 # if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
808 yystpcpy (char *yydest, const char *yysrc) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
809 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
810 yystpcpy (yydest, yysrc) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
811 char *yydest; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
812 const char *yysrc; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
813 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
814 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
815 char *yyd = yydest; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
816 const char *yys = yysrc; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
817 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
818 while ((*yyd++ = *yys++) != '\0') |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
819 continue; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
820 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
821 return yyd - 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
822 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
823 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
824 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
825 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
826 # ifndef yytnamerr |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
827 /* Copy to YYRES the contents of YYSTR after stripping away unnecessary |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
828 quotes and backslashes, so that it's suitable for yyerror. The |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
829 heuristic is that double-quoting is unnecessary unless the string |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
830 contains an apostrophe, a comma, or backslash (other than |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
831 backslash-backslash). YYSTR is taken from yytname. If YYRES is |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
832 null, do not copy; instead, return the length of what the result |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
833 would have been. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
834 static YYSIZE_T |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
835 yytnamerr (char *yyres, const char *yystr) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
836 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
837 if (*yystr == '"') |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
838 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
839 size_t yyn = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
840 char const *yyp = yystr; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
841 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
842 for (;;) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
843 switch (*++yyp) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
844 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
845 case '\'': |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
846 case ',': |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
847 goto do_not_strip_quotes; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
848 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
849 case '\\': |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
850 if (*++yyp != '\\') |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
851 goto do_not_strip_quotes; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
852 /* Fall through. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
853 default: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
854 if (yyres) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
855 yyres[yyn] = *yyp; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
856 yyn++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
857 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
858 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
859 case '"': |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
860 if (yyres) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
861 yyres[yyn] = '\0'; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
862 return yyn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
863 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
864 do_not_strip_quotes: ; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
865 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
866 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
867 if (! yyres) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
868 return yystrlen (yystr); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
869 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
870 return yystpcpy (yyres, yystr) - yyres; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
871 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
872 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
873 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
874 #endif /* YYERROR_VERBOSE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
875 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
876 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
877 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
878 #if YYDEBUG |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
879 /*--------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
880 | Print this symbol on YYOUTPUT. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
881 `--------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
882 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
883 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
884 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
885 yysymprint (FILE *yyoutput, int yytype, YYSTYPE *yyvaluep) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
886 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
887 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
888 yysymprint (yyoutput, yytype, yyvaluep) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
889 FILE *yyoutput; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
890 int yytype; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
891 YYSTYPE *yyvaluep; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
892 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
893 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
894 /* Pacify ``unused variable'' warnings. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
895 (void) yyvaluep; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
896 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
897 if (yytype < YYNTOKENS) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
898 YYFPRINTF (yyoutput, "token %s (", yytname[yytype]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
899 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
900 YYFPRINTF (yyoutput, "nterm %s (", yytname[yytype]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
901 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
902 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
903 # ifdef YYPRINT |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
904 if (yytype < YYNTOKENS) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
905 YYPRINT (yyoutput, yytoknum[yytype], *yyvaluep); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
906 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
907 switch (yytype) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
908 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
909 default: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
910 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
911 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
912 YYFPRINTF (yyoutput, ")"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
913 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
914 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
915 #endif /* ! YYDEBUG */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
916 /*-----------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
917 | Release the memory associated to this symbol. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
918 `-----------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
919 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
920 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
921 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
922 yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
923 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
924 static void |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
925 yydestruct (yymsg, yytype, yyvaluep) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
926 const char *yymsg; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
927 int yytype; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
928 YYSTYPE *yyvaluep; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
929 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
930 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
931 /* Pacify ``unused variable'' warnings. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
932 (void) yyvaluep; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
933 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
934 if (!yymsg) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
935 yymsg = "Deleting"; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
936 YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
937 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
938 switch (yytype) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
939 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
940 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
941 default: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
942 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
943 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
944 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
945 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
946 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
947 /* Prevent warnings from -Wmissing-prototypes. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
948 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
949 #ifdef YYPARSE_PARAM |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
950 # if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
951 int yyparse (void *YYPARSE_PARAM); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
952 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
953 int yyparse (); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
954 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
955 #else /* ! YYPARSE_PARAM */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
956 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
957 int yyparse (void); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
958 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
959 int yyparse (); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
960 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
961 #endif /* ! YYPARSE_PARAM */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
962 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
963 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
964 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
965 /* The look-ahead symbol. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
966 int yychar; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
967 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
968 /* The semantic value of the look-ahead symbol. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
969 YYSTYPE yylval; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
970 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
971 /* Number of syntax errors so far. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
972 int yynerrs; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
973 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
974 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
975 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
976 /*----------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
977 | yyparse. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
978 `----------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
979 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
980 #ifdef YYPARSE_PARAM |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
981 # if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
982 int yyparse (void *YYPARSE_PARAM) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
983 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
984 int yyparse (YYPARSE_PARAM) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
985 void *YYPARSE_PARAM; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
986 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
987 #else /* ! YYPARSE_PARAM */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
988 #if defined (__STDC__) || defined (__cplusplus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
989 int |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
990 yyparse (void) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
991 #else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
992 int |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
993 yyparse () |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
994 ; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
995 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
996 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
997 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
998 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
999 int yystate; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1000 int yyn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1001 int yyresult; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1002 /* Number of tokens to shift before error messages enabled. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1003 int yyerrstatus; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1004 /* Look-ahead token as an internal (translated) token number. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1005 int yytoken = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1006 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1007 /* Three stacks and their tools: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1008 `yyss': related to states, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1009 `yyvs': related to semantic values, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1010 `yyls': related to locations. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1011 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1012 Refer to the stacks thru separate pointers, to allow yyoverflow |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1013 to reallocate them elsewhere. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1014 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1015 /* The state stack. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1016 short int yyssa[YYINITDEPTH]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1017 short int *yyss = yyssa; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1018 short int *yyssp; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1019 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1020 /* The semantic value stack. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1021 YYSTYPE yyvsa[YYINITDEPTH]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1022 YYSTYPE *yyvs = yyvsa; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1023 YYSTYPE *yyvsp; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1024 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1025 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1026 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1027 #define YYPOPSTACK (yyvsp--, yyssp--) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1028 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1029 YYSIZE_T yystacksize = YYINITDEPTH; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1030 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1031 /* The variables used to return semantic value and location from the |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1032 action routines. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1033 YYSTYPE yyval; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1034 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1035 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1036 /* When reducing, the number of symbols on the RHS of the reduced |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1037 rule. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1038 int yylen; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1039 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1040 YYDPRINTF ((stderr, "Starting parse\n")); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1041 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1042 yystate = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1043 yyerrstatus = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1044 yynerrs = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1045 yychar = YYEMPTY; /* Cause a token to be read. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1046 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1047 /* Initialize stack pointers. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1048 Waste one element of value and location stack |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1049 so that they stay on the same level as the state stack. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1050 The wasted elements are never initialized. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1051 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1052 yyssp = yyss; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1053 yyvsp = yyvs; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1054 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1055 goto yysetstate; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1056 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1057 /*------------------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1058 | yynewstate -- Push a new state, which is found in yystate. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1059 `------------------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1060 yynewstate: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1061 /* In all cases, when you get here, the value and location stacks |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1062 have just been pushed. so pushing a state here evens the stacks. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1063 */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1064 yyssp++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1065 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1066 yysetstate: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1067 *yyssp = yystate; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1068 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1069 if (yyss + yystacksize - 1 <= yyssp) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1070 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1071 /* Get the current used size of the three stacks, in elements. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1072 YYSIZE_T yysize = yyssp - yyss + 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1073 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1074 #ifdef yyoverflow |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1075 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1076 /* Give user a chance to reallocate the stack. Use copies of |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1077 these so that the &'s don't force the real ones into |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1078 memory. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1079 YYSTYPE *yyvs1 = yyvs; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1080 short int *yyss1 = yyss; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1081 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1082 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1083 /* Each stack pointer address is followed by the size of the |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1084 data in use in that stack, in bytes. This used to be a |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1085 conditional around just the two extra args, but that might |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1086 be undefined if yyoverflow is a macro. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1087 yyoverflow (YY_("memory exhausted"), |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1088 &yyss1, yysize * sizeof (*yyssp), |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1089 &yyvs1, yysize * sizeof (*yyvsp), |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1090 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1091 &yystacksize); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1092 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1093 yyss = yyss1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1094 yyvs = yyvs1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1095 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1096 #else /* no yyoverflow */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1097 # ifndef YYSTACK_RELOCATE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1098 goto yyexhaustedlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1099 # else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1100 /* Extend the stack our own way. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1101 if (YYMAXDEPTH <= yystacksize) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1102 goto yyexhaustedlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1103 yystacksize *= 2; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1104 if (YYMAXDEPTH < yystacksize) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1105 yystacksize = YYMAXDEPTH; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1106 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1107 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1108 short int *yyss1 = yyss; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1109 union yyalloc *yyptr = |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1110 (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1111 if (! yyptr) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1112 goto yyexhaustedlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1113 YYSTACK_RELOCATE (yyss); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1114 YYSTACK_RELOCATE (yyvs); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1115 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1116 # undef YYSTACK_RELOCATE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1117 if (yyss1 != yyssa) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1118 YYSTACK_FREE (yyss1); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1119 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1120 # endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1121 #endif /* no yyoverflow */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1122 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1123 yyssp = yyss + yysize - 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1124 yyvsp = yyvs + yysize - 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1125 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1126 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1127 YYDPRINTF ((stderr, "Stack size increased to %lu\n", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1128 (unsigned long int) yystacksize)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1129 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1130 if (yyss + yystacksize - 1 <= yyssp) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1131 YYABORT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1132 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1133 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1134 YYDPRINTF ((stderr, "Entering state %d\n", yystate)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1135 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1136 goto yybackup; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1137 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1138 /*-----------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1139 | yybackup. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1140 `-----------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1141 yybackup: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1142 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1143 /* Do appropriate processing given the current state. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1144 /* Read a look-ahead token if we need one and don't already have one. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1145 /* yyresume: */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1146 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1147 /* First try to decide what to do without reference to look-ahead token. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1148 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1149 yyn = yypact[yystate]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1150 if (yyn == YYPACT_NINF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1151 goto yydefault; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1152 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1153 /* Not known => get a look-ahead token if don't already have one. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1154 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1155 /* YYCHAR is either YYEMPTY or YYEOF or a valid look-ahead symbol. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1156 if (yychar == YYEMPTY) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1157 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1158 YYDPRINTF ((stderr, "Reading a token: ")); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1159 yychar = YYLEX; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1160 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1161 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1162 if (yychar <= YYEOF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1163 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1164 yychar = yytoken = YYEOF; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1165 YYDPRINTF ((stderr, "Now at end of input.\n")); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1166 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1167 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1168 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1169 yytoken = YYTRANSLATE (yychar); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1170 YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1171 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1172 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1173 /* If the proper action on seeing token YYTOKEN is to reduce or to |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1174 detect an error, take that action. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1175 yyn += yytoken; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1176 if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1177 goto yydefault; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1178 yyn = yytable[yyn]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1179 if (yyn <= 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1180 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1181 if (yyn == 0 || yyn == YYTABLE_NINF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1182 goto yyerrlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1183 yyn = -yyn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1184 goto yyreduce; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1185 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1186 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1187 if (yyn == YYFINAL) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1188 YYACCEPT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1189 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1190 /* Shift the look-ahead token. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1191 YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1192 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1193 /* Discard the token being shifted unless it is eof. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1194 if (yychar != YYEOF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1195 yychar = YYEMPTY; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1196 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1197 *++yyvsp = yylval; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1198 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1199 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1200 /* Count tokens shifted since error; after three, turn off error |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1201 status. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1202 if (yyerrstatus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1203 yyerrstatus--; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1204 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1205 yystate = yyn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1206 goto yynewstate; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1207 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1208 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1209 /*-----------------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1210 | yydefault -- do the default action for the current state. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1211 `-----------------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1212 yydefault: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1213 yyn = yydefact[yystate]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1214 if (yyn == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1215 goto yyerrlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1216 goto yyreduce; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1217 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1218 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1219 /*-----------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1220 | yyreduce -- Do a reduction. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1221 `-----------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1222 yyreduce: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1223 /* yyn is the number of a rule to reduce with. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1224 yylen = yyr2[yyn]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1225 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1226 /* If YYLEN is nonzero, implement the default value of the action: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1227 `$$ = $1'. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1228 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1229 Otherwise, the following line sets YYVAL to garbage. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1230 This behavior is undocumented and Bison |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1231 users should not rely upon it. Assigning to YYVAL |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1232 unconditionally makes the parser a bit smaller, and it avoids a |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1233 GCC warning that YYVAL may be used uninitialized. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1234 yyval = yyvsp[1-yylen]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1235 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1236 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1237 YY_REDUCE_PRINT (yyn); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1238 switch (yyn) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1239 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1240 case 4: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1241 #line 107 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1242 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1243 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1244 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1245 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1246 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1247 *code_ptr++ = PN_OP_POP; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1248 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1249 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1250 g_print ("POP\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1251 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1252 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1253 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1254 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1255 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1256 case 5: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1257 #line 123 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1258 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1259 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1260 code_size += sizeof (guint) + sizeof (gdouble *); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1261 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1262 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1263 *code_ptr++ = PN_OP_SET; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1264 *code_ptr++ = (guint) (yyvsp[-2].variable); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1265 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1266 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1267 g_print ("SET %s\n", (yyvsp[-2].variable)->name); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1268 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1269 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1270 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1271 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1272 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1273 case 6: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1274 #line 139 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1275 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1276 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1277 code_size += sizeof (guint) + sizeof (gdouble *); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1278 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1279 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1280 *code_ptr++ = PN_OP_PUSHC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1281 *code_ptr++ = GPOINTER_TO_UINT ((yyvsp[0].constant)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1282 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1283 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1284 g_print ("PUSHC %f\n", *(yyvsp[0].constant)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1285 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1286 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1287 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1288 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1289 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1290 case 7: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1291 #line 153 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1292 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1293 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1294 code_size += sizeof (guint) + sizeof (gdouble *); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1295 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1296 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1297 *code_ptr++ = PN_OP_PUSHV; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1298 *code_ptr++ = (guint) (yyvsp[0].variable); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1299 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1300 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1301 g_print ("PUSHV %s\n", (yyvsp[0].variable)->name); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1302 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1303 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1304 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1305 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1306 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1307 case 9: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1308 #line 168 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1309 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1310 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1311 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1312 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1313 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1314 *code_ptr++ = PN_OP_ABS; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1315 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1316 g_print ("ABS\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1317 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1318 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1319 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1320 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1321 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1322 case 10: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1323 #line 180 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1324 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1325 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1326 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1327 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1328 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1329 *code_ptr++ = PN_OP_MAX; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1330 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1331 g_print ("MAX\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1332 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1333 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1334 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1335 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1336 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1337 case 11: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1338 #line 192 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1339 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1340 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1341 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1342 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1343 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1344 *code_ptr++ = PN_OP_MIN; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1345 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1346 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1347 g_print ("MIN\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1348 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1349 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1350 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1351 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1352 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1353 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1354 case 12: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1355 #line 206 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1356 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1357 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1358 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1359 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1360 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1361 *code_ptr++ = PN_OP_SIN; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1362 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1363 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1364 g_print ("SIN\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1365 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1366 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1367 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1368 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1369 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1370 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1371 case 13: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1372 #line 220 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1373 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1374 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1375 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1376 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1377 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1378 *code_ptr++ = PN_OP_COS; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1379 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1380 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1381 g_print ("COS\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1382 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1383 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1384 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1385 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1386 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1387 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1388 case 14: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1389 #line 234 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1390 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1391 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1392 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1393 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1394 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1395 *code_ptr++ = PN_OP_TAN; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1396 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1397 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1398 g_print ("TAN\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1399 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1400 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1401 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1402 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1403 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1404 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1405 case 15: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1406 #line 248 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1407 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1408 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1409 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1410 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1411 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1412 *code_ptr++ = PN_OP_ASIN; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1413 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1414 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1415 g_print ("ASIN\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1416 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1417 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1418 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1419 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1420 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1421 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1422 case 16: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1423 #line 262 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1424 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1425 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1426 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1427 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1428 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1429 *code_ptr++ = PN_OP_ACOS; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1430 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1431 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1432 g_print ("ACOS\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1433 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1434 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1435 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1436 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1437 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1438 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1439 case 17: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1440 #line 276 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1441 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1442 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1443 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1444 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1445 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1446 *code_ptr++ = PN_OP_ATAN; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1447 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1448 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1449 g_print ("ATAN\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1450 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1451 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1452 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1453 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1454 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1455 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1456 case 18: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1457 #line 290 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1458 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1459 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1460 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1461 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1462 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1463 *code_ptr++ = PN_OP_ADD; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1464 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1465 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1466 g_print ("ADD\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1467 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1468 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1469 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1470 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1471 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1472 case 19: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1473 #line 303 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1474 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1475 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1476 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1477 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1478 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1479 *code_ptr++ = PN_OP_SUB; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1480 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1481 g_print ("SUB\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1482 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1483 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1484 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1485 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1486 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1487 case 20: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1488 #line 315 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1489 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1490 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1491 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1492 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1493 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1494 *code_ptr++ = PN_OP_MUL; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1495 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1496 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1497 g_print ("MUL\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1498 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1499 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1500 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1501 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1502 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1503 case 21: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1504 #line 328 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1505 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1506 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1507 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1508 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1509 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1510 *code_ptr++ = PN_OP_DIV; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1511 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1512 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1513 g_print ("DIV\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1514 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1515 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1516 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1517 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1518 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1519 case 22: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1520 #line 341 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1521 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1522 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1523 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1524 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1525 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1526 *code_ptr++ = PN_OP_NEG; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1527 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1528 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1529 g_print ("NEG\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1530 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1531 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1532 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1533 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1534 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1535 case 23: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1536 #line 354 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1537 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1538 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1539 code_size += sizeof (guint); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1540 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1541 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1542 *code_ptr++ = PN_OP_POW; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1543 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1544 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1545 g_print ("POW\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1546 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1547 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1548 ;} |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1549 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1550 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1551 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1552 default: break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1553 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1554 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1555 /* Line 1126 of yacc.c. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1556 #line 1557 "pnscriptparser.tab.c" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1557 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1558 yyvsp -= yylen; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1559 yyssp -= yylen; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1560 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1561 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1562 YY_STACK_PRINT (yyss, yyssp); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1563 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1564 *++yyvsp = yyval; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1565 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1566 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1567 /* Now `shift' the result of the reduction. Determine what state |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1568 that goes to, based on the state we popped back to and the rule |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1569 number reduced by. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1570 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1571 yyn = yyr1[yyn]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1572 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1573 yystate = yypgoto[yyn - YYNTOKENS] + *yyssp; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1574 if (0 <= yystate && yystate <= YYLAST && yycheck[yystate] == *yyssp) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1575 yystate = yytable[yystate]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1576 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1577 yystate = yydefgoto[yyn - YYNTOKENS]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1578 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1579 goto yynewstate; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1580 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1581 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1582 /*------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1583 | yyerrlab -- here on detecting error | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1584 `------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1585 yyerrlab: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1586 /* If not already recovering from an error, report this error. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1587 if (!yyerrstatus) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1588 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1589 ++yynerrs; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1590 #if YYERROR_VERBOSE |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1591 yyn = yypact[yystate]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1592 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1593 if (YYPACT_NINF < yyn && yyn < YYLAST) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1594 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1595 int yytype = YYTRANSLATE (yychar); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1596 YYSIZE_T yysize0 = yytnamerr (0, yytname[yytype]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1597 YYSIZE_T yysize = yysize0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1598 YYSIZE_T yysize1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1599 int yysize_overflow = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1600 char *yymsg = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1601 # define YYERROR_VERBOSE_ARGS_MAXIMUM 5 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1602 char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1603 int yyx; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1604 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1605 #if 0 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1606 /* This is so xgettext sees the translatable formats that are |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1607 constructed on the fly. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1608 YY_("syntax error, unexpected %s"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1609 YY_("syntax error, unexpected %s, expecting %s"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1610 YY_("syntax error, unexpected %s, expecting %s or %s"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1611 YY_("syntax error, unexpected %s, expecting %s or %s or %s"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1612 YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1613 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1614 char *yyfmt; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1615 char const *yyf; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1616 static char const yyunexpected[] = "syntax error, unexpected %s"; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1617 static char const yyexpecting[] = ", expecting %s"; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1618 static char const yyor[] = " or %s"; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1619 char yyformat[sizeof yyunexpected |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1620 + sizeof yyexpecting - 1 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1621 + ((YYERROR_VERBOSE_ARGS_MAXIMUM - 2) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1622 * (sizeof yyor - 1))]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1623 char const *yyprefix = yyexpecting; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1624 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1625 /* Start YYX at -YYN if negative to avoid negative indexes in |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1626 YYCHECK. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1627 int yyxbegin = yyn < 0 ? -yyn : 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1628 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1629 /* Stay within bounds of both yycheck and yytname. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1630 int yychecklim = YYLAST - yyn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1631 int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1632 int yycount = 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1633 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1634 yyarg[0] = yytname[yytype]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1635 yyfmt = yystpcpy (yyformat, yyunexpected); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1636 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1637 for (yyx = yyxbegin; yyx < yyxend; ++yyx) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1638 if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1639 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1640 if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1641 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1642 yycount = 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1643 yysize = yysize0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1644 yyformat[sizeof yyunexpected - 1] = '\0'; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1645 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1646 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1647 yyarg[yycount++] = yytname[yyx]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1648 yysize1 = yysize + yytnamerr (0, yytname[yyx]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1649 yysize_overflow |= yysize1 < yysize; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1650 yysize = yysize1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1651 yyfmt = yystpcpy (yyfmt, yyprefix); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1652 yyprefix = yyor; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1653 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1654 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1655 yyf = YY_(yyformat); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1656 yysize1 = yysize + yystrlen (yyf); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1657 yysize_overflow |= yysize1 < yysize; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1658 yysize = yysize1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1659 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1660 if (!yysize_overflow && yysize <= YYSTACK_ALLOC_MAXIMUM) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1661 yymsg = (char *) YYSTACK_ALLOC (yysize); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1662 if (yymsg) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1663 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1664 /* Avoid sprintf, as that infringes on the user's name space. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1665 Don't have undefined behavior even if the translation |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1666 produced a string with the wrong number of "%s"s. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1667 char *yyp = yymsg; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1668 int yyi = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1669 while ((*yyp = *yyf)) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1670 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1671 if (*yyp == '%' && yyf[1] == 's' && yyi < yycount) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1672 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1673 yyp += yytnamerr (yyp, yyarg[yyi++]); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1674 yyf += 2; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1675 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1676 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1677 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1678 yyp++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1679 yyf++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1680 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1681 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1682 yyerror (yymsg); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1683 YYSTACK_FREE (yymsg); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1684 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1685 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1686 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1687 yyerror (YY_("syntax error")); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1688 goto yyexhaustedlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1689 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1690 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1691 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1692 #endif /* YYERROR_VERBOSE */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1693 yyerror (YY_("syntax error")); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1694 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1695 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1696 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1697 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1698 if (yyerrstatus == 3) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1699 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1700 /* If just tried and failed to reuse look-ahead token after an |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1701 error, discard it. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1702 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1703 if (yychar <= YYEOF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1704 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1705 /* Return failure if at end of input. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1706 if (yychar == YYEOF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1707 YYABORT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1708 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1709 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1710 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1711 yydestruct ("Error: discarding", yytoken, &yylval); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1712 yychar = YYEMPTY; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1713 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1714 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1715 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1716 /* Else will try to reuse look-ahead token after shifting the error |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1717 token. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1718 goto yyerrlab1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1719 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1720 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1721 /*---------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1722 | yyerrorlab -- error raised explicitly by YYERROR. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1723 `---------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1724 yyerrorlab: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1725 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1726 /* Pacify compilers like GCC when the user code never invokes |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1727 YYERROR and the label yyerrorlab therefore never appears in user |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1728 code. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1729 if (0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1730 goto yyerrorlab; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1731 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1732 yyvsp -= yylen; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1733 yyssp -= yylen; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1734 yystate = *yyssp; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1735 goto yyerrlab1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1736 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1737 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1738 /*-------------------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1739 | yyerrlab1 -- common code for both syntax error and YYERROR. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1740 `-------------------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1741 yyerrlab1: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1742 yyerrstatus = 3; /* Each real token shifted decrements this. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1743 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1744 for (;;) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1745 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1746 yyn = yypact[yystate]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1747 if (yyn != YYPACT_NINF) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1748 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1749 yyn += YYTERROR; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1750 if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1751 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1752 yyn = yytable[yyn]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1753 if (0 < yyn) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1754 break; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1755 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1756 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1757 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1758 /* Pop the current state because it cannot handle the error token. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1759 if (yyssp == yyss) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1760 YYABORT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1761 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1762 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1763 yydestruct ("Error: popping", yystos[yystate], yyvsp); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1764 YYPOPSTACK; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1765 yystate = *yyssp; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1766 YY_STACK_PRINT (yyss, yyssp); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1767 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1768 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1769 if (yyn == YYFINAL) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1770 YYACCEPT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1771 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1772 *++yyvsp = yylval; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1773 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1774 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1775 /* Shift the error token. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1776 YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1777 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1778 yystate = yyn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1779 goto yynewstate; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1780 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1781 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1782 /*-------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1783 | yyacceptlab -- YYACCEPT comes here. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1784 `-------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1785 yyacceptlab: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1786 yyresult = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1787 goto yyreturn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1788 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1789 /*-----------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1790 | yyabortlab -- YYABORT comes here. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1791 `-----------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1792 yyabortlab: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1793 yyresult = 1; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1794 goto yyreturn; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1795 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1796 #ifndef yyoverflow |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1797 /*-------------------------------------------------. |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1798 | yyexhaustedlab -- memory exhaustion comes here. | |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1799 `-------------------------------------------------*/ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1800 yyexhaustedlab: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1801 yyerror (YY_("memory exhausted")); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1802 yyresult = 2; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1803 /* Fall through. */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1804 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1805 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1806 yyreturn: |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1807 if (yychar != YYEOF && yychar != YYEMPTY) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1808 yydestruct ("Cleanup: discarding lookahead", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1809 yytoken, &yylval); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1810 while (yyssp != yyss) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1811 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1812 yydestruct ("Cleanup: popping", |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1813 yystos[*yyssp], yyvsp); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1814 YYPOPSTACK; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1815 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1816 #ifndef yyoverflow |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1817 if (yyss != yyssa) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1818 YYSTACK_FREE (yyss); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1819 #endif |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1820 return yyresult; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1821 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1822 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1823 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1824 #line 369 "pnscriptparser.y" |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1825 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1826 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1827 static gdouble |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1828 get_named_constant_value (const gchar *name) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1829 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1830 if (g_strcasecmp (name, "pi") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1831 return G_PI; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1832 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1833 /* This is a failure, so don't make a "zero" :) */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1834 return 0.0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1835 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1836 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1837 static guint |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1838 get_function_token_type (const gchar *name) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1839 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1840 if (g_strcasecmp (name, "abs") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1841 return ABS_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1842 if (g_strcasecmp (name, "max") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1843 return MAX_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1844 if (g_strcasecmp (name, "min") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1845 return MIN_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1846 if (g_strcasecmp (name, "sin") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1847 return SIN_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1848 if (g_strcasecmp (name, "cos") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1849 return COS_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1850 if (g_strcasecmp (name, "tan") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1851 return TAN_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1852 if (g_strcasecmp (name, "asin") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1853 return ASIN_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1854 if (g_strcasecmp (name, "acos") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1855 return ACOS_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1856 if (g_strcasecmp (name, "atan") == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1857 return ATAN_FUNC; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1858 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1859 return 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1860 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1861 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1862 static gdouble* |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1863 get_constant_ptr (gdouble value) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1864 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1865 guint i; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1866 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1867 if (size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1868 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1869 for (i=0; i<temp_constant_table->len; i++) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1870 if (g_array_index (temp_constant_table, gdouble, i) == value) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1871 return (gdouble *) TRUE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1872 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1873 /* Add a constant */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1874 g_array_append_val (temp_constant_table, value); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1875 return (gdouble *) TRUE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1876 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1877 else |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1878 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1879 for (i=0; i<temp_constant_table->len; i++) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1880 if (parse_script->constant_table[i] == value) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1881 return &parse_script->constant_table[i]; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1882 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1883 return NULL; /* This should never be reached */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1884 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1885 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1886 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1887 int |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1888 yylex (void) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1889 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1890 /* Skip whitespaces */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1891 while (isspace (*parse_string)) parse_string++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1892 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1893 /* Handle the end of the string */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1894 if (*parse_string == '\0') |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1895 return 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1896 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1897 /* Handle unnamed (numeric) constants */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1898 if (*parse_string == '.' || isdigit (*parse_string)) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1899 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1900 gdouble value; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1901 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1902 value = strtod (parse_string, (char **) &parse_string); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1903 yylval.constant = get_constant_ptr (value); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1904 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1905 return CONSTANT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1906 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1907 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1908 /* Handle alphanumeric symbols */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1909 if (isalpha (*parse_string)) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1910 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1911 const gchar *symbol_start = parse_string; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1912 guint function_token; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1913 gchar *symbol_name; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1914 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1915 while (isalnum (*parse_string) || *parse_string == '_') parse_string++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1916 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1917 symbol_name = g_strndup (symbol_start, parse_string - symbol_start); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1918 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1919 /* Handle a named constant (e.g. 'pi') */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1920 if (get_named_constant_value (symbol_name)) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1921 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1922 yylval.constant = get_constant_ptr (get_named_constant_value (symbol_name)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1923 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1924 g_free (symbol_name); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1925 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1926 return CONSTANT; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1927 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1928 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1929 /* Handle a function (e.g. 'max') */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1930 if ((function_token = get_function_token_type (symbol_name))) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1931 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1932 g_free (symbol_name); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1933 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1934 return function_token; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1935 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1936 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1937 /* Handle a variable */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1938 if (! size_pass) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1939 yylval.variable = pn_symbol_table_ref_variable_by_name (parse_script->symbol_table, |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1940 symbol_name); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1941 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1942 g_free (symbol_name); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1943 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1944 return VARIABLE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1945 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1946 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1947 /* Handle a single-character symbol (or invalid tokens) */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1948 return *parse_string++; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1949 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1950 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1951 int |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1952 yyerror (char *s) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1953 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1954 parse_failed = TRUE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1955 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1956 return 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1957 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1958 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1959 gboolean |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1960 pn_script_internal_parse_string (PnScript *script, const gchar *string) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1961 { |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1962 guint i; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1963 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1964 g_return_val_if_fail (script != NULL, FALSE); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1965 g_return_val_if_fail (PN_IS_SCRIPT (script), FALSE); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1966 g_return_val_if_fail (string != NULL, FALSE); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1967 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1968 /* Make a new temp constant table if needed */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1969 if (! temp_constant_table) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1970 temp_constant_table = g_array_new (FALSE, FALSE, sizeof (gdouble)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1971 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1972 parse_failed = FALSE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1973 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1974 parse_script = script; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1975 parse_string = string; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1976 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1977 /* First determine the code size */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1978 size_pass = TRUE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1979 code_size = 0; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1980 yyparse (); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1981 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1982 if (parse_failed) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1983 return FALSE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1984 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1985 if (code_size == 0) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1986 return TRUE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1987 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1988 /* Now generate the real code */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1989 size_pass = FALSE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1990 parse_string = string; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1991 script->code = g_malloc (code_size); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1992 script->constant_table = g_malloc (temp_constant_table->len * sizeof (gdouble)); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1993 for (i=0; i<temp_constant_table->len; i++) |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1994 script->constant_table[i] = g_array_index (temp_constant_table, gdouble, i); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1995 code_ptr = script->code; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1996 yyparse (); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1997 g_array_set_size (temp_constant_table, 0); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1998 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
1999 /* Terminate the script, replacing the last POP with an END */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2000 *(code_ptr-1) = PN_OP_END; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2001 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2002 #ifdef PN_PRINT_OPS |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2003 g_print ("END\n"); |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2004 #endif /* PN_PRINT_OPS */ |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2005 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2006 return TRUE; |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2007 } |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2008 |
aa1e05d66f6d
[svn] - it might help if i actually ran bison on the script parser eh :)
nenolod
parents:
diff
changeset
|
2009 |