Code coverage tests

This page documents the degree to which the PARI/GP source code is tested by our public test suite, distributed with the source distribution in directory src/test/. This is measured by the gcov utility; we then process gcov output using the lcov frond-end.

We test a few variants depending on Configure flags on the pari.math.u-bordeaux.fr machine (x86_64 architecture), and agregate them in the final report:

The target is to exceed 90% coverage for all mathematical modules (given that branches depending on DEBUGLEVEL or DEBUGMEM are not covered). This script is run to produce the results below.

LCOV - code coverage report
Current view: top level - language - parse.c (source / functions) Hit Total Coverage
Test: PARI/GP v2.12.1 lcov report (development 25819-e703fe1174) Lines: 392 521 75.2 %
Date: 2020-09-18 06:10:04 Functions: 5 5 100.0 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /* A Bison parser, made by GNU Bison 3.3.2.  */
       2             : 
       3             : /* Bison implementation for Yacc-like parsers in C
       4             : 
       5             :    Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2019 Free Software Foundation,
       6             :    Inc.
       7             : 
       8             :    This program is free software: you can redistribute it and/or modify
       9             :    it under the terms of the GNU General Public License as published by
      10             :    the Free Software Foundation, either version 3 of the License, or
      11             :    (at your option) any later version.
      12             : 
      13             :    This program is distributed in the hope that it will be useful,
      14             :    but WITHOUT ANY WARRANTY; without even the implied warranty of
      15             :    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      16             :    GNU General Public License for more details.
      17             : 
      18             :    You should have received a copy of the GNU General Public License
      19             :    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
      20             : 
      21             : /* As a special exception, you may create a larger work that contains
      22             :    part or all of the Bison parser skeleton and distribute that work
      23             :    under terms of your choice, so long as that work isn't itself a
      24             :    parser generator using the skeleton or a modified version thereof
      25             :    as a parser skeleton.  Alternatively, if you modify or redistribute
      26             :    the parser skeleton itself, you may (at your option) remove this
      27             :    special exception, which will cause the skeleton and the resulting
      28             :    Bison output files to be licensed under the GNU General Public
      29             :    License without this special exception.
      30             : 
      31             :    This special exception was added by the Free Software Foundation in
      32             :    version 2.2 of Bison.  */
      33             : 
      34             : /* C LALR(1) parser skeleton written by Richard Stallman, by
      35             :    simplifying the original so-called "semantic" parser.  */
      36             : 
      37             : /* All symbols defined below should begin with yy or YY, to avoid
      38             :    infringing on user name space.  This should be done even for local
      39             :    variables, as they might otherwise be expanded by user macros.
      40             :    There are some unavoidable exceptions within include files to
      41             :    define necessary library symbols; they are noted "INFRINGES ON
      42             :    USER NAME SPACE" below.  */
      43             : 
      44             : /* Undocumented macros, especially those whose name start with YY_,
      45             :    are private implementation details.  Do not rely on them.  */
      46             : 
      47             : /* Identify Bison output.  */
      48             : #define YYBISON 1
      49             : 
      50             : /* Bison version.  */
      51             : #define YYBISON_VERSION "3.3.2"
      52             : 
      53             : /* Skeleton name.  */
      54             : #define YYSKELETON_NAME "yacc.c"
      55             : 
      56             : /* Pure parsers.  */
      57             : #define YYPURE 2
      58             : 
      59             : /* Push parsers.  */
      60             : #define YYPUSH 0
      61             : 
      62             : /* Pull parsers.  */
      63             : #define YYPULL 1
      64             : 
      65             : /* Substitute the type names.  */
      66             : #define YYSTYPE         PARI_STYPE
      67             : #define YYLTYPE         PARI_LTYPE
      68             : /* Substitute the variable and function names.  */
      69             : #define yyparse         pari_parse
      70             : #define yylex           pari_lex
      71             : #define yyerror         pari_error
      72             : #define yydebug         pari_debug
      73             : #define yynerrs         pari_nerrs
      74             : 
      75             : 
      76             : /* First part of user prologue.  */
      77             : #line 1 "../src/language/parse.y" /* yacc.c:337  */
      78             : 
      79             : /* Copyright (C) 2006  The PARI group.
      80             : 
      81             : This file is part of the PARI package.
      82             : 
      83             : PARI/GP is free software; you can redistribute it and/or modify it under the
      84             : terms of the GNU General Public License as published by the Free Software
      85             : Foundation. It is distributed in the hope that it will be useful, but WITHOUT
      86             : ANY WARRANTY WHATSOEVER.
      87             : 
      88             : Check the License for details. You should have received a copy of it, along
      89             : with the package; see the file 'COPYING'. If not, write to the Free Software
      90             : Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. */
      91             : 
      92             : #define PARI_STYPE union token_value
      93             : #define PARI_LTYPE struct node_loc
      94             : #define YYPTRDIFF_T long
      95             : #define YYPTRDIFF_MAXIMUM LONG_MAX
      96             : #define YYSIZE_T size_t
      97             : #define YYLLOC_DEFAULT(Current, Rhs, N)     \
      98             :         ((Current).start  = ((N)?(Rhs)[1].start:(Rhs)[0].end),  \
      99             :          (Current).end    = (Rhs)[N].end)
     100             : #include "parsec.h"
     101             : #define NOARG(x) newnode(Fnoarg,-1,-1,&(x))
     102             : #define NORANGE(x) newnode(Fnorange,-1,-1,&(x))
     103             : 
     104             : #line 105 "../src/language/parse.c" /* yacc.c:337  */
     105             : # ifndef YY_NULLPTR
     106             : #  if defined __cplusplus
     107             : #   if 201103L <= __cplusplus
     108             : #    define YY_NULLPTR nullptr
     109             : #   else
     110             : #    define YY_NULLPTR 0
     111             : #   endif
     112             : #  else
     113             : #   define YY_NULLPTR ((void*)0)
     114             : #  endif
     115             : # endif
     116             : 
     117             : /* Enabling verbose error messages.  */
     118             : #ifdef YYERROR_VERBOSE
     119             : # undef YYERROR_VERBOSE
     120             : # define YYERROR_VERBOSE 1
     121             : #else
     122             : # define YYERROR_VERBOSE 1
     123             : #endif
     124             : 
     125             : /* In a future release of Bison, this section will be replaced
     126             :    by #include "parse.h".  */
     127             : #ifndef YY_PARI_SRC_LANGUAGE_PARSE_H_INCLUDED
     128             : # define YY_PARI_SRC_LANGUAGE_PARSE_H_INCLUDED
     129             : /* Debug traces.  */
     130             : #ifndef PARI_DEBUG
     131             : # if defined YYDEBUG
     132             : #if YYDEBUG
     133             : #   define PARI_DEBUG 1
     134             : #  else
     135             : #   define PARI_DEBUG 0
     136             : #  endif
     137             : # else /* ! defined YYDEBUG */
     138             : #  define PARI_DEBUG 0
     139             : # endif /* ! defined YYDEBUG */
     140             : #endif  /* ! defined PARI_DEBUG */
     141             : #if PARI_DEBUG
     142             : extern int pari_debug;
     143             : #endif
     144             : 
     145             : /* Token type.  */
     146             : #ifndef PARI_TOKENTYPE
     147             : # define PARI_TOKENTYPE
     148             :   enum pari_tokentype
     149             :   {
     150             :     KPARROW = 258,
     151             :     KARROW = 259,
     152             :     KDOTDOT = 260,
     153             :     KPE = 261,
     154             :     KSE = 262,
     155             :     KME = 263,
     156             :     KDE = 264,
     157             :     KDRE = 265,
     158             :     KEUCE = 266,
     159             :     KMODE = 267,
     160             :     KAND = 268,
     161             :     KOR = 269,
     162             :     KID = 270,
     163             :     KEQ = 271,
     164             :     KNE = 272,
     165             :     KGE = 273,
     166             :     KLE = 274,
     167             :     KSRE = 275,
     168             :     KSLE = 276,
     169             :     KSR = 277,
     170             :     KSL = 278,
     171             :     KDR = 279,
     172             :     KPP = 280,
     173             :     KSS = 281,
     174             :     KINTEGER = 282,
     175             :     KREAL = 283,
     176             :     KENTRY = 284,
     177             :     KSTRING = 285,
     178             :     SEQ = 286,
     179             :     DEFFUNC = 287,
     180             :     INT = 288,
     181             :     LVAL = 289,
     182             :     SIGN = 290,
     183             :     DERIV = 291
     184             :   };
     185             : #endif
     186             : 
     187             : /* Value type.  */
     188             : 
     189             : /* Location type.  */
     190             : #if ! defined PARI_LTYPE && ! defined PARI_LTYPE_IS_DECLARED
     191             : typedef struct PARI_LTYPE PARI_LTYPE;
     192             : struct PARI_LTYPE
     193             : {
     194             :   int first_line;
     195             :   int first_column;
     196             :   int last_line;
     197             :   int last_column;
     198             : };
     199             : # define PARI_LTYPE_IS_DECLARED 1
     200             : # define PARI_LTYPE_IS_TRIVIAL 1
     201             : #endif
     202             : 
     203             : 
     204             : 
     205             : int pari_parse (char **lex);
     206             : 
     207             : #endif /* !YY_PARI_SRC_LANGUAGE_PARSE_H_INCLUDED  */
     208             : 
     209             : 
     210             : 
     211             : #ifdef short
     212             : # undef short
     213             : #endif
     214             : 
     215             : #ifdef YYTYPE_UINT8
     216             : typedef YYTYPE_UINT8 yytype_uint8;
     217             : #else
     218             : typedef unsigned char yytype_uint8;
     219             : #endif
     220             : 
     221             : #ifdef YYTYPE_INT8
     222             : typedef YYTYPE_INT8 yytype_int8;
     223             : #else
     224             : typedef signed char yytype_int8;
     225             : #endif
     226             : 
     227             : #ifdef YYTYPE_UINT16
     228             : typedef YYTYPE_UINT16 yytype_uint16;
     229             : #else
     230             : typedef unsigned short yytype_uint16;
     231             : #endif
     232             : 
     233             : #ifdef YYTYPE_INT16
     234             : typedef YYTYPE_INT16 yytype_int16;
     235             : #else
     236             : typedef short yytype_int16;
     237             : #endif
     238             : 
     239             : #ifndef YYSIZE_T
     240             : # ifdef __SIZE_TYPE__
     241             : #  define YYSIZE_T __SIZE_TYPE__
     242             : # elif defined size_t
     243             : #  define YYSIZE_T size_t
     244             : # elif ! defined YYSIZE_T
     245             : #  include <stddef.h> /* INFRINGES ON USER NAME SPACE */
     246             : #  define YYSIZE_T size_t
     247             : # else
     248             : #  define YYSIZE_T unsigned
     249             : # endif
     250             : #endif
     251             : 
     252             : #define YYSIZE_MAXIMUM ((YYSIZE_T) -1)
     253             : 
     254             : #ifndef YY_
     255             : # if defined YYENABLE_NLS && YYENABLE_NLS
     256             : #  if ENABLE_NLS
     257             : #   include <libintl.h> /* INFRINGES ON USER NAME SPACE */
     258             : #   define YY_(Msgid) dgettext ("bison-runtime", Msgid)
     259             : #  endif
     260             : # endif
     261             : # ifndef YY_
     262             : #  define YY_(Msgid) Msgid
     263             : # endif
     264             : #endif
     265             : 
     266             : #ifndef YY_ATTRIBUTE
     267             : # if (defined __GNUC__                                               \
     268             :       && (2 < __GNUC__ || (__GNUC__ == 2 && 96 <= __GNUC_MINOR__)))  \
     269             :      || defined __SUNPRO_C && 0x5110 <= __SUNPRO_C
     270             : #  define YY_ATTRIBUTE(Spec) __attribute__(Spec)
     271             : # else
     272             : #  define YY_ATTRIBUTE(Spec) /* empty */
     273             : # endif
     274             : #endif
     275             : 
     276             : #ifndef YY_ATTRIBUTE_PURE
     277             : # define YY_ATTRIBUTE_PURE   YY_ATTRIBUTE ((__pure__))
     278             : #endif
     279             : 
     280             : #ifndef YY_ATTRIBUTE_UNUSED
     281             : # define YY_ATTRIBUTE_UNUSED YY_ATTRIBUTE ((__unused__))
     282             : #endif
     283             : 
     284             : /* Suppress unused-variable warnings by "using" E.  */
     285             : #if ! defined lint || defined __GNUC__
     286             : # define YYUSE(E) ((void) (E))
     287             : #else
     288             : # define YYUSE(E) /* empty */
     289             : #endif
     290             : 
     291             : #if defined __GNUC__ && ! defined __ICC && 407 <= __GNUC__ * 100 + __GNUC_MINOR__
     292             : /* Suppress an incorrect diagnostic about yylval being uninitialized.  */
     293             : # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
     294             :     _Pragma ("GCC diagnostic push") \
     295             :     _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")\
     296             :     _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"")
     297             : # define YY_IGNORE_MAYBE_UNINITIALIZED_END \
     298             :     _Pragma ("GCC diagnostic pop")
     299             : #else
     300             : # define YY_INITIAL_VALUE(Value) Value
     301             : #endif
     302             : #ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
     303             : # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
     304             : # define YY_IGNORE_MAYBE_UNINITIALIZED_END
     305             : #endif
     306             : #ifndef YY_INITIAL_VALUE
     307             : # define YY_INITIAL_VALUE(Value) /* Nothing. */
     308             : #endif
     309             : 
     310             : 
     311             : #if ! defined yyoverflow || YYERROR_VERBOSE
     312             : 
     313             : /* The parser invokes alloca or malloc; define the necessary symbols.  */
     314             : 
     315             : # ifdef YYSTACK_USE_ALLOCA
     316             : #  if YYSTACK_USE_ALLOCA
     317             : #   ifdef __GNUC__
     318             : #    define YYSTACK_ALLOC __builtin_alloca
     319             : #   elif defined __BUILTIN_VA_ARG_INCR
     320             : #    include <alloca.h> /* INFRINGES ON USER NAME SPACE */
     321             : #   elif defined _AIX
     322             : #    define YYSTACK_ALLOC __alloca
     323             : #   elif defined _MSC_VER
     324             : #    include <malloc.h> /* INFRINGES ON USER NAME SPACE */
     325             : #    define alloca _alloca
     326             : #   else
     327             : #    define YYSTACK_ALLOC alloca
     328             : #    if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS
     329             : #     include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
     330             :       /* Use EXIT_SUCCESS as a witness for stdlib.h.  */
     331             : #     ifndef EXIT_SUCCESS
     332             : #      define EXIT_SUCCESS 0
     333             : #     endif
     334             : #    endif
     335             : #   endif
     336             : #  endif
     337             : # endif
     338             : 
     339             : # ifdef YYSTACK_ALLOC
     340             :    /* Pacify GCC's 'empty if-body' warning.  */
     341             : #  define YYSTACK_FREE(Ptr) do { /* empty */; } while (0)
     342             : #  ifndef YYSTACK_ALLOC_MAXIMUM
     343             :     /* The OS might guarantee only one guard page at the bottom of the stack,
     344             :        and a page size can be as small as 4096 bytes.  So we cannot safely
     345             :        invoke alloca (N) if N exceeds 4096.  Use a slightly smaller number
     346             :        to allow for a few compiler-allocated temporary stack slots.  */
     347             : #   define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */
     348             : #  endif
     349             : # else
     350             : #  define YYSTACK_ALLOC YYMALLOC
     351             : #  define YYSTACK_FREE YYFREE
     352             : #  ifndef YYSTACK_ALLOC_MAXIMUM
     353             : #   define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
     354             : #  endif
     355             : #  if (defined __cplusplus && ! defined EXIT_SUCCESS \
     356             :        && ! ((defined YYMALLOC || defined malloc) \
     357             :              && (defined YYFREE || defined free)))
     358             : #   include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
     359             : #   ifndef EXIT_SUCCESS
     360             : #    define EXIT_SUCCESS 0
     361             : #   endif
     362             : #  endif
     363             : #  ifndef YYMALLOC
     364             : #   define YYMALLOC malloc
     365             : #   if ! defined malloc && ! defined EXIT_SUCCESS
     366             : void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */
     367             : #   endif
     368             : #  endif
     369             : #  ifndef YYFREE
     370             : #   define YYFREE free
     371             : #   if ! defined free && ! defined EXIT_SUCCESS
     372             : void free (void *); /* INFRINGES ON USER NAME SPACE */
     373             : #   endif
     374             : #  endif
     375             : # endif
     376             : #endif /* ! defined yyoverflow || YYERROR_VERBOSE */
     377             : 
     378             : 
     379             : #if (! defined yyoverflow \
     380             :      && (! defined __cplusplus \
     381             :          || (defined PARI_LTYPE_IS_TRIVIAL && PARI_LTYPE_IS_TRIVIAL \
     382             :              && defined PARI_STYPE_IS_TRIVIAL && PARI_STYPE_IS_TRIVIAL)))
     383             : 
     384             : /* A type that is properly aligned for any stack member.  */
     385             : union yyalloc
     386             : {
     387             :   yytype_int16 yyss_alloc;
     388             :   YYSTYPE yyvs_alloc;
     389             :   YYLTYPE yyls_alloc;
     390             : };
     391             : 
     392             : /* The size of the maximum gap between one aligned stack and the next.  */
     393             : # define YYSTACK_GAP_MAXIMUM (sizeof (union yyalloc) - 1)
     394             : 
     395             : /* The size of an array large to enough to hold all stacks, each with
     396             :    N elements.  */
     397             : # define YYSTACK_BYTES(N) \
     398             :      ((N) * (sizeof (yytype_int16) + sizeof (YYSTYPE) + sizeof (YYLTYPE)) \
     399             :       + 2 * YYSTACK_GAP_MAXIMUM)
     400             : 
     401             : # define YYCOPY_NEEDED 1
     402             : 
     403             : /* Relocate STACK from its old location to the new one.  The
     404             :    local variables YYSIZE and YYSTACKSIZE give the old and new number of
     405             :    elements in the stack, and YYPTR gives the new location of the
     406             :    stack.  Advance YYPTR to a properly aligned location for the next
     407             :    stack.  */
     408             : # define YYSTACK_RELOCATE(Stack_alloc, Stack)                           \
     409             :     do                                                                  \
     410             :       {                                                                 \
     411             :         YYSIZE_T yynewbytes;                                            \
     412             :         YYCOPY (&yyptr->Stack_alloc, Stack, yysize);                    \
     413             :         Stack = &yyptr->Stack_alloc;                                    \
     414             :         yynewbytes = yystacksize * sizeof (*Stack) + YYSTACK_GAP_MAXIMUM; \
     415             :         yyptr += yynewbytes / sizeof (*yyptr);                          \
     416             :       }                                                                 \
     417             :     while (0)
     418             : 
     419             : #endif
     420             : 
     421             : #if defined YYCOPY_NEEDED && YYCOPY_NEEDED
     422             : /* Copy COUNT objects from SRC to DST.  The source and destination do
     423             :    not overlap.  */
     424             : # ifndef YYCOPY
     425             : #  if defined __GNUC__ && 1 < __GNUC__
     426             : #   define YYCOPY(Dst, Src, Count) \
     427             :       __builtin_memcpy (Dst, Src, (Count) * sizeof (*(Src)))
     428             : #  else
     429             : #   define YYCOPY(Dst, Src, Count)              \
     430             :       do                                        \
     431             :         {                                       \
     432             :           YYSIZE_T yyi;                         \
     433             :           for (yyi = 0; yyi < (Count); yyi++)   \
     434             :             (Dst)[yyi] = (Src)[yyi];            \
     435             :         }                                       \
     436             :       while (0)
     437             : #  endif
     438             : # endif
     439             : #endif /* !YYCOPY_NEEDED */
     440             : 
     441             : /* YYFINAL -- State number of the termination state.  */
     442             : #define YYFINAL  49
     443             : /* YYLAST -- Last index in YYTABLE.  */
     444             : #define YYLAST   711
     445             : 
     446             : /* YYNTOKENS -- Number of terminals.  */
     447             : #define YYNTOKENS  62
     448             : /* YYNNTS -- Number of nonterminals.  */
     449             : #define YYNNTS  24
     450             : /* YYNRULES -- Number of rules.  */
     451             : #define YYNRULES  116
     452             : /* YYNSTATES -- Number of states.  */
     453             : #define YYNSTATES  198
     454             : 
     455             : #define YYUNDEFTOK  2
     456             : #define YYMAXUTOK   291
     457             : 
     458             : /* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM
     459             :    as returned by yylex, with out-of-bounds checking.  */
     460             : #define YYTRANSLATE(YYX)                                                \
     461             :   ((unsigned) (YYX) <= YYMAXUTOK ? yytranslate[YYX] : YYUNDEFTOK)
     462             : 
     463             : /* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM
     464             :    as returned by yylex.  */
     465             : static const yytype_uint8 yytranslate[] =
     466             : {
     467             :        0,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     468             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     469             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     470             :        2,     2,     2,    50,     2,    49,     2,    43,    38,    54,
     471             :       56,    60,    46,    41,    36,    42,    55,    45,     2,     2,
     472             :        2,     2,     2,     2,     2,     2,     2,     2,    57,    35,
     473             :       40,    37,    39,     2,     2,     2,     2,     2,     2,     2,
     474             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     475             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     476             :        2,    52,    44,    58,    48,     2,    59,     2,     2,     2,
     477             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     478             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     479             :        2,     2,     2,     2,    61,     2,    51,     2,     2,     2,
     480             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     481             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     482             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     483             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     484             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     485             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     486             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     487             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     488             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     489             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     490             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     491             :        2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
     492             :        2,     2,     2,     2,     2,     2,     1,     2,     3,     4,
     493             :        5,     6,     7,     8,     9,    10,    11,    12,    13,    14,
     494             :       15,    16,    17,    18,    19,    20,    21,    22,    23,    24,
     495             :       25,    26,    27,    28,    29,    30,    31,    32,    33,    34,
     496             :       47,    53
     497             : };
     498             : 
     499             : #if PARI_DEBUG
     500             :   /* YYRLINE[YYN] -- Source line where rule number YYN was defined.  */
     501             : static const yytype_uint8 yyrline[] =
     502             : {
     503             :        0,    89,    89,    92,    93,    94,    95,    98,    99,   100,
     504             :      101,   104,   105,   108,   109,   112,   113,   114,   115,   116,
     505             :      117,   120,   121,   124,   125,   126,   127,   129,   130,   131,
     506             :      132,   133,   134,   135,   136,   137,   138,   139,   140,   141,
     507             :      142,   143,   144,   145,   146,   147,   148,   149,   150,   151,
     508             :      152,   153,   154,   155,   156,   157,   158,   159,   160,   161,
     509             :      162,   163,   164,   165,   166,   167,   168,   169,   170,   171,
     510             :      172,   173,   174,   175,   176,   177,   178,   179,   180,   181,
     511             :      184,   185,   186,   189,   190,   192,   193,   196,   197,   200,
     512             :      201,   204,   205,   206,   207,   208,   209,   212,   215,   216,
     513             :      217,   218,   221,   224,   225,   226,   227,   228,   228,   232,
     514             :      233,   236,   239,   242,   244,   246,   247
     515             : };
     516             : #endif
     517             : 
     518             : #if PARI_DEBUG || YYERROR_VERBOSE || 1
     519             : /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
     520             :    First, the terminals, then, starting at YYNTOKENS, nonterminals.  */
     521             : static const char *const yytname[] =
     522             : {
     523             :   "$end", "error", "$undefined", "\")->\"", "\"->\"", "\"..\"", "\"+=\"",
     524             :   "\"-=\"", "\"*=\"", "\"/=\"", "\"\\\\/=\"", "\"\\\\=\"", "\"%=\"",
     525             :   "\"&&\"", "\"||\"", "\"===\"", "\"==\"", "\"!=\"", "\">=\"", "\"<=\"",
     526             :   "\">>=\"", "\"<<=\"", "\">>\"", "\"<<\"", "\"\\\\/\"", "\"++\"",
     527             :   "\"--\"", "\"integer\"", "\"real number\"", "\"variable name\"",
     528             :   "\"character string\"", "SEQ", "DEFFUNC", "INT", "LVAL", "';'", "','",
     529             :   "'='", "'&'", "'>'", "'<'", "'+'", "'-'", "'%'", "'\\\\'", "'/'", "'*'",
     530             :   "SIGN", "'^'", "'#'", "'!'", "'~'", "'['", "DERIV", "'\\''", "'.'",
     531             :   "'('", "':'", "']'", "'`'", "')'", "'|'", "$accept", "sequence", "seq",
     532             :   "range", "matrix_index", "backticks", "history", "deriv", "expr",
     533             :   "lvalue", "exprno", "matrixeltsno", "matrixelts", "matrixlines",
     534             :   "matrix", "in", "inseq", "compr", "arg", "$@1", "listarg", "funcid",
     535             :   "memberid", "definition", YY_NULLPTR
     536             : };
     537             : #endif
     538             : 
     539             : # ifdef YYPRINT
     540             : /* YYTOKNUM[NUM] -- (External) token number corresponding to the
     541             :    (internal) symbol number NUM (which must be that of a token).  */
     542             : static const yytype_uint16 yytoknum[] =
     543             : {
     544             :        0,   256,   257,   258,   259,   260,   261,   262,   263,   264,
     545             :      265,   266,   267,   268,   269,   270,   271,   272,   273,   274,
     546             :      275,   276,   277,   278,   279,   280,   281,   282,   283,   284,
     547             :      285,   286,   287,   288,   289,    59,    44,    61,    38,    62,
     548             :       60,    43,    45,    37,    92,    47,    42,   290,    94,    35,
     549             :       33,   126,    91,   291,    39,    46,    40,    58,    93,    96,
     550             :       41,   124
     551             : };
     552             : # endif
     553             : 
     554             : #define YYPACT_NINF -109
     555             : 
     556             : #define yypact_value_is_default(Yystate) \
     557             :   (!!((Yystate) == (-109)))
     558             : 
     559             : #define YYTABLE_NINF -111
     560             : 
     561             : #define yytable_value_is_error(Yytable_value) \
     562             :   0
     563             : 
     564             :   /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
     565             :      STATE-NUM.  */
     566             : static const yytype_int16 yypact[] =
     567             : {
     568             :      655,   -26,  -109,    17,  -109,   655,   655,   -15,   655,   655,
     569             :      112,     2,  -109,   621,    33,    40,  -109,   496,   234,    49,
     570             :     -109,  -109,  -109,  -109,    60,   621,    64,    64,  -109,    12,
     571             :     -109,    35,    81,   -33,    41,    44,  -109,   178,    68,   -18,
     572             :       50,  -109,    77,    77,    40,   357,   257,     6,     7,  -109,
     573             :      655,   655,   655,   655,   655,   655,   655,   655,   655,   655,
     574             :      655,   655,   655,   655,   655,   655,   655,   655,   655,   655,
     575             :      655,  -109,  -109,   638,  -109,    78,   621,    82,  -109,    63,
     576             :      655,   655,   655,   655,   655,   655,   655,   655,   655,   655,
     577             :     -109,  -109,   655,    93,  -109,   655,  -109,   -23,  -109,    35,
     578             :     -109,  -109,  -109,   655,    77,   655,   655,  -109,   655,  -109,
     579             :     -109,   -32,   -32,  -109,   313,  -109,   655,   621,   496,   539,
     580             :      539,   575,   575,   575,   575,   575,    64,    64,    64,   539,
     581             :      575,   575,   590,   590,    64,    64,    64,    64,    64,   655,
     582             :      -17,   282,    86,   -22,  -109,  -109,    40,   496,   496,   496,
     583             :      496,   496,   496,   496,   496,   496,   496,  -109,   496,    87,
     584             :      405,   -25,    57,    67,   496,  -109,   496,    90,    90,    70,
     585             :      655,    40,    69,   496,   638,  -109,   655,   655,  -109,   655,
     586             :     -109,    88,    77,   655,  -109,  -109,   496,    85,   496,    40,
     587             :       40,   655,  -109,   451,  -109,   496,    77,  -109
     588             : };
     589             : 
     590             :   /* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM.
     591             :      Performed when YYTABLE does not specify something else to do.  Zero
     592             :      means the default is an error.  */
     593             : static const yytype_uint8 yydefact[] =
     594             : {
     595             :        3,    23,    24,    80,    27,     0,     0,    15,     0,     0,
     596             :        0,     0,    25,     3,     0,     2,    29,     4,    32,    33,
     597             :       34,    31,    77,    35,     0,     3,    70,    71,    16,    18,
     598             :       13,    17,    50,    49,     0,     0,    91,    87,     0,    85,
     599             :        0,    28,     0,     0,   103,     4,    32,     0,     0,     1,
     600             :        5,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     601             :        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     602             :        0,    75,    73,     7,    21,     0,     3,     0,    76,    74,
     603             :        3,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     604             :       38,    39,     0,     0,    81,     0,    26,     0,    19,    20,
     605             :       14,    96,    93,     0,     0,    84,    86,    94,    86,    95,
     606             :       80,   105,   106,    79,     7,   107,     3,     3,     6,    52,
     607             :       51,    54,    55,    56,    57,    59,    64,    63,    66,    53,
     608             :       58,    60,    62,    61,    65,    67,    68,    69,    72,     0,
     609             :        0,     8,   112,     0,    78,    22,   115,    47,    48,    40,
     610             :       41,    42,    43,    44,    46,    45,    37,    82,    36,   111,
     611             :        0,     0,    98,     0,    83,    88,    87,    89,    90,     0,
     612             :        0,   116,     0,    10,     7,    12,     0,     3,    30,     3,
     613             :       92,     0,     0,     0,   102,   104,   108,     0,     9,   114,
     614             :      113,     0,   100,    99,    11,    97,     0,   101
     615             : };
     616             : 
     617             :   /* YYPGOTO[NTERM-NUM].  */
     618             : static const yytype_int8 yypgoto[] =
     619             : {
     620             :     -109,  -109,    11,   -30,   -16,   117,  -109,  -109,    -5,    -7,
     621             :     -109,  -109,   -80,  -109,  -109,  -109,  -108,  -109,    32,  -109,
     622             :       -9,  -109,  -109,  -109
     623             : };
     624             : 
     625             :   /* YYDEFGOTO[NTERM-NUM].  */
     626             : static const yytype_int16 yydefgoto[] =
     627             : {
     628             :       -1,    14,    44,   140,    78,    31,    16,    79,    17,    18,
     629             :      165,    38,    39,    40,    19,   162,   163,    20,    47,   170,
     630             :       48,    21,    22,    23
     631             : };
     632             : 
     633             :   /* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM.  If
     634             :      positive, shift that token.  If negative, reduce the rule whose
     635             :      number is the opposite.  If YYTABLE_NINF, syntax error.  */
     636             : static const yytype_int16 yytable[] =
     637             : {
     638             :       26,    27,    94,    32,    33,    37,    46,   115,    45,  -109,
     639             :      116,    15,    28,   117,   117,   181,    97,   106,    46,   174,
     640             :       73,    74,    75,    76,    77,    93,   167,    73,   168,    24,
     641             :       94,    41,    93,    49,    29,   111,   112,   159,   178,    98,
     642             :      107,   175,  -109,   117,    30,   118,   119,   120,   121,   122,
     643             :      123,   124,   125,   126,   127,   128,   129,   130,   131,   132,
     644             :      133,   134,   135,   136,   137,   138,  -109,   143,   141,    46,
     645             :      115,    30,  -110,    25,   192,    50,   147,   148,   149,   150,
     646             :      151,   152,   153,   154,   155,   108,    95,   156,   197,    96,
     647             :      158,   146,   182,   183,   100,    94,    94,   161,   160,   101,
     648             :      164,   166,   102,   166,   105,  -110,   110,   142,   109,   141,
     649             :       46,   144,    70,    34,    71,    72,    73,   145,    74,    75,
     650             :       76,    77,   157,   177,   179,   184,   -85,   171,   185,  -110,
     651             :      191,    71,    72,    73,   173,    74,    75,    76,    77,     1,
     652             :        2,     3,     4,   194,   187,    94,    99,    35,   -86,   172,
     653             :        0,     0,     0,     5,     6,     7,     0,     0,     0,     0,
     654             :        0,     8,     9,     0,    10,   186,    11,    12,    13,   141,
     655             :       36,   188,     0,     0,     0,   161,     0,     0,   193,     0,
     656             :        0,     0,     0,   103,     0,     0,   195,     0,   189,   161,
     657             :      190,    51,    52,    53,    54,    55,    56,    57,     0,     0,
     658             :       58,    59,    60,     0,     0,     0,     0,     0,     0,     0,
     659             :        0,     0,     0,     0,     0,     0,    61,    62,    63,    64,
     660             :       65,    66,    67,    68,    69,     0,    70,     0,    71,    72,
     661             :       73,     0,    74,    75,    76,    77,     0,     0,    80,   104,
     662             :       81,    82,    83,    84,    85,    86,    87,     0,     0,     0,
     663             :        0,     0,     0,     0,    88,    89,     0,     0,     0,    90,
     664             :       91,    80,     0,    81,    82,    83,    84,    85,    86,    87,
     665             :        0,    92,     0,     0,     0,     0,     0,    88,    89,     0,
     666             :        0,     0,    90,    91,     0,     0,    73,   176,     0,     0,
     667             :        0,    93,     0,     0,    92,    51,    52,    53,    54,    55,
     668             :       56,    57,     0,     0,    58,    59,    60,     0,     0,   114,
     669             :        0,     0,     0,     0,    93,     0,     0,     0,   169,     0,
     670             :       61,    62,    63,    64,    65,    66,    67,    68,    69,     0,
     671             :       70,     0,    71,    72,    73,     0,    74,    75,    76,    77,
     672             :        1,     2,     3,     4,     0,     0,     0,     0,     0,     0,
     673             :        0,     0,     0,     0,     5,     6,     7,     0,     0,     0,
     674             :        0,   139,     8,     9,     0,    10,     0,    11,    12,    13,
     675             :       51,    52,    53,    54,    55,    56,    57,     0,     0,    58,
     676             :       59,    60,     0,     0,     0,     0,     0,     0,     0,     0,
     677             :        0,     0,     0,     0,     0,    61,    62,    63,    64,    65,
     678             :       66,    67,    68,    69,     0,    70,     0,    71,    72,    73,
     679             :        0,    74,    75,    76,    77,     0,     0,   113,    51,    52,
     680             :       53,    54,    55,    56,    57,     0,     0,    58,    59,    60,
     681             :        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     682             :        0,     0,     0,    61,    62,    63,    64,    65,    66,    67,
     683             :       68,    69,     0,    70,     0,    71,    72,    73,     0,    74,
     684             :       75,    76,    77,   180,    51,    52,    53,    54,    55,    56,
     685             :       57,     0,     0,    58,    59,    60,     0,     0,     0,     0,
     686             :        0,     0,     0,     0,     0,     0,   196,     0,     0,    61,
     687             :       62,    63,    64,    65,    66,    67,    68,    69,     0,    70,
     688             :        0,    71,    72,    73,     0,    74,    75,    76,    77,    51,
     689             :       52,    53,    54,    55,    56,    57,     0,     0,    58,    59,
     690             :       60,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     691             :        0,     0,     0,     0,    61,    62,    63,    64,    65,    66,
     692             :       67,    68,    69,     0,    70,     0,    71,    72,    73,     0,
     693             :       74,    75,    76,    77,    53,    54,    55,    56,    57,     0,
     694             :        0,    58,    59,    60,     0,     0,     0,     0,     0,     0,
     695             :        0,     0,     0,     0,     0,     0,     0,     0,    62,    63,
     696             :       64,    65,    66,    67,    68,    69,     0,    70,     0,    71,
     697             :       72,    73,     0,    74,    75,    76,    77,    58,    59,    60,
     698             :        0,     0,     0,     0,     0,     0,     0,     0,     0,     0,
     699             :        0,     0,    58,    59,    60,     0,    64,    65,    66,    67,
     700             :       68,    69,     0,    70,     0,    71,    72,    73,     0,    74,
     701             :       75,    76,    77,    66,    67,    68,    69,     0,    70,     0,
     702             :       71,    72,    73,     0,    74,    75,    76,    77,     1,     2,
     703             :        3,     4,     0,     0,     0,     0,     0,     0,     0,    42,
     704             :        0,     0,     5,     6,     7,     1,     2,     3,     4,     0,
     705             :        8,     9,    43,    10,     0,    11,    12,    13,     0,     5,
     706             :        6,     7,     1,     2,     3,     4,   139,     8,     9,     0,
     707             :       10,     0,    11,    12,    13,     0,     5,     6,     7,     0,
     708             :        0,     0,     0,     0,     8,     9,     0,    10,     0,    11,
     709             :       12,    13
     710             : };
     711             : 
     712             : static const yytype_int16 yycheck[] =
     713             : {
     714             :        5,     6,    18,     8,     9,    10,    13,     1,    13,     3,
     715             :        3,     0,    27,    36,    36,    40,    25,    35,    25,    36,
     716             :       52,    54,    55,    56,    57,    57,   106,    52,   108,    55,
     717             :       46,    29,    57,     0,    49,    42,    43,    60,    60,    27,
     718             :       58,    58,    36,    36,    59,    50,    51,    52,    53,    54,
     719             :       55,    56,    57,    58,    59,    60,    61,    62,    63,    64,
     720             :       65,    66,    67,    68,    69,    70,    60,    76,    73,    76,
     721             :        1,    59,     3,    56,   182,    35,    81,    82,    83,    84,
     722             :       85,    86,    87,    88,    89,    35,    37,    92,   196,    29,
     723             :       95,    80,    35,    36,    59,   111,   112,   104,   103,    58,
     724             :      105,   106,    58,   108,    36,    36,    29,    29,    58,   114,
     725             :      117,    29,    48,     1,    50,    51,    52,    54,    54,    55,
     726             :       56,    57,    29,    37,    37,    58,    36,   116,    58,    60,
     727             :       42,    50,    51,    52,   139,    54,    55,    56,    57,    27,
     728             :       28,    29,    30,    58,   174,   161,    29,    35,    36,   117,
     729             :       -1,    -1,    -1,    41,    42,    43,    -1,    -1,    -1,    -1,
     730             :       -1,    49,    50,    -1,    52,   170,    54,    55,    56,   174,
     731             :       58,   176,    -1,    -1,    -1,   182,    -1,    -1,   183,    -1,
     732             :       -1,    -1,    -1,     5,    -1,    -1,   191,    -1,   177,   196,
     733             :      179,    13,    14,    15,    16,    17,    18,    19,    -1,    -1,
     734             :       22,    23,    24,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
     735             :       -1,    -1,    -1,    -1,    -1,    -1,    38,    39,    40,    41,
     736             :       42,    43,    44,    45,    46,    -1,    48,    -1,    50,    51,
     737             :       52,    -1,    54,    55,    56,    57,    -1,    -1,     4,    61,
     738             :        6,     7,     8,     9,    10,    11,    12,    -1,    -1,    -1,
     739             :       -1,    -1,    -1,    -1,    20,    21,    -1,    -1,    -1,    25,
     740             :       26,     4,    -1,     6,     7,     8,     9,    10,    11,    12,
     741             :       -1,    37,    -1,    -1,    -1,    -1,    -1,    20,    21,    -1,
     742             :       -1,    -1,    25,    26,    -1,    -1,    52,     5,    -1,    -1,
     743             :       -1,    57,    -1,    -1,    37,    13,    14,    15,    16,    17,
     744             :       18,    19,    -1,    -1,    22,    23,    24,    -1,    -1,    52,
     745             :       -1,    -1,    -1,    -1,    57,    -1,    -1,    -1,     5,    -1,
     746             :       38,    39,    40,    41,    42,    43,    44,    45,    46,    -1,
     747             :       48,    -1,    50,    51,    52,    -1,    54,    55,    56,    57,
     748             :       27,    28,    29,    30,    -1,    -1,    -1,    -1,    -1,    -1,
     749             :       -1,    -1,    -1,    -1,    41,    42,    43,    -1,    -1,    -1,
     750             :       -1,    48,    49,    50,    -1,    52,    -1,    54,    55,    56,
     751             :       13,    14,    15,    16,    17,    18,    19,    -1,    -1,    22,
     752             :       23,    24,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
     753             :       -1,    -1,    -1,    -1,    -1,    38,    39,    40,    41,    42,
     754             :       43,    44,    45,    46,    -1,    48,    -1,    50,    51,    52,
     755             :       -1,    54,    55,    56,    57,    -1,    -1,    60,    13,    14,
     756             :       15,    16,    17,    18,    19,    -1,    -1,    22,    23,    24,
     757             :       -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
     758             :       -1,    -1,    -1,    38,    39,    40,    41,    42,    43,    44,
     759             :       45,    46,    -1,    48,    -1,    50,    51,    52,    -1,    54,
     760             :       55,    56,    57,    58,    13,    14,    15,    16,    17,    18,
     761             :       19,    -1,    -1,    22,    23,    24,    -1,    -1,    -1,    -1,
     762             :       -1,    -1,    -1,    -1,    -1,    -1,    35,    -1,    -1,    38,
     763             :       39,    40,    41,    42,    43,    44,    45,    46,    -1,    48,
     764             :       -1,    50,    51,    52,    -1,    54,    55,    56,    57,    13,
     765             :       14,    15,    16,    17,    18,    19,    -1,    -1,    22,    23,
     766             :       24,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
     767             :       -1,    -1,    -1,    -1,    38,    39,    40,    41,    42,    43,
     768             :       44,    45,    46,    -1,    48,    -1,    50,    51,    52,    -1,
     769             :       54,    55,    56,    57,    15,    16,    17,    18,    19,    -1,
     770             :       -1,    22,    23,    24,    -1,    -1,    -1,    -1,    -1,    -1,
     771             :       -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    39,    40,
     772             :       41,    42,    43,    44,    45,    46,    -1,    48,    -1,    50,
     773             :       51,    52,    -1,    54,    55,    56,    57,    22,    23,    24,
     774             :       -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    -1,
     775             :       -1,    -1,    22,    23,    24,    -1,    41,    42,    43,    44,
     776             :       45,    46,    -1,    48,    -1,    50,    51,    52,    -1,    54,
     777             :       55,    56,    57,    43,    44,    45,    46,    -1,    48,    -1,
     778             :       50,    51,    52,    -1,    54,    55,    56,    57,    27,    28,
     779             :       29,    30,    -1,    -1,    -1,    -1,    -1,    -1,    -1,    38,
     780             :       -1,    -1,    41,    42,    43,    27,    28,    29,    30,    -1,
     781             :       49,    50,    51,    52,    -1,    54,    55,    56,    -1,    41,
     782             :       42,    43,    27,    28,    29,    30,    48,    49,    50,    -1,
     783             :       52,    -1,    54,    55,    56,    -1,    41,    42,    43,    -1,
     784             :       -1,    -1,    -1,    -1,    49,    50,    -1,    52,    -1,    54,
     785             :       55,    56
     786             : };
     787             : 
     788             :   /* YYSTOS[STATE-NUM] -- The (internal number of the) accessing
     789             :      symbol of state STATE-NUM.  */
     790             : static const yytype_uint8 yystos[] =
     791             : {
     792             :        0,    27,    28,    29,    30,    41,    42,    43,    49,    50,
     793             :       52,    54,    55,    56,    63,    64,    68,    70,    71,    76,
     794             :       79,    83,    84,    85,    55,    56,    70,    70,    27,    49,
     795             :       59,    67,    70,    70,     1,    35,    58,    70,    73,    74,
     796             :       75,    29,    38,    51,    64,    70,    71,    80,    82,     0,
     797             :       35,    13,    14,    15,    16,    17,    18,    19,    22,    23,
     798             :       24,    38,    39,    40,    41,    42,    43,    44,    45,    46,
     799             :       48,    50,    51,    52,    54,    55,    56,    57,    66,    69,
     800             :        4,     6,     7,     8,     9,    10,    11,    12,    20,    21,
     801             :       25,    26,    37,    57,    66,    37,    29,    82,    27,    67,
     802             :       59,    58,    58,     5,    61,    36,    35,    58,    35,    58,
     803             :       29,    71,    71,    60,    52,     1,     3,    36,    70,    70,
     804             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    70,
     805             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    48,
     806             :       65,    70,    29,    82,    29,    54,    64,    70,    70,    70,
     807             :       70,    70,    70,    70,    70,    70,    70,    29,    70,    60,
     808             :       70,    71,    77,    78,    70,    72,    70,    74,    74,     5,
     809             :       81,    64,    80,    70,    36,    58,     5,    37,    60,    37,
     810             :       58,    40,    35,    36,    58,    58,    70,    65,    70,    64,
     811             :       64,    42,    78,    70,    58,    70,    35,    78
     812             : };
     813             : 
     814             :   /* YYR1[YYN] -- Symbol number of symbol that rule YYN derives.  */
     815             : static const yytype_uint8 yyr1[] =
     816             : {
     817             :        0,    62,    63,    64,    64,    64,    64,    65,    65,    65,
     818             :       65,    66,    66,    67,    67,    68,    68,    68,    68,    68,
     819             :       68,    69,    69,    70,    70,    70,    70,    70,    70,    70,
     820             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    70,
     821             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    70,
     822             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    70,
     823             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    70,
     824             :       70,    70,    70,    70,    70,    70,    70,    70,    70,    70,
     825             :       71,    71,    71,    72,    72,    73,    73,    74,    74,    75,
     826             :       75,    76,    76,    76,    76,    76,    76,    77,    78,    78,
     827             :       78,    78,    79,    80,    80,    80,    80,    81,    80,    82,
     828             :       82,    83,    84,    85,    85,    85,    85
     829             : };
     830             : 
     831             :   /* YYR2[YYN] -- Number of symbols on the right hand side of rule YYN.  */
     832             : static const yytype_uint8 yyr2[] =
     833             : {
     834             :        0,     2,     1,     0,     1,     2,     3,     0,     1,     3,
     835             :        2,     5,     3,     1,     2,     1,     2,     2,     2,     3,
     836             :        3,     1,     2,     1,     1,     1,     3,     1,     2,     1,
     837             :        4,     1,     1,     1,     1,     1,     3,     3,     2,     2,
     838             :        3,     3,     3,     3,     3,     3,     3,     3,     3,     2,
     839             :        2,     3,     3,     3,     3,     3,     3,     3,     3,     3,
     840             :        3,     3,     3,     3,     3,     3,     3,     3,     3,     3,
     841             :        2,     2,     3,     2,     2,     2,     2,     1,     3,     3,
     842             :        1,     2,     3,     1,     0,     1,     0,     1,     3,     3,
     843             :        3,     2,     5,     3,     3,     3,     3,     4,     1,     3,
     844             :        3,     5,     5,     1,     4,     2,     2,     0,     4,     1,
     845             :        3,     4,     3,     6,     5,     3,     4
     846             : };
     847             : 
     848             : 
     849             : #define yyerrok         (yyerrstatus = 0)
     850             : #define yyclearin       (yychar = YYEMPTY)
     851             : #define YYEMPTY         (-2)
     852             : #define YYEOF           0
     853             : 
     854             : #define YYACCEPT        goto yyacceptlab
     855             : #define YYABORT         goto yyabortlab
     856             : #define YYERROR         goto yyerrorlab
     857             : 
     858             : 
     859             : #define YYRECOVERING()  (!!yyerrstatus)
     860             : 
     861             : #define YYBACKUP(Token, Value)                                    \
     862             :   do                                                              \
     863             :     if (yychar == YYEMPTY)                                        \
     864             :       {                                                           \
     865             :         yychar = (Token);                                         \
     866             :         yylval = (Value);                                         \
     867             :         YYPOPSTACK (yylen);                                       \
     868             :         yystate = *yyssp;                                         \
     869             :         goto yybackup;                                            \
     870             :       }                                                           \
     871             :     else                                                          \
     872             :       {                                                           \
     873             :         yyerror (&yylloc, lex, YY_("syntax error: cannot back up")); \
     874             :         YYERROR;                                                  \
     875             :       }                                                           \
     876             :   while (0)
     877             : 
     878             : /* Error token number */
     879             : #define YYTERROR        1
     880             : #define YYERRCODE       256
     881             : 
     882             : 
     883             : /* YYLLOC_DEFAULT -- Set CURRENT to span from RHS[1] to RHS[N].
     884             :    If N is 0, then set CURRENT to the empty location which ends
     885             :    the previous symbol: RHS[0] (always defined).  */
     886             : 
     887             : #ifndef YYLLOC_DEFAULT
     888             : # define YYLLOC_DEFAULT(Current, Rhs, N)                                \
     889             :     do                                                                  \
     890             :       if (N)                                                            \
     891             :         {                                                               \
     892             :           (Current).first_line   = YYRHSLOC (Rhs, 1).first_line;        \
     893             :           (Current).first_column = YYRHSLOC (Rhs, 1).first_column;      \
     894             :           (Current).last_line    = YYRHSLOC (Rhs, N).last_line;         \
     895             :           (Current).last_column  = YYRHSLOC (Rhs, N).last_column;       \
     896             :         }                                                               \
     897             :       else                                                              \
     898             :         {                                                               \
     899             :           (Current).first_line   = (Current).last_line   =              \
     900             :             YYRHSLOC (Rhs, 0).last_line;                                \
     901             :           (Current).first_column = (Current).last_column =              \
     902             :             YYRHSLOC (Rhs, 0).last_column;                              \
     903             :         }                                                               \
     904             :     while (0)
     905             : #endif
     906             : 
     907             : #define YYRHSLOC(Rhs, K) ((Rhs)[K])
     908             : 
     909             : 
     910             : /* Enable debugging if requested.  */
     911             : #if PARI_DEBUG
     912             : 
     913             : # ifndef YYFPRINTF
     914             : #  include <stdio.h> /* INFRINGES ON USER NAME SPACE */
     915             : #  define YYFPRINTF fprintf
     916             : # endif
     917             : 
     918             : # define YYDPRINTF(Args)                        \
     919             : do {                                            \
     920             :   if (yydebug)                                  \
     921             :     YYFPRINTF Args;                             \
     922             : } while (0)
     923             : 
     924             : 
     925             : /* YY_LOCATION_PRINT -- Print the location on the stream.
     926             :    This macro was not mandated originally: define only if we know
     927             :    we won't break user code: when these are the locations we know.  */
     928             : 
     929             : #ifndef YY_LOCATION_PRINT
     930             : # if defined PARI_LTYPE_IS_TRIVIAL && PARI_LTYPE_IS_TRIVIAL
     931             : 
     932             : /* Print *YYLOCP on YYO.  Private, do not rely on its existence. */
     933             : 
     934             : YY_ATTRIBUTE_UNUSED
     935             : static int
     936             : yy_location_print_ (FILE *yyo, YYLTYPE const * const yylocp)
     937             : {
     938             :   int res = 0;
     939             :   int end_col = 0 != yylocp->last_column ? yylocp->last_column - 1 : 0;
     940             :   if (0 <= yylocp->first_line)
     941             :     {
     942             :       res += YYFPRINTF (yyo, "%d", yylocp->first_line);
     943             :       if (0 <= yylocp->first_column)
     944             :         res += YYFPRINTF (yyo, ".%d", yylocp->first_column);
     945             :     }
     946             :   if (0 <= yylocp->last_line)
     947             :     {
     948             :       if (yylocp->first_line < yylocp->last_line)
     949             :         {
     950             :           res += YYFPRINTF (yyo, "-%d", yylocp->last_line);
     951             :           if (0 <= end_col)
     952             :             res += YYFPRINTF (yyo, ".%d", end_col);
     953             :         }
     954             :       else if (0 <= end_col && yylocp->first_column < end_col)
     955             :         res += YYFPRINTF (yyo, "-%d", end_col);
     956             :     }
     957             :   return res;
     958             :  }
     959             : 
     960             : #  define YY_LOCATION_PRINT(File, Loc)          \
     961             :   yy_location_print_ (File, &(Loc))
     962             : 
     963             : # else
     964             : #  define YY_LOCATION_PRINT(File, Loc) ((void) 0)
     965             : # endif
     966             : #endif
     967             : 
     968             : 
     969             : # define YY_SYMBOL_PRINT(Title, Type, Value, Location)                    \
     970             : do {                                                                      \
     971             :   if (yydebug)                                                            \
     972             :     {                                                                     \
     973             :       YYFPRINTF (stderr, "%s ", Title);                                   \
     974             :       yy_symbol_print (stderr,                                            \
     975             :                   Type, Value, Location, lex); \
     976             :       YYFPRINTF (stderr, "\n");                                           \
     977             :     }                                                                     \
     978             : } while (0)
     979             : 
     980             : 
     981             : /*-----------------------------------.
     982             : | Print this symbol's value on YYO.  |
     983             : `-----------------------------------*/
     984             : 
     985             : static void
     986             : yy_symbol_value_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep, YYLTYPE const * const yylocationp, char **lex)
     987             : {
     988             :   FILE *yyoutput = yyo;
     989             :   YYUSE (yyoutput);
     990             :   YYUSE (yylocationp);
     991             :   YYUSE (lex);
     992             :   if (!yyvaluep)
     993             :     return;
     994             : # ifdef YYPRINT
     995             :   if (yytype < YYNTOKENS)
     996             :     YYPRINT (yyo, yytoknum[yytype], *yyvaluep);
     997             : # endif
     998             :   YYUSE (yytype);
     999             : }
    1000             : 
    1001             : 
    1002             : /*---------------------------.
    1003             : | Print this symbol on YYO.  |
    1004             : `---------------------------*/
    1005             : 
    1006             : static void
    1007             : yy_symbol_print (FILE *yyo, int yytype, YYSTYPE const * const yyvaluep, YYLTYPE const * const yylocationp, char **lex)
    1008             : {
    1009             :   YYFPRINTF (yyo, "%s %s (",
    1010             :              yytype < YYNTOKENS ? "token" : "nterm", yytname[yytype]);
    1011             : 
    1012             :   YY_LOCATION_PRINT (yyo, *yylocationp);
    1013             :   YYFPRINTF (yyo, ": ");
    1014             :   yy_symbol_value_print (yyo, yytype, yyvaluep, yylocationp, lex);
    1015             :   YYFPRINTF (yyo, ")");
    1016             : }
    1017             : 
    1018             : /*------------------------------------------------------------------.
    1019             : | yy_stack_print -- Print the state stack from its BOTTOM up to its |
    1020             : | TOP (included).                                                   |
    1021             : `------------------------------------------------------------------*/
    1022             : 
    1023             : static void
    1024             : yy_stack_print (yytype_int16 *yybottom, yytype_int16 *yytop)
    1025             : {
    1026             :   YYFPRINTF (stderr, "Stack now");
    1027             :   for (; yybottom <= yytop; yybottom++)
    1028             :     {
    1029             :       int yybot = *yybottom;
    1030             :       YYFPRINTF (stderr, " %d", yybot);
    1031             :     }
    1032             :   YYFPRINTF (stderr, "\n");
    1033             : }
    1034             : 
    1035             : # define YY_STACK_PRINT(Bottom, Top)                            \
    1036             : do {                                                            \
    1037             :   if (yydebug)                                                  \
    1038             :     yy_stack_print ((Bottom), (Top));                           \
    1039             : } while (0)
    1040             : 
    1041             : 
    1042             : /*------------------------------------------------.
    1043             : | Report that the YYRULE is going to be reduced.  |
    1044             : `------------------------------------------------*/
    1045             : 
    1046             : static void
    1047             : yy_reduce_print (yytype_int16 *yyssp, YYSTYPE *yyvsp, YYLTYPE *yylsp, int yyrule, char **lex)
    1048             : {
    1049             :   unsigned long yylno = yyrline[yyrule];
    1050             :   int yynrhs = yyr2[yyrule];
    1051             :   int yyi;
    1052             :   YYFPRINTF (stderr, "Reducing stack by rule %d (line %lu):\n",
    1053             :              yyrule - 1, yylno);
    1054             :   /* The symbols being reduced.  */
    1055             :   for (yyi = 0; yyi < yynrhs; yyi++)
    1056             :     {
    1057             :       YYFPRINTF (stderr, "   $%d = ", yyi + 1);
    1058             :       yy_symbol_print (stderr,
    1059             :                        yystos[yyssp[yyi + 1 - yynrhs]],
    1060             :                        &yyvsp[(yyi + 1) - (yynrhs)]
    1061             :                        , &(yylsp[(yyi + 1) - (yynrhs)])                       , lex);
    1062             :       YYFPRINTF (stderr, "\n");
    1063             :     }
    1064             : }
    1065             : 
    1066             : # define YY_REDUCE_PRINT(Rule)          \
    1067             : do {                                    \
    1068             :   if (yydebug)                          \
    1069             :     yy_reduce_print (yyssp, yyvsp, yylsp, Rule, lex); \
    1070             : } while (0)
    1071             : 
    1072             : /* Nonzero means print parse trace.  It is left uninitialized so that
    1073             :    multiple parsers can coexist.  */
    1074             : int yydebug;
    1075             : #else /* !PARI_DEBUG */
    1076             : # define YYDPRINTF(Args)
    1077             : # define YY_SYMBOL_PRINT(Title, Type, Value, Location)
    1078             : # define YY_STACK_PRINT(Bottom, Top)
    1079             : # define YY_REDUCE_PRINT(Rule)
    1080             : #endif /* !PARI_DEBUG */
    1081             : 
    1082             : 
    1083             : /* YYINITDEPTH -- initial size of the parser's stacks.  */
    1084             : #ifndef YYINITDEPTH
    1085             : # define YYINITDEPTH 200
    1086             : #endif
    1087             : 
    1088             : /* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
    1089             :    if the built-in stack extension method is used).
    1090             : 
    1091             :    Do not make this value too large; the results are undefined if
    1092             :    YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
    1093             :    evaluated with infinite-precision integer arithmetic.  */
    1094             : 
    1095             : #ifndef YYMAXDEPTH
    1096             : # define YYMAXDEPTH 10000
    1097             : #endif
    1098             : 
    1099             : 
    1100             : #if YYERROR_VERBOSE
    1101             : 
    1102             : # ifndef yystrlen
    1103             : #  if defined __GLIBC__ && defined _STRING_H
    1104             : #   define yystrlen strlen
    1105             : #  else
    1106             : /* Return the length of YYSTR.  */
    1107             : static YYSIZE_T
    1108             : yystrlen (const char *yystr)
    1109             : {
    1110             :   YYSIZE_T yylen;
    1111             :   for (yylen = 0; yystr[yylen]; yylen++)
    1112             :     continue;
    1113             :   return yylen;
    1114             : }
    1115             : #  endif
    1116             : # endif
    1117             : 
    1118             : # ifndef yystpcpy
    1119             : #  if defined __GLIBC__ && defined _STRING_H && defined _GNU_SOURCE
    1120             : #   define yystpcpy stpcpy
    1121             : #  else
    1122             : /* Copy YYSRC to YYDEST, returning the address of the terminating '\0' in
    1123             :    YYDEST.  */
    1124             : static char *
    1125          14 : yystpcpy (char *yydest, const char *yysrc)
    1126             : {
    1127          14 :   char *yyd = yydest;
    1128          14 :   const char *yys = yysrc;
    1129             : 
    1130          56 :   while ((*yyd++ = *yys++) != '\0')
    1131          42 :     continue;
    1132             : 
    1133          14 :   return yyd - 1;
    1134             : }
    1135             : #  endif
    1136             : # endif
    1137             : 
    1138             : # ifndef yytnamerr
    1139             : /* Copy to YYRES the contents of YYSTR after stripping away unnecessary
    1140             :    quotes and backslashes, so that it's suitable for yyerror.  The
    1141             :    heuristic is that double-quoting is unnecessary unless the string
    1142             :    contains an apostrophe, a comma, or backslash (other than
    1143             :    backslash-backslash).  YYSTR is taken from yytname.  If YYRES is
    1144             :    null, do not copy; instead, return the length of what the result
    1145             :    would have been.  */
    1146             : static YYSIZE_T
    1147          56 : yytnamerr (char *yyres, const char *yystr)
    1148             : {
    1149          56 :   if (*yystr == '"')
    1150             :     {
    1151          28 :       YYSIZE_T yyn = 0;
    1152          28 :       char const *yyp = yystr;
    1153             : 
    1154             :       for (;;)
    1155         294 :         switch (*++yyp)
    1156             :           {
    1157           0 :           case '\'':
    1158             :           case ',':
    1159           0 :             goto do_not_strip_quotes;
    1160             : 
    1161           0 :           case '\\':
    1162           0 :             if (*++yyp != '\\')
    1163           0 :               goto do_not_strip_quotes;
    1164             :             else
    1165           0 :               goto append;
    1166             : 
    1167         266 :           append:
    1168             :           default:
    1169         266 :             if (yyres)
    1170         133 :               yyres[yyn] = *yyp;
    1171         266 :             yyn++;
    1172         266 :             break;
    1173             : 
    1174          28 :           case '"':
    1175          28 :             if (yyres)
    1176          14 :               yyres[yyn] = '\0';
    1177          28 :             return yyn;
    1178             :           }
    1179          28 :     do_not_strip_quotes: ;
    1180             :     }
    1181             : 
    1182          28 :   if (! yyres)
    1183          14 :     return yystrlen (yystr);
    1184             : 
    1185          14 :   return (YYSIZE_T) (yystpcpy (yyres, yystr) - yyres);
    1186             : }
    1187             : # endif
    1188             : 
    1189             : /* Copy into *YYMSG, which is of size *YYMSG_ALLOC, an error message
    1190             :    about the unexpected token YYTOKEN for the state stack whose top is
    1191             :    YYSSP.
    1192             : 
    1193             :    Return 0 if *YYMSG was successfully written.  Return 1 if *YYMSG is
    1194             :    not large enough to hold the message.  In that case, also set
    1195             :    *YYMSG_ALLOC to the required number of bytes.  Return 2 if the
    1196             :    required number of bytes is too large to store.  */
    1197             : static int
    1198           7 : yysyntax_error (YYSIZE_T *yymsg_alloc, char **yymsg,
    1199             :                 yytype_int16 *yyssp, int yytoken)
    1200             : {
    1201           7 :   YYSIZE_T yysize0 = yytnamerr (YY_NULLPTR, yytname[yytoken]);
    1202           7 :   YYSIZE_T yysize = yysize0;
    1203             :   enum { YYERROR_VERBOSE_ARGS_MAXIMUM = 5 };
    1204             :   /* Internationalized format string. */
    1205           7 :   const char *yyformat = YY_NULLPTR;
    1206             :   /* Arguments of yyformat. */
    1207             :   char const *yyarg[YYERROR_VERBOSE_ARGS_MAXIMUM];
    1208             :   /* Number of reported tokens (one for the "unexpected", one per
    1209             :      "expected"). */
    1210           7 :   int yycount = 0;
    1211             : 
    1212             :   /* There are many possibilities here to consider:
    1213             :      - If this state is a consistent state with a default action, then
    1214             :        the only way this function was invoked is if the default action
    1215             :        is an error action.  In that case, don't check for expected
    1216             :        tokens because there are none.
    1217             :      - The only way there can be no lookahead present (in yychar) is if
    1218             :        this state is a consistent state with a default action.  Thus,
    1219             :        detecting the absence of a lookahead is sufficient to determine
    1220             :        that there is no unexpected or expected token to report.  In that
    1221             :        case, just report a simple "syntax error".
    1222             :      - Don't assume there isn't a lookahead just because this state is a
    1223             :        consistent state with a default action.  There might have been a
    1224             :        previous inconsistent state, consistent state with a non-default
    1225             :        action, or user semantic action that manipulated yychar.
    1226             :      - Of course, the expected token list depends on states to have
    1227             :        correct lookahead information, and it depends on the parser not
    1228             :        to perform extra reductions after fetching a lookahead from the
    1229             :        scanner and before detecting a syntax error.  Thus, state merging
    1230             :        (from LALR or IELR) and default reductions corrupt the expected
    1231             :        token list.  However, the list is correct for canonical LR with
    1232             :        one exception: it will still contain any token that will not be
    1233             :        accepted due to an error action in a later state.
    1234             :   */
    1235           7 :   if (yytoken != YYEMPTY)
    1236             :     {
    1237           7 :       int yyn = yypact[*yyssp];
    1238           7 :       yyarg[yycount++] = yytname[yytoken];
    1239           7 :       if (!yypact_value_is_default (yyn))
    1240             :         {
    1241             :           /* Start YYX at -YYN if negative to avoid negative indexes in
    1242             :              YYCHECK.  In other words, skip the first -YYN actions for
    1243             :              this state because they are default actions.  */
    1244           7 :           int yyxbegin = yyn < 0 ? -yyn : 0;
    1245             :           /* Stay within bounds of both yycheck and yytname.  */
    1246           7 :           int yychecklim = YYLAST - yyn + 1;
    1247           7 :           int yyxend = yychecklim < YYNTOKENS ? yychecklim : YYNTOKENS;
    1248             :           int yyx;
    1249             : 
    1250         441 :           for (yyx = yyxbegin; yyx < yyxend; ++yyx)
    1251         434 :             if (yycheck[yyx + yyn] == yyx && yyx != YYTERROR
    1252          28 :                 && !yytable_value_is_error (yytable[yyx + yyn]))
    1253             :               {
    1254          21 :                 if (yycount == YYERROR_VERBOSE_ARGS_MAXIMUM)
    1255             :                   {
    1256           0 :                     yycount = 1;
    1257           0 :                     yysize = yysize0;
    1258           0 :                     break;
    1259             :                   }
    1260          21 :                 yyarg[yycount++] = yytname[yyx];
    1261             :                 {
    1262          21 :                   YYSIZE_T yysize1 = yysize + yytnamerr (YY_NULLPTR, yytname[yyx]);
    1263          21 :                   if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)
    1264          21 :                     yysize = yysize1;
    1265             :                   else
    1266           0 :                     return 2;
    1267             :                 }
    1268             :               }
    1269             :         }
    1270             :     }
    1271             : 
    1272           7 :   switch (yycount)
    1273             :     {
    1274             : # define YYCASE_(N, S)                      \
    1275             :       case N:                               \
    1276             :         yyformat = S;                       \
    1277             :       break
    1278           0 :     default: /* Avoid compiler warnings. */
    1279           0 :       YYCASE_(0, YY_("syntax error"));
    1280           0 :       YYCASE_(1, YY_("syntax error, unexpected %s"));
    1281           0 :       YYCASE_(2, YY_("syntax error, unexpected %s, expecting %s"));
    1282           0 :       YYCASE_(3, YY_("syntax error, unexpected %s, expecting %s or %s"));
    1283           7 :       YYCASE_(4, YY_("syntax error, unexpected %s, expecting %s or %s or %s"));
    1284           0 :       YYCASE_(5, YY_("syntax error, unexpected %s, expecting %s or %s or %s or %s"));
    1285             : # undef YYCASE_
    1286             :     }
    1287             : 
    1288             :   {
    1289           7 :     YYSIZE_T yysize1 = yysize + yystrlen (yyformat);
    1290           7 :     if (yysize <= yysize1 && yysize1 <= YYSTACK_ALLOC_MAXIMUM)
    1291           7 :       yysize = yysize1;
    1292             :     else
    1293           0 :       return 2;
    1294             :   }
    1295             : 
    1296           7 :   if (*yymsg_alloc < yysize)
    1297             :     {
    1298           0 :       *yymsg_alloc = 2 * yysize;
    1299           0 :       if (! (yysize <= *yymsg_alloc
    1300             :              && *yymsg_alloc <= YYSTACK_ALLOC_MAXIMUM))
    1301           0 :         *yymsg_alloc = YYSTACK_ALLOC_MAXIMUM;
    1302           0 :       return 1;
    1303             :     }
    1304             : 
    1305             :   /* Avoid sprintf, as that infringes on the user's name space.
    1306             :      Don't have undefined behavior even if the translation
    1307             :      produced a string with the wrong number of "%s"s.  */
    1308             :   {
    1309           7 :     char *yyp = *yymsg;
    1310           7 :     int yyi = 0;
    1311         350 :     while ((*yyp = *yyformat) != '\0')
    1312         343 :       if (*yyp == '%' && yyformat[1] == 's' && yyi < yycount)
    1313             :         {
    1314          28 :           yyp += yytnamerr (yyp, yyarg[yyi++]);
    1315          28 :           yyformat += 2;
    1316             :         }
    1317             :       else
    1318             :         {
    1319         315 :           yyp++;
    1320         315 :           yyformat++;
    1321             :         }
    1322             :   }
    1323           7 :   return 0;
    1324             : }
    1325             : #endif /* YYERROR_VERBOSE */
    1326             : 
    1327             : /*-----------------------------------------------.
    1328             : | Release the memory associated to this symbol.  |
    1329             : `-----------------------------------------------*/
    1330             : 
    1331             : static void
    1332      211020 : yydestruct (const char *yymsg, int yytype, YYSTYPE *yyvaluep, YYLTYPE *yylocationp, char **lex)
    1333             : {
    1334             :   YYUSE (yyvaluep);
    1335             :   YYUSE (yylocationp);
    1336             :   YYUSE (lex);
    1337      211020 :   if (!yymsg)
    1338           0 :     yymsg = "Deleting";
    1339             :   YY_SYMBOL_PRINT (yymsg, yytype, yyvaluep, yylocationp);
    1340             : 
    1341             :   YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
    1342      211020 :   switch (yytype)
    1343             :     {
    1344           0 :     case 64: /* seq  */
    1345             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1346             :       { pari_discarded++; }
    1347             : #line 1348 "../src/language/parse.c" /* yacc.c:1257  */
    1348           0 :         break;
    1349             : 
    1350           0 :     case 65: /* range  */
    1351             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1352             :       { pari_discarded++; }
    1353             : #line 1354 "../src/language/parse.c" /* yacc.c:1257  */
    1354           0 :         break;
    1355             : 
    1356           0 :     case 66: /* matrix_index  */
    1357             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1358             :       { pari_discarded++; }
    1359             : #line 1360 "../src/language/parse.c" /* yacc.c:1257  */
    1360           0 :         break;
    1361             : 
    1362           0 :     case 67: /* backticks  */
    1363             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1364             :       { pari_discarded++; }
    1365             : #line 1366 "../src/language/parse.c" /* yacc.c:1257  */
    1366           0 :         break;
    1367             : 
    1368           0 :     case 68: /* history  */
    1369             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1370             :       { pari_discarded++; }
    1371             : #line 1372 "../src/language/parse.c" /* yacc.c:1257  */
    1372           0 :         break;
    1373             : 
    1374           0 :     case 69: /* deriv  */
    1375             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1376             :       { pari_discarded++; }
    1377             : #line 1378 "../src/language/parse.c" /* yacc.c:1257  */
    1378           0 :         break;
    1379             : 
    1380           0 :     case 70: /* expr  */
    1381             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1382             :       { pari_discarded++; }
    1383             : #line 1384 "../src/language/parse.c" /* yacc.c:1257  */
    1384           0 :         break;
    1385             : 
    1386           0 :     case 71: /* lvalue  */
    1387             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1388             :       { pari_discarded++; }
    1389             : #line 1390 "../src/language/parse.c" /* yacc.c:1257  */
    1390           0 :         break;
    1391             : 
    1392           0 :     case 72: /* exprno  */
    1393             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1394             :       { pari_discarded++; }
    1395             : #line 1396 "../src/language/parse.c" /* yacc.c:1257  */
    1396           0 :         break;
    1397             : 
    1398           0 :     case 73: /* matrixeltsno  */
    1399             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1400             :       { pari_discarded++; }
    1401             : #line 1402 "../src/language/parse.c" /* yacc.c:1257  */
    1402           0 :         break;
    1403             : 
    1404           0 :     case 74: /* matrixelts  */
    1405             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1406             :       { pari_discarded++; }
    1407             : #line 1408 "../src/language/parse.c" /* yacc.c:1257  */
    1408           0 :         break;
    1409             : 
    1410           0 :     case 75: /* matrixlines  */
    1411             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1412             :       { pari_discarded++; }
    1413             : #line 1414 "../src/language/parse.c" /* yacc.c:1257  */
    1414           0 :         break;
    1415             : 
    1416           0 :     case 76: /* matrix  */
    1417             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1418             :       { pari_discarded++; }
    1419             : #line 1420 "../src/language/parse.c" /* yacc.c:1257  */
    1420           0 :         break;
    1421             : 
    1422           0 :     case 77: /* in  */
    1423             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1424             :       { pari_discarded++; }
    1425             : #line 1426 "../src/language/parse.c" /* yacc.c:1257  */
    1426           0 :         break;
    1427             : 
    1428           0 :     case 78: /* inseq  */
    1429             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1430             :       { pari_discarded++; }
    1431             : #line 1432 "../src/language/parse.c" /* yacc.c:1257  */
    1432           0 :         break;
    1433             : 
    1434           0 :     case 79: /* compr  */
    1435             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1436             :       { pari_discarded++; }
    1437             : #line 1438 "../src/language/parse.c" /* yacc.c:1257  */
    1438           0 :         break;
    1439             : 
    1440           0 :     case 80: /* arg  */
    1441             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1442             :       { pari_discarded++; }
    1443             : #line 1444 "../src/language/parse.c" /* yacc.c:1257  */
    1444           0 :         break;
    1445             : 
    1446           0 :     case 82: /* listarg  */
    1447             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1448             :       { pari_discarded++; }
    1449             : #line 1450 "../src/language/parse.c" /* yacc.c:1257  */
    1450           0 :         break;
    1451             : 
    1452           0 :     case 83: /* funcid  */
    1453             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1454             :       { pari_discarded++; }
    1455             : #line 1456 "../src/language/parse.c" /* yacc.c:1257  */
    1456           0 :         break;
    1457             : 
    1458           0 :     case 84: /* memberid  */
    1459             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1460             :       { pari_discarded++; }
    1461             : #line 1462 "../src/language/parse.c" /* yacc.c:1257  */
    1462           0 :         break;
    1463             : 
    1464           0 :     case 85: /* definition  */
    1465             : #line 86 "../src/language/parse.y" /* yacc.c:1257  */
    1466             :       { pari_discarded++; }
    1467             : #line 1468 "../src/language/parse.c" /* yacc.c:1257  */
    1468           0 :         break;
    1469             : 
    1470      211020 :       default:
    1471      211020 :         break;
    1472             :     }
    1473             :   YY_IGNORE_MAYBE_UNINITIALIZED_END
    1474      211020 : }
    1475             : 
    1476             : 
    1477             : 
    1478             : 
    1479             : /*----------.
    1480             : | yyparse.  |
    1481             : `----------*/
    1482             : 
    1483             : int
    1484      105510 : yyparse (char **lex)
    1485             : {
    1486             : /* The lookahead symbol.  */
    1487             : int yychar;
    1488             : 
    1489             : 
    1490             : /* The semantic value of the lookahead symbol.  */
    1491             : /* Default value used for initialization, for pacifying older GCCs
    1492             :    or non-GCC compilers.  */
    1493             : YY_INITIAL_VALUE (static YYSTYPE yyval_default;)
    1494             : YYSTYPE yylval YY_INITIAL_VALUE (= yyval_default);
    1495             : 
    1496             : /* Location data for the lookahead symbol.  */
    1497             : static YYLTYPE yyloc_default
    1498             : # if defined PARI_LTYPE_IS_TRIVIAL && PARI_LTYPE_IS_TRIVIAL
    1499             :   = { 1, 1, 1, 1 }
    1500             : # endif
    1501             : ;
    1502      105510 : YYLTYPE yylloc = yyloc_default;
    1503             : 
    1504             :     /* Number of syntax errors so far.  */
    1505             :     int yynerrs;
    1506             : 
    1507             :     int yystate;
    1508             :     /* Number of tokens to shift before error messages enabled.  */
    1509             :     int yyerrstatus;
    1510             : 
    1511             :     /* The stacks and their tools:
    1512             :        'yyss': related to states.
    1513             :        'yyvs': related to semantic values.
    1514             :        'yyls': related to locations.
    1515             : 
    1516             :        Refer to the stacks through separate pointers, to allow yyoverflow
    1517             :        to reallocate them elsewhere.  */
    1518             : 
    1519             :     /* The state stack.  */
    1520             :     yytype_int16 yyssa[YYINITDEPTH];
    1521             :     yytype_int16 *yyss;
    1522             :     yytype_int16 *yyssp;
    1523             : 
    1524             :     /* The semantic value stack.  */
    1525             :     YYSTYPE yyvsa[YYINITDEPTH];
    1526             :     YYSTYPE *yyvs;
    1527             :     YYSTYPE *yyvsp;
    1528             : 
    1529             :     /* The location stack.  */
    1530             :     YYLTYPE yylsa[YYINITDEPTH];
    1531             :     YYLTYPE *yyls;
    1532             :     YYLTYPE *yylsp;
    1533             : 
    1534             :     /* The locations where the error started and ended.  */
    1535             :     YYLTYPE yyerror_range[3];
    1536             : 
    1537             :     YYSIZE_T yystacksize;
    1538             : 
    1539             :   int yyn;
    1540             :   int yyresult;
    1541             :   /* Lookahead token as an internal (translated) token number.  */
    1542      105510 :   int yytoken = 0;
    1543             :   /* The variables used to return semantic value and location from the
    1544             :      action routines.  */
    1545             :   YYSTYPE yyval;
    1546             :   YYLTYPE yyloc;
    1547             : 
    1548             : #if YYERROR_VERBOSE
    1549             :   /* Buffer for error messages, and its allocated size.  */
    1550             :   char yymsgbuf[128];
    1551      105510 :   char *yymsg = yymsgbuf;
    1552      105510 :   YYSIZE_T yymsg_alloc = sizeof yymsgbuf;
    1553             : #endif
    1554             : 
    1555             : #define YYPOPSTACK(N)   (yyvsp -= (N), yyssp -= (N), yylsp -= (N))
    1556             : 
    1557             :   /* The number of symbols on the RHS of the reduced rule.
    1558             :      Keep to zero when no symbol should be popped.  */
    1559      105510 :   int yylen = 0;
    1560             : 
    1561      105510 :   yyssp = yyss = yyssa;
    1562      105510 :   yyvsp = yyvs = yyvsa;
    1563      105510 :   yylsp = yyls = yylsa;
    1564      105510 :   yystacksize = YYINITDEPTH;
    1565             : 
    1566             :   YYDPRINTF ((stderr, "Starting parse\n"));
    1567             : 
    1568      105510 :   yystate = 0;
    1569      105510 :   yyerrstatus = 0;
    1570      105510 :   yynerrs = 0;
    1571      105510 :   yychar = YYEMPTY; /* Cause a token to be read.  */
    1572             : 
    1573             : /* User initialization code.  */
    1574             : #line 32 "../src/language/parse.y" /* yacc.c:1431  */
    1575             : { yylloc.start=yylloc.end=*lex; }
    1576             : 
    1577             : #line 1578 "../src/language/parse.c" /* yacc.c:1431  */
    1578      105510 :   yylsp[0] = yylloc;
    1579      105510 :   goto yysetstate;
    1580             : 
    1581             : 
    1582             : /*------------------------------------------------------------.
    1583             : | yynewstate -- push a new state, which is found in yystate.  |
    1584             : `------------------------------------------------------------*/
    1585    82349424 : yynewstate:
    1586             :   /* In all cases, when you get here, the value and location stacks
    1587             :      have just been pushed.  So pushing a state here evens the stacks.  */
    1588    82349424 :   yyssp++;
    1589             : 
    1590             : 
    1591             : /*--------------------------------------------------------------------.
    1592             : | yynewstate -- set current state (the top of the stack) to yystate.  |
    1593             : `--------------------------------------------------------------------*/
    1594    82454934 : yysetstate:
    1595    82454934 :   *yyssp = (yytype_int16) yystate;
    1596             : 
    1597    82454934 :   if (yyss + yystacksize - 1 <= yyssp)
    1598             : #if !defined yyoverflow && !defined YYSTACK_RELOCATE
    1599             :     goto yyexhaustedlab;
    1600             : #else
    1601             :     {
    1602             :       /* Get the current used size of the three stacks, in elements.  */
    1603           0 :       YYSIZE_T yysize = (YYSIZE_T) (yyssp - yyss + 1);
    1604             : 
    1605             : # if defined yyoverflow
    1606             :       {
    1607             :         /* Give user a chance to reallocate the stack.  Use copies of
    1608             :            these so that the &'s don't force the real ones into
    1609             :            memory.  */
    1610             :         YYSTYPE *yyvs1 = yyvs;
    1611             :         yytype_int16 *yyss1 = yyss;
    1612             :         YYLTYPE *yyls1 = yyls;
    1613             : 
    1614             :         /* Each stack pointer address is followed by the size of the
    1615             :            data in use in that stack, in bytes.  This used to be a
    1616             :            conditional around just the two extra args, but that might
    1617             :            be undefined if yyoverflow is a macro.  */
    1618             :         yyoverflow (YY_("memory exhausted"),
    1619             :                     &yyss1, yysize * sizeof (*yyssp),
    1620             :                     &yyvs1, yysize * sizeof (*yyvsp),
    1621             :                     &yyls1, yysize * sizeof (*yylsp),
    1622             :                     &yystacksize);
    1623             :         yyss = yyss1;
    1624             :         yyvs = yyvs1;
    1625             :         yyls = yyls1;
    1626             :       }
    1627             : # else /* defined YYSTACK_RELOCATE */
    1628             :       /* Extend the stack our own way.  */
    1629           0 :       if (YYMAXDEPTH <= yystacksize)
    1630           0 :         goto yyexhaustedlab;
    1631           0 :       yystacksize *= 2;
    1632           0 :       if (YYMAXDEPTH < yystacksize)
    1633           0 :         yystacksize = YYMAXDEPTH;
    1634             : 
    1635             :       {
    1636           0 :         yytype_int16 *yyss1 = yyss;
    1637             :         union yyalloc *yyptr =
    1638           0 :           (union yyalloc *) YYSTACK_ALLOC (YYSTACK_BYTES (yystacksize));
    1639           0 :         if (! yyptr)
    1640           0 :           goto yyexhaustedlab;
    1641           0 :         YYSTACK_RELOCATE (yyss_alloc, yyss);
    1642           0 :         YYSTACK_RELOCATE (yyvs_alloc, yyvs);
    1643           0 :         YYSTACK_RELOCATE (yyls_alloc, yyls);
    1644             : # undef YYSTACK_RELOCATE
    1645           0 :         if (yyss1 != yyssa)
    1646           0 :           YYSTACK_FREE (yyss1);
    1647             :       }
    1648             : # endif
    1649             : 
    1650           0 :       yyssp = yyss + yysize - 1;
    1651           0 :       yyvsp = yyvs + yysize - 1;
    1652           0 :       yylsp = yyls + yysize - 1;
    1653             : 
    1654             :       YYDPRINTF ((stderr, "Stack size increased to %lu\n",
    1655             :                   (unsigned long) yystacksize));
    1656             : 
    1657           0 :       if (yyss + yystacksize - 1 <= yyssp)
    1658           0 :         YYABORT;
    1659             :     }
    1660             : #endif /* !defined yyoverflow && !defined YYSTACK_RELOCATE */
    1661             : 
    1662             :   YYDPRINTF ((stderr, "Entering state %d\n", yystate));
    1663             : 
    1664    82454934 :   if (yystate == YYFINAL)
    1665      105510 :     YYACCEPT;
    1666             : 
    1667    82349424 :   goto yybackup;
    1668             : 
    1669             : 
    1670             : /*-----------.
    1671             : | yybackup.  |
    1672             : `-----------*/
    1673    82349424 : yybackup:
    1674             :   /* Do appropriate processing given the current state.  Read a
    1675             :      lookahead token if we need one and don't already have one.  */
    1676             : 
    1677             :   /* First try to decide what to do without reference to lookahead token.  */
    1678    82349424 :   yyn = yypact[yystate];
    1679    82349424 :   if (yypact_value_is_default (yyn))
    1680    14448548 :     goto yydefault;
    1681             : 
    1682             :   /* Not known => get a lookahead token if don't already have one.  */
    1683             : 
    1684             :   /* YYCHAR is either YYEMPTY or YYEOF or a valid lookahead symbol.  */
    1685    67900876 :   if (yychar == YYEMPTY)
    1686             :     {
    1687             :       YYDPRINTF ((stderr, "Reading a token: "));
    1688    29866304 :       yychar = yylex (&yylval, &yylloc, lex);
    1689             :     }
    1690             : 
    1691    67900876 :   if (yychar <= YYEOF)
    1692             :     {
    1693      405157 :       yychar = yytoken = YYEOF;
    1694             :       YYDPRINTF ((stderr, "Now at end of input.\n"));
    1695             :     }
    1696             :   else
    1697             :     {
    1698    67495719 :       yytoken = YYTRANSLATE (yychar);
    1699             :       YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
    1700             :     }
    1701             : 
    1702             :   /* If the proper action on seeing token YYTOKEN is to reduce or to
    1703             :      detect an error, take that action.  */
    1704    67900876 :   yyn += yytoken;
    1705    67900876 :   if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
    1706    37556064 :     goto yydefault;
    1707    30344812 :   yyn = yytable[yyn];
    1708    30344812 :   if (yyn <= 0)
    1709             :     {
    1710             :       if (yytable_value_is_error (yyn))
    1711             :         goto yyerrlab;
    1712      478508 :       yyn = -yyn;
    1713      478508 :       goto yyreduce;
    1714             :     }
    1715             : 
    1716             :   /* Count tokens shifted since error; after three, turn off error
    1717             :      status.  */
    1718    29866304 :   if (yyerrstatus)
    1719           7 :     yyerrstatus--;
    1720             : 
    1721             :   /* Shift the lookahead token.  */
    1722             :   YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
    1723             : 
    1724             :   /* Discard the shifted token.  */
    1725    29866304 :   yychar = YYEMPTY;
    1726             : 
    1727    29866304 :   yystate = yyn;
    1728             :   YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
    1729    29866304 :   *++yyvsp = yylval;
    1730             :   YY_IGNORE_MAYBE_UNINITIALIZED_END
    1731    29866304 :   *++yylsp = yylloc;
    1732    29866304 :   goto yynewstate;
    1733             : 
    1734             : 
    1735             : /*-----------------------------------------------------------.
    1736             : | yydefault -- do the default action for the current state.  |
    1737             : `-----------------------------------------------------------*/
    1738    52004612 : yydefault:
    1739    52004612 :   yyn = yydefact[yystate];
    1740    52004612 :   if (yyn == 0)
    1741          14 :     goto yyerrlab;
    1742    52004598 :   goto yyreduce;
    1743             : 
    1744             : 
    1745             : /*-----------------------------.
    1746             : | yyreduce -- do a reduction.  |
    1747             : `-----------------------------*/
    1748    52483106 : yyreduce:
    1749             :   /* yyn is the number of a rule to reduce with.  */
    1750    52483106 :   yylen = yyr2[yyn];
    1751             : 
    1752             :   /* If YYLEN is nonzero, implement the default value of the action:
    1753             :      '$$ = $1'.
    1754             : 
    1755             :      Otherwise, the following line sets YYVAL to garbage.
    1756             :      This behavior is undocumented and Bison
    1757             :      users should not rely upon it.  Assigning to YYVAL
    1758             :      unconditionally makes the parser a bit smaller, and it avoids a
    1759             :      GCC warning that YYVAL may be used uninitialized.  */
    1760    52483106 :   yyval = yyvsp[1-yylen];
    1761             : 
    1762             :   /* Default location. */
    1763    52483106 :   YYLLOC_DEFAULT (yyloc, (yylsp - yylen), yylen);
    1764    52483106 :   yyerror_range[1] = yyloc;
    1765             :   YY_REDUCE_PRINT (yyn);
    1766    52483106 :   switch (yyn)
    1767             :     {
    1768      105510 :         case 2:
    1769             : #line 89 "../src/language/parse.y" /* yacc.c:1652  */
    1770             :     {(yyval.val)=(yyvsp[0].val);}
    1771             : #line 1772 "../src/language/parse.c" /* yacc.c:1652  */
    1772      105510 :     break;
    1773             : 
    1774       11461 :   case 3:
    1775             : #line 92 "../src/language/parse.y" /* yacc.c:1652  */
    1776             :     {(yyval.val)=NOARG((yyloc));}
    1777             : #line 1778 "../src/language/parse.c" /* yacc.c:1652  */
    1778       11461 :     break;
    1779             : 
    1780      403660 :   case 4:
    1781             : #line 93 "../src/language/parse.y" /* yacc.c:1652  */
    1782             :     {(yyval.val)=(yyvsp[0].val);}
    1783             : #line 1784 "../src/language/parse.c" /* yacc.c:1652  */
    1784      403660 :     break;
    1785             : 
    1786       32284 :   case 5:
    1787             : #line 94 "../src/language/parse.y" /* yacc.c:1652  */
    1788             :     {(yyval.val)=(yyvsp[-1].val); (yyloc)=(yylsp[-1]);}
    1789             : #line 1790 "../src/language/parse.c" /* yacc.c:1652  */
    1790       32284 :     break;
    1791             : 
    1792       26871 :   case 6:
    1793             : #line 95 "../src/language/parse.y" /* yacc.c:1652  */
    1794             :     {(yyval.val)=newnode(Fseq,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    1795             : #line 1796 "../src/language/parse.c" /* yacc.c:1652  */
    1796       26871 :     break;
    1797             : 
    1798         791 :   case 7:
    1799             : #line 98 "../src/language/parse.y" /* yacc.c:1652  */
    1800             :     { (yyval.val)=newnode(Frange,NORANGE((yyloc)),NORANGE((yyloc)),&(yyloc)); }
    1801             : #line 1802 "../src/language/parse.c" /* yacc.c:1652  */
    1802         791 :     break;
    1803             : 
    1804       10939 :   case 8:
    1805             : #line 99 "../src/language/parse.y" /* yacc.c:1652  */
    1806             :     { (yyval.val)=newnode(Frange,(yyvsp[0].val),NORANGE((yyloc)),&(yyloc)); }
    1807             : #line 1808 "../src/language/parse.c" /* yacc.c:1652  */
    1808       10939 :     break;
    1809             : 
    1810         525 :   case 9:
    1811             : #line 100 "../src/language/parse.y" /* yacc.c:1652  */
    1812             :     { (yyval.val)=newnode(Frange,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc)); }
    1813             : #line 1814 "../src/language/parse.c" /* yacc.c:1652  */
    1814         525 :     break;
    1815             : 
    1816          98 :   case 10:
    1817             : #line 101 "../src/language/parse.y" /* yacc.c:1652  */
    1818             :     { (yyval.val)=newnode(Frange,NORANGE((yyloc)),(yyvsp[0].val),&(yyloc)); }
    1819             : #line 1820 "../src/language/parse.c" /* yacc.c:1652  */
    1820          98 :     break;
    1821             : 
    1822        1309 :   case 11:
    1823             : #line 104 "../src/language/parse.y" /* yacc.c:1652  */
    1824             :     {(yyval.val)=newnode(Fmatrix,(yyvsp[-3].val),(yyvsp[-1].val),&(yyloc));}
    1825             : #line 1826 "../src/language/parse.c" /* yacc.c:1652  */
    1826        1309 :     break;
    1827             : 
    1828        9735 :   case 12:
    1829             : #line 105 "../src/language/parse.y" /* yacc.c:1652  */
    1830             :     {(yyval.val)=newnode(Fmatrix,(yyvsp[-1].val),-1,&(yyloc));}
    1831             : #line 1832 "../src/language/parse.c" /* yacc.c:1652  */
    1832        9735 :     break;
    1833             : 
    1834          35 :   case 13:
    1835             : #line 108 "../src/language/parse.y" /* yacc.c:1652  */
    1836             :     {(yyval.val)=1;}
    1837             : #line 1838 "../src/language/parse.c" /* yacc.c:1652  */
    1838          35 :     break;
    1839             : 
    1840          84 :   case 14:
    1841             : #line 109 "../src/language/parse.y" /* yacc.c:1652  */
    1842             :     {(yyval.val)=(yyvsp[-1].val)+1;}
    1843             : #line 1844 "../src/language/parse.c" /* yacc.c:1652  */
    1844          84 :     break;
    1845             : 
    1846          49 :   case 15:
    1847             : #line 112 "../src/language/parse.y" /* yacc.c:1652  */
    1848             :     {(yyval.val)=newopcall(OPhist,-1,-1,&(yyloc));}
    1849             : #line 1850 "../src/language/parse.c" /* yacc.c:1652  */
    1850          49 :     break;
    1851             : 
    1852          14 :   case 16:
    1853             : #line 113 "../src/language/parse.y" /* yacc.c:1652  */
    1854             :     {(yyval.val)=newopcall(OPhist,newintnode(&(yylsp[0])),-1,&(yyloc));}
    1855             : #line 1856 "../src/language/parse.c" /* yacc.c:1652  */
    1856          14 :     break;
    1857             : 
    1858          28 :   case 17:
    1859             : #line 114 "../src/language/parse.y" /* yacc.c:1652  */
    1860             :     {(yyval.val)=newopcall(OPhist,newnode(Fsmall,-(yyvsp[0].val),-1,&(yyloc)),-1,&(yyloc));}
    1861             : #line 1862 "../src/language/parse.c" /* yacc.c:1652  */
    1862          28 :     break;
    1863             : 
    1864           7 :   case 18:
    1865             : #line 115 "../src/language/parse.y" /* yacc.c:1652  */
    1866             :     {(yyval.val)=newopcall(OPhisttime,-1,-1,&(yyloc));}
    1867             : #line 1868 "../src/language/parse.c" /* yacc.c:1652  */
    1868           7 :     break;
    1869             : 
    1870          11 :   case 19:
    1871             : #line 116 "../src/language/parse.y" /* yacc.c:1652  */
    1872             :     {(yyval.val)=newopcall(OPhisttime,newintnode(&(yylsp[0])),-1,&(yyloc));}
    1873             : #line 1874 "../src/language/parse.c" /* yacc.c:1652  */
    1874          11 :     break;
    1875             : 
    1876           7 :   case 20:
    1877             : #line 117 "../src/language/parse.y" /* yacc.c:1652  */
    1878             :     {(yyval.val)=newopcall(OPhisttime,newnode(Fsmall,-(yyvsp[0].val),-1,&(yyloc)),-1,&(yyloc));}
    1879             : #line 1880 "../src/language/parse.c" /* yacc.c:1652  */
    1880           7 :     break;
    1881             : 
    1882         140 :   case 21:
    1883             : #line 120 "../src/language/parse.y" /* yacc.c:1652  */
    1884             :     {(yyval.val) = 1;}
    1885             : #line 1886 "../src/language/parse.c" /* yacc.c:1652  */
    1886         140 :     break;
    1887             : 
    1888          42 :   case 22:
    1889             : #line 121 "../src/language/parse.y" /* yacc.c:1652  */
    1890             :     {(yyval.val) = (yyvsp[-1].val)+1;}
    1891             : #line 1892 "../src/language/parse.c" /* yacc.c:1652  */
    1892          42 :     break;
    1893             : 
    1894     7800624 :   case 23:
    1895             : #line 124 "../src/language/parse.y" /* yacc.c:1652  */
    1896             :     {(yyval.val)=newintnode(&(yylsp[0]));}
    1897             : #line 1898 "../src/language/parse.c" /* yacc.c:1652  */
    1898     7800624 :     break;
    1899             : 
    1900        3475 :   case 24:
    1901             : #line 125 "../src/language/parse.y" /* yacc.c:1652  */
    1902             :     {(yyval.val)=newconst(CSTreal,&(yyloc));}
    1903             : #line 1904 "../src/language/parse.c" /* yacc.c:1652  */
    1904        3475 :     break;
    1905             : 
    1906           0 :   case 25:
    1907             : #line 126 "../src/language/parse.y" /* yacc.c:1652  */
    1908             :     {(yyval.val)=newconst(CSTreal,&(yyloc));}
    1909             : #line 1910 "../src/language/parse.c" /* yacc.c:1652  */
    1910           0 :     break;
    1911             : 
    1912           0 :   case 26:
    1913             : #line 127 "../src/language/parse.y" /* yacc.c:1652  */
    1914             :     {(yyval.val)=newnode(Ffunction,newconst(CSTmember,&(yylsp[0])),
    1915             :                                                 newintnode(&(yylsp[-2])),&(yyloc));}
    1916             : #line 1917 "../src/language/parse.c" /* yacc.c:1652  */
    1917           0 :     break;
    1918             : 
    1919     1144945 :   case 27:
    1920             : #line 129 "../src/language/parse.y" /* yacc.c:1652  */
    1921             :     {(yyval.val)=newconst(CSTstr,&(yyloc));}
    1922             : #line 1923 "../src/language/parse.c" /* yacc.c:1652  */
    1923     1144945 :     break;
    1924             : 
    1925        2992 :   case 28:
    1926             : #line 130 "../src/language/parse.y" /* yacc.c:1652  */
    1927             :     {(yyval.val)=newconst(CSTquote,&(yyloc));}
    1928             : #line 1929 "../src/language/parse.c" /* yacc.c:1652  */
    1929        2992 :     break;
    1930             : 
    1931         116 :   case 29:
    1932             : #line 131 "../src/language/parse.y" /* yacc.c:1652  */
    1933             :     {(yyval.val)=(yyvsp[0].val);}
    1934             : #line 1935 "../src/language/parse.c" /* yacc.c:1652  */
    1935         116 :     break;
    1936             : 
    1937         315 :   case 30:
    1938             : #line 132 "../src/language/parse.y" /* yacc.c:1652  */
    1939             :     {(yyval.val)=newnode(Fcall,(yyvsp[-3].val),(yyvsp[-1].val),&(yyloc));}
    1940             : #line 1941 "../src/language/parse.c" /* yacc.c:1652  */
    1941         315 :     break;
    1942             : 
    1943      158419 :   case 31:
    1944             : #line 133 "../src/language/parse.y" /* yacc.c:1652  */
    1945             :     {(yyval.val)=(yyvsp[0].val);}
    1946             : #line 1947 "../src/language/parse.c" /* yacc.c:1652  */
    1947      158419 :     break;
    1948             : 
    1949      228693 :   case 32:
    1950             : #line 134 "../src/language/parse.y" /* yacc.c:1652  */
    1951             :     {(yyval.val)=(yyvsp[0].val);}
    1952             : #line 1953 "../src/language/parse.c" /* yacc.c:1652  */
    1953      228693 :     break;
    1954             : 
    1955     3945901 :   case 33:
    1956             : #line 135 "../src/language/parse.y" /* yacc.c:1652  */
    1957             :     {(yyval.val)=(yyvsp[0].val);}
    1958             : #line 1959 "../src/language/parse.c" /* yacc.c:1652  */
    1959     3945901 :     break;
    1960             : 
    1961         609 :   case 34:
    1962             : #line 136 "../src/language/parse.y" /* yacc.c:1652  */
    1963             :     {(yyval.val)=(yyvsp[0].val);}
    1964             : #line 1965 "../src/language/parse.c" /* yacc.c:1652  */
    1965         609 :     break;
    1966             : 
    1967        8406 :   case 35:
    1968             : #line 137 "../src/language/parse.y" /* yacc.c:1652  */
    1969             :     {(yyval.val)=(yyvsp[0].val);}
    1970             : #line 1971 "../src/language/parse.c" /* yacc.c:1652  */
    1971        8406 :     break;
    1972             : 
    1973         844 :   case 36:
    1974             : #line 138 "../src/language/parse.y" /* yacc.c:1652  */
    1975             :     {(yyval.val)=newnode(Fassign,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    1976             : #line 1977 "../src/language/parse.c" /* yacc.c:1652  */
    1977         844 :     break;
    1978             : 
    1979       38386 :   case 37:
    1980             : #line 139 "../src/language/parse.y" /* yacc.c:1652  */
    1981             :     {(yyval.val)=newnode(Fassign,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    1982             : #line 1983 "../src/language/parse.c" /* yacc.c:1652  */
    1983       38386 :     break;
    1984             : 
    1985         141 :   case 38:
    1986             : #line 140 "../src/language/parse.y" /* yacc.c:1652  */
    1987             :     {(yyval.val)=newopcall(OPpp,(yyvsp[-1].val),-1,&(yyloc));}
    1988             : #line 1989 "../src/language/parse.c" /* yacc.c:1652  */
    1989         141 :     break;
    1990             : 
    1991          14 :   case 39:
    1992             : #line 141 "../src/language/parse.y" /* yacc.c:1652  */
    1993             :     {(yyval.val)=newopcall(OPss,(yyvsp[-1].val),-1,&(yyloc));}
    1994             : #line 1995 "../src/language/parse.c" /* yacc.c:1652  */
    1995          14 :     break;
    1996             : 
    1997         160 :   case 40:
    1998             : #line 142 "../src/language/parse.y" /* yacc.c:1652  */
    1999             :     {(yyval.val)=newopcall(OPme,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2000             : #line 2001 "../src/language/parse.c" /* yacc.c:1652  */
    2001         160 :     break;
    2002             : 
    2003          35 :   case 41:
    2004             : #line 143 "../src/language/parse.y" /* yacc.c:1652  */
    2005             :     {(yyval.val)=newopcall(OPde,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2006             : #line 2007 "../src/language/parse.c" /* yacc.c:1652  */
    2007          35 :     break;
    2008             : 
    2009           7 :   case 42:
    2010             : #line 144 "../src/language/parse.y" /* yacc.c:1652  */
    2011             :     {(yyval.val)=newopcall(OPdre,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2012             : #line 2013 "../src/language/parse.c" /* yacc.c:1652  */
    2013           7 :     break;
    2014             : 
    2015           7 :   case 43:
    2016             : #line 145 "../src/language/parse.y" /* yacc.c:1652  */
    2017             :     {(yyval.val)=newopcall(OPeuce,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2018             : #line 2019 "../src/language/parse.c" /* yacc.c:1652  */
    2019           7 :     break;
    2020             : 
    2021           7 :   case 44:
    2022             : #line 146 "../src/language/parse.y" /* yacc.c:1652  */
    2023             :     {(yyval.val)=newopcall(OPmode,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2024             : #line 2025 "../src/language/parse.c" /* yacc.c:1652  */
    2025           7 :     break;
    2026             : 
    2027           7 :   case 45:
    2028             : #line 147 "../src/language/parse.y" /* yacc.c:1652  */
    2029             :     {(yyval.val)=newopcall(OPsle,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2030             : #line 2031 "../src/language/parse.c" /* yacc.c:1652  */
    2031           7 :     break;
    2032             : 
    2033           7 :   case 46:
    2034             : #line 148 "../src/language/parse.y" /* yacc.c:1652  */
    2035             :     {(yyval.val)=newopcall(OPsre,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2036             : #line 2037 "../src/language/parse.c" /* yacc.c:1652  */
    2037           7 :     break;
    2038             : 
    2039         176 :   case 47:
    2040             : #line 149 "../src/language/parse.y" /* yacc.c:1652  */
    2041             :     {(yyval.val)=newopcall(OPpe,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2042             : #line 2043 "../src/language/parse.c" /* yacc.c:1652  */
    2043         176 :     break;
    2044             : 
    2045          49 :   case 48:
    2046             : #line 150 "../src/language/parse.y" /* yacc.c:1652  */
    2047             :     {(yyval.val)=newopcall(OPse,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2048             : #line 2049 "../src/language/parse.c" /* yacc.c:1652  */
    2049          49 :     break;
    2050             : 
    2051         525 :   case 49:
    2052             : #line 151 "../src/language/parse.y" /* yacc.c:1652  */
    2053             :     {(yyval.val)=newopcall(OPnb,(yyvsp[0].val),-1,&(yyloc));}
    2054             : #line 2055 "../src/language/parse.c" /* yacc.c:1652  */
    2055         525 :     break;
    2056             : 
    2057        3130 :   case 50:
    2058             : #line 152 "../src/language/parse.y" /* yacc.c:1652  */
    2059             :     {(yyval.val)=newopcall(OPlength,(yyvsp[0].val),-1,&(yyloc));}
    2060             : #line 2061 "../src/language/parse.c" /* yacc.c:1652  */
    2061        3130 :     break;
    2062             : 
    2063         315 :   case 51:
    2064             : #line 153 "../src/language/parse.y" /* yacc.c:1652  */
    2065             :     {(yyval.val)=newopcall(OPor,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2066             : #line 2067 "../src/language/parse.c" /* yacc.c:1652  */
    2067         315 :     break;
    2068             : 
    2069         704 :   case 52:
    2070             : #line 154 "../src/language/parse.y" /* yacc.c:1652  */
    2071             :     {(yyval.val)=newopcall(OPand,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2072             : #line 2073 "../src/language/parse.c" /* yacc.c:1652  */
    2073         704 :     break;
    2074             : 
    2075           0 :   case 53:
    2076             : #line 155 "../src/language/parse.y" /* yacc.c:1652  */
    2077             :     {(yyval.val)=newopcall(OPand,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2078             : #line 2079 "../src/language/parse.c" /* yacc.c:1652  */
    2079           0 :     break;
    2080             : 
    2081         357 :   case 54:
    2082             : #line 156 "../src/language/parse.y" /* yacc.c:1652  */
    2083             :     {(yyval.val)=newopcall(OPid,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2084             : #line 2085 "../src/language/parse.c" /* yacc.c:1652  */
    2085         357 :     break;
    2086             : 
    2087        8290 :   case 55:
    2088             : #line 157 "../src/language/parse.y" /* yacc.c:1652  */
    2089             :     {(yyval.val)=newopcall(OPeq,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2090             : #line 2091 "../src/language/parse.c" /* yacc.c:1652  */
    2091        8290 :     break;
    2092             : 
    2093        1862 :   case 56:
    2094             : #line 158 "../src/language/parse.y" /* yacc.c:1652  */
    2095             :     {(yyval.val)=newopcall(OPne,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2096             : #line 2097 "../src/language/parse.c" /* yacc.c:1652  */
    2097        1862 :     break;
    2098             : 
    2099          76 :   case 57:
    2100             : #line 159 "../src/language/parse.y" /* yacc.c:1652  */
    2101             :     {(yyval.val)=newopcall(OPge,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2102             : #line 2103 "../src/language/parse.c" /* yacc.c:1652  */
    2103          76 :     break;
    2104             : 
    2105         340 :   case 58:
    2106             : #line 160 "../src/language/parse.y" /* yacc.c:1652  */
    2107             :     {(yyval.val)=newopcall(OPg,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2108             : #line 2109 "../src/language/parse.c" /* yacc.c:1652  */
    2109         340 :     break;
    2110             : 
    2111         174 :   case 59:
    2112             : #line 161 "../src/language/parse.y" /* yacc.c:1652  */
    2113             :     {(yyval.val)=newopcall(OPle,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2114             : #line 2115 "../src/language/parse.c" /* yacc.c:1652  */
    2115         174 :     break;
    2116             : 
    2117         430 :   case 60:
    2118             : #line 162 "../src/language/parse.y" /* yacc.c:1652  */
    2119             :     {(yyval.val)=newopcall(OPl,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2120             : #line 2121 "../src/language/parse.c" /* yacc.c:1652  */
    2121         430 :     break;
    2122             : 
    2123       21181 :   case 61:
    2124             : #line 163 "../src/language/parse.y" /* yacc.c:1652  */
    2125             :     {(yyval.val)=newopcall(OPs,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2126             : #line 2127 "../src/language/parse.c" /* yacc.c:1652  */
    2127       21181 :     break;
    2128             : 
    2129       44866 :   case 62:
    2130             : #line 164 "../src/language/parse.y" /* yacc.c:1652  */
    2131             :     {(yyval.val)=newopcall(OPp,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2132             : #line 2133 "../src/language/parse.c" /* yacc.c:1652  */
    2133       44866 :     break;
    2134             : 
    2135         105 :   case 63:
    2136             : #line 165 "../src/language/parse.y" /* yacc.c:1652  */
    2137             :     {(yyval.val)=newopcall(OPsl,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2138             : #line 2139 "../src/language/parse.c" /* yacc.c:1652  */
    2139         105 :     break;
    2140             : 
    2141          21 :   case 64:
    2142             : #line 166 "../src/language/parse.y" /* yacc.c:1652  */
    2143             :     {(yyval.val)=newopcall(OPsr,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2144             : #line 2145 "../src/language/parse.c" /* yacc.c:1652  */
    2145          21 :     break;
    2146             : 
    2147         504 :   case 65:
    2148             : #line 167 "../src/language/parse.y" /* yacc.c:1652  */
    2149             :     {(yyval.val)=newopcall(OPmod,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2150             : #line 2151 "../src/language/parse.c" /* yacc.c:1652  */
    2151         504 :     break;
    2152             : 
    2153          28 :   case 66:
    2154             : #line 168 "../src/language/parse.y" /* yacc.c:1652  */
    2155             :     {(yyval.val)=newopcall(OPdr,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2156             : #line 2157 "../src/language/parse.c" /* yacc.c:1652  */
    2157          28 :     break;
    2158             : 
    2159         133 :   case 67:
    2160             : #line 169 "../src/language/parse.y" /* yacc.c:1652  */
    2161             :     {(yyval.val)=newopcall(OPeuc,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2162             : #line 2163 "../src/language/parse.c" /* yacc.c:1652  */
    2163         133 :     break;
    2164             : 
    2165      121745 :   case 68:
    2166             : #line 170 "../src/language/parse.y" /* yacc.c:1652  */
    2167             :     {(yyval.val)=newopcall(OPd,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2168             : #line 2169 "../src/language/parse.c" /* yacc.c:1652  */
    2169      121745 :     break;
    2170             : 
    2171       44134 :   case 69:
    2172             : #line 171 "../src/language/parse.y" /* yacc.c:1652  */
    2173             :     {(yyval.val)=newopcall(OPm,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2174             : #line 2175 "../src/language/parse.c" /* yacc.c:1652  */
    2175       44134 :     break;
    2176             : 
    2177          77 :   case 70:
    2178             : #line 172 "../src/language/parse.y" /* yacc.c:1652  */
    2179             :     {(yyval.val)=(yyvsp[0].val);}
    2180             : #line 2181 "../src/language/parse.c" /* yacc.c:1652  */
    2181          77 :     break;
    2182             : 
    2183     2361918 :   case 71:
    2184             : #line 173 "../src/language/parse.y" /* yacc.c:1652  */
    2185             :     {(yyval.val)=newopcall(OPn,(yyvsp[0].val),-1,&(yyloc));}
    2186             : #line 2187 "../src/language/parse.c" /* yacc.c:1652  */
    2187     2361918 :     break;
    2188             : 
    2189       58003 :   case 72:
    2190             : #line 174 "../src/language/parse.y" /* yacc.c:1652  */
    2191             :     {(yyval.val)=newopcall(OPpow,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2192             : #line 2193 "../src/language/parse.c" /* yacc.c:1652  */
    2193       58003 :     break;
    2194             : 
    2195        3549 :   case 73:
    2196             : #line 175 "../src/language/parse.y" /* yacc.c:1652  */
    2197             :     {(yyval.val)=newopcall(OPtrans,(yyvsp[-1].val),-1,&(yyloc));}
    2198             : #line 2199 "../src/language/parse.c" /* yacc.c:1652  */
    2199        3549 :     break;
    2200             : 
    2201         140 :   case 74:
    2202             : #line 176 "../src/language/parse.y" /* yacc.c:1652  */
    2203             :     {(yyval.val)=newopcall(OPderivn,(yyvsp[-1].val), newnode(Fsmall,(yyvsp[0].val),-1,&(yyloc)),&(yyloc));}
    2204             : #line 2205 "../src/language/parse.c" /* yacc.c:1652  */
    2205         140 :     break;
    2206             : 
    2207         218 :   case 75:
    2208             : #line 177 "../src/language/parse.y" /* yacc.c:1652  */
    2209             :     {(yyval.val)=newopcall(OPfact,(yyvsp[-1].val),-1,&(yyloc));}
    2210             : #line 2211 "../src/language/parse.c" /* yacc.c:1652  */
    2211         218 :     break;
    2212             : 
    2213        3246 :   case 76:
    2214             : #line 178 "../src/language/parse.y" /* yacc.c:1652  */
    2215             :     {(yyval.val)=newnode(Fmatcoeff,(yyvsp[-1].val),(yyvsp[0].val),&(yyloc));}
    2216             : #line 2217 "../src/language/parse.c" /* yacc.c:1652  */
    2217        3246 :     break;
    2218             : 
    2219       11452 :   case 77:
    2220             : #line 179 "../src/language/parse.y" /* yacc.c:1652  */
    2221             :     {(yyval.val)=(yyvsp[0].val);}
    2222             : #line 2223 "../src/language/parse.c" /* yacc.c:1652  */
    2223       11452 :     break;
    2224             : 
    2225           0 :   case 78:
    2226             : #line 180 "../src/language/parse.y" /* yacc.c:1652  */
    2227             :     {(yyval.val)=newnode(Ftag,(yyvsp[-2].val),0,&(yyloc));}
    2228             : #line 2229 "../src/language/parse.c" /* yacc.c:1652  */
    2229           0 :     break;
    2230             : 
    2231       11261 :   case 79:
    2232             : #line 181 "../src/language/parse.y" /* yacc.c:1652  */
    2233             :     {(yyval.val)=(yyvsp[-1].val);}
    2234             : #line 2235 "../src/language/parse.c" /* yacc.c:1652  */
    2235       11261 :     break;
    2236             : 
    2237      270882 :   case 80:
    2238             : #line 184 "../src/language/parse.y" /* yacc.c:1652  */
    2239             :     {(yyval.val)=newnode(Fentry,newconst(CSTentry,&(yylsp[0])),-1,&(yyloc));}
    2240             : #line 2241 "../src/language/parse.c" /* yacc.c:1652  */
    2241      270882 :     break;
    2242             : 
    2243        7798 :   case 81:
    2244             : #line 185 "../src/language/parse.y" /* yacc.c:1652  */
    2245             :     {(yyval.val)=newnode(Fmatcoeff,(yyvsp[-1].val),(yyvsp[0].val),&(yyloc));}
    2246             : #line 2247 "../src/language/parse.c" /* yacc.c:1652  */
    2247        7798 :     break;
    2248             : 
    2249           0 :   case 82:
    2250             : #line 186 "../src/language/parse.y" /* yacc.c:1652  */
    2251             :     {(yyval.val)=newnode(Ftag,(yyvsp[-2].val),newconst(CSTentry,&(yylsp[-1])),&(yyloc));}
    2252             : #line 2253 "../src/language/parse.c" /* yacc.c:1652  */
    2253           0 :     break;
    2254             : 
    2255     9130642 :   case 83:
    2256             : #line 189 "../src/language/parse.y" /* yacc.c:1652  */
    2257             :     {(yyval.val)=(yyvsp[0].val);}
    2258             : #line 2259 "../src/language/parse.c" /* yacc.c:1652  */
    2259     9130642 :     break;
    2260             : 
    2261          35 :   case 84:
    2262             : #line 190 "../src/language/parse.y" /* yacc.c:1652  */
    2263             :     {(yyval.val)=NOARG((yyloc));}
    2264             : #line 2265 "../src/language/parse.c" /* yacc.c:1652  */
    2265          35 :     break;
    2266             : 
    2267     9130670 :   case 85:
    2268             : #line 192 "../src/language/parse.y" /* yacc.c:1652  */
    2269             :     {(yyval.val)=(yyvsp[0].val);}
    2270             : #line 2271 "../src/language/parse.c" /* yacc.c:1652  */
    2271     9130670 :     break;
    2272             : 
    2273           7 :   case 86:
    2274             : #line 193 "../src/language/parse.y" /* yacc.c:1652  */
    2275             :     {(yyval.val)=NOARG((yyloc));}
    2276             : #line 2277 "../src/language/parse.c" /* yacc.c:1652  */
    2277           7 :     break;
    2278             : 
    2279     3415190 :   case 87:
    2280             : #line 196 "../src/language/parse.y" /* yacc.c:1652  */
    2281             :     {(yyval.val)=(yyvsp[0].val);}
    2282             : #line 2283 "../src/language/parse.c" /* yacc.c:1652  */
    2283     3415190 :     break;
    2284             : 
    2285     9130677 :   case 88:
    2286             : #line 197 "../src/language/parse.y" /* yacc.c:1652  */
    2287             :     {(yyval.val)=newnode(Fmatrixelts,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2288             : #line 2289 "../src/language/parse.c" /* yacc.c:1652  */
    2289     9130677 :     break;
    2290             : 
    2291        8036 :   case 89:
    2292             : #line 200 "../src/language/parse.y" /* yacc.c:1652  */
    2293             :     {(yyval.val)=newnode(Fmatrixlines,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2294             : #line 2295 "../src/language/parse.c" /* yacc.c:1652  */
    2295        8036 :     break;
    2296             : 
    2297       20209 :   case 90:
    2298             : #line 201 "../src/language/parse.y" /* yacc.c:1652  */
    2299             :     {(yyval.val)=newnode(Fmatrixlines,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2300             : #line 2301 "../src/language/parse.c" /* yacc.c:1652  */
    2301       20209 :     break;
    2302             : 
    2303      558404 :   case 91:
    2304             : #line 204 "../src/language/parse.y" /* yacc.c:1652  */
    2305             :     {(yyval.val)=newnode(Fvec,-1,-1,&(yyloc));}
    2306             : #line 2307 "../src/language/parse.c" /* yacc.c:1652  */
    2307      558404 :     break;
    2308             : 
    2309         563 :   case 92:
    2310             : #line 205 "../src/language/parse.y" /* yacc.c:1652  */
    2311             :     {(yyval.val)=newopcall(OPrange,(yyvsp[-3].val),(yyvsp[-1].val),&(yyloc));}
    2312             : #line 2313 "../src/language/parse.c" /* yacc.c:1652  */
    2313         563 :     break;
    2314             : 
    2315         826 :   case 93:
    2316             : #line 206 "../src/language/parse.y" /* yacc.c:1652  */
    2317             :     {(yyval.val)=newnode(Fmat,-1,-1,&(yyloc));}
    2318             : #line 2319 "../src/language/parse.c" /* yacc.c:1652  */
    2319         826 :     break;
    2320             : 
    2321     3378916 :   case 94:
    2322             : #line 207 "../src/language/parse.y" /* yacc.c:1652  */
    2323             :     {(yyval.val)=newnode(Fvec,(yyvsp[-1].val),-1,&(yyloc));}
    2324             : #line 2325 "../src/language/parse.c" /* yacc.c:1652  */
    2325     3378916 :     break;
    2326             : 
    2327        8036 :   case 95:
    2328             : #line 208 "../src/language/parse.y" /* yacc.c:1652  */
    2329             :     {(yyval.val)=newnode(Fmat,(yyvsp[-1].val),-1,&(yyloc));}
    2330             : #line 2331 "../src/language/parse.c" /* yacc.c:1652  */
    2331        8036 :     break;
    2332             : 
    2333           0 :   case 96:
    2334             : #line 209 "../src/language/parse.y" /* yacc.c:1652  */
    2335             :     {(yyval.val)=-1; YYABORT;}
    2336             : #line 2337 "../src/language/parse.c" /* yacc.c:1652  */
    2337             :     break;
    2338             : 
    2339         700 :   case 97:
    2340             : #line 212 "../src/language/parse.y" /* yacc.c:1652  */
    2341             :     {(yyval.val)=newnode(Flistarg,(yyvsp[0].val),(yyvsp[-3].val),&(yyloc));}
    2342             : #line 2343 "../src/language/parse.c" /* yacc.c:1652  */
    2343         700 :     break;
    2344             : 
    2345         469 :   case 98:
    2346             : #line 215 "../src/language/parse.y" /* yacc.c:1652  */
    2347             :     {(yyval.val)=newopcall(OPcompr,(yyvsp[0].val),-2,&(yyloc));}
    2348             : #line 2349 "../src/language/parse.c" /* yacc.c:1652  */
    2349         469 :     break;
    2350             : 
    2351         140 :   case 99:
    2352             : #line 216 "../src/language/parse.y" /* yacc.c:1652  */
    2353             :     {(yyval.val)=newopcall3(OPcompr,(yyvsp[-2].val),-2,(yyvsp[0].val),&(yyloc));}
    2354             : #line 2355 "../src/language/parse.c" /* yacc.c:1652  */
    2355         140 :     break;
    2356             : 
    2357          77 :   case 100:
    2358             : #line 217 "../src/language/parse.y" /* yacc.c:1652  */
    2359             :     {(yyval.val)=newopcall(OPcomprc,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2360             : #line 2361 "../src/language/parse.c" /* yacc.c:1652  */
    2361          77 :     break;
    2362             : 
    2363          14 :   case 101:
    2364             : #line 218 "../src/language/parse.y" /* yacc.c:1652  */
    2365             :     {(yyval.val)=newopcall3(OPcomprc,(yyvsp[-4].val),(yyvsp[0].val),(yyvsp[-2].val),&(yyloc));}
    2366             : #line 2367 "../src/language/parse.c" /* yacc.c:1652  */
    2367          14 :     break;
    2368             : 
    2369         609 :   case 102:
    2370             : #line 221 "../src/language/parse.y" /* yacc.c:1652  */
    2371             :     {(yyval.val)=addcurrexpr((yyvsp[-1].val),(yyvsp[-3].val),&(yyloc));}
    2372             : #line 2373 "../src/language/parse.c" /* yacc.c:1652  */
    2373         609 :     break;
    2374             : 
    2375      301205 :   case 103:
    2376             : #line 224 "../src/language/parse.y" /* yacc.c:1652  */
    2377             :     {(yyval.val)=(yyvsp[0].val);}
    2378             : #line 2379 "../src/language/parse.c" /* yacc.c:1652  */
    2379      301205 :     break;
    2380             : 
    2381          21 :   case 104:
    2382             : #line 225 "../src/language/parse.y" /* yacc.c:1652  */
    2383             :     {(yyval.val)=newnode(Fvararg,(yyvsp[-3].val),-1,&(yyloc));}
    2384             : #line 2385 "../src/language/parse.c" /* yacc.c:1652  */
    2385          21 :     break;
    2386             : 
    2387        1043 :   case 105:
    2388             : #line 226 "../src/language/parse.y" /* yacc.c:1652  */
    2389             :     {(yyval.val)=newnode(Frefarg,(yyvsp[0].val),-1,&(yyloc));}
    2390             : #line 2391 "../src/language/parse.c" /* yacc.c:1652  */
    2391        1043 :     break;
    2392             : 
    2393         322 :   case 106:
    2394             : #line 227 "../src/language/parse.y" /* yacc.c:1652  */
    2395             :     {(yyval.val)=newnode(Findarg,(yyvsp[0].val),-1,&(yyloc));}
    2396             : #line 2397 "../src/language/parse.c" /* yacc.c:1652  */
    2397         322 :     break;
    2398             : 
    2399          14 :   case 107:
    2400             : #line 228 "../src/language/parse.y" /* yacc.c:1652  */
    2401             :     {if (!pari_once) { yyerrok; } pari_once=1;}
    2402             : #line 2403 "../src/language/parse.c" /* yacc.c:1652  */
    2403          14 :     break;
    2404             : 
    2405          14 :   case 108:
    2406             : #line 229 "../src/language/parse.y" /* yacc.c:1652  */
    2407             :     {pari_once=0; (yyval.val)=newopcall(OPcat,(yyvsp[-3].val),(yyvsp[0].val),&(yyloc));}
    2408             : #line 2409 "../src/language/parse.c" /* yacc.c:1652  */
    2409          14 :     break;
    2410             : 
    2411      166019 :   case 109:
    2412             : #line 232 "../src/language/parse.y" /* yacc.c:1652  */
    2413             :     {(yyval.val)=(yyvsp[0].val);}
    2414             : #line 2415 "../src/language/parse.c" /* yacc.c:1652  */
    2415      166019 :     break;
    2416             : 
    2417      136572 :   case 110:
    2418             : #line 233 "../src/language/parse.y" /* yacc.c:1652  */
    2419             :     {(yyval.val)=newnode(Flistarg,(yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2420             : #line 2421 "../src/language/parse.c" /* yacc.c:1652  */
    2421      136572 :     break;
    2422             : 
    2423      158419 :   case 111:
    2424             : #line 236 "../src/language/parse.y" /* yacc.c:1652  */
    2425             :     {(yyval.val)=newnode(Ffunction,newconst(CSTentry,&(yylsp[-3])),(yyvsp[-1].val),&(yyloc));}
    2426             : #line 2427 "../src/language/parse.c" /* yacc.c:1652  */
    2427      158419 :     break;
    2428             : 
    2429       11452 :   case 112:
    2430             : #line 239 "../src/language/parse.y" /* yacc.c:1652  */
    2431             :     {(yyval.val)=newnode(Ffunction,newconst(CSTmember,&(yylsp[0])),(yyvsp[-2].val),&(yyloc));}
    2432             : #line 2433 "../src/language/parse.c" /* yacc.c:1652  */
    2433       11452 :     break;
    2434             : 
    2435        3206 :   case 113:
    2436             : #line 243 "../src/language/parse.y" /* yacc.c:1652  */
    2437             :     {(yyval.val)=newfunc(CSTentry,&(yylsp[-5]),(yyvsp[-3].val),(yyvsp[0].val),&(yyloc));}
    2438             : #line 2439 "../src/language/parse.c" /* yacc.c:1652  */
    2439        3206 :     break;
    2440             : 
    2441          14 :   case 114:
    2442             : #line 245 "../src/language/parse.y" /* yacc.c:1652  */
    2443             :     {(yyval.val)=newfunc(CSTmember,&(yylsp[-2]),newnode(Findarg,(yyvsp[-4].val),-1,&(yylsp[-4])),(yyvsp[0].val),&(yyloc));}
    2444             : #line 2445 "../src/language/parse.c" /* yacc.c:1652  */
    2445          14 :     break;
    2446             : 
    2447        1107 :   case 115:
    2448             : #line 246 "../src/language/parse.y" /* yacc.c:1652  */
    2449             :     {(yyval.val)=newnode(Flambda, (yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2450             : #line 2451 "../src/language/parse.c" /* yacc.c:1652  */
    2451        1107 :     break;
    2452             : 
    2453        4079 :   case 116:
    2454             : #line 247 "../src/language/parse.y" /* yacc.c:1652  */
    2455             :     {(yyval.val)=newnode(Flambda, (yyvsp[-2].val),(yyvsp[0].val),&(yyloc));}
    2456             : #line 2457 "../src/language/parse.c" /* yacc.c:1652  */
    2457        4079 :     break;
    2458             : 
    2459             : 
    2460             : #line 2461 "../src/language/parse.c" /* yacc.c:1652  */
    2461           0 :       default: break;
    2462             :     }
    2463             :   /* User semantic actions sometimes alter yychar, and that requires
    2464             :      that yytoken be updated with the new translation.  We take the
    2465             :      approach of translating immediately before every use of yytoken.
    2466             :      One alternative is translating here after every semantic action,
    2467             :      but that translation would be missed if the semantic action invokes
    2468             :      YYABORT, YYACCEPT, or YYERROR immediately after altering yychar or
    2469             :      if it invokes YYBACKUP.  In the case of YYABORT or YYACCEPT, an
    2470             :      incorrect destructor might then be invoked immediately.  In the
    2471             :      case of YYERROR or YYBACKUP, subsequent parser actions might lead
    2472             :      to an incorrect destructor call or verbose syntax error message
    2473             :      before the lookahead is translated.  */
    2474             :   YY_SYMBOL_PRINT ("-> $$ =", yyr1[yyn], &yyval, &yyloc);
    2475             : 
    2476    52483106 :   YYPOPSTACK (yylen);
    2477    52483106 :   yylen = 0;
    2478             :   YY_STACK_PRINT (yyss, yyssp);
    2479             : 
    2480    52483106 :   *++yyvsp = yyval;
    2481    52483106 :   *++yylsp = yyloc;
    2482             : 
    2483             :   /* Now 'shift' the result of the reduction.  Determine what state
    2484             :      that goes to, based on the state we popped back to and the rule
    2485             :      number reduced by.  */
    2486             :   {
    2487    52483106 :     const int yylhs = yyr1[yyn] - YYNTOKENS;
    2488    52483106 :     const int yyi = yypgoto[yylhs] + *yyssp;
    2489    17503179 :     yystate = (0 <= yyi && yyi <= YYLAST && yycheck[yyi] == *yyssp
    2490    16507760 :                ? yytable[yyi]
    2491    69986285 :                : yydefgoto[yylhs]);
    2492             :   }
    2493             : 
    2494    52483106 :   goto yynewstate;
    2495             : 
    2496             : 
    2497             : /*--------------------------------------.
    2498             : | yyerrlab -- here on detecting error.  |
    2499             : `--------------------------------------*/
    2500          14 : yyerrlab:
    2501             :   /* Make sure we have latest lookahead translation.  See comments at
    2502             :      user semantic actions for why this is necessary.  */
    2503          14 :   yytoken = yychar == YYEMPTY ? YYEMPTY : YYTRANSLATE (yychar);
    2504             : 
    2505             :   /* If not already recovering from an error, report this error.  */
    2506          14 :   if (!yyerrstatus)
    2507             :     {
    2508           7 :       ++yynerrs;
    2509             : #if ! YYERROR_VERBOSE
    2510             :       yyerror (&yylloc, lex, YY_("syntax error"));
    2511             : #else
    2512             : # define YYSYNTAX_ERROR yysyntax_error (&yymsg_alloc, &yymsg, \
    2513             :                                         yyssp, yytoken)
    2514             :       {
    2515           7 :         char const *yymsgp = YY_("syntax error");
    2516             :         int yysyntax_error_status;
    2517           7 :         yysyntax_error_status = YYSYNTAX_ERROR;
    2518           7 :         if (yysyntax_error_status == 0)
    2519           7 :           yymsgp = yymsg;
    2520           0 :         else if (yysyntax_error_status == 1)
    2521             :           {
    2522           0 :             if (yymsg != yymsgbuf)
    2523           0 :               YYSTACK_FREE (yymsg);
    2524           0 :             yymsg = (char *) YYSTACK_ALLOC (yymsg_alloc);
    2525           0 :             if (!yymsg)
    2526             :               {
    2527           0 :                 yymsg = yymsgbuf;
    2528           0 :                 yymsg_alloc = sizeof yymsgbuf;
    2529           0 :                 yysyntax_error_status = 2;
    2530             :               }
    2531             :             else
    2532             :               {
    2533           0 :                 yysyntax_error_status = YYSYNTAX_ERROR;
    2534           0 :                 yymsgp = yymsg;
    2535             :               }
    2536             :           }
    2537           7 :         yyerror (&yylloc, lex, yymsgp);
    2538           7 :         if (yysyntax_error_status == 2)
    2539           0 :           goto yyexhaustedlab;
    2540             :       }
    2541             : # undef YYSYNTAX_ERROR
    2542             : #endif
    2543             :     }
    2544             : 
    2545          14 :   yyerror_range[1] = yylloc;
    2546             : 
    2547          14 :   if (yyerrstatus == 3)
    2548             :     {
    2549             :       /* If just tried and failed to reuse lookahead token after an
    2550             :          error, discard it.  */
    2551             : 
    2552           0 :       if (yychar <= YYEOF)
    2553             :         {
    2554             :           /* Return failure if at end of input.  */
    2555           0 :           if (yychar == YYEOF)
    2556           0 :             YYABORT;
    2557             :         }
    2558             :       else
    2559             :         {
    2560           0 :           yydestruct ("Error: discarding",
    2561             :                       yytoken, &yylval, &yylloc, lex);
    2562           0 :           yychar = YYEMPTY;
    2563             :         }
    2564             :     }
    2565             : 
    2566             :   /* Else will try to reuse lookahead token after shifting the error
    2567             :      token.  */
    2568          14 :   goto yyerrlab1;
    2569             : 
    2570             : 
    2571             : /*---------------------------------------------------.
    2572             : | yyerrorlab -- error raised explicitly by YYERROR.  |
    2573             : `---------------------------------------------------*/
    2574             : yyerrorlab:
    2575             :   /* Pacify compilers when the user code never invokes YYERROR and the
    2576             :      label yyerrorlab therefore never appears in user code.  */
    2577             :   if (0)
    2578             :     YYERROR;
    2579             : 
    2580             :   /* Do not reclaim the symbols of the rule whose action triggered
    2581             :      this YYERROR.  */
    2582             :   YYPOPSTACK (yylen);
    2583             :   yylen = 0;
    2584             :   YY_STACK_PRINT (yyss, yyssp);
    2585             :   yystate = *yyssp;
    2586             :   goto yyerrlab1;
    2587             : 
    2588             : 
    2589             : /*-------------------------------------------------------------.
    2590             : | yyerrlab1 -- common code for both syntax error and YYERROR.  |
    2591             : `-------------------------------------------------------------*/
    2592          14 : yyerrlab1:
    2593          14 :   yyerrstatus = 3;      /* Each real token shifted decrements this.  */
    2594             : 
    2595             :   for (;;)
    2596             :     {
    2597          14 :       yyn = yypact[yystate];
    2598          14 :       if (!yypact_value_is_default (yyn))
    2599             :         {
    2600          14 :           yyn += YYTERROR;
    2601          14 :           if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYTERROR)
    2602             :             {
    2603          14 :               yyn = yytable[yyn];
    2604          14 :               if (0 < yyn)
    2605          14 :                 break;
    2606             :             }
    2607             :         }
    2608             : 
    2609             :       /* Pop the current state because it cannot handle the error token.  */
    2610           0 :       if (yyssp == yyss)
    2611           0 :         YYABORT;
    2612             : 
    2613           0 :       yyerror_range[1] = *yylsp;
    2614           0 :       yydestruct ("Error: popping",
    2615           0 :                   yystos[yystate], yyvsp, yylsp, lex);
    2616           0 :       YYPOPSTACK (1);
    2617           0 :       yystate = *yyssp;
    2618             :       YY_STACK_PRINT (yyss, yyssp);
    2619             :     }
    2620             : 
    2621             :   YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
    2622          14 :   *++yyvsp = yylval;
    2623             :   YY_IGNORE_MAYBE_UNINITIALIZED_END
    2624             : 
    2625          14 :   yyerror_range[2] = yylloc;
    2626             :   /* Using YYLLOC is tempting, but would change the location of
    2627             :      the lookahead.  YYLOC is available though.  */
    2628          14 :   YYLLOC_DEFAULT (yyloc, yyerror_range, 2);
    2629          14 :   *++yylsp = yyloc;
    2630             : 
    2631             :   /* Shift the error token.  */
    2632             :   YY_SYMBOL_PRINT ("Shifting", yystos[yyn], yyvsp, yylsp);
    2633             : 
    2634          14 :   yystate = yyn;
    2635          14 :   goto yynewstate;
    2636             : 
    2637             : 
    2638             : /*-------------------------------------.
    2639             : | yyacceptlab -- YYACCEPT comes here.  |
    2640             : `-------------------------------------*/
    2641      105510 : yyacceptlab:
    2642      105510 :   yyresult = 0;
    2643      105510 :   goto yyreturn;
    2644             : 
    2645             : 
    2646             : /*-----------------------------------.
    2647             : | yyabortlab -- YYABORT comes here.  |
    2648             : `-----------------------------------*/
    2649           0 : yyabortlab:
    2650           0 :   yyresult = 1;
    2651           0 :   goto yyreturn;
    2652             : 
    2653             : 
    2654             : #if !defined yyoverflow || YYERROR_VERBOSE
    2655             : /*-------------------------------------------------.
    2656             : | yyexhaustedlab -- memory exhaustion comes here.  |
    2657             : `-------------------------------------------------*/
    2658           0 : yyexhaustedlab:
    2659           0 :   yyerror (&yylloc, lex, YY_("memory exhausted"));
    2660           0 :   yyresult = 2;
    2661             :   /* Fall through.  */
    2662             : #endif
    2663             : 
    2664             : 
    2665             : /*-----------------------------------------------------.
    2666             : | yyreturn -- parsing is finished, return the result.  |
    2667             : `-----------------------------------------------------*/
    2668      105510 : yyreturn:
    2669      105510 :   if (yychar != YYEMPTY)
    2670             :     {
    2671             :       /* Make sure we have latest lookahead translation.  See comments at
    2672             :          user semantic actions for why this is necessary.  */
    2673           0 :       yytoken = YYTRANSLATE (yychar);
    2674           0 :       yydestruct ("Cleanup: discarding lookahead",
    2675             :                   yytoken, &yylval, &yylloc, lex);
    2676             :     }
    2677             :   /* Do not reclaim the symbols of the rule whose action triggered
    2678             :      this YYABORT or YYACCEPT.  */
    2679      105510 :   YYPOPSTACK (yylen);
    2680             :   YY_STACK_PRINT (yyss, yyssp);
    2681      316530 :   while (yyssp != yyss)
    2682             :     {
    2683      211020 :       yydestruct ("Cleanup: popping",
    2684      211020 :                   yystos[*yyssp], yyvsp, yylsp, lex);
    2685      211020 :       YYPOPSTACK (1);
    2686             :     }
    2687             : #ifndef yyoverflow
    2688      105510 :   if (yyss != yyssa)
    2689           0 :     YYSTACK_FREE (yyss);
    2690             : #endif
    2691             : #if YYERROR_VERBOSE
    2692      105510 :   if (yymsg != yymsgbuf)
    2693           0 :     YYSTACK_FREE (yymsg);
    2694             : #endif
    2695      105510 :   return yyresult;
    2696             : }
    2697             : #line 250 "../src/language/parse.y" /* yacc.c:1918  */
    2698             : 

Generated by: LCOV version 1.13