📄 lp.c
字号:
/* A Bison parser, made from lp.y by GNU Bison version 1.28 */#define YYBISON 1 /* Identify Bison output. */#define VAR 257#define CONS 258#define SIGN 259#define AR_M_OP 260#define RE_OP 261#define END_C 262#define COMMA 263#define COLON 264#define MINIMISE 265#define MAXIMISE 266#line 9 "lp.y"#include "lpkit.h" #include "lpglob.h"#include "read.h"/* globals */char Last_var[NAMELEN];char Constraint_name[NAMELEN];int Lin_term_count;REAL f;int x;int Sign;int isign; /* internal_sign variable to make sure nothing goes wrong */ /* with lookahead */int make_neg; /* is true after the relational operator is seen in order */ /* to remember if lin_term stands before or after re_op */int Within_int_decl = FALSE; /* TRUE when we are within an int declaration */#ifndef YYSTYPE#define YYSTYPE int#endif#include <stdio.h>#ifndef __cplusplus#ifndef __STDC__#define const#endif#endif#define YYFINAL 60#define YYFLAG -32768#define YYNTBASE 13#define YYTRANSLATE(x) ((unsigned)(x) <= 266 ? yytranslate[x] : 35)static const char yytranslate[] = { 0, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12};#if YYDEBUG != 0static const short yyprhs[] = { 0, 0, 1, 6, 8, 11, 13, 14, 19, 20, 26, 27, 29, 31, 34, 38, 40, 42, 45, 49, 51, 52, 56, 57, 62, 64, 66, 68, 69, 73, 74, 79, 81, 84, 88, 91, 94, 96, 99};static const short yyrhs[] = { -1, 14, 33, 15, 20, 0, 16, 0, 15, 16, 0, 18, 0, 0, 3, 10, 17, 18, 0, 0, 25, 7, 19, 25, 8, 0, 0, 21, 0, 22, 0, 21, 22, 0, 23, 24, 8, 0, 3, 0, 3, 0, 24, 3, 0, 24, 9, 3, 0, 28, 0, 0, 5, 26, 28, 0, 0, 25, 5, 27, 28, 0, 32, 0, 4, 0, 32, 0, 0, 5, 30, 32, 0, 0, 29, 5, 31, 32, 0, 3, 0, 4, 3, 0, 4, 6, 3, 0, 12, 34, 0, 11, 34, 0, 34, 0, 29, 8, 0, 8, 0};#endif#if YYDEBUG != 0static const short yyrline[] = { 0, 33, 41, 45, 46, 50, 51, 56, 59, 66, 87, 88, 91, 92, 95, 98, 101, 102, 103, 106, 107, 112, 112, 118, 120, 121, 131, 132, 137, 137, 143, 145, 154, 163, 175, 179, 183, 186, 194};#endif#if YYDEBUG != 0 || defined (YYERROR_VERBOSE)static const char * const yytname[] = { "$","error","$undefined.","VAR","CONS","SIGN","AR_M_OP","RE_OP","END_C","COMMA","COLON","MINIMISE","MAXIMISE","inputfile","@1","constraints","constraint","@2","real_constraint","@3","int_declarations","real_int_decls","int_declaration","int_declarator","vars","x_lineair_sum","@4","@5","x_lineair_term","lineair_sum","@6","@7","lineair_term","objective_function","real_of", NULL};#endifstatic const short yyr1[] = { 0, 14, 13, 15, 15, 16, 17, 16, 19, 18, 20, 20, 21, 21, 22, 23, 24, 24, 24, 25, 26, 25, 27, 25, 28, 28, 29, 30, 29, 31, 29, 32, 32, 32, 33, 33, 33, 34, 34};static const short yyr2[] = { 0, 0, 4, 1, 2, 1, 0, 4, 0, 5, 0, 1, 1, 2, 3, 1, 1, 2, 3, 1, 0, 3, 0, 4, 1, 1, 1, 0, 3, 0, 4, 1, 2, 3, 2, 2, 1, 2, 1};static const short yydefact[] = { 1, 0, 31, 0, 27, 38, 0, 0, 0, 26, 0, 36, 32, 0, 0, 35, 34, 29, 37, 31, 25, 20, 10, 3, 5, 0, 19, 24, 33, 28, 0, 6, 0, 31, 4, 2, 11, 12, 0, 22, 8, 30, 0, 21, 15, 13, 16, 0, 0, 0, 7, 17, 14, 0, 23, 0, 18, 9, 0, 0, 0};static const short yydefgoto[] = { 58, 1, 22, 23, 42, 24, 49, 35, 36, 37, 38, 47, 25, 32, 48, 26, 8, 14, 30, 27, 10, 11};static const short yypact[] = {-32768, 4,-32768, 21,-32768,-32768, 18, 18, 20,-32768, 31,-32768,-32768, 8, 28,-32768,-32768,-32768,-32768, 38, 21,-32768, 34,-32768,-32768, -3,-32768,-32768,-32768,-32768, 28,-32768, 40, 0,-32768,-32768, 15,-32768, 44,-32768,-32768,-32768, 37,-32768,-32768,-32768,-32768, 11, 40, 37,-32768,-32768,-32768, 46,-32768, 25,-32768,-32768, 50, 51,-32768};static const short yypgoto[] = {-32768,-32768,-32768, 30,-32768, 12,-32768,-32768,-32768, 17,-32768,-32768, 6,-32768,-32768, -31,-32768,-32768,-32768, -1,-32768, 39};#define YYLAST 55static const short yytable[] = { 9, 43, 39, -15, 40, 9, 9, 2, 3, 4, 31, 28, 5, 29, 51, 6, 7, 54, 44, 52, 53, 2, 3, 4, 12, 17, 5, 13, 18, 41, 39, 2, 3, 57, 19, 20, 21, 33, 20, 21, 2, 20, 21, 2, 20, 15, 16, 46, 31, 56, 59, 60, 34, 45, 50, 55};static const short yycheck[] = { 1, 32, 5, 3, 7, 6, 7, 3, 4, 5, 10, 3, 8, 14, 3, 11, 12, 48, 3, 8, 9, 3, 4, 5, 3, 5, 8, 6, 8, 30, 5, 3, 4, 8, 3, 4, 5, 3, 4, 5, 3, 4, 5, 3, 4, 6, 7, 3, 10, 3, 0, 0, 22, 36, 42, 49};/* -*-C-*- Note some compilers choke on comments on `#line' lines. */#line 3 "/usr/local/share/bison.simple"/* This file comes from bison-1.28. *//* Skeleton output parser for bison, Copyright (C) 1984, 1989, 1990 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *//* As a special exception, when this file is copied by Bison into a Bison output file, you may use that output file without restriction. This special exception was added by the Free Software Foundation in version 1.24 of Bison. *//* This is the parser code that is written into each bison parser when the %semantic_parser declaration is not specified in the grammar. It was written by Richard Stallman by simplifying the hairy parser used when %semantic_parser is specified. */#ifndef YYSTACK_USE_ALLOCA#ifdef alloca#define YYSTACK_USE_ALLOCA#else /* alloca not defined */#ifdef __GNUC__#define YYSTACK_USE_ALLOCA#define alloca __builtin_alloca#else /* not GNU C. */#if (!defined (__STDC__) && defined (sparc)) || defined (__sparc__) || defined (__sparc) || defined (__sgi) || (defined (__sun) && defined (__i386))#define YYSTACK_USE_ALLOCA#include <alloca.h>#else /* not sparc *//* We think this test detects Watcom and Microsoft C. *//* This used to test MSDOS, but that is a bad idea since that symbol is in the user namespace. */#if (defined (_MSDOS) || defined (_MSDOS_)) && !defined (__TURBOC__)#if 0 /* No need for malloc.h, which pollutes the namespace; instead, just don't use alloca. */#include <malloc.h>#endif#else /* not MSDOS, or __TURBOC__ */#if defined(_AIX)/* I don't know what this was needed for, but it pollutes the namespace. So I turned it off. rms, 2 May 1997. *//* #include <malloc.h> */ #pragma alloca#define YYSTACK_USE_ALLOCA#else /* not MSDOS, or __TURBOC__, or _AIX */#if 0#ifdef __hpux /* haible@ilog.fr says this works for HPUX 9.05 and up, and on HPUX 10. Eventually we can turn this on. */#define YYSTACK_USE_ALLOCA#define alloca __builtin_alloca#endif /* __hpux */#endif#endif /* not _AIX */#endif /* not MSDOS, or __TURBOC__ */#endif /* not sparc */#endif /* not GNU C */#endif /* alloca not defined */#endif /* YYSTACK_USE_ALLOCA not defined */#ifdef YYSTACK_USE_ALLOCA#define YYSTACK_ALLOC alloca#else#define YYSTACK_ALLOC malloc#endif/* Note: there must be only one dollar sign in this file. It is replaced by the list of actions, each action as one case of the switch. */#define yyerrok (yyerrstatus = 0)#define yyclearin (yychar = YYEMPTY)#define YYEMPTY -2#define YYEOF 0#define YYACCEPT goto yyacceptlab#define YYABORT goto yyabortlab#define YYERROR goto yyerrlab1/* Like YYERROR except do call yyerror. This remains here temporarily to ease the transition to the new meaning of YYERROR, for GCC. Once GCC version 2 has supplanted version 1, this can go. */#define YYFAIL goto yyerrlab#define YYRECOVERING() (!!yyerrstatus)#define YYBACKUP(token, value) \do \ if (yychar == YYEMPTY && yylen == 1) \ { yychar = (token), yylval = (value); \ yychar1 = YYTRANSLATE (yychar); \ YYPOPSTACK; \ goto yybackup; \ } \ else \ { yyerror ("syntax error: cannot back up"); YYERROR; } \while (0)#define YYTERROR 1#define YYERRCODE 256#ifndef YYPURE#define YYLEX yylex()#endif#ifdef YYPURE#ifdef YYLSP_NEEDED#ifdef YYLEX_PARAM#define YYLEX yylex(&yylval, &yylloc, YYLEX_PARAM)#else#define YYLEX yylex(&yylval, &yylloc)#endif#else /* not YYLSP_NEEDED */#ifdef YYLEX_PARAM#define YYLEX yylex(&yylval, YYLEX_PARAM)#else#define YYLEX yylex(&yylval)#endif#endif /* not YYLSP_NEEDED */#endif/* If nonreentrant, generate the variables here */#ifndef YYPUREint yychar; /* the lookahead symbol */YYSTYPE yylval; /* the semantic value of the */ /* lookahead symbol */#ifdef YYLSP_NEEDEDYYLTYPE yylloc; /* location data for the lookahead */ /* symbol */#endifint yynerrs; /* number of parse errors so far */#endif /* not YYPURE */#if YYDEBUG != 0int yydebug; /* nonzero means print parse trace *//* Since this is uninitialized, it does not stop multiple parsers from coexisting. */#endif/* YYINITDEPTH indicates the initial size of the parser's stacks */#ifndef YYINITDEPTH#define YYINITDEPTH 200#endif/* YYMAXDEPTH is the maximum size the stacks can grow to (effective only if the built-in stack extension method is used). */#if YYMAXDEPTH == 0#undef YYMAXDEPTH#endif#ifndef YYMAXDEPTH#define YYMAXDEPTH 10000#endif/* Define __yy_memcpy. Note that the size argument should be passed with type unsigned int, because that is what the non-GCC definitions require. With GCC, __builtin_memcpy takes an arg of type size_t, but it can handle unsigned int. */#if __GNUC__ > 1 /* GNU C and GNU C++ define this. */#define __yy_memcpy(TO,FROM,COUNT) __builtin_memcpy(TO,FROM,COUNT)#else /* not GNU C or C++ */#ifndef __cplusplus/* This is the most reliable way to avoid incompatibilities in available built-in functions on various systems. */static void__yy_memcpy (to, from, count) char *to; char *from; unsigned int count;{ register char *f = from; register char *t = to; register int i = count; while (i-- > 0) *t++ = *f++;}#else /* __cplusplus *//* This is the most reliable way to avoid incompatibilities in available built-in functions on various systems. */static void__yy_memcpy (char *to, char *from, unsigned int count){ register char *t = to; register char *f = from; register int i = count; while (i-- > 0) *t++ = *f++;}#endif#endif#line 217 "/usr/local/share/bison.simple"/* The user can define YYPARSE_PARAM as the name of an argument to be passed into yyparse. The argument should have type void *. It should actually point to an object. Grammar actions can access the variable by casting it to the proper pointer type. */#ifdef YYPARSE_PARAM#ifdef __cplusplus#define YYPARSE_PARAM_ARG void *YYPARSE_PARAM#define YYPARSE_PARAM_DECL#else /* not __cplusplus */#define YYPARSE_PARAM_ARG YYPARSE_PARAM#define YYPARSE_PARAM_DECL void *YYPARSE_PARAM;#endif /* not __cplusplus */#else /* not YYPARSE_PARAM */#define YYPARSE_PARAM_ARG#define YYPARSE_PARAM_DECL#endif /* not YYPARSE_PARAM *//* Prevent warning if -Wstrict-prototypes. */#ifdef __GNUC__#ifdef YYPARSE_PARAMint yyparse (void *);#elseint yyparse (void);#endif#endifintyyparse(YYPARSE_PARAM_ARG) YYPARSE_PARAM_DECL{ register int yystate; register int yyn; register short *yyssp; register YYSTYPE *yyvsp; int yyerrstatus; /* number of tokens to shift before error messages enabled */ int yychar1 = 0; /* lookahead token as an internal (translated) token number */ short yyssa[YYINITDEPTH]; /* the state stack */ YYSTYPE yyvsa[YYINITDEPTH]; /* the semantic value stack */ short *yyss = yyssa; /* refer to the stacks thru separate pointers */ YYSTYPE *yyvs = yyvsa; /* to allow yyoverflow to reallocate them elsewhere */#ifdef YYLSP_NEEDED YYLTYPE yylsa[YYINITDEPTH]; /* the location stack */ YYLTYPE *yyls = yylsa; YYLTYPE *yylsp;#define YYPOPSTACK (yyvsp--, yyssp--, yylsp--)#else#define YYPOPSTACK (yyvsp--, yyssp--)#endif int yystacksize = YYINITDEPTH; int yyfree_stacks = 0;#ifdef YYPURE int yychar; YYSTYPE yylval; int yynerrs;#ifdef YYLSP_NEEDED YYLTYPE yylloc;#endif#endif YYSTYPE yyval; /* the variable used to return */ /* semantic values from the action */ /* routines */ int yylen;#if YYDEBUG != 0 if (yydebug) fprintf(stderr, "Starting parse\n");#endif yystate = 0; yyerrstatus = 0; yynerrs = 0; yychar = YYEMPTY; /* Cause a token to be read. */ /* Initialize stack pointers. Waste one element of value and location stack so that they stay on the same level as the state stack. The wasted elements are never initialized. */ yyssp = yyss - 1; yyvsp = yyvs;#ifdef YYLSP_NEEDED yylsp = yyls;#endif/* Push a new state, which is found in yystate . *//* In all cases, when you get here, the value and location stacks have just been pushed. so pushing a state here evens the stacks. */yynewstate: *++yyssp = yystate; if (yyssp >= yyss + yystacksize - 1) { /* Give user a chance to reallocate the stack */ /* Use copies of these so that the &'s don't force the real ones into memory. */ YYSTYPE *yyvs1 = yyvs; short *yyss1 = yyss;#ifdef YYLSP_NEEDED YYLTYPE *yyls1 = yyls;#endif /* Get the current used size of the three stacks, in elements. */ int size = yyssp - yyss + 1;#ifdef yyoverflow /* Each stack pointer address is followed by the size of the data in use in that stack, in bytes. */#ifdef YYLSP_NEEDED /* This used to be a conditional around just the two extra args, but that might be undefined if yyoverflow is a macro. */ yyoverflow("parser stack overflow", &yyss1, size * sizeof (*yyssp), &yyvs1, size * sizeof (*yyvsp), &yyls1, size * sizeof (*yylsp), &yystacksize);#else yyoverflow("parser stack overflow", &yyss1, size * sizeof (*yyssp), &yyvs1, size * sizeof (*yyvsp), &yystacksize);#endif yyss = yyss1; yyvs = yyvs1;#ifdef YYLSP_NEEDED yyls = yyls1;#endif#else /* no yyoverflow */ /* Extend the stack our own way. */ if (yystacksize >= YYMAXDEPTH) { yyerror("parser stack overflow"); if (yyfree_stacks) { free (yyss); free (yyvs);#ifdef YYLSP_NEEDED free (yyls);#endif
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -