This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
First attempt at implementing the _ prototype
[perl5.git] / perly.tab
index 5c7e678..d1807d7 100644 (file)
--- a/perly.tab
+++ b/perly.tab
@@ -171,21 +171,21 @@ static const unsigned short int yyrline[] =
      212,   219,   222,   228,   229,   234,   240,   246,   249,   253,
      256,   273,   280,   290,   296,   297,   302,   303,   307,   312,
      316,   320,   326,   327,   331,   333,   335,   337,   339,   343,
-     347,   348,   352,   357,   362,   366,   370,   374,   383,   384,
-     389,   390,   392,   397,   399,   404,   405,   408,   413,   412,
-     419,   421,   423,   425,   429,   431,   433,   437,   440,   443,
-     448,   452,   457,   462,   464,   467,   466,   475,   476,   480,
-     485,   487,   491,   495,   498,   503,   508,   511,   516,   520,
-     523,   525,   530,   532,   534,   538,   540,   542,   544,   546,
-     548,   550,   552,   554,   556,   558,   563,   565,   567,   569,
-     571,   574,   577,   580,   587,   589,   591,   593,   595,   601,
-     603,   605,   613,   622,   626,   634,   635,   636,   637,   638,
-     640,   642,   644,   646,   648,   650,   652,   654,   656,   658,
-     660,   662,   668,   675,   677,   679,   681,   684,   687,   690,
-     692,   694,   696,   698,   700,   702,   704,   707,   709,   711,
-     714,   717,   719,   721,   722,   726,   728,   733,   735,   737,
-     739,   741,   746,   748,   753,   754,   756,   762,   766,   770,
-     774,   778,   782,   786,   791,   793,   795,   798
+     348,   349,   353,   359,   365,   370,   375,   380,   389,   390,
+     395,   396,   398,   403,   405,   410,   411,   414,   419,   418,
+     426,   428,   430,   432,   436,   438,   440,   444,   447,   450,
+     455,   459,   464,   469,   471,   474,   473,   483,   484,   488,
+     493,   495,   499,   503,   506,   511,   516,   519,   524,   528,
+     531,   533,   538,   540,   542,   546,   548,   550,   552,   554,
+     556,   558,   560,   562,   564,   566,   571,   573,   575,   577,
+     579,   582,   585,   588,   595,   597,   599,   601,   603,   610,
+     612,   614,   622,   631,   635,   643,   644,   645,   646,   647,
+     649,   651,   653,   655,   657,   659,   661,   663,   665,   667,
+     669,   671,   677,   684,   686,   688,   690,   693,   696,   699,
+     701,   703,   705,   707,   709,   711,   713,   716,   718,   720,
+     723,   726,   728,   730,   731,   735,   737,   742,   744,   746,
+     748,   750,   755,   757,   762,   763,   765,   771,   775,   779,
+     783,   787,   791,   795,   800,   802,   804,   807
 };
 #endif
 
@@ -884,3 +884,30 @@ static const unsigned char yystos[] =
       96,   105,   105,    99,    96,    78,    96,   108,   105,    81,
      112,   105,   113,    77,    77,    96,    96,   102
 };
+/* which symbols are of type opval */
+static const int yy_is_opval[] =
+{
+  0, 0, 0, 0, 1, 1, 1,
+  1, 1, 1, 1, 1, 1,
+  0, 0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0, 0,
+  0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
+  0, 0, 1, 0, 0, 0, 1,
+  0, 0, 1, 1, 1, 1, 1,
+  1, 1, 1, 1, 0, 1, 1, 1,
+  1, 1, 1, 0, 0, 0, 1,
+  1, 0, 0, 0, 0,
+  1, 1, 1, 1, 1, 0,
+  0, 0, 1, 1, 1, 0, 1, 1,
+  1, 1, 1, 1, 1, 1,
+  1, 1, 1, 1, 1, 1,
+  1, 1, 1, 1, 1, 0
+
+};