bison.c

YBasic编程语言的移植和开发 YBasic编程语言的移植和开发 YBasic编程语言的移植和开发

    if (string[0]) error(severity,string);
  }
}
     

#ifndef YYSTYPE
typedef union {
  double fnum;          /* double number */
  int inum;             /* integer number */
  int token;            /* token of command */
  int sep;              /* number of newlines */
  char *string;         /* quoted string */
  char *symbol;         /* general symbol */
  char *digits;         /* string of digits */
  char *docu;		/* embedded documentation */
} yystype;
# define YYSTYPE yystype
# define YYSTYPE_IS_TRIVIAL 1
#endif
#ifndef YYDEBUG
# define YYDEBUG 1
#endif



#define	YYFINAL		980
#define	YYFLAG		-32768
#define	YYNTBASE	166

/* YYTRANSLATE(YYLEX) -- Bison token number corresponding to YYLEX. */
#define YYTRANSLATE(x) ((unsigned)(x) <= 410 ? yytranslate[x] : 275)

/* YYTRANSLATE[YYLEX] -- Bison token number corresponding to YYLEX. */
static const short yytranslate[] =
{
       0,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,   165,     2,     2,     2,     2,
     161,   162,   158,   157,   164,   156,     2,   159,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,   163,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     2,     2,     2,     2,
       2,     2,     2,     2,     2,     2,     1,     3,     4,     5,
       6,     7,     8,     9,    10,    11,    12,    13,    14,    15,
      16,    17,    18,    19,    20,    21,    22,    23,    24,    25,
      26,    27,    28,    29,    30,    31,    32,    33,    34,    35,
      36,    37,    38,    39,    40,    41,    42,    43,    44,    45,
      46,    47,    48,    49,    50,    51,    52,    53,    54,    55,
      56,    57,    58,    59,    60,    61,    62,    63,    64,    65,
      66,    67,    68,    69,    70,    71,    72,    73,    74,    75,
      76,    77,    78,    79,    80,    81,    82,    83,    84,    85,
      86,    87,    88,    89,    90,    91,    92,    93,    94,    95,
      96,    97,    98,    99,   100,   101,   102,   103,   104,   105,
     106,   107,   108,   109,   110,   111,   112,   113,   114,   115,
     116,   117,   118,   119,   120,   121,   122,   123,   124,   125,
     126,   127,   128,   129,   130,   131,   132,   133,   134,   135,
     136,   137,   138,   139,   140,   141,   142,   143,   144,   145,
     146,   147,   148,   149,   150,   151,   152,   153,   154,   155,
     160
};

