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.0 lcov report (development 23724-b3bdf5af3) Lines: 276 359 76.9 %
Date: 2019-03-25 05:45:24 Functions: 5 5 100.0 %
Legend: Lines: hit not hit

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

Generated by: LCOV version 1.13