awkgram.c 55 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620
  1. #line 26 "/sys/src/cmd/awk/awkgram.y"
  2. #include <stdio.h>
  3. #include <string.h>
  4. #include "awk.h"
  5. #define makedfa(a,b) compre(a)
  6. void checkdup(Node *list, Cell *item);
  7. int yywrap(void) { return(1); }
  8. Node *beginloc = 0;
  9. Node *endloc = 0;
  10. int infunc = 0; /* = 1 if in arglist or body of func */
  11. int inloop = 0; /* = 1 if in while, for, do */
  12. char *curfname = 0; /* current function name */
  13. Node *arglist = 0; /* list of args for current function */
  14. #line 43 "/sys/src/cmd/awk/awkgram.y"
  15. typedef union {
  16. Node *p;
  17. Cell *cp;
  18. int i;
  19. char *s;
  20. } YYSTYPE;
  21. extern int yyerrflag;
  22. #ifndef YYMAXDEPTH
  23. #define YYMAXDEPTH 150
  24. #endif
  25. YYSTYPE yylval;
  26. YYSTYPE yyval;
  27. #define FIRSTTOKEN 57346
  28. #define PROGRAM 57347
  29. #define PASTAT 57348
  30. #define PASTAT2 57349
  31. #define XBEGIN 57350
  32. #define XEND 57351
  33. #define NL 57352
  34. #define ARRAY 57353
  35. #define MATCH 57354
  36. #define NOTMATCH 57355
  37. #define MATCHOP 57356
  38. #define FINAL 57357
  39. #define DOT 57358
  40. #define ALL 57359
  41. #define CCL 57360
  42. #define NCCL 57361
  43. #define CHAR 57362
  44. #define OR 57363
  45. #define STAR 57364
  46. #define QUEST 57365
  47. #define PLUS 57366
  48. #define AND 57367
  49. #define BOR 57368
  50. #define APPEND 57369
  51. #define EQ 57370
  52. #define GE 57371
  53. #define GT 57372
  54. #define LE 57373
  55. #define LT 57374
  56. #define NE 57375
  57. #define IN 57376
  58. #define ARG 57377
  59. #define BLTIN 57378
  60. #define BREAK 57379
  61. #define CLOSE 57380
  62. #define CONTINUE 57381
  63. #define DELETE 57382
  64. #define DO 57383
  65. #define EXIT 57384
  66. #define FOR 57385
  67. #define FUNC 57386
  68. #define SUB 57387
  69. #define GSUB 57388
  70. #define IF 57389
  71. #define INDEX 57390
  72. #define LSUBSTR 57391
  73. #define MATCHFCN 57392
  74. #define NEXT 57393
  75. #define NEXTFILE 57394
  76. #define ADD 57395
  77. #define MINUS 57396
  78. #define MULT 57397
  79. #define DIVIDE 57398
  80. #define MOD 57399
  81. #define ASSIGN 57400
  82. #define ASGNOP 57401
  83. #define ADDEQ 57402
  84. #define SUBEQ 57403
  85. #define MULTEQ 57404
  86. #define DIVEQ 57405
  87. #define MODEQ 57406
  88. #define POWEQ 57407
  89. #define PRINT 57408
  90. #define PRINTF 57409
  91. #define SPRINTF 57410
  92. #define ELSE 57411
  93. #define INTEST 57412
  94. #define CONDEXPR 57413
  95. #define POSTINCR 57414
  96. #define PREINCR 57415
  97. #define POSTDECR 57416
  98. #define PREDECR 57417
  99. #define VAR 57418
  100. #define IVAR 57419
  101. #define VARNF 57420
  102. #define CALL 57421
  103. #define NUMBER 57422
  104. #define STRING 57423
  105. #define REGEXPR 57424
  106. #define GETLINE 57425
  107. #define RETURN 57426
  108. #define SPLIT 57427
  109. #define SUBSTR 57428
  110. #define WHILE 57429
  111. #define CAT 57430
  112. #define NOT 57431
  113. #define UMINUS 57432
  114. #define POWER 57433
  115. #define DECR 57434
  116. #define INCR 57435
  117. #define INDIRECT 57436
  118. #define LASTTOKEN 57437
  119. #define YYEOFCODE 1
  120. #define YYERRCODE 2
  121. #line 447 "/sys/src/cmd/awk/awkgram.y"
  122. void setfname(Cell *p)
  123. {
  124. if (isarr(p))
  125. SYNTAX("%s is an array, not a function", p->nval);
  126. else if (isfcn(p))
  127. SYNTAX("you can't define function %s more than once", p->nval);
  128. curfname = p->nval;
  129. }
  130. int constnode(Node *p)
  131. {
  132. return isvalue(p) && ((Cell *) (p->narg[0]))->csub == CCON;
  133. }
  134. char *strnode(Node *p)
  135. {
  136. return ((Cell *)(p->narg[0]))->sval;
  137. }
  138. Node *notnull(Node *n)
  139. {
  140. switch (n->nobj) {
  141. case LE: case LT: case EQ: case NE: case GT: case GE:
  142. case BOR: case AND: case NOT:
  143. return n;
  144. default:
  145. return op2(NE, n, nullnode);
  146. }
  147. }
  148. void checkdup(Node *vl, Cell *cp) /* check if name already in list */
  149. {
  150. char *s = cp->nval;
  151. for ( ; vl; vl = vl->nnext) {
  152. if (strcmp(s, ((Cell *)(vl->narg[0]))->nval) == 0) {
  153. SYNTAX("duplicate argument %s", s);
  154. break;
  155. }
  156. }
  157. }
  158. short yyexca[] =
  159. {-1, 0,
  160. 1, 28,
  161. 8, 28,
  162. 9, 28,
  163. 12, 28,
  164. 13, 28,
  165. 16, 28,
  166. 45, 28,
  167. 46, 28,
  168. 54, 28,
  169. 55, 28,
  170. 56, 28,
  171. 58, 28,
  172. 60, 28,
  173. 78, 28,
  174. 86, 28,
  175. 87, 28,
  176. 88, 28,
  177. 89, 28,
  178. 90, 28,
  179. 91, 28,
  180. 95, 28,
  181. 97, 28,
  182. 98, 28,
  183. 101, 28,
  184. 102, 28,
  185. 105, 28,
  186. 108, 28,
  187. 109, 28,
  188. 110, 28,
  189. -2, 0,
  190. -1, 1,
  191. 1, -1,
  192. -2, 0,
  193. -1, 157,
  194. 15, 30,
  195. -2, 0,
  196. -1, 176,
  197. 14, 0,
  198. 24, 0,
  199. 38, 0,
  200. 39, 0,
  201. 40, 0,
  202. 41, 0,
  203. 42, 0,
  204. 43, 0,
  205. 44, 0,
  206. -2, 63,
  207. -1, 177,
  208. 14, 0,
  209. 24, 0,
  210. 38, 0,
  211. 39, 0,
  212. 40, 0,
  213. 41, 0,
  214. 42, 0,
  215. 43, 0,
  216. 44, 0,
  217. -2, 64,
  218. -1, 178,
  219. 14, 0,
  220. 24, 0,
  221. 38, 0,
  222. 39, 0,
  223. 40, 0,
  224. 41, 0,
  225. 42, 0,
  226. 43, 0,
  227. 44, 0,
  228. -2, 65,
  229. -1, 179,
  230. 14, 0,
  231. 24, 0,
  232. 38, 0,
  233. 39, 0,
  234. 40, 0,
  235. 41, 0,
  236. 42, 0,
  237. 43, 0,
  238. 44, 0,
  239. -2, 66,
  240. -1, 180,
  241. 14, 0,
  242. 24, 0,
  243. 38, 0,
  244. 39, 0,
  245. 40, 0,
  246. 41, 0,
  247. 42, 0,
  248. 43, 0,
  249. 44, 0,
  250. -2, 67,
  251. -1, 181,
  252. 14, 0,
  253. 24, 0,
  254. 38, 0,
  255. 39, 0,
  256. 40, 0,
  257. 41, 0,
  258. 42, 0,
  259. 43, 0,
  260. 44, 0,
  261. -2, 68,
  262. -1, 183,
  263. 14, 0,
  264. 24, 0,
  265. 38, 0,
  266. 39, 0,
  267. 40, 0,
  268. 41, 0,
  269. 42, 0,
  270. 43, 0,
  271. 44, 0,
  272. -2, 70,
  273. -1, 290,
  274. 24, 0,
  275. 44, 0,
  276. -2, 53,
  277. -1, 334,
  278. 17, 30,
  279. -2, 0,
  280. -1, 356,
  281. 17, 30,
  282. -2, 0,
  283. };
  284. #define YYNPROD 185
  285. #define YYPRIVATE 57344
  286. #define YYLAST 4170
  287. short yyact[] =
  288. {
  289. 17, 278, 254, 137, 244, 229, 102, 200, 53, 66,
  290. 24, 105, 42, 155, 103, 104, 100, 138, 112, 309,
  291. 54, 185, 215, 42, 100, 254, 100, 100, 100, 250,
  292. 224, 121, 122, 123, 9, 107, 82, 42, 315, 83,
  293. 162, 254, 107, 103, 104, 103, 104, 124, 253, 206,
  294. 42, 190, 245, 41, 22, 43, 113, 113, 279, 133,
  295. 317, 142, 10, 146, 41, 353, 43, 149, 150, 152,
  296. 153, 148, 352, 163, 136, 100, 42, 23, 41, 22,
  297. 43, 277, 147, 351, 132, 62, 156, 85, 168, 169,
  298. 11, 41, 22, 43, 322, 321, 50, 190, 79, 80,
  299. 100, 319, 23, 86, 182, 270, 259, 100, 100, 100,
  300. 100, 100, 100, 100, 134, 23, 276, 41, 233, 43,
  301. 108, 109, 110, 111, 332, 100, 112, 203, 205, 110,
  302. 111, 190, 190, 112, 140, 11, 211, 336, 325, 139,
  303. 212, 234, 100, 140, 235, 220, 100, 170, 311, 222,
  304. 190, 167, 100, 219, 136, 227, 279, 156, 190, 158,
  305. 190, 157, 190, 100, 285, 221, 266, 231, 261, 136,
  306. 130, 129, 100, 237, 100, 228, 100, 100, 100, 100,
  307. 100, 100, 100, 128, 100, 190, 252, 100, 100, 136,
  308. 136, 260, 190, 3, 100, 6, 127, 126, 188, 19,
  309. 7, 6, 100, 47, 313, 125, 7, 100, 48, 100,
  310. 100, 100, 120, 119, 100, 100, 51, 16, 16, 190,
  311. 217, 140, 275, 218, 143, 115, 271, 154, 272, 4,
  312. 144, 131, 318, 100, 100, 100, 100, 163, 49, 163,
  313. 163, 163, 163, 20, 274, 163, 348, 100, 294, 362,
  314. 239, 295, 289, 293, 365, 1, 100, 100, 72, 96,
  315. 39, 225, 5, 58, 67, 223, 240, 114, 61, 116,
  316. 117, 118, 164, 60, 301, 302, 249, 283, 81, 286,
  317. 287, 288, 290, 8, 100, 292, 159, 100, 100, 100,
  318. 310, 100, 136, 100, 156, 160, 314, 2, 100, 0,
  319. 100, 100, 0, 0, 100, 0, 100, 100, 100, 0,
  320. 0, 0, 0, 0, 335, 0, 165, 163, 96, 0,
  321. 0, 0, 0, 0, 0, 334, 0, 0, 342, 156,
  322. 343, 0, 0, 0, 100, 341, 0, 0, 0, 100,
  323. 347, 100, 0, 116, 231, 100, 100, 0, 349, 357,
  324. 96, 194, 195, 196, 197, 198, 199, 338, 0, 360,
  325. 356, 0, 361, 363, 156, 0, 231, 0, 207, 358,
  326. 136, 239, 0, 0, 239, 239, 239, 0, 239, 0,
  327. 239, 0, 0, 364, 0, 96, 366, 240, 0, 96,
  328. 240, 240, 240, 0, 240, 96, 240, 0, 0, 0,
  329. 258, 0, 0, 0, 339, 0, 243, 0, 0, 0,
  330. 0, 0, 0, 0, 0, 96, 0, 96, 21, 96,
  331. 96, 96, 96, 96, 96, 96, 239, 96, 0, 0,
  332. 96, 96, 0, 0, 0, 0, 164, 257, 164, 164,
  333. 164, 164, 240, 0, 164, 96, 0, 0, 0, 0,
  334. 262, 0, 96, 96, 96, 0, 0, 96, 96, 0,
  335. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  336. 0, 0, 0, 0, 0, 0, 96, 280, 281, 282,
  337. 165, 0, 165, 165, 165, 165, 0, 0, 165, 0,
  338. 96, 0, 166, 0, 0, 0, 0, 0, 0, 96,
  339. 96, 0, 0, 0, 0, 74, 189, 191, 0, 0,
  340. 15, 0, 0, 184, 0, 0, 164, 0, 0, 0,
  341. 0, 0, 0, 0, 106, 0, 0, 243, 0, 0,
  342. 243, 243, 243, 0, 243, 0, 243, 0, 0, 0,
  343. 0, 96, 0, 96, 96, 0, 0, 96, 0, 96,
  344. 96, 96, 0, 0, 0, 15, 0, 15, 0, 0,
  345. 165, 236, 141, 0, 0, 145, 0, 0, 0, 0,
  346. 0, 151, 0, 0, 0, 0, 230, 96, 0, 0,
  347. 0, 0, 243, 0, 96, 0, 0, 0, 96, 96,
  348. 171, 173, 175, 176, 177, 178, 179, 180, 181, 183,
  349. 0, 0, 0, 0, 0, 0, 0, 186, 187, 263,
  350. 264, 265, 0, 267, 268, 269, 0, 0, 0, 201,
  351. 0, 0, 0, 0, 0, 201, 201, 0, 0, 0,
  352. 0, 208, 209, 210, 201, 213, 214, 0, 189, 0,
  353. 0, 0, 0, 0, 0, 0, 0, 101, 0, 0,
  354. 296, 0, 0, 0, 0, 0, 0, 0, 241, 0,
  355. 0, 291, 0, 0, 232, 0, 0, 106, 0, 98,
  356. 97, 0, 298, 246, 0, 0, 0, 0, 242, 42,
  357. 28, 0, 0, 0, 304, 0, 0, 0, 0, 45,
  358. 46, 0, 33, 0, 34, 255, 312, 256, 0, 0,
  359. 0, 0, 0, 0, 0, 324, 327, 329, 330, 0,
  360. 0, 0, 37, 0, 0, 189, 0, 0, 0, 0,
  361. 41, 22, 43, 29, 35, 38, 0, 238, 316, 32,
  362. 0, 36, 40, 0, 337, 27, 26, 0, 0, 99,
  363. 0, 0, 30, 31, 23, 0, 0, 0, 0, 0,
  364. 0, 201, 0, 0, 0, 0, 0, 297, 0, 0,
  365. 0, 0, 0, 0, 299, 0, 0, 0, 0, 300,
  366. 303, 0, 0, 305, 306, 307, 0, 0, 0, 0,
  367. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  368. 106, 0, 0, 0, 0, 0, 75, 0, 0, 0,
  369. 0, 0, 0, 0, 0, 0, 16, 18, 0, 68,
  370. 44, 0, 359, 0, 0, 0, 333, 0, 0, 0,
  371. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  372. 340, 0, 0, 0, 0, 0, 344, 0, 345, 42,
  373. 28, 55, 56, 57, 73, 69, 59, 70, 0, 45,
  374. 46, 71, 33, 0, 34, 63, 64, 0, 0, 0,
  375. 0, 0, 0, 0, 0, 75, 0, 0, 0, 0,
  376. 77, 78, 37, 52, 0, 16, 18, 0, 68, 44,
  377. 41, 22, 43, 29, 35, 38, 0, 0, 0, 32,
  378. 65, 36, 40, 76, 0, 27, 26, 0, 0, 25,
  379. 0, 0, 30, 31, 23, 0, 0, 0, 42, 28,
  380. 55, 56, 57, 73, 69, 59, 70, 0, 45, 46,
  381. 71, 33, 0, 34, 63, 64, 0, 0, 0, 0,
  382. 0, 0, 75, 0, 0, 0, 0, 0, 0, 77,
  383. 78, 37, 16, 18, 0, 68, 44, 0, 308, 41,
  384. 22, 43, 29, 35, 38, 0, 0, 0, 32, 65,
  385. 36, 40, 76, 0, 27, 26, 0, 0, 25, 0,
  386. 0, 30, 31, 23, 0, 42, 28, 55, 56, 57,
  387. 73, 69, 59, 70, 0, 45, 46, 71, 33, 0,
  388. 34, 63, 64, 0, 0, 0, 0, 0, 0, 0,
  389. 0, 75, 0, 0, 0, 0, 77, 78, 37, 273,
  390. 0, 16, 18, 0, 68, 44, 41, 22, 43, 29,
  391. 35, 38, 0, 0, 0, 32, 65, 36, 40, 76,
  392. 0, 27, 26, 0, 0, 25, 0, 0, 30, 31,
  393. 23, 0, 0, 0, 42, 28, 55, 56, 57, 73,
  394. 69, 59, 70, 0, 45, 46, 71, 33, 0, 34,
  395. 63, 64, 0, 0, 0, 0, 0, 0, 75, 0,
  396. 0, 0, 0, 0, 0, 77, 78, 37, 16, 18,
  397. 0, 68, 44, 0, 248, 41, 22, 43, 29, 35,
  398. 38, 0, 0, 0, 32, 65, 36, 40, 76, 0,
  399. 27, 26, 0, 0, 25, 0, 0, 30, 31, 23,
  400. 0, 42, 28, 55, 56, 57, 73, 69, 59, 70,
  401. 0, 45, 46, 71, 33, 0, 34, 63, 64, 0,
  402. 0, 0, 0, 0, 0, 75, 0, 0, 0, 0,
  403. 0, 0, 77, 78, 37, 16, 18, 0, 68, 44,
  404. 0, 247, 41, 22, 43, 29, 35, 38, 0, 0,
  405. 0, 32, 65, 36, 40, 76, 0, 27, 26, 0,
  406. 0, 25, 0, 0, 30, 31, 23, 0, 42, 28,
  407. 55, 56, 57, 73, 69, 59, 70, 0, 45, 46,
  408. 71, 33, 0, 34, 63, 64, 0, 0, 0, 0,
  409. 0, 0, 75, 0, 0, 0, 0, 0, 0, 77,
  410. 78, 37, 16, 18, 0, 68, 44, 0, 226, 41,
  411. 22, 43, 29, 35, 38, 0, 0, 0, 32, 65,
  412. 36, 40, 76, 0, 27, 26, 0, 0, 25, 0,
  413. 0, 30, 31, 23, 0, 42, 28, 55, 56, 57,
  414. 73, 69, 59, 70, 0, 45, 46, 71, 33, 0,
  415. 34, 63, 64, 0, 0, 0, 0, 0, 0, 75,
  416. 0, 0, 0, 0, 0, 0, 77, 78, 37, 16,
  417. 18, 0, 68, 44, 0, 216, 41, 22, 43, 29,
  418. 35, 38, 0, 0, 0, 32, 65, 36, 40, 76,
  419. 0, 27, 26, 0, 0, 25, 0, 0, 30, 31,
  420. 23, 0, 42, 28, 55, 56, 57, 73, 69, 59,
  421. 70, 0, 45, 46, 71, 33, 0, 34, 63, 64,
  422. 0, 0, 0, 0, 0, 0, 75, 0, 0, 0,
  423. 0, 0, 0, 77, 78, 37, 16, 18, 0, 68,
  424. 44, 0, 135, 41, 22, 43, 29, 35, 38, 0,
  425. 0, 0, 32, 65, 36, 40, 76, 0, 27, 26,
  426. 0, 0, 25, 0, 0, 30, 31, 23, 0, 42,
  427. 28, 55, 56, 57, 73, 69, 59, 70, 0, 45,
  428. 46, 71, 33, 0, 34, 63, 64, 0, 0, 0,
  429. 0, 0, 0, 75, 0, 0, 0, 0, 0, 0,
  430. 77, 78, 37, 16, 18, 0, 68, 44, 0, 0,
  431. 41, 22, 43, 29, 35, 38, 0, 0, 0, 32,
  432. 65, 36, 40, 76, 0, 27, 26, 0, 0, 25,
  433. 0, 0, 30, 31, 23, 0, 42, 28, 55, 56,
  434. 57, 73, 69, 59, 70, 0, 45, 46, 71, 33,
  435. 0, 34, 63, 64, 0, 0, 0, 0, 0, 0,
  436. 0, 0, 0, 0, 0, 0, 0, 77, 78, 37,
  437. 0, 0, 0, 0, 0, 0, 0, 41, 22, 43,
  438. 29, 35, 38, 0, 0, 0, 32, 65, 36, 40,
  439. 76, 0, 27, 26, 0, 0, 25, 0, 0, 30,
  440. 31, 23, 190, 0, 101, 95, 0, 0, 331, 0,
  441. 0, 0, 0, 0, 0, 93, 0, 0, 0, 0,
  442. 0, 0, 0, 0, 0, 0, 98, 97, 0, 87,
  443. 88, 89, 90, 91, 92, 94, 42, 28, 0, 0,
  444. 0, 0, 0, 0, 0, 0, 45, 46, 0, 33,
  445. 0, 34, 0, 0, 0, 0, 0, 0, 0, 0,
  446. 0, 0, 0, 0, 0, 0, 0, 0, 0, 37,
  447. 0, 0, 0, 0, 0, 0, 0, 41, 22, 43,
  448. 29, 35, 38, 0, 84, 0, 32, 0, 36, 40,
  449. 0, 0, 27, 26, 0, 0, 99, 0, 0, 30,
  450. 31, 23, 190, 0, 101, 95, 0, 0, 328, 0,
  451. 0, 0, 0, 0, 0, 93, 0, 0, 0, 0,
  452. 0, 0, 0, 0, 0, 0, 98, 97, 0, 87,
  453. 88, 89, 90, 91, 92, 94, 42, 28, 0, 0,
  454. 0, 0, 0, 0, 0, 0, 45, 46, 0, 33,
  455. 0, 34, 0, 0, 0, 0, 0, 0, 0, 0,
  456. 0, 0, 0, 0, 0, 0, 0, 0, 0, 37,
  457. 0, 0, 0, 0, 0, 0, 0, 41, 22, 43,
  458. 29, 35, 38, 0, 84, 0, 32, 0, 36, 40,
  459. 0, 0, 27, 26, 0, 0, 99, 0, 0, 30,
  460. 31, 23, 190, 0, 101, 95, 0, 0, 326, 0,
  461. 0, 0, 0, 0, 0, 93, 0, 0, 0, 0,
  462. 0, 0, 0, 0, 0, 0, 98, 97, 0, 87,
  463. 88, 89, 90, 91, 92, 94, 42, 28, 0, 0,
  464. 0, 0, 0, 0, 0, 0, 45, 46, 0, 33,
  465. 0, 34, 0, 0, 0, 0, 0, 0, 0, 0,
  466. 0, 0, 0, 0, 0, 0, 0, 0, 0, 37,
  467. 0, 0, 0, 0, 0, 0, 0, 41, 22, 43,
  468. 29, 35, 38, 0, 84, 0, 32, 0, 36, 40,
  469. 0, 0, 27, 26, 0, 0, 99, 0, 0, 30,
  470. 31, 23, 140, 0, 0, 101, 95, 139, 0, 0,
  471. 0, 0, 0, 0, 0, 0, 93, 0, 0, 0,
  472. 0, 0, 0, 0, 0, 0, 0, 98, 97, 0,
  473. 87, 88, 89, 90, 91, 92, 94, 42, 28, 0,
  474. 0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
  475. 33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
  476. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  477. 37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
  478. 43, 29, 35, 38, 0, 84, 0, 32, 0, 36,
  479. 40, 0, 0, 27, 26, 0, 0, 99, 0, 0,
  480. 30, 31, 23, 190, 0, 101, 95, 0, 0, 192,
  481. 0, 0, 0, 0, 0, 0, 93, 0, 0, 0,
  482. 0, 0, 0, 0, 0, 0, 0, 98, 97, 0,
  483. 87, 88, 89, 90, 91, 92, 94, 42, 28, 0,
  484. 0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
  485. 33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
  486. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  487. 37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
  488. 43, 29, 35, 38, 0, 84, 0, 32, 0, 36,
  489. 40, 0, 0, 27, 26, 101, 95, 99, 0, 355,
  490. 30, 31, 23, 0, 0, 0, 93, 0, 0, 0,
  491. 0, 0, 0, 0, 0, 0, 0, 98, 97, 0,
  492. 87, 88, 89, 90, 91, 92, 94, 42, 28, 0,
  493. 0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
  494. 33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
  495. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  496. 37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
  497. 43, 29, 35, 38, 0, 84, 0, 32, 0, 36,
  498. 40, 0, 0, 27, 26, 101, 95, 99, 0, 354,
  499. 30, 31, 23, 0, 0, 0, 93, 0, 0, 0,
  500. 0, 0, 0, 0, 0, 0, 0, 98, 97, 0,
  501. 87, 88, 89, 90, 91, 92, 94, 42, 28, 0,
  502. 0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
  503. 33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
  504. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  505. 37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
  506. 43, 29, 35, 38, 0, 84, 0, 32, 0, 36,
  507. 40, 0, 0, 27, 26, 101, 95, 99, 0, 350,
  508. 30, 31, 23, 0, 0, 0, 93, 0, 0, 0,
  509. 0, 0, 0, 0, 0, 0, 0, 98, 97, 0,
  510. 87, 88, 89, 90, 91, 92, 94, 42, 28, 0,
  511. 0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
  512. 33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
  513. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  514. 37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
  515. 43, 29, 35, 38, 0, 84, 0, 32, 0, 36,
  516. 40, 0, 0, 27, 26, 0, 0, 99, 0, 0,
  517. 30, 31, 23, 101, 95, 346, 0, 0, 0, 0,
  518. 0, 0, 0, 0, 93, 0, 0, 0, 0, 0,
  519. 0, 0, 0, 0, 0, 98, 97, 0, 87, 88,
  520. 89, 90, 91, 92, 94, 42, 28, 0, 0, 0,
  521. 0, 0, 0, 0, 0, 45, 46, 0, 33, 0,
  522. 34, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  523. 0, 0, 0, 0, 0, 0, 0, 0, 37, 0,
  524. 0, 0, 0, 0, 0, 0, 41, 22, 43, 29,
  525. 35, 38, 0, 84, 0, 32, 0, 36, 40, 0,
  526. 0, 27, 26, 101, 95, 99, 0, 323, 30, 31,
  527. 23, 0, 0, 0, 93, 0, 0, 0, 0, 0,
  528. 0, 0, 0, 0, 0, 98, 97, 0, 87, 88,
  529. 89, 90, 91, 92, 94, 42, 28, 0, 0, 0,
  530. 0, 0, 0, 0, 0, 45, 46, 0, 33, 0,
  531. 34, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  532. 0, 0, 0, 0, 0, 0, 0, 0, 37, 0,
  533. 0, 0, 0, 0, 0, 0, 41, 22, 43, 29,
  534. 35, 38, 0, 84, 0, 32, 0, 36, 40, 0,
  535. 0, 27, 26, 101, 95, 99, 0, 320, 30, 31,
  536. 23, 0, 0, 0, 93, 0, 0, 0, 0, 0,
  537. 0, 0, 0, 0, 0, 98, 97, 0, 87, 88,
  538. 89, 90, 91, 92, 94, 42, 28, 0, 0, 0,
  539. 0, 0, 0, 0, 0, 45, 46, 0, 33, 0,
  540. 34, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  541. 0, 0, 0, 0, 0, 0, 0, 0, 37, 0,
  542. 0, 0, 0, 0, 0, 0, 41, 22, 43, 29,
  543. 35, 38, 0, 84, 0, 32, 0, 36, 40, 0,
  544. 0, 27, 26, 101, 95, 99, 0, 279, 30, 31,
  545. 23, 0, 0, 0, 93, 0, 0, 0, 0, 0,
  546. 0, 0, 0, 0, 0, 98, 97, 0, 87, 88,
  547. 89, 90, 91, 92, 94, 42, 28, 0, 0, 0,
  548. 0, 0, 0, 0, 0, 45, 46, 0, 33, 0,
  549. 34, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  550. 0, 0, 0, 0, 0, 0, 0, 0, 37, 0,
  551. 0, 0, 0, 0, 0, 0, 41, 22, 43, 29,
  552. 35, 38, 0, 84, 0, 32, 0, 36, 40, 0,
  553. 0, 27, 26, 0, 190, 99, 101, 95, 30, 31,
  554. 23, 0, 0, 0, 0, 0, 0, 93, 0, 0,
  555. 0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
  556. 0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
  557. 0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
  558. 0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
  559. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  560. 0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
  561. 22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
  562. 36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
  563. 192, 30, 31, 23, 0, 0, 0, 93, 0, 0,
  564. 0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
  565. 0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
  566. 0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
  567. 0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
  568. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  569. 0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
  570. 22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
  571. 36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
  572. 0, 30, 31, 23, 0, 0, 0, 93, 0, 0,
  573. 0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
  574. 0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
  575. 0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
  576. 0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
  577. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  578. 0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
  579. 22, 43, 29, 35, 38, 0, 84, 251, 32, 0,
  580. 36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
  581. 0, 30, 31, 23, 0, 0, 0, 93, 0, 0,
  582. 0, 0, 0, 0, 0, 0, 0, 0, 98, 97,
  583. 0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
  584. 0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
  585. 0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
  586. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  587. 0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
  588. 22, 43, 29, 35, 38, 0, 84, 0, 32, 0,
  589. 36, 40, 0, 0, 27, 26, 101, 95, 99, 0,
  590. 0, 30, 31, 23, 0, 0, 0, 93, 0, 0,
  591. 0, 0, 0, 0, 0, 0, 0, 0, 98, 0,
  592. 0, 87, 88, 89, 90, 91, 92, 94, 42, 28,
  593. 0, 0, 0, 0, 0, 0, 0, 0, 45, 46,
  594. 0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
  595. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  596. 0, 37, 0, 0, 0, 0, 0, 0, 0, 41,
  597. 22, 43, 29, 35, 38, 101, 95, 0, 32, 0,
  598. 36, 40, 0, 0, 27, 26, 93, 0, 99, 0,
  599. 0, 30, 31, 23, 0, 0, 0, 0, 0, 0,
  600. 87, 88, 89, 90, 91, 92, 94, 42, 28, 0,
  601. 0, 0, 0, 0, 0, 0, 0, 45, 46, 0,
  602. 33, 0, 34, 0, 0, 75, 0, 0, 0, 0,
  603. 0, 0, 0, 0, 0, 0, 18, 0, 0, 44,
  604. 37, 0, 0, 0, 0, 0, 0, 0, 41, 22,
  605. 43, 29, 35, 38, 0, 0, 0, 32, 0, 36,
  606. 40, 0, 0, 27, 26, 0, 0, 99, 42, 28,
  607. 30, 31, 23, 73, 0, 0, 0, 0, 45, 46,
  608. 0, 33, 0, 34, 0, 0, 0, 0, 0, 0,
  609. 0, 0, 0, 0, 0, 0, 0, 0, 0, 77,
  610. 78, 37, 0, 0, 101, 0, 0, 0, 0, 41,
  611. 22, 43, 29, 35, 38, 241, 0, 0, 32, 0,
  612. 36, 40, 0, 0, 27, 26, 98, 97, 25, 0,
  613. 0, 30, 31, 23, 0, 242, 42, 28, 0, 0,
  614. 0, 0, 0, 0, 0, 0, 45, 46, 0, 33,
  615. 0, 34, 0, 0, 0, 0, 0, 12, 13, 0,
  616. 0, 16, 18, 0, 0, 44, 0, 0, 0, 37,
  617. 0, 0, 0, 0, 0, 0, 0, 41, 22, 43,
  618. 29, 35, 38, 0, 238, 0, 32, 0, 36, 40,
  619. 0, 0, 27, 26, 42, 28, 99, 0, 0, 30,
  620. 31, 23, 0, 14, 45, 46, 0, 33, 0, 34,
  621. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  622. 0, 0, 0, 0, 0, 0, 0, 37, 0, 0,
  623. 101, 0, 0, 0, 0, 41, 22, 43, 29, 35,
  624. 38, 241, 0, 0, 32, 0, 36, 40, 0, 0,
  625. 27, 26, 98, 0, 25, 0, 0, 30, 31, 23,
  626. 0, 242, 42, 28, 0, 0, 0, 0, 0, 0,
  627. 0, 0, 45, 46, 0, 33, 0, 34, 0, 0,
  628. 0, 0, 0, 0, 0, 140, 0, 0, 18, 0,
  629. 139, 44, 0, 0, 0, 37, 0, 0, 0, 0,
  630. 0, 0, 0, 41, 22, 43, 29, 35, 38, 0,
  631. 254, 0, 32, 18, 36, 40, 44, 0, 27, 26,
  632. 42, 28, 99, 0, 0, 30, 31, 23, 0, 0,
  633. 45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
  634. 0, 0, 0, 0, 0, 42, 28, 0, 0, 0,
  635. 0, 0, 0, 37, 0, 45, 46, 0, 33, 0,
  636. 34, 41, 22, 43, 29, 35, 38, 0, 0, 0,
  637. 32, 0, 36, 40, 0, 0, 27, 26, 37, 0,
  638. 25, 101, 0, 30, 31, 23, 41, 22, 43, 29,
  639. 35, 38, 241, 0, 0, 32, 0, 36, 40, 0,
  640. 0, 27, 26, 0, 0, 25, 0, 0, 30, 31,
  641. 23, 0, 242, 42, 28, 0, 0, 0, 0, 0,
  642. 0, 0, 0, 45, 46, 0, 33, 0, 34, 0,
  643. 0, 0, 0, 0, 0, 0, 174, 0, 0, 284,
  644. 0, 0, 44, 0, 0, 0, 37, 0, 0, 0,
  645. 0, 0, 0, 0, 41, 22, 43, 29, 35, 38,
  646. 0, 172, 0, 32, 284, 36, 40, 44, 0, 27,
  647. 26, 42, 28, 99, 0, 0, 30, 31, 23, 0,
  648. 0, 45, 46, 0, 33, 0, 34, 0, 0, 0,
  649. 0, 0, 0, 0, 0, 0, 42, 28, 0, 0,
  650. 0, 0, 0, 0, 37, 0, 45, 46, 0, 33,
  651. 0, 34, 41, 22, 43, 29, 35, 38, 0, 254,
  652. 0, 32, 284, 36, 40, 44, 0, 27, 26, 37,
  653. 0, 25, 0, 0, 30, 31, 23, 41, 22, 43,
  654. 29, 35, 38, 0, 0, 0, 32, 18, 36, 40,
  655. 44, 204, 27, 26, 42, 28, 25, 0, 0, 30,
  656. 31, 23, 0, 0, 45, 46, 0, 33, 0, 34,
  657. 0, 0, 0, 0, 0, 0, 0, 0, 0, 42,
  658. 28, 0, 0, 0, 0, 0, 0, 37, 0, 45,
  659. 46, 0, 33, 0, 34, 41, 22, 43, 29, 35,
  660. 38, 0, 0, 0, 32, 18, 36, 40, 44, 202,
  661. 27, 26, 37, 0, 25, 0, 0, 30, 31, 23,
  662. 41, 22, 43, 29, 35, 38, 0, 174, 0, 32,
  663. 18, 36, 40, 44, 0, 27, 26, 42, 28, 25,
  664. 0, 0, 30, 31, 23, 0, 0, 45, 46, 0,
  665. 33, 0, 34, 0, 0, 0, 0, 0, 0, 0,
  666. 0, 0, 42, 28, 0, 0, 0, 0, 0, 0,
  667. 37, 0, 45, 46, 0, 33, 0, 34, 41, 22,
  668. 43, 29, 35, 38, 0, 172, 0, 32, 18, 36,
  669. 40, 44, 0, 27, 26, 37, 0, 25, 0, 0,
  670. 30, 31, 23, 41, 22, 43, 29, 35, 38, 0,
  671. 0, 0, 32, 18, 36, 40, 44, 0, 27, 26,
  672. 42, 28, 25, 0, 0, 30, 31, 23, 0, 0,
  673. 45, 46, 0, 33, 0, 34, 0, 0, 0, 0,
  674. 0, 0, 0, 0, 0, 42, 28, 0, 0, 0,
  675. 0, 0, 0, 37, 0, 45, 46, 0, 33, 0,
  676. 34, 41, 22, 43, 29, 35, 38, 0, 0, 0,
  677. 32, 284, 36, 40, 44, 0, 27, 26, 37, 0,
  678. 25, 0, 0, 30, 31, 23, 41, 22, 43, 29,
  679. 35, 38, 0, 0, 0, 32, 101, 36, 40, 0,
  680. 0, 27, 26, 42, 28, 25, 0, 0, 30, 31,
  681. 23, 0, 0, 45, 46, 0, 33, 0, 34, 0,
  682. 0, 0, 0, 0, 0, 0, 0, 0, 42, 28,
  683. 0, 0, 0, 0, 0, 0, 37, 0, 45, 46,
  684. 0, 33, 0, 34, 41, 22, 43, 29, 35, 38,
  685. 0, 0, 193, 32, 161, 36, 40, 44, 0, 27,
  686. 26, 37, 0, 25, 0, 0, 30, 31, 23, 41,
  687. 22, 43, 29, 35, 38, 0, 0, 0, 32, 101,
  688. 36, 40, 44, 0, 27, 26, 42, 28, 99, 0,
  689. 0, 30, 31, 23, 0, 0, 45, 46, 0, 33,
  690. 0, 34, 0, 0, 0, 0, 0, 0, 0, 0,
  691. 0, 42, 28, 0, 0, 0, 0, 0, 0, 37,
  692. 0, 45, 46, 0, 33, 0, 34, 41, 22, 43,
  693. 29, 35, 38, 0, 0, 0, 32, 101, 36, 40,
  694. 0, 0, 27, 26, 37, 0, 25, 0, 0, 30,
  695. 31, 23, 41, 22, 43, 29, 35, 38, 0, 0,
  696. 0, 32, 101, 36, 40, 0, 0, 27, 26, 42,
  697. 28, 25, 0, 0, 30, 31, 23, 0, 0, 45,
  698. 46, 0, 33, 0, 34, 0, 0, 0, 0, 0,
  699. 0, 0, 0, 0, 42, 28, 0, 0, 0, 0,
  700. 0, 0, 37, 0, 45, 46, 0, 33, 0, 34,
  701. 41, 22, 43, 29, 35, 38, 0, 0, 0, 32,
  702. 0, 36, 40, 0, 0, 27, 26, 37, 0, 99,
  703. 0, 0, 30, 31, 23, 41, 22, 43, 29, 35,
  704. 38, 0, 0, 0, 0, 0, 36, 40, 0, 0,
  705. 27, 26, 0, 0, 99, 0, 0, 30, 31, 23
  706. };
  707. short yypact[] =
  708. {
  709. 191,-1000,-1000,-1000,3259, 193,-1000,-1000, 185,-1000,
  710. 205, 863, 206, 206, -50,2903,-1000, -63,3810,-1000,
  711. 19, 38,-1000,4034,-1000,3976,4034,4034, 200, 199,
  712. -33, -33, 5, 192, 184,-1000, 183, 170,-1000, 158,
  713. 157,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,3259,
  714. 863,3810,-1000,1334,-1000, 124,3810, 124, 214,3385,
  715. -1000,1401, 863, 124, 124,3385, 124,-1000, 211,-1000,
  716. 148, 146,3951, -22,2903,-1000, 138,-1000,-1000, 863,
  717. 863, 134,-1000,-1000,3810,3785,3727,3810,3810,3810,
  718. 3810,3810,3810,3810, -22, -74, 19,-1000,-1000,4034,
  719. -94,3810,3810,-1000,-1000, 181,1902,3893,4034,4034,
  720. 4034,4034,4034,3810,-1000,-1000, -89, -89, -89,3702,
  721. 3644,-1000,-1000, 7,4034,3810,3810,3810,3810,3810,
  722. 3810, -70,-1000,1267, 206,-1000,-1000,-1000, 213, 211,
  723. -1000,1802,-1000,-1000,1401,1802,-1000, -49,1200,-1000,
  724. -1000,1802,-1000,-1000,1401,-1000, 213,3133,3810, 104,
  725. 208,3810,3201, -65,-1000, 19, 33,3810,1133,1066,
  726. -57,2813,-1000,2993,-1000,3072,4059,4059,4059,4059,
  727. 4059,4059,-1000,4059,-1000, -33,2723,2903, 4,3410,
  728. -1000,3410,-1000,4034, -89, 26, 26, -89, -89, -89,
  729. 86,2903,-1000, 174,-1000, 151,4034, 19,2633,2633,
  730. 2633, 149, 208,2633,2633, 89,-1000, 863,-1000,-1000,
  731. -1000,-1000,-1000, 999,-1000, 212,-1000,-1000,-1000, 101,
  732. 37,-1000,2540,4034,4034,4034,3619, 147,3868,3561,
  733. 3536,3868, -22, 19,3868,3810,2540,-1000,-1000, 139,
  734. -1000,3810,-1000, -22,-1000,2903,2903, 19,3410,-1000,
  735. -1000,-1000, 19,3410,3410, 31,-1000,3410,3410,3410,
  736. -1000, 930, -80,-1000,-1000,-1000, 133, -22, 194,-1000,
  737. 19, 19, 19,3201,3810, -6, 634,3327,3478,-1000,
  738. 4059,-1000,3201, 40, 194, 194, 15,2903,-1000,2903,
  739. 2450, 78, 77,2360, 121,1701,1601,1501,-1000, 111,
  740. 3810, 211, 41,-1000, 120, -22,3868,-1000, 206,-1000,
  741. -1000,-1000,-1000,-1000,3410,-1000,-1000, -8,-1000, -8,
  742. 3410,-1000,3810,2270,3133, 194, -6,-1000,3201, 863,
  743. 2172, 66, 55, 48,2082,1992, 211, 41,1401, 794,
  744. -1000,-1000,-1000,-1000,-1000, 124,3133, 194,-1000,-1000,
  745. -1000, 41,1401, 194,-1000,1401,-1000
  746. };
  747. short yypgo[] =
  748. {
  749. 0, 297, 505, 40, 11, 295, 7, 286, 243, 199,
  750. 62, 34, 283, 10, 9, 5, 20, 8, 0, 418,
  751. 278, 276, 273, 268, 265, 264, 263, 3, 262, 229,
  752. 85, 261, 1, 400, 17, 13, 103, 87, 260, 258,
  753. 255, 254, 249, 246, 232, 231, 230, 228, 227
  754. };
  755. short yyr1[] =
  756. {
  757. 0, 40, 40, 36, 36, 37, 37, 33, 33, 26,
  758. 26, 24, 24, 41, 22, 42, 22, 43, 22, 20,
  759. 20, 23, 30, 30, 34, 34, 35, 35, 29, 29,
  760. 15, 15, 1, 1, 10, 11, 11, 11, 11, 11,
  761. 11, 11, 44, 11, 12, 12, 6, 6, 3, 3,
  762. 3, 3, 3, 3, 3, 3, 3, 3, 3, 2,
  763. 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
  764. 2, 2, 2, 2, 2, 2, 2, 2, 4, 4,
  765. 5, 5, 7, 7, 7, 39, 39, 28, 28, 28,
  766. 28, 31, 31, 9, 9, 45, 13, 32, 32, 14,
  767. 14, 14, 14, 14, 14, 14, 14, 27, 27, 16,
  768. 16, 16, 46, 47, 16, 16, 16, 16, 16, 16,
  769. 16, 16, 16, 16, 16, 16, 48, 16, 16, 17,
  770. 17, 38, 38, 8, 8, 8, 8, 8, 8, 8,
  771. 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  772. 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  773. 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,
  774. 8, 8, 8, 8, 18, 18, 18, 18, 21, 21,
  775. 21, 19, 19, 19, 25
  776. };
  777. short yyr2[] =
  778. {
  779. 0, 1, 1, 1, 2, 1, 2, 1, 2, 1,
  780. 2, 1, 2, 0, 12, 0, 10, 0, 8, 1,
  781. 1, 4, 1, 2, 1, 2, 0, 1, 0, 1,
  782. 0, 1, 1, 3, 1, 1, 4, 3, 6, 3,
  783. 4, 4, 0, 9, 1, 3, 1, 3, 3, 5,
  784. 3, 3, 3, 3, 3, 5, 2, 1, 1, 3,
  785. 5, 3, 3, 3, 3, 3, 3, 3, 3, 3,
  786. 3, 3, 5, 4, 3, 2, 1, 1, 3, 3,
  787. 1, 3, 0, 1, 3, 1, 1, 1, 1, 2,
  788. 2, 1, 2, 1, 2, 0, 4, 1, 2, 4,
  789. 4, 4, 2, 5, 2, 1, 1, 1, 2, 2,
  790. 3, 2, 0, 0, 9, 3, 2, 1, 4, 2,
  791. 3, 2, 2, 3, 2, 2, 0, 3, 2, 1,
  792. 2, 1, 1, 4, 3, 3, 3, 3, 3, 3,
  793. 2, 2, 2, 3, 4, 1, 3, 4, 2, 2,
  794. 2, 2, 4, 3, 2, 1, 6, 6, 3, 6,
  795. 6, 1, 8, 8, 6, 4, 1, 6, 6, 8,
  796. 8, 8, 6, 1, 1, 4, 1, 2, 0, 1,
  797. 3, 1, 1, 1, 4
  798. };
  799. short yychk[] =
  800. {
  801. -1000, -40, -1, 2, -29, -28, 10, 15, -12, -11,
  802. -10, -30, 8, 9, 54, -2, 12, -18, 13, -9,
  803. -8, -19, 87, 110, -13, 105, 102, 101, 46, 89,
  804. 108, 109, 95, 58, 60, 90, 97, 78, 91, -38,
  805. 98, 86, 45, 88, 16, 55, 56, 10, 15, -29,
  806. -30, 11, 10, -17, -16, 47, 48, 49, -26, 52,
  807. -22, -23, -30, 61, 62, 96, -14, -25, 15, 51,
  808. 53, 57, -39, 50, -2, 2, 99, 76, 77, -30,
  809. -30, -20, 86, 89, 93, -37, -36, 38, 39, 40,
  810. 41, 42, 43, 24, 44, 14, -8, 36, 35, 105,
  811. -18, 13, 69, 108, 109, -4, -2, 16, 101, 102,
  812. 103, 104, 107, 19, -8, -9, -8, -8, -8, 13,
  813. 13, -18, -18, -18, 42, 13, 13, 13, 13, 13,
  814. 13, -45, -11, -17, -10, 18, -16, -27, -34, 15,
  815. 10, -2, -27, 10, -46, -2, -27, -16, -17, -27,
  816. -27, -2, -27, -27, -48, -35, -34, 13, 13, -7,
  817. -5, 13, -3, -18, -9, -8, -19, 13, -17, -17,
  818. 13, -2, 10, -2, 10, -2, -2, -2, -2, -2,
  819. -2, -2, -13, -2, -19, 95, -2, -2, 17, -33,
  820. 11, -33, 17, 69, -8, -8, -8, -8, -8, -8,
  821. -6, -2, 17, -6, 17, -6, 42, -8, -2, -2,
  822. -2, -6, -13, -2, -2, 92, 18, -30, 10, -35,
  823. -27, -16, -27, -24, 79, -31, 18, -27, -16, -15,
  824. -19, -14, -2, 14, 37, 40, -33, -4, 93, -37,
  825. -36, 24, 44, -8, 69, 19, -2, 18, 18, -21,
  826. 86, 94, -18, 44, 10, -2, -2, -8, -33, 20,
  827. 17, 17, -8, -33, -33, -33, 17, -33, -33, -33,
  828. 16, -17, -47, 10, -16, 10, 15, 44, -32, 17,
  829. -8, -8, -8, -3, 13, 17, -3, -3, -3, -13,
  830. -3, -19, -3, -6, -32, -32, -33, -2, -19, -2,
  831. -2, -13, -13, -2, -19, -2, -2, -2, 18, 99,
  832. -35, 15, -19, 10, -4, 44, 94, 20, -44, 86,
  833. 17, 17, 17, 17, -33, 17, 17, -33, 17, -33,
  834. -33, 17, 13, -2, -35, -32, 17, -19, -3, -30,
  835. -2, -13, -18, -18, -2, -2, 15, -15, -43, -17,
  836. 17, 17, 17, 17, 17, 17, -35, -32, -16, 18,
  837. -27, -15, -42, -32, -16, -41, -16
  838. };
  839. short yydef[] =
  840. {
  841. -2, -2, 1, 2, 32, 29, 87, 88, 28, 44,
  842. 35, 0, 0, 0, 0, 34, 22, 173, 0, 76,
  843. 77, 174, 176, 0, 93, 0, 0, 0, 145, 0,
  844. 0, 0, 155, 0, 0, 161, 0, 0, 166, 0,
  845. 0, 181, 182, 183, 95, 131, 132, 89, 90, 33,
  846. 0, 0, 23, 0, 129, 0, 0, 0, 112, 0,
  847. 117, 0, 0, 0, 0, 0, 0, 126, 26, 9,
  848. 0, 0, 82, 0, 105, 106, 0, 85, 86, 0,
  849. 0, 0, 19, 20, 0, 0, 0, 0, 0, 0,
  850. 0, 0, 0, 0, 0, 0, 75, 5, 3, 0,
  851. 173, 0, 0, 150, 151, 0, 0, 0, 0, 0,
  852. 0, 0, 0, 0, 177, 94, 142, 140, 141, 0,
  853. 0, 148, 149, 154, 0, 0, 0, 0, 0, 0,
  854. 0, 0, 45, 0, 37, 39, 130, 109, 107, 26,
  855. 24, 0, 111, 10, 0, 0, 116, 119, 0, 121,
  856. 122, 0, 124, 125, 0, 128, 27, -2, 0, 102,
  857. 83, 0, 80, 173, 57, 58, 104, 0, 0, 0,
  858. 178, 0, 6, 61, 4, 62, -2, -2, -2, -2,
  859. -2, -2, 69, -2, 71, 74, 0, 59, 0, 0,
  860. 7, 0, 158, 0, 137, 134, 135, 136, 138, 139,
  861. 0, 46, 143, 0, 146, 0, 0, 153, 0, 0,
  862. 0, 0, 93, 0, 0, 0, 36, 0, 25, 108,
  863. 110, 113, 115, 0, 11, 120, 91, 123, 127, 0,
  864. 174, 31, 0, 0, 0, 0, 0, 0, 0, 0,
  865. 0, 0, 0, 56, 0, 0, 0, 40, 41, 0,
  866. 179, 0, 73, 0, 8, 79, 78, 133, 0, 175,
  867. 144, 147, 152, 0, 0, 0, 165, 0, 0, 0,
  868. 96, 0, 0, 12, 118, 92, 26, 0, 21, 97,
  869. 99, 100, 101, 81, 0, 84, 0, 50, 51, 52,
  870. -2, 54, 48, 0, 184, 42, 0, 60, 72, 47,
  871. 0, 93, 93, 0, 0, 0, 0, 0, 38, 0,
  872. 0, 26, 0, 98, 0, 0, 0, 103, 0, 180,
  873. 156, 157, 159, 160, 0, 164, 167, 0, 168, 0,
  874. 0, 172, 0, 0, -2, 17, 0, 55, 49, 0,
  875. 0, 93, 0, 0, 0, 0, 26, 0, 0, 0,
  876. 162, 163, 169, 170, 171, 0, -2, 15, 18, 43,
  877. 114, 0, 0, 13, 16, 0, 14
  878. };
  879. short yytok1[] =
  880. {
  881. 1, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  882. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  883. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  884. 0, 0, 0, 0, 0, 0, 0, 104, 0, 0,
  885. 13, 17, 103, 101, 11, 102, 0, 16, 0, 0,
  886. 0, 0, 0, 0, 0, 0, 0, 0, 94, 15,
  887. 0, 0, 0, 93, 0, 0, 0, 0, 0, 0,
  888. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  889. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  890. 0, 19, 0, 20, 0, 0, 0, 0, 0, 0,
  891. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  892. 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
  893. 0, 0, 0, 12, 14, 18
  894. };
  895. short yytok2[] =
  896. {
  897. 2, 3, 4, 5, 6, 7, 8, 9, 10, 21,
  898. 22, 23, 24, 25, 26, 27, 28, 29, 30, 31,
  899. 32, 33, 34, 35, 36, 37, 38, 39, 40, 41,
  900. 42, 43, 44, 45, 46, 47, 48, 49, 50, 51,
  901. 52, 53, 54, 55, 56, 57, 58, 59, 60, 61,
  902. 62, 63, 64, 65, 66, 67, 68, 69, 70, 71,
  903. 72, 73, 74, 75, 76, 77, 78, 79, 80, 81,
  904. 82, 83, 84, 85, 86, 87, 88, 89, 90, 91,
  905. 92, 95, 96, 97, 98, 99, 100, 105, 106, 107,
  906. 108, 109, 110, 111
  907. };
  908. long yytok3[] =
  909. {
  910. 0
  911. };
  912. #define YYFLAG -1000
  913. #define YYERROR goto yyerrlab
  914. #define YYACCEPT return(0)
  915. #define YYABORT return(1)
  916. #define yyclearin yychar = -1
  917. #define yyerrok yyerrflag = 0
  918. #ifdef yydebug
  919. #include "y.debug"
  920. #else
  921. #define yydebug 0
  922. char* yytoknames[1]; /* for debugging */
  923. char* yystates[1]; /* for debugging */
  924. #endif
  925. /* parser for yacc output */
  926. int yynerrs = 0; /* number of errors */
  927. int yyerrflag = 0; /* error recovery flag */
  928. char*
  929. yytokname(int yyc)
  930. {
  931. static char x[16];
  932. if(yyc > 0 && yyc <= sizeof(yytoknames)/sizeof(yytoknames[0]))
  933. if(yytoknames[yyc-1])
  934. return yytoknames[yyc-1];
  935. sprintf(x, "<%d>", yyc);
  936. return x;
  937. }
  938. char*
  939. yystatname(int yys)
  940. {
  941. static char x[16];
  942. if(yys >= 0 && yys < sizeof(yystates)/sizeof(yystates[0]))
  943. if(yystates[yys])
  944. return yystates[yys];
  945. sprintf(x, "<%d>\n", yys);
  946. return x;
  947. }
  948. long
  949. yylex1(void)
  950. {
  951. long yychar;
  952. long *t3p;
  953. int c;
  954. yychar = yylex();
  955. if(yychar <= 0) {
  956. c = yytok1[0];
  957. goto out;
  958. }
  959. if(yychar < sizeof(yytok1)/sizeof(yytok1[0])) {
  960. c = yytok1[yychar];
  961. goto out;
  962. }
  963. if(yychar >= YYPRIVATE)
  964. if(yychar < YYPRIVATE+sizeof(yytok2)/sizeof(yytok2[0])) {
  965. c = yytok2[yychar-YYPRIVATE];
  966. goto out;
  967. }
  968. for(t3p=yytok3;; t3p+=2) {
  969. c = t3p[0];
  970. if(c == yychar) {
  971. c = t3p[1];
  972. goto out;
  973. }
  974. if(c == 0)
  975. break;
  976. }
  977. c = 0;
  978. out:
  979. if(c == 0)
  980. c = yytok2[1]; /* unknown char */
  981. if(yydebug >= 3)
  982. printf("lex %.4lX %s\n", yychar, yytokname(c));
  983. return c;
  984. }
  985. int
  986. yyparse(void)
  987. {
  988. struct
  989. {
  990. YYSTYPE yyv;
  991. int yys;
  992. } yys[YYMAXDEPTH], *yyp, *yypt;
  993. short *yyxi;
  994. int yyj, yym, yystate, yyn, yyg;
  995. YYSTYPE save1, save2;
  996. int save3, save4;
  997. long yychar;
  998. save1 = yylval;
  999. save2 = yyval;
  1000. save3 = yynerrs;
  1001. save4 = yyerrflag;
  1002. yystate = 0;
  1003. yychar = -1;
  1004. yynerrs = 0;
  1005. yyerrflag = 0;
  1006. yyp = &yys[-1];
  1007. goto yystack;
  1008. ret0:
  1009. yyn = 0;
  1010. goto ret;
  1011. ret1:
  1012. yyn = 1;
  1013. goto ret;
  1014. ret:
  1015. yylval = save1;
  1016. yyval = save2;
  1017. yynerrs = save3;
  1018. yyerrflag = save4;
  1019. return yyn;
  1020. yystack:
  1021. /* put a state and value onto the stack */
  1022. if(yydebug >= 4)
  1023. printf("char %s in %s", yytokname(yychar), yystatname(yystate));
  1024. yyp++;
  1025. if(yyp >= &yys[YYMAXDEPTH]) {
  1026. yyerror("yacc stack overflow");
  1027. goto ret1;
  1028. }
  1029. yyp->yys = yystate;
  1030. yyp->yyv = yyval;
  1031. yynewstate:
  1032. yyn = yypact[yystate];
  1033. if(yyn <= YYFLAG)
  1034. goto yydefault; /* simple state */
  1035. if(yychar < 0)
  1036. yychar = yylex1();
  1037. yyn += yychar;
  1038. if(yyn < 0 || yyn >= YYLAST)
  1039. goto yydefault;
  1040. yyn = yyact[yyn];
  1041. if(yychk[yyn] == yychar) { /* valid shift */
  1042. yychar = -1;
  1043. yyval = yylval;
  1044. yystate = yyn;
  1045. if(yyerrflag > 0)
  1046. yyerrflag--;
  1047. goto yystack;
  1048. }
  1049. yydefault:
  1050. /* default state action */
  1051. yyn = yydef[yystate];
  1052. if(yyn == -2) {
  1053. if(yychar < 0)
  1054. yychar = yylex1();
  1055. /* look through exception table */
  1056. for(yyxi=yyexca;; yyxi+=2)
  1057. if(yyxi[0] == -1 && yyxi[1] == yystate)
  1058. break;
  1059. for(yyxi += 2;; yyxi += 2) {
  1060. yyn = yyxi[0];
  1061. if(yyn < 0 || yyn == yychar)
  1062. break;
  1063. }
  1064. yyn = yyxi[1];
  1065. if(yyn < 0)
  1066. goto ret0;
  1067. }
  1068. if(yyn == 0) {
  1069. /* error ... attempt to resume parsing */
  1070. switch(yyerrflag) {
  1071. case 0: /* brand new error */
  1072. yyerror("syntax error");
  1073. if(yydebug >= 1) {
  1074. printf("%s", yystatname(yystate));
  1075. printf("saw %s\n", yytokname(yychar));
  1076. }
  1077. yyerrlab:
  1078. yynerrs++;
  1079. case 1:
  1080. case 2: /* incompletely recovered error ... try again */
  1081. yyerrflag = 3;
  1082. /* find a state where "error" is a legal shift action */
  1083. while(yyp >= yys) {
  1084. yyn = yypact[yyp->yys] + YYERRCODE;
  1085. if(yyn >= 0 && yyn < YYLAST) {
  1086. yystate = yyact[yyn]; /* simulate a shift of "error" */
  1087. if(yychk[yystate] == YYERRCODE)
  1088. goto yystack;
  1089. }
  1090. /* the current yyp has no shift onn "error", pop stack */
  1091. if(yydebug >= 2)
  1092. printf("error recovery pops state %d, uncovers %d\n",
  1093. yyp->yys, (yyp-1)->yys );
  1094. yyp--;
  1095. }
  1096. /* there is no state on the stack with an error shift ... abort */
  1097. goto ret1;
  1098. case 3: /* no shift yet; clobber input char */
  1099. if(yydebug >= YYEOFCODE)
  1100. printf("error recovery discards %s\n", yytokname(yychar));
  1101. if(yychar == YYEOFCODE)
  1102. goto ret1;
  1103. yychar = -1;
  1104. goto yynewstate; /* try again in the same state */
  1105. }
  1106. }
  1107. /* reduction by production yyn */
  1108. if(yydebug >= 2)
  1109. printf("reduce %d in:\n\t%s", yyn, yystatname(yystate));
  1110. yypt = yyp;
  1111. yyp -= yyr2[yyn];
  1112. yyval = (yyp+1)->yyv;
  1113. yym = yyn;
  1114. /* consult goto table to find next state */
  1115. yyn = yyr1[yyn];
  1116. yyg = yypgo[yyn];
  1117. yyj = yyg + yyp->yys + 1;
  1118. if(yyj >= YYLAST || yychk[yystate=yyact[yyj]] != -yyn)
  1119. yystate = yyact[yyg];
  1120. switch(yym) {
  1121. case 1:
  1122. #line 100 "/sys/src/cmd/awk/awkgram.y"
  1123. { if (errorflag==0)
  1124. winner = (Node *)stat3(PROGRAM, beginloc, yypt[-0].yyv.p, endloc); } break;
  1125. case 2:
  1126. #line 102 "/sys/src/cmd/awk/awkgram.y"
  1127. { yyclearin; bracecheck(); SYNTAX("bailing out"); } break;
  1128. case 13:
  1129. #line 126 "/sys/src/cmd/awk/awkgram.y"
  1130. {inloop++;} break;
  1131. case 14:
  1132. #line 127 "/sys/src/cmd/awk/awkgram.y"
  1133. { --inloop; yyval.p = stat4(FOR, yypt[-9].yyv.p, notnull(yypt[-6].yyv.p), yypt[-3].yyv.p, yypt[-0].yyv.p); } break;
  1134. case 15:
  1135. #line 128 "/sys/src/cmd/awk/awkgram.y"
  1136. {inloop++;} break;
  1137. case 16:
  1138. #line 129 "/sys/src/cmd/awk/awkgram.y"
  1139. { --inloop; yyval.p = stat4(FOR, yypt[-7].yyv.p, NIL, yypt[-3].yyv.p, yypt[-0].yyv.p); } break;
  1140. case 17:
  1141. #line 130 "/sys/src/cmd/awk/awkgram.y"
  1142. {inloop++;} break;
  1143. case 18:
  1144. #line 131 "/sys/src/cmd/awk/awkgram.y"
  1145. { --inloop; yyval.p = stat3(IN, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), yypt[-0].yyv.p); } break;
  1146. case 19:
  1147. #line 135 "/sys/src/cmd/awk/awkgram.y"
  1148. { setfname(yypt[-0].yyv.cp); } break;
  1149. case 20:
  1150. #line 136 "/sys/src/cmd/awk/awkgram.y"
  1151. { setfname(yypt[-0].yyv.cp); } break;
  1152. case 21:
  1153. #line 140 "/sys/src/cmd/awk/awkgram.y"
  1154. { yyval.p = notnull(yypt[-1].yyv.p); } break;
  1155. case 26:
  1156. #line 152 "/sys/src/cmd/awk/awkgram.y"
  1157. { yyval.i = 0; } break;
  1158. case 28:
  1159. #line 157 "/sys/src/cmd/awk/awkgram.y"
  1160. { yyval.i = 0; } break;
  1161. case 30:
  1162. #line 163 "/sys/src/cmd/awk/awkgram.y"
  1163. { yyval.p = 0; } break;
  1164. case 32:
  1165. #line 168 "/sys/src/cmd/awk/awkgram.y"
  1166. { yyval.p = 0; } break;
  1167. case 33:
  1168. #line 169 "/sys/src/cmd/awk/awkgram.y"
  1169. { yyval.p = yypt[-1].yyv.p; } break;
  1170. case 34:
  1171. #line 173 "/sys/src/cmd/awk/awkgram.y"
  1172. { yyval.p = notnull(yypt[-0].yyv.p); } break;
  1173. case 35:
  1174. #line 177 "/sys/src/cmd/awk/awkgram.y"
  1175. { yyval.p = stat2(PASTAT, yypt[-0].yyv.p, stat2(PRINT, rectonode(), NIL)); } break;
  1176. case 36:
  1177. #line 178 "/sys/src/cmd/awk/awkgram.y"
  1178. { yyval.p = stat2(PASTAT, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1179. case 37:
  1180. #line 179 "/sys/src/cmd/awk/awkgram.y"
  1181. { yyval.p = pa2stat(yypt[-2].yyv.p, yypt[-0].yyv.p, stat2(PRINT, rectonode(), NIL)); } break;
  1182. case 38:
  1183. #line 180 "/sys/src/cmd/awk/awkgram.y"
  1184. { yyval.p = pa2stat(yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1185. case 39:
  1186. #line 181 "/sys/src/cmd/awk/awkgram.y"
  1187. { yyval.p = stat2(PASTAT, NIL, yypt[-1].yyv.p); } break;
  1188. case 40:
  1189. #line 183 "/sys/src/cmd/awk/awkgram.y"
  1190. { beginloc = linkum(beginloc, yypt[-1].yyv.p); yyval.p = 0; } break;
  1191. case 41:
  1192. #line 185 "/sys/src/cmd/awk/awkgram.y"
  1193. { endloc = linkum(endloc, yypt[-1].yyv.p); yyval.p = 0; } break;
  1194. case 42:
  1195. #line 186 "/sys/src/cmd/awk/awkgram.y"
  1196. {infunc++;} break;
  1197. case 43:
  1198. #line 187 "/sys/src/cmd/awk/awkgram.y"
  1199. { infunc--; curfname=0; defn((Cell *)yypt[-7].yyv.p, yypt[-5].yyv.p, yypt[-1].yyv.p); yyval.p = 0; } break;
  1200. case 45:
  1201. #line 192 "/sys/src/cmd/awk/awkgram.y"
  1202. { yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1203. case 47:
  1204. #line 197 "/sys/src/cmd/awk/awkgram.y"
  1205. { yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1206. case 48:
  1207. #line 201 "/sys/src/cmd/awk/awkgram.y"
  1208. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1209. case 49:
  1210. #line 203 "/sys/src/cmd/awk/awkgram.y"
  1211. { yyval.p = op3(CONDEXPR, notnull(yypt[-4].yyv.p), yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1212. case 50:
  1213. #line 205 "/sys/src/cmd/awk/awkgram.y"
  1214. { yyval.p = op2(BOR, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
  1215. case 51:
  1216. #line 207 "/sys/src/cmd/awk/awkgram.y"
  1217. { yyval.p = op2(AND, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
  1218. case 52:
  1219. #line 208 "/sys/src/cmd/awk/awkgram.y"
  1220. { yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(yypt[-0].yyv.s, 0)); } break;
  1221. case 53:
  1222. #line 210 "/sys/src/cmd/awk/awkgram.y"
  1223. { if (constnode(yypt[-0].yyv.p))
  1224. yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(strnode(yypt[-0].yyv.p), 0));
  1225. else
  1226. yyval.p = op3(yypt[-1].yyv.i, (Node *)1, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1227. case 54:
  1228. #line 214 "/sys/src/cmd/awk/awkgram.y"
  1229. { yyval.p = op2(INTEST, yypt[-2].yyv.p, makearr(yypt[-0].yyv.p)); } break;
  1230. case 55:
  1231. #line 215 "/sys/src/cmd/awk/awkgram.y"
  1232. { yyval.p = op2(INTEST, yypt[-3].yyv.p, makearr(yypt[-0].yyv.p)); } break;
  1233. case 56:
  1234. #line 216 "/sys/src/cmd/awk/awkgram.y"
  1235. { yyval.p = op2(CAT, yypt[-1].yyv.p, yypt[-0].yyv.p); } break;
  1236. case 59:
  1237. #line 222 "/sys/src/cmd/awk/awkgram.y"
  1238. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1239. case 60:
  1240. #line 224 "/sys/src/cmd/awk/awkgram.y"
  1241. { yyval.p = op3(CONDEXPR, notnull(yypt[-4].yyv.p), yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1242. case 61:
  1243. #line 226 "/sys/src/cmd/awk/awkgram.y"
  1244. { yyval.p = op2(BOR, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
  1245. case 62:
  1246. #line 228 "/sys/src/cmd/awk/awkgram.y"
  1247. { yyval.p = op2(AND, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break;
  1248. case 63:
  1249. #line 229 "/sys/src/cmd/awk/awkgram.y"
  1250. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1251. case 64:
  1252. #line 230 "/sys/src/cmd/awk/awkgram.y"
  1253. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1254. case 65:
  1255. #line 231 "/sys/src/cmd/awk/awkgram.y"
  1256. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1257. case 66:
  1258. #line 232 "/sys/src/cmd/awk/awkgram.y"
  1259. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1260. case 67:
  1261. #line 233 "/sys/src/cmd/awk/awkgram.y"
  1262. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1263. case 68:
  1264. #line 234 "/sys/src/cmd/awk/awkgram.y"
  1265. { yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1266. case 69:
  1267. #line 235 "/sys/src/cmd/awk/awkgram.y"
  1268. { yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(yypt[-0].yyv.s, 0)); } break;
  1269. case 70:
  1270. #line 237 "/sys/src/cmd/awk/awkgram.y"
  1271. { if (constnode(yypt[-0].yyv.p))
  1272. yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(strnode(yypt[-0].yyv.p), 0));
  1273. else
  1274. yyval.p = op3(yypt[-1].yyv.i, (Node *)1, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1275. case 71:
  1276. #line 241 "/sys/src/cmd/awk/awkgram.y"
  1277. { yyval.p = op2(INTEST, yypt[-2].yyv.p, makearr(yypt[-0].yyv.p)); } break;
  1278. case 72:
  1279. #line 242 "/sys/src/cmd/awk/awkgram.y"
  1280. { yyval.p = op2(INTEST, yypt[-3].yyv.p, makearr(yypt[-0].yyv.p)); } break;
  1281. case 73:
  1282. #line 243 "/sys/src/cmd/awk/awkgram.y"
  1283. {
  1284. if (safe) SYNTAX("cmd | getline is unsafe");
  1285. else yyval.p = op3(GETLINE, yypt[-0].yyv.p, itonp(yypt[-2].yyv.i), yypt[-3].yyv.p); } break;
  1286. case 74:
  1287. #line 246 "/sys/src/cmd/awk/awkgram.y"
  1288. {
  1289. if (safe) SYNTAX("cmd | getline is unsafe");
  1290. else yyval.p = op3(GETLINE, (Node*)0, itonp(yypt[-1].yyv.i), yypt[-2].yyv.p); } break;
  1291. case 75:
  1292. #line 249 "/sys/src/cmd/awk/awkgram.y"
  1293. { yyval.p = op2(CAT, yypt[-1].yyv.p, yypt[-0].yyv.p); } break;
  1294. case 78:
  1295. #line 255 "/sys/src/cmd/awk/awkgram.y"
  1296. { yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1297. case 79:
  1298. #line 256 "/sys/src/cmd/awk/awkgram.y"
  1299. { yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1300. case 81:
  1301. #line 261 "/sys/src/cmd/awk/awkgram.y"
  1302. { yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1303. case 82:
  1304. #line 265 "/sys/src/cmd/awk/awkgram.y"
  1305. { yyval.p = rectonode(); } break;
  1306. case 84:
  1307. #line 267 "/sys/src/cmd/awk/awkgram.y"
  1308. { yyval.p = yypt[-1].yyv.p; } break;
  1309. case 93:
  1310. #line 284 "/sys/src/cmd/awk/awkgram.y"
  1311. { yyval.p = op3(MATCH, NIL, rectonode(), (Node*)makedfa(yypt[-0].yyv.s, 0)); } break;
  1312. case 94:
  1313. #line 285 "/sys/src/cmd/awk/awkgram.y"
  1314. { yyval.p = op1(NOT, notnull(yypt[-0].yyv.p)); } break;
  1315. case 95:
  1316. #line 289 "/sys/src/cmd/awk/awkgram.y"
  1317. {startreg();} break;
  1318. case 96:
  1319. #line 289 "/sys/src/cmd/awk/awkgram.y"
  1320. { yyval.s = yypt[-1].yyv.s; } break;
  1321. case 99:
  1322. #line 297 "/sys/src/cmd/awk/awkgram.y"
  1323. {
  1324. if (safe) SYNTAX("print | is unsafe");
  1325. else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break;
  1326. case 100:
  1327. #line 300 "/sys/src/cmd/awk/awkgram.y"
  1328. {
  1329. if (safe) SYNTAX("print >> is unsafe");
  1330. else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break;
  1331. case 101:
  1332. #line 303 "/sys/src/cmd/awk/awkgram.y"
  1333. {
  1334. if (safe) SYNTAX("print > is unsafe");
  1335. else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break;
  1336. case 102:
  1337. #line 306 "/sys/src/cmd/awk/awkgram.y"
  1338. { yyval.p = stat3(yypt[-1].yyv.i, yypt[-0].yyv.p, NIL, NIL); } break;
  1339. case 103:
  1340. #line 307 "/sys/src/cmd/awk/awkgram.y"
  1341. { yyval.p = stat2(DELETE, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p); } break;
  1342. case 104:
  1343. #line 308 "/sys/src/cmd/awk/awkgram.y"
  1344. { yyval.p = stat2(DELETE, makearr(yypt[-0].yyv.p), 0); } break;
  1345. case 105:
  1346. #line 309 "/sys/src/cmd/awk/awkgram.y"
  1347. { yyval.p = exptostat(yypt[-0].yyv.p); } break;
  1348. case 106:
  1349. #line 310 "/sys/src/cmd/awk/awkgram.y"
  1350. { yyclearin; SYNTAX("illegal statement"); } break;
  1351. case 109:
  1352. #line 319 "/sys/src/cmd/awk/awkgram.y"
  1353. { if (!inloop) SYNTAX("break illegal outside of loops");
  1354. yyval.p = stat1(BREAK, NIL); } break;
  1355. case 110:
  1356. #line 321 "/sys/src/cmd/awk/awkgram.y"
  1357. { yyval.p = stat1(CLOSE, yypt[-1].yyv.p); } break;
  1358. case 111:
  1359. #line 322 "/sys/src/cmd/awk/awkgram.y"
  1360. { if (!inloop) SYNTAX("continue illegal outside of loops");
  1361. yyval.p = stat1(CONTINUE, NIL); } break;
  1362. case 112:
  1363. #line 324 "/sys/src/cmd/awk/awkgram.y"
  1364. {inloop++;} break;
  1365. case 113:
  1366. #line 324 "/sys/src/cmd/awk/awkgram.y"
  1367. {--inloop;} break;
  1368. case 114:
  1369. #line 325 "/sys/src/cmd/awk/awkgram.y"
  1370. { yyval.p = stat2(DO, yypt[-6].yyv.p, notnull(yypt[-2].yyv.p)); } break;
  1371. case 115:
  1372. #line 326 "/sys/src/cmd/awk/awkgram.y"
  1373. { yyval.p = stat1(EXIT, yypt[-1].yyv.p); } break;
  1374. case 116:
  1375. #line 327 "/sys/src/cmd/awk/awkgram.y"
  1376. { yyval.p = stat1(EXIT, NIL); } break;
  1377. case 118:
  1378. #line 329 "/sys/src/cmd/awk/awkgram.y"
  1379. { yyval.p = stat3(IF, yypt[-3].yyv.p, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1380. case 119:
  1381. #line 330 "/sys/src/cmd/awk/awkgram.y"
  1382. { yyval.p = stat3(IF, yypt[-1].yyv.p, yypt[-0].yyv.p, NIL); } break;
  1383. case 120:
  1384. #line 331 "/sys/src/cmd/awk/awkgram.y"
  1385. { yyval.p = yypt[-1].yyv.p; } break;
  1386. case 121:
  1387. #line 332 "/sys/src/cmd/awk/awkgram.y"
  1388. { if (infunc)
  1389. SYNTAX("next is illegal inside a function");
  1390. yyval.p = stat1(NEXT, NIL); } break;
  1391. case 122:
  1392. #line 335 "/sys/src/cmd/awk/awkgram.y"
  1393. { if (infunc)
  1394. SYNTAX("nextfile is illegal inside a function");
  1395. yyval.p = stat1(NEXTFILE, NIL); } break;
  1396. case 123:
  1397. #line 338 "/sys/src/cmd/awk/awkgram.y"
  1398. { yyval.p = stat1(RETURN, yypt[-1].yyv.p); } break;
  1399. case 124:
  1400. #line 339 "/sys/src/cmd/awk/awkgram.y"
  1401. { yyval.p = stat1(RETURN, NIL); } break;
  1402. case 126:
  1403. #line 341 "/sys/src/cmd/awk/awkgram.y"
  1404. {inloop++;} break;
  1405. case 127:
  1406. #line 341 "/sys/src/cmd/awk/awkgram.y"
  1407. { --inloop; yyval.p = stat2(WHILE, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1408. case 128:
  1409. #line 342 "/sys/src/cmd/awk/awkgram.y"
  1410. { yyval.p = 0; } break;
  1411. case 130:
  1412. #line 347 "/sys/src/cmd/awk/awkgram.y"
  1413. { yyval.p = linkum(yypt[-1].yyv.p, yypt[-0].yyv.p); } break;
  1414. case 133:
  1415. #line 355 "/sys/src/cmd/awk/awkgram.y"
  1416. { yyval.p = op2(DIVEQ, yypt[-3].yyv.p, yypt[-0].yyv.p); } break;
  1417. case 134:
  1418. #line 356 "/sys/src/cmd/awk/awkgram.y"
  1419. { yyval.p = op2(ADD, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1420. case 135:
  1421. #line 357 "/sys/src/cmd/awk/awkgram.y"
  1422. { yyval.p = op2(MINUS, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1423. case 136:
  1424. #line 358 "/sys/src/cmd/awk/awkgram.y"
  1425. { yyval.p = op2(MULT, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1426. case 137:
  1427. #line 359 "/sys/src/cmd/awk/awkgram.y"
  1428. { yyval.p = op2(DIVIDE, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1429. case 138:
  1430. #line 360 "/sys/src/cmd/awk/awkgram.y"
  1431. { yyval.p = op2(MOD, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1432. case 139:
  1433. #line 361 "/sys/src/cmd/awk/awkgram.y"
  1434. { yyval.p = op2(POWER, yypt[-2].yyv.p, yypt[-0].yyv.p); } break;
  1435. case 140:
  1436. #line 362 "/sys/src/cmd/awk/awkgram.y"
  1437. { yyval.p = op1(UMINUS, yypt[-0].yyv.p); } break;
  1438. case 141:
  1439. #line 363 "/sys/src/cmd/awk/awkgram.y"
  1440. { yyval.p = yypt[-0].yyv.p; } break;
  1441. case 142:
  1442. #line 364 "/sys/src/cmd/awk/awkgram.y"
  1443. { yyval.p = op1(NOT, notnull(yypt[-0].yyv.p)); } break;
  1444. case 143:
  1445. #line 365 "/sys/src/cmd/awk/awkgram.y"
  1446. { yyval.p = op2(BLTIN, itonp(yypt[-2].yyv.i), rectonode()); } break;
  1447. case 144:
  1448. #line 366 "/sys/src/cmd/awk/awkgram.y"
  1449. { yyval.p = op2(BLTIN, itonp(yypt[-3].yyv.i), yypt[-1].yyv.p); } break;
  1450. case 145:
  1451. #line 367 "/sys/src/cmd/awk/awkgram.y"
  1452. { yyval.p = op2(BLTIN, itonp(yypt[-0].yyv.i), rectonode()); } break;
  1453. case 146:
  1454. #line 368 "/sys/src/cmd/awk/awkgram.y"
  1455. { yyval.p = op2(CALL, celltonode(yypt[-2].yyv.cp,CVAR), NIL); } break;
  1456. case 147:
  1457. #line 369 "/sys/src/cmd/awk/awkgram.y"
  1458. { yyval.p = op2(CALL, celltonode(yypt[-3].yyv.cp,CVAR), yypt[-1].yyv.p); } break;
  1459. case 148:
  1460. #line 370 "/sys/src/cmd/awk/awkgram.y"
  1461. { yyval.p = op1(PREDECR, yypt[-0].yyv.p); } break;
  1462. case 149:
  1463. #line 371 "/sys/src/cmd/awk/awkgram.y"
  1464. { yyval.p = op1(PREINCR, yypt[-0].yyv.p); } break;
  1465. case 150:
  1466. #line 372 "/sys/src/cmd/awk/awkgram.y"
  1467. { yyval.p = op1(POSTDECR, yypt[-1].yyv.p); } break;
  1468. case 151:
  1469. #line 373 "/sys/src/cmd/awk/awkgram.y"
  1470. { yyval.p = op1(POSTINCR, yypt[-1].yyv.p); } break;
  1471. case 152:
  1472. #line 374 "/sys/src/cmd/awk/awkgram.y"
  1473. { yyval.p = op3(GETLINE, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break;
  1474. case 153:
  1475. #line 375 "/sys/src/cmd/awk/awkgram.y"
  1476. { yyval.p = op3(GETLINE, NIL, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break;
  1477. case 154:
  1478. #line 376 "/sys/src/cmd/awk/awkgram.y"
  1479. { yyval.p = op3(GETLINE, yypt[-0].yyv.p, NIL, NIL); } break;
  1480. case 155:
  1481. #line 377 "/sys/src/cmd/awk/awkgram.y"
  1482. { yyval.p = op3(GETLINE, NIL, NIL, NIL); } break;
  1483. case 156:
  1484. #line 379 "/sys/src/cmd/awk/awkgram.y"
  1485. { yyval.p = op2(INDEX, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1486. case 157:
  1487. #line 381 "/sys/src/cmd/awk/awkgram.y"
  1488. { SYNTAX("index() doesn't permit regular expressions");
  1489. yyval.p = op2(INDEX, yypt[-3].yyv.p, (Node*)yypt[-1].yyv.s); } break;
  1490. case 158:
  1491. #line 383 "/sys/src/cmd/awk/awkgram.y"
  1492. { yyval.p = yypt[-1].yyv.p; } break;
  1493. case 159:
  1494. #line 385 "/sys/src/cmd/awk/awkgram.y"
  1495. { yyval.p = op3(MATCHFCN, NIL, yypt[-3].yyv.p, (Node*)makedfa(yypt[-1].yyv.s, 1)); } break;
  1496. case 160:
  1497. #line 387 "/sys/src/cmd/awk/awkgram.y"
  1498. { if (constnode(yypt[-1].yyv.p))
  1499. yyval.p = op3(MATCHFCN, NIL, yypt[-3].yyv.p, (Node*)makedfa(strnode(yypt[-1].yyv.p), 1));
  1500. else
  1501. yyval.p = op3(MATCHFCN, (Node *)1, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1502. case 161:
  1503. #line 391 "/sys/src/cmd/awk/awkgram.y"
  1504. { yyval.p = celltonode(yypt[-0].yyv.cp, CCON); } break;
  1505. case 162:
  1506. #line 393 "/sys/src/cmd/awk/awkgram.y"
  1507. { yyval.p = op4(SPLIT, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p, (Node*)STRING); } break;
  1508. case 163:
  1509. #line 395 "/sys/src/cmd/awk/awkgram.y"
  1510. { yyval.p = op4(SPLIT, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), (Node*)makedfa(yypt[-1].yyv.s, 1), (Node *)REGEXPR); } break;
  1511. case 164:
  1512. #line 397 "/sys/src/cmd/awk/awkgram.y"
  1513. { yyval.p = op4(SPLIT, yypt[-3].yyv.p, makearr(yypt[-1].yyv.p), NIL, (Node*)STRING); } break;
  1514. case 165:
  1515. #line 398 "/sys/src/cmd/awk/awkgram.y"
  1516. { yyval.p = op1(yypt[-3].yyv.i, yypt[-1].yyv.p); } break;
  1517. case 166:
  1518. #line 399 "/sys/src/cmd/awk/awkgram.y"
  1519. { yyval.p = celltonode(yypt[-0].yyv.cp, CCON); } break;
  1520. case 167:
  1521. #line 401 "/sys/src/cmd/awk/awkgram.y"
  1522. { yyval.p = op4(yypt[-5].yyv.i, NIL, (Node*)makedfa(yypt[-3].yyv.s, 1), yypt[-1].yyv.p, rectonode()); } break;
  1523. case 168:
  1524. #line 403 "/sys/src/cmd/awk/awkgram.y"
  1525. { if (constnode(yypt[-3].yyv.p))
  1526. yyval.p = op4(yypt[-5].yyv.i, NIL, (Node*)makedfa(strnode(yypt[-3].yyv.p), 1), yypt[-1].yyv.p, rectonode());
  1527. else
  1528. yyval.p = op4(yypt[-5].yyv.i, (Node *)1, yypt[-3].yyv.p, yypt[-1].yyv.p, rectonode()); } break;
  1529. case 169:
  1530. #line 408 "/sys/src/cmd/awk/awkgram.y"
  1531. { yyval.p = op4(yypt[-7].yyv.i, NIL, (Node*)makedfa(yypt[-5].yyv.s, 1), yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1532. case 170:
  1533. #line 410 "/sys/src/cmd/awk/awkgram.y"
  1534. { if (constnode(yypt[-5].yyv.p))
  1535. yyval.p = op4(yypt[-7].yyv.i, NIL, (Node*)makedfa(strnode(yypt[-5].yyv.p), 1), yypt[-3].yyv.p, yypt[-1].yyv.p);
  1536. else
  1537. yyval.p = op4(yypt[-7].yyv.i, (Node *)1, yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1538. case 171:
  1539. #line 415 "/sys/src/cmd/awk/awkgram.y"
  1540. { yyval.p = op3(SUBSTR, yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break;
  1541. case 172:
  1542. #line 417 "/sys/src/cmd/awk/awkgram.y"
  1543. { yyval.p = op3(SUBSTR, yypt[-3].yyv.p, yypt[-1].yyv.p, NIL); } break;
  1544. case 175:
  1545. #line 423 "/sys/src/cmd/awk/awkgram.y"
  1546. { yyval.p = op2(ARRAY, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p); } break;
  1547. case 176:
  1548. #line 424 "/sys/src/cmd/awk/awkgram.y"
  1549. { yyval.p = op1(INDIRECT, celltonode(yypt[-0].yyv.cp, CVAR)); } break;
  1550. case 177:
  1551. #line 425 "/sys/src/cmd/awk/awkgram.y"
  1552. { yyval.p = op1(INDIRECT, yypt[-0].yyv.p); } break;
  1553. case 178:
  1554. #line 429 "/sys/src/cmd/awk/awkgram.y"
  1555. { arglist = yyval.p = 0; } break;
  1556. case 179:
  1557. #line 430 "/sys/src/cmd/awk/awkgram.y"
  1558. { arglist = yyval.p = celltonode(yypt[-0].yyv.cp,CVAR); } break;
  1559. case 180:
  1560. #line 431 "/sys/src/cmd/awk/awkgram.y"
  1561. {
  1562. checkdup(yypt[-2].yyv.p, yypt[-0].yyv.cp);
  1563. arglist = yyval.p = linkum(yypt[-2].yyv.p,celltonode(yypt[-0].yyv.cp,CVAR)); } break;
  1564. case 181:
  1565. #line 437 "/sys/src/cmd/awk/awkgram.y"
  1566. { yyval.p = celltonode(yypt[-0].yyv.cp, CVAR); } break;
  1567. case 182:
  1568. #line 438 "/sys/src/cmd/awk/awkgram.y"
  1569. { yyval.p = op1(ARG, itonp(yypt[-0].yyv.i)); } break;
  1570. case 183:
  1571. #line 439 "/sys/src/cmd/awk/awkgram.y"
  1572. { yyval.p = op1(VARNF, (Node *) yypt[-0].yyv.cp); } break;
  1573. case 184:
  1574. #line 444 "/sys/src/cmd/awk/awkgram.y"
  1575. { yyval.p = notnull(yypt[-1].yyv.p); } break;
  1576. }
  1577. goto yystack; /* stack new state and value */
  1578. }