#if YYDEBUG
static const short yyprhs[] =
{
       0,     0,     3,     5,     6,     7,    13,    14,    16,    19,
      21,    24,    26,    29,    31,    33,    35,    37,    39,    41,
      43,    45,    47,    49,    50,    54,    55,    59,    61,    63,
      66,    69,    73,    77,    78,    84,    85,    91,    94,    96,
      99,   101,   104,   109,   114,   118,   123,   128,   129,   133,
     134,   139,   142,   145,   147,   150,   152,   155,   158,   161,
     167,   175,   179,   182,   186,   191,   197,   201,   204,   209,
     213,   222,   229,   236,   239,   242,   248,   253,   260,   266,
     269,   272,   275,   278,   282,   285,   288,   290,   292,   296,
     301,   306,   311,   316,   321,   326,   328,   330,   333,   335,
     338,   339,   341,   343,   346,   349,   353,   364,   373,   382,
     391,   395,   397,   399,   406,   411,   416,   423,   430,   435,
     442,   444,   449,   451,   453,   455,   457,   461,   465,   472,
     479,   488,   495,   500,   507,   516,   518,   522,   527,   532,
     537,   542,   547,   552,   557,   562,   564,   568,   570,   574,
     579,   586,   593,   598,   605,   610,   617,   628,   633,   638,
     643,   647,   651,   652,   657,   658,   663,   666,   670,   674,
     678,   682,   686,   690,   695,   702,   704,   709,   714,   721,
     728,   730,   732,   736,   740,   744,   748,   752,   755,   759,
     763,   767,   771,   775,   779,   781,   785,   789,   793,   797,
     802,   807,   812,   817,   822,   827,   834,   839,   844,   851,
     856,   861,   866,   871,   876,   881,   888,   893,   897,   904,
     911,   916,   921,   926,   931,   938,   945,   954,   961,   970,
     975,   980,   985,   990,   992,   996,  1001,  1003,  1007,  1012,
    1014,  1018,  1023,  1025,  1029,  1036,  1043,  1050,  1055,  1064,
    1071,  1080,  1087,  1092,  1097,  1102,  1109,  1116,  1123,  1132,
    1134,  1137,  1140,  1142,  1144,  1146,  1148,  1153,  1160,  1165,
    1172,  1177,  1182,  1183,  1186,  1187,  1189,  1193,  1195,  1197,
    1198,  1199,  1200,  1212,  1214,  1216,  1218,  1220,  1221,  1223,
    1225,  1228,  1230,  1234,  1236,  1238,  1243,  1248,  1250,  1254,
    1256,  1258,  1263,  1268,  1269,  1271,  1275,  1277,  1279,  1283,
    1287,  1288,  1289,  1290,  1291,  1306,  1308,  1310,  1311,  1314,
    1315,  1317,  1318,  1326,  1328,  1331,  1333,  1335,  1336,  1337,
    1338,  1345,  1346,  1347,  1352,  1353,  1358,  1360,  1362,  1363,
    1364,  1373,  1375,  1377,  1378,  1383,  1385,  1390,  1391,  1392,
    1393,  1394,  1406,  1408,  1410,  1411,  1417,  1418,  1421,  1422,
    1423,  1424,  1432,  1433,  1435,  1437,  1438,  1443,  1445,  1450,
    1452,  1457,  1459,  1463,  1465,  1470,  1472,  1477,  1479,  1481,
    1485,  1489,  1490,  1493,  1498,  1500,  1504,  1505,  1508,  1515,
    1516,  1521,  1522,  1527,  1528,  1535,  1536,  1546,  1547,  1551,
    1552,  1554,  1555,  1558,  1561,  1566,  1568,  1573,  1580,  1587,
    1595,  1606,  1619,  1627,  1638,  1651,  1654,  1656,  1658,  1662,
    1664
};
static const short yyrhs[] =
{
     167,    42,     0,   170,     0,     0,     0,   167,   168,     3,
     169,   170,     0,     0,   178,     0,    91,   178,     0,   185,
       0,    91,   185,     0,    18,     0,    28,   183,     0,   216,
       0,   224,     0,   240,     0,   236,     0,   233,     0,    34,
       0,    35,     0,   203,     0,   197,     0,   198,     0,     0,
      25,   171,   210,     0,     0,    26,   172,   212,     0,   243,
       0,   249,     0,    19,   195,     0,    20,   195,     0,    22,
      33,    34,     0,    22,    33,    35,     0,     0,    22,   186,
      19,   173,   273,     0,     0,    22,   186,    20,   174,   274,
       0,    21,   195,     0,   180,     0,    75,   272,     0,   181,
       0,    31,   183,     0,    29,   161,   199,   162,     0,    30,
     161,   199,   162,     0,    49,   271,   262,     0,    49,   271,
     262,   163,     0,    49,   271,   262,   164,     0,     0,    50,
     175,   264,     0,     0,    51,    50,   176,   264,     0,    71,
     259,     0,    72,   261,     0,    73,     0,    73,   195,     0,
      52,     0,    52,   186,     0,    52,   183,     0,    53,   196,
       0,    74,    82,   186,   164,   186,     0,    74,    82,   186,
     164,   186,   164,   183,     0,    82,    81,   183,     0,    83,
     191,     0,    86,    83,   191,     0,    51,   191,   179,   191,
       0,    86,    51,   191,   179,   191,     0,    51,    11,   191,
       0,    51,   191,     0,    86,    51,    11,   191,     0,    86,
      51,   191,     0,    97,   183,   179,   186,   164,   186,   164,
     183,     0,    97,   183,   179,   186,   164,   186,     0,    99,
     183,   179,   186,   164,   186,     0,   100,   101,     0,    75,
     101,     0,   177,    84,   191,   164,   186,     0,    85,   191,
     164,   183,     0,    85,   191,   164,   183,   164,   183,     0,
     177,    95,   191,   179,   191,     0,    75,    82,     0,    86,
      82,     0,    86,    57,     0,    74,    88,     0,    74,    88,
     183,     0,    75,    88,     0,    89,   186,     0,    90,     0,
     127,     0,   127,   161,   162,     0,   127,   161,   186,   162,
       0,   145,   161,   183,   162,     0,   148,   183,   164,   183,
       0,   148,   183,   164,   186,     0,   148,   272,   164,   183,
       0,   148,   272,   164,   186,     0,    54,     0,    55,     0,
      55,   186,     0,     7,     0,    94,   183,     0,     0,    86,
       0,    87,     0,    86,    87,     0,    87,    86,     0,     6,
      69,   183,     0,   123,   161,   182,   164,   186,   164,   186,
     162,    69,   183,     0,   123,   161,   182,   164,   186,   162,
      69,   183,     0,   121,   161,   182,   164,   186,   162,    69,
     183,     0,   122,   161,   182,   164,   186,   162,    69,   183,
       0,   198,    69,   183,     0,   164,     0,    11,     0,    74,
     272,   164,   183,   164,   183,     0,    74,   272,   164,   183,
       0,    74,   272,   164,    88,     0,    74,   183,    10,    79,
      78,   272,     0,    74,   183,    10,    80,    78,   272,     0,
      76,   272,   164,   186,     0,    76,   272,   164,   186,   164,
     183,     0,     6,     0,     6,   161,   199,   162,     0,     6,
       0,   184,     0,   198,     0,     9,     0,   183,   157,   183,
       0,   161,   183,   162,     0,   121,   161,   183,   164,   186,
     162,     0,   122,   161,   183,   164,   186,   162,     0,   123,
     161,   183,   164,   186,   164,   186,   162,     0,   123,   161,
     183,   164,   186,   162,     0,   126,   161,   186,   162,     0,
     126,   161,   186,   164,   183,   162,     0,   126,   161,   186,
     164,   183,   164,   183,   162,     0,   127,     0,   127,   161,
     162,     0,   127,   161,   186,   162,     0,   128,   161,   186,
     162,     0,   133,   161,   183,   162,     0,   134,   161,   183,
     162,     0,   140,   161,   183,   162,     0,   141,   161,   183,
     162,     0,   139,   161,   183,   162,     0,   144,   161,   183,
     162,     0,   149,     0,   149,   161,   162,     0,   150,     0,
     150,   161,   162,     0,   147,   161,   183,   162,     0,   147,
     161,   183,   164,   183,   162,     0,   152,   161,   182,   164,
     183,   162,     0,   152,   161,   182,   162,     0,   154,   161,
     182,   164,   183,   162,     0,   154,   161,   182,   162,     0,
      96,   161,   191,   179,   191,   162,     0,    98,   161,   186,
     164,   186,   179,   186,   164,   186,   162,     0,   130,   161,
     186,   162,     0,   132,   161,   186,   162,     0,    30,   161,
     199,   162,     0,     5,    69,   186,     0,   197,    69,   186,
       0,     0,   186,    61,   187,   186,     0,     0,   186,    60,
     188,   186,     0,    62,   186,     0,   186,    69,   186,     0,
     186,    64,   186,     0,   186,    67,   186,     0,   186,    65,
     186,     0,   186,    68,   186,     0,   186,    66,   186,     0,
     112,   161,   272,   162,     0,   155,   161,   183,   164,   183,
     162,     0,   194,     0,    92,   161,   189,   162,     0,    92,
     161,   190,   162,     0,    93,   161,   189,   164,   186,   162,
       0,    93,   161,   190,   164,   186,   162,     0,   197,     0,
       5,     0,   186,   157,   186,     0,   186,   156,   186,     0,
     186,   158,   186,     0,   186,   159,   186,     0,   186,    70,
     186,     0,   156,   186,     0,   183,    69,   183,     0,   183,
      64,   183,     0,   183,    67,   183,     0,   183,    65,   183,
       0,   183,    68,   183,     0,   183,    66,   183,     0,   192,
       0,   161,   186,   162,     0,     5,   161,   162,     0,     6,
     161,   162,     0,   186,   164,   186,     0,   102,   161,   186,
     162,     0,   103,   161,   186,   162,     0,   104,   161,   186,
     162,     0,   105,   161,   186,   162,     0,   106,   161,   186,
     162,     0,   107,   161,   186,   162,     0,   107,   161,   186,
     164,   186,   162,     0,   108,   161,   186,   162,     0,   109,
     161,   186,   162,     0,   109,   161,   186,   164,   186,   162,
       0,   110,   161,   186,   162,     0,   111,   161,   186,   162,
       0,   115,   161,   186,   162,     0,   116,   161,   186,   162,
       0,   113,   161,   186,   162,     0,   114,   161,   186,   162,
       0,   117,   161,   186,   164,   186,   162,     0,   118,   161,
     186,   162,     0,   118,   161,   162,     0,   124,   161,   186,
     164,   186,   162,     0,   125,   161,   186,   164,   186,   162,
       0,   119,   161,   183,   162,     0,   120,   161,   183,   162,
       0,   129,   161,   183,   162,     0,   131,   161,   183,   162,
       0,   131,   161,   183,   164,   186,   162,     0,   142,   161,
     183,   164,   183,   162,     0,   142,   161,   183,   164,   183,
     164,   186,   162,     0,   143,   161,   183,   164,   183,   162,
       0,   143,   161,   183,   164,   183,   164,   186,   162,     0,
     145,   161,   183,   162,     0,   146,   161,   272,   162,     0,
     146,   161,   183,   162,     0,   135,   161,   183,   162,     0,