开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 汇编语言 > 查看源码
parse.c
资源名称：C语言编译器.rar　[点击查看]
上传用户：wqdrylgs
上传日期：2007-02-09
资源大小：65k
文件大小：44k
源码类别：

汇编语言

开发平台：

WINDOWS

parse.c：源码内容
  1. /****************************************************************************
  2. *                     U N R E G I S T E R E D   C O P Y
  3. * 
  4. * You are on day 85 of your 30 day trial period.
  5. * 
  6. * This file was produced by an UNREGISTERED COPY of Parser Generator. It is
  7. * for evaluation purposes only. If you continue to use Parser Generator 30
  8. * days after installation then you are required to purchase a license. For
  9. * more information see the online help or go to the Bumble-Bee Software
  10. * homepage at:
  11. * 
  12. * http://www.bumblebeesoftware.com
  13. * 
  14. * This notice must remain present in the file. It cannot be removed.
  15. ****************************************************************************/
  17. /****************************************************************************
  18. * parse.c
  19. * C source file generated from parse.y.
  20. * 
  21. * Date: 06/24/03
  22. * Time: 17:07:53
  23. * 
  24. * AYACC Version: 2.05
  25. ****************************************************************************/
  27. #include <yypars.h>
  29. /* namespaces */
  30. #if defined(__cplusplus) && defined(YYSTDCPPLIB)
  31. using namespace std;
  32. #endif
  33. #if defined(__cplusplus) && defined(YYNAMESPACE)
  34. using namespace yl;
  35. #endif
  37. #define YYFASTPARSER
  39. #line 1 ".\parse.y"
  41. #define YYPARSER /* distinguishes Yacc output from other code files */
  43. #include "globals.h"
  44. #include "util.h"
  45. #include "scan.h"
  46. #include "parse.h"
  49. static char * savedFunName; /* for use in assignments */
  50. static char * savedIdName;
  51. static int savedLineNo;  /* ditto */
  52. static TreeNode * savedTree; /* stores syntax tree for later return */
  55. #line 56 "parse.c"
  56. /* repeated because of possible precompiled header */
  57. #include <yypars.h>
  59. /* namespaces */
  60. #if defined(__cplusplus) && defined(YYSTDCPPLIB)
  61. using namespace std;
  62. #endif
  63. #if defined(__cplusplus) && defined(YYNAMESPACE)
  64. using namespace yl;
  65. #endif
  67. #define YYFASTPARSER
  69. #include ".parse.h"
  71. #ifndef YYSTYPE
  72. #define YYSTYPE int
  73. #endif
  74. #ifndef YYSTACK_SIZE
  75. #define YYSTACK_SIZE 100
  76. #endif
  77. #ifndef YYSTACK_MAX
  78. #define YYSTACK_MAX 0
  79. #endif
  81. /* (state) stack */
  82. #if (YYSTACK_SIZE) != 0
  83. static yystack_t YYNEAR yystack[(YYSTACK_SIZE)];
  84. yystack_t YYFAR *YYNEAR YYDCDECL yysstackptr = yystack;
  85. yystack_t YYFAR *YYNEAR YYDCDECL yystackptr = yystack;
  86. #else
  87. yystack_t YYFAR *YYNEAR YYDCDECL yysstackptr = NULL;
  88. yystack_t YYFAR *YYNEAR YYDCDECL yystackptr = NULL;
  89. #endif
  91. /* attribute stack */
  92. #if (YYSTACK_SIZE) != 0
  93. static YYSTYPE YYNEAR yyattributestack[(YYSTACK_SIZE)];
  94. #ifdef YYPROTOTYPE
  95. void YYFAR *YYNEAR YYDCDECL yysattributestackptr = yyattributestack;
  96. void YYFAR *YYNEAR YYDCDECL yyattributestackptr = yyattributestack;
  97. #else
  98. char YYFAR *YYNEAR YYDCDECL yysattributestackptr = (char YYFAR *) yyattributestack;
  99. char YYFAR *YYNEAR YYDCDECL yyattributestackptr = (char YYFAR *) yyattributestack;
  100. #endif
  101. #else
  102. #ifdef YYPROTOTYPE
  103. void YYFAR *YYNEAR YYDCDECL yysattributestackptr = NULL;
  104. void YYFAR *YYNEAR YYDCDECL yyattributestackptr = NULL;
  105. #else
  106. char YYFAR *YYNEAR YYDCDECL yysattributestackptr = NULL;
  107. char YYFAR *YYNEAR YYDCDECL yyattributestackptr = NULL;
  108. #endif
  109. #endif
  111. int YYNEAR YYDCDECL yysstack_size = (YYSTACK_SIZE);
  112. int YYNEAR YYDCDECL yystack_size = (YYSTACK_SIZE);
  113. int YYNEAR YYDCDECL yystack_max = (YYSTACK_MAX);
  115. /* attributes */
  116. YYSTYPE YYNEAR yyval;
  117. YYSTYPE YYNEAR yylval;
  118. #ifdef YYPROTOTYPE
  119. void YYFAR *YYNEAR YYDCDECL yyvalptr = &yyval;
  120. void YYFAR *YYNEAR YYDCDECL yylvalptr = &yylval;
  121. #else
  122. char YYFAR *YYNEAR YYDCDECL yyvalptr = (char *) &yyval;
  123. char YYFAR *YYNEAR YYDCDECL yylvalptr = (char *) &yylval;
  124. #endif
  126. size_t YYNEAR YYDCDECL yyattribute_size = sizeof(YYSTYPE);
  128. /* yyattribute */
  129. #ifdef YYDEBUG
  130. #ifdef YYPROTOTYPE
  131. static YYSTYPE YYFAR *yyattribute1(int index)
  132. #else
  133. static YYSTYPE YYFAR *yyattribute1(index)
  134. int index;
  135. #endif
  136. {
  137. YYSTYPE YYFAR *p = &((YYSTYPE YYFAR *) yyattributestackptr)[yytop + index];
  138. return p;
  139. }
  140. #define yyattribute(index) (*yyattribute1(index))
  141. #else
  142. #define yyattribute(index) (((YYSTYPE YYFAR *) yyattributestackptr)[yytop + (index)])
  143. #endif
  145. #ifdef YYDEBUG
  146. #ifdef YYPROTOTYPE
  147. static void yyinitdebug(YYSTYPE YYFAR **p, int count)
  148. #else
  149. static void yyinitdebug(p, count)
  150. YYSTYPE YYFAR **p;
  151. int count;
  152. #endif
  153. {
  154. int i;
  155. yyassert(p != NULL);
  156. yyassert(count >= 1);
  158. for (i = 0; i < count; i++) {
  159. p[i] = &((YYSTYPE YYFAR *) yyattributestackptr)[yytop + i - (count - 1)];
  160. }
  161. }
  162. #endif
  164. #ifdef YYPROTOTYPE
  165. void YYCDECL yyparseraction(int action)
  166. #else
  167. void YYCDECL yyparseraction(action)
  168. int action;
  169. #endif
  170. {
  171. switch (action) {
  172. case 0:
  173. {
  174. #ifdef YYDEBUG
  175. YYSTYPE YYFAR *yya[2];
  176. yyinitdebug(yya, 2);
  177. #endif
  178. {
  179. #line 52 ".\parse.y"
  180.  savedTree = yyattribute(1 - 1).ptree;
  181. #line 182 "parse.c"
  182. }
  183. }
  184. break;
  185. case 1:
  186. {
  187. #ifdef YYDEBUG
  188. YYSTYPE YYFAR *yya[3];
  189. yyinitdebug(yya, 3);
  190. #endif
  191. {
  192. #line 55 ".\parse.y"
  193.  TreeNode * t = yyattribute(1 - 2).ptree;
  194.   if (t != NULL)
  195.   { while (t->sibling != NULL)
  196. t = t->sibling;
  197. t->sibling = yyattribute(2 - 2).ptree;
  198. yyval.ptree = yyattribute(1 - 2).ptree; }
  199.   else yyval.ptree = yyattribute(2 - 2).ptree;
  201. #line 202 "parse.c"
  202. }
  203. }
  204. break;
  205. case 2:
  206. {
  207. #ifdef YYDEBUG
  208. YYSTYPE YYFAR *yya[2];
  209. yyinitdebug(yya, 2);
  210. #endif
  211. {
  212. #line 64 ".\parse.y"
  213.  yyval.ptree = yyattribute(1 - 1).ptree; 
  214. #line 215 "parse.c"
  215. }
  216. }
  217. break;
  218. case 3:
  219. {
  220. #ifdef YYDEBUG
  221. YYSTYPE YYFAR *yya[2];
  222. yyinitdebug(yya, 2);
  223. #endif
  224. {
  225. #line 66 ".\parse.y"
  226.  yyval.ptree = yyattribute(1 - 1).ptree; 
  227. #line 228 "parse.c"
  228. }
  229. }
  230. break;
  231. case 4:
  232. {
  233. #ifdef YYDEBUG
  234. YYSTYPE YYFAR *yya[2];
  235. yyinitdebug(yya, 2);
  236. #endif
  237. {
  238. #line 67 ".\parse.y"
  239.  yyval.ptree = yyattribute(1 - 1).ptree; 
  240. #line 241 "parse.c"
  241. }
  242. }
  243. break;
  244. case 5:
  245. {
  246. #ifdef YYDEBUG
  247. YYSTYPE YYFAR *yya[2];
  248. yyinitdebug(yya, 2);
  249. #endif
  250. {
  251. #line 68 ".\parse.y"
  252.  yyval.ptree = yyattribute(1 - 1).ptree; 
  253. #line 254 "parse.c"
  254. }
  255. }
  256. break;
  257. case 6:
  258. {
  259. #ifdef YYDEBUG
  260. YYSTYPE YYFAR *yya[2];
  261. yyinitdebug(yya, 2);
  262. #endif
  263. {
  264. #line 70 ".\parse.y"
  265.  savedIdName = copyString(tokenString); 
  266. #line 267 "parse.c"
  267. }
  268. }
  269. break;
  270. case 7:
  271. {
  272. #line 72 ".\parse.y"
  273.  savedFunName = savedIdName; 
  274. #line 275 "parse.c"
  275. }
  276. break;
  277. case 8:
  278. {
  279. #ifdef YYDEBUG
  280. YYSTYPE YYFAR *yya[4];
  281. yyinitdebug(yya, 4);
  282. #endif
  283. {
  284. #line 75 ".\parse.y"
  285.  if(yyattribute(1 - 3).type == Void)
  286.   ;
  287.   // err
  288.   else
  289.     {
  290.   yyval.ptree = newDecNode(VarK); 
  291.   yyval.ptree -> type = yyattribute(1 - 3).type;
  292.   yyval.ptree -> child[0] = yyattribute(2 - 3).ptree;
  293. }
  295. #line 296 "parse.c"
  296. }
  297. }
  298. break;
  299. case 9:
  300. {
  301. #ifdef YYDEBUG
  302. YYSTYPE YYFAR *yya[4];
  303. yyinitdebug(yya, 4);
  304. #endif
  305. {
  306. #line 87 ".\parse.y"
  307.  
  308.                   TreeNode * t = yyattribute(1 - 3).ptree;
  309.   if (t != NULL)
  310.   { while (t->sibling != NULL)
  311. t = t->sibling;
  312. t->sibling = yyattribute(3 - 3).ptree;
  313. yyval.ptree = yyattribute(1 - 3).ptree; }
  314.   else yyval.ptree = yyattribute(3 - 3).ptree;
  315.                 
  316. #line 317 "parse.c"
  317. }
  318. }
  319. break;
  320. case 10:
  321. {
  322. #ifdef YYDEBUG
  323. YYSTYPE YYFAR *yya[2];
  324. yyinitdebug(yya, 2);
  325. #endif
  326. {
  327. #line 96 ".\parse.y"
  328.  yyval.ptree = yyattribute(1 - 1).ptree; 
  329. #line 330 "parse.c"
  330. }
  331. }
  332. break;
  333. case 11:
  334. {
  335. #ifdef YYDEBUG
  336. YYSTYPE YYFAR *yya[6];
  337. yyinitdebug(yya, 6);
  338. #endif
  339. {
  340. #line 98 ".\parse.y"
  341.  
  342.   TreeNode * new_node = newStmtNode(AssignK);
  343.   TreeNode * t = yyattribute(1 - 5).ptree;
  344.   if (t != NULL)
  345.   { while (t->sibling != NULL)
  346. t = t->sibling;
  347. t->sibling = new_node;
  348. yyval.ptree = yyattribute(1 - 5).ptree; }
  349.   else yyval.ptree = new_node;
  350.               
  351. #line 352 "parse.c"
  352. }
  353. }
  354. break;
  355. case 12:
  356. {
  357. #ifdef YYDEBUG
  358. YYSTYPE YYFAR *yya[4];
  359. yyinitdebug(yya, 4);
  360. #endif
  361. {
  362. #line 109 ".\parse.y"
  363.  
  364.  yyval.ptree = newStmtNode(AssignK);
  365.  yyval.ptree -> child[0] = newExpNode(IdK);
  366.  yyval.ptree -> child[0] -> attr.name = savedIdName;
  367.  yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  368.               
  369. #line 370 "parse.c"
  370. }
  371. }
  372. break;
  373. case 13:
  374. {
  375. #ifdef YYDEBUG
  376. YYSTYPE YYFAR *yya[2];
  377. yyinitdebug(yya, 2);
  378. #endif
  379. {
  380. #line 116 ".\parse.y"
  381.  yyval.type = Integer; 
  382. #line 383 "parse.c"
  383. }
  384. }
  385. break;
  386. case 14:
  387. {
  388. #ifdef YYDEBUG
  389. YYSTYPE YYFAR *yya[2];
  390. yyinitdebug(yya, 2);
  391. #endif
  392. {
  393. #line 117 ".\parse.y"
  394.  yyval.type = Float; 
  395. #line 396 "parse.c"
  396. }
  397. }
  398. break;
  399. case 15:
  400. {
  401. #ifdef YYDEBUG
  402. YYSTYPE YYFAR *yya[2];
  403. yyinitdebug(yya, 2);
  404. #endif
  405. {
  406. #line 118 ".\parse.y"
  407.  yyval.type = Char; 
  408. #line 409 "parse.c"
  409. }
  410. }
  411. break;
  412. case 16:
  413. {
  414. #ifdef YYDEBUG
  415. YYSTYPE YYFAR *yya[2];
  416. yyinitdebug(yya, 2);
  417. #endif
  418. {
  419. #line 119 ".\parse.y"
  420.  yyval.type = Void; 
  421. #line 422 "parse.c"
  422. }
  423. }
  424. break;
  425. case 17:
  426. {
  427. #ifdef YYDEBUG
  428. YYSTYPE YYFAR *yya[8];
  429. yyinitdebug(yya, 8);
  430. #endif
  431. {
  432. #line 122 ".\parse.y"
  433.  yyval.ptree = newDecNode(FunDefK);
  434.   yyval.ptree -> attr.name = savedFunName;
  435.   yyval.ptree -> type = yyattribute(1 - 7).type;
  436.   yyval.ptree -> child[0] = yyattribute(5 - 7).ptree;
  437.   yyval.ptree -> child[1] = yyattribute(7 - 7).ptree; 
  439. #line 440 "parse.c"
  440. }
  441. }
  442. break;
  443. case 18:
  444. {
  445. #ifdef YYDEBUG
  446. YYSTYPE YYFAR *yya[7];
  447. yyinitdebug(yya, 7);
  448. #endif
  449. {
  450. #line 129 ".\parse.y"
  451.  yyval.ptree = newDecNode(FunDefK);
  452.   yyval.ptree -> attr.name = savedFunName;
  453.   yyval.ptree -> type = Void;
  454.   yyval.ptree -> child[0] = yyattribute(4 - 6).ptree;
  455.   yyval.ptree -> child[1] = yyattribute(6 - 6).ptree; 
  457. #line 458 "parse.c"
  458. }
  459. }
  460. break;
  461. case 19:
  462. {
  463. #ifdef YYDEBUG
  464. YYSTYPE YYFAR *yya[8];
  465. yyinitdebug(yya, 8);
  466. #endif
  467. {
  468. #line 137 ".\parse.y"
  469.  yyval.ptree = newDecNode(FunDecK);
  470.   yyval.ptree -> attr.name = savedFunName;
  471.   yyval.ptree -> type = yyattribute(1 - 7).type;
  472.   yyval.ptree -> child[0] = yyattribute(5 - 7).ptree;
  473.   yyval.ptree -> child[1] = NULL;
  475. #line 476 "parse.c"
  476. }
  477. }
  478. break;
  479. case 20:
  480. {
  481. #ifdef YYDEBUG
  482. YYSTYPE YYFAR *yya[7];
  483. yyinitdebug(yya, 7);
  484. #endif
  485. {
  486. #line 144 ".\parse.y"
  487.  yyval.ptree = newDecNode(FunDecK);
  488.   yyval.ptree -> attr.name = savedFunName;
  489.   yyval.ptree -> type = Void;
  490.   yyval.ptree -> child[0] = yyattribute(4 - 6).ptree;
  491.   yyval.ptree -> child[1] = NULL;
  493. #line 494 "parse.c"
  494. }
  495. }
  496. break;
  497. case 21:
  498. {
  499. #ifdef YYDEBUG
  500. YYSTYPE YYFAR *yya[2];
  501. yyinitdebug(yya, 2);
  502. #endif
  503. {
  504. #line 152 ".\parse.y"
  505.  yyval.ptree = yyattribute(1 - 1).ptree; 
  506. #line 507 "parse.c"
  507. }
  508. }
  509. break;
  510. case 22:
  511. {
  512. #line 154 ".\parse.y"
  513.  yyval.ptree = NULL; 
  514. #line 515 "parse.c"
  515. }
  516. break;
  517. case 23:
  518. {
  519. #ifdef YYDEBUG
  520. YYSTYPE YYFAR *yya[4];
  521. yyinitdebug(yya, 4);
  522. #endif
  523. {
  524. #line 157 ".\parse.y"
  525.  TreeNode * t = yyattribute(1 - 3).ptree;
  526.   if (t != NULL)
  527.   { while (t->sibling != NULL)
  528. t = t->sibling;
  529. t->sibling = yyattribute(3 - 3).ptree;
  530. yyval.ptree = yyattribute(1 - 3).ptree; }
  531.   else yyval.ptree = yyattribute(3 - 3).ptree;
  533. #line 534 "parse.c"
  534. }
  535. }
  536. break;
  537. case 24:
  538. {
  539. #ifdef YYDEBUG
  540. YYSTYPE YYFAR *yya[2];
  541. yyinitdebug(yya, 2);
  542. #endif
  543. {
  544. #line 166 ".\parse.y"
  545.  yyval.ptree = yyattribute(1 - 1).ptree; 
  546. #line 547 "parse.c"
  547. }
  548. }
  549. break;
  550. case 25:
  551. {
  552. #ifdef YYDEBUG
  553. YYSTYPE YYFAR *yya[2];
  554. yyinitdebug(yya, 2);
  555. #endif
  556. {
  557. #line 169 ".\parse.y"
  558.  yyval.ptree = newDecNode(ParamK);
  559.                   yyval.ptree -> type = yyattribute(1 - 1).type;
  560.                 
  561. #line 562 "parse.c"
  562. }
  563. }
  564. break;
  565. case 26:
  566. {
  567. #ifdef YYDEBUG
  568. YYSTYPE YYFAR *yya[3];
  569. yyinitdebug(yya, 3);
  570. #endif
  571. {
  572. #line 173 ".\parse.y"
  573.  yyval.ptree = newDecNode(ParamK);
  574.                   yyval.ptree -> type = yyattribute(1 - 2).type;
  575.                   yyval.ptree -> attr.name = savedIdName;
  576.                 
  577. #line 578 "parse.c"
  578. }
  579. }
  580. break;
  581. case 27:
  582. {
  583. #ifdef YYDEBUG
  584. YYSTYPE YYFAR *yya[5];
  585. yyinitdebug(yya, 5);
  586. #endif
  587. {
  588. #line 178 ".\parse.y"
  589.  yyval.ptree = newDecNode(ParamK);
  590.                   yyval.ptree -> type = yyattribute(1 - 4).type;
  591.                   yyval.ptree -> attr.name = savedIdName;
  592.                 
  593. #line 594 "parse.c"
  594. }
  595. }
  596. break;
  597. case 28:
  598. {
  599. #ifdef YYDEBUG
  600. YYSTYPE YYFAR *yya[6];
  601. yyinitdebug(yya, 6);
  602. #endif
  603. {
  604. #line 183 ".\parse.y"
  605.  yyval.ptree = newDecNode(ParamK);
  606.                   yyval.ptree -> type = yyattribute(1 - 5).type;
  607.                   yyval.ptree -> attr.name = savedIdName;
  608.                   yyval.ptree -> child[0] = yyattribute(4 - 5).ptree;
  609.                 
  610. #line 611 "parse.c"
  611. }
  612. }
  613. break;
  614. case 29:
  615. {
  616. #ifdef YYDEBUG
  617. YYSTYPE YYFAR *yya[5];
  618. yyinitdebug(yya, 5);
  619. #endif
  620. {
  621. #line 190 ".\parse.y"
  622.  yyval.ptree = newDecNode(CompK);
  623.                   yyval.ptree -> child[0] = yyattribute(2 - 4).ptree;
  624.                   yyval.ptree -> child[1] = yyattribute(3 - 4).ptree;
  625.                 
  626. #line 627 "parse.c"
  627. }
  628. }
  629. break;
  630. case 30:
  631. {
  632. #ifdef YYDEBUG
  633. YYSTYPE YYFAR *yya[3];
  634. yyinitdebug(yya, 3);
  635. #endif
  636. {
  637. #line 196 ".\parse.y"
  638.  TreeNode * t = yyattribute(1 - 2).ptree;
  639.   if (t != NULL)
  640.   { while (t->sibling != NULL)
  641. t = t->sibling;
  642. t->sibling = yyattribute(2 - 2).ptree;
  643. yyval.ptree = yyattribute(1 - 2).ptree; }
  644.   else yyval.ptree = yyattribute(2 - 2).ptree;
  646. #line 647 "parse.c"
  647. }
  648. }
  649. break;
  650. case 31:
  651. {
  652. #line 205 ".\parse.y"
  653.  yyval.ptree = NULL; 
  654. #line 655 "parse.c"
  655. }
  656. break;
  657. case 32:
  658. {
  659. #ifdef YYDEBUG
  660. YYSTYPE YYFAR *yya[3];
  661. yyinitdebug(yya, 3);
  662. #endif
  663. {
  664. #line 208 ".\parse.y"
  665.  TreeNode * t = yyattribute(1 - 2).ptree;
  666.   if (t != NULL)
  667.   { while (t->sibling != NULL)
  668. t = t->sibling;
  669. t->sibling = yyattribute(2 - 2).ptree;
  670. yyval.ptree = yyattribute(1 - 2).ptree; }
  671.   else yyval.ptree = yyattribute(2 - 2).ptree;
  673. #line 674 "parse.c"
  674. }
  675. }
  676. break;
  677. case 33:
  678. {
  679. #line 217 ".\parse.y"
  680.  yyval.ptree = NULL; 
  681. #line 682 "parse.c"
  682. }
  683. break;
  684. case 34:
  685. {
  686. #ifdef YYDEBUG
  687. YYSTYPE YYFAR *yya[2];
  688. yyinitdebug(yya, 2);
  689. #endif
  690. {
  691. #line 219 ".\parse.y"
  692.  yyval.ptree = yyattribute(1 - 1).ptree; 
  693. #line 694 "parse.c"
  694. }
  695. }
  696. break;
  697. case 35:
  698. {
  699. #ifdef YYDEBUG
  700. YYSTYPE YYFAR *yya[2];
  701. yyinitdebug(yya, 2);
  702. #endif
  703. {
  704. #line 220 ".\parse.y"
  705.  yyval.ptree = yyattribute(1 - 1).ptree; 
  706. #line 707 "parse.c"
  707. }
  708. }
  709. break;
  710. case 36:
  711. {
  712. #ifdef YYDEBUG
  713. YYSTYPE YYFAR *yya[2];
  714. yyinitdebug(yya, 2);
  715. #endif
  716. {
  717. #line 221 ".\parse.y"
  718.  yyval.ptree = yyattribute(1 - 1).ptree; 
  719. #line 720 "parse.c"
  720. }
  721. }
  722. break;
  723. case 37:
  724. {
  725. #ifdef YYDEBUG
  726. YYSTYPE YYFAR *yya[2];
  727. yyinitdebug(yya, 2);
  728. #endif
  729. {
  730. #line 222 ".\parse.y"
  731.  yyval.ptree = yyattribute(1 - 1).ptree; 
  732. #line 733 "parse.c"
  733. }
  734. }
  735. break;
  736. case 38:
  737. {
  738. #ifdef YYDEBUG
  739. YYSTYPE YYFAR *yya[2];
  740. yyinitdebug(yya, 2);
  741. #endif
  742. {
  743. #line 223 ".\parse.y"
  744.  yyval.ptree = yyattribute(1 - 1).ptree; 
  745. #line 746 "parse.c"
  746. }
  747. }
  748. break;
  749. case 39:
  750. {
  751. #ifdef YYDEBUG
  752. YYSTYPE YYFAR *yya[3];
  753. yyinitdebug(yya, 3);
  754. #endif
  755. {
  756. #line 224 ".\parse.y"
  757.  yyval.ptree = newStmtNode(ContinueK); 
  758. #line 759 "parse.c"
  759. }
  760. }
  761. break;
  762. case 40:
  763. {
  764. #ifdef YYDEBUG
  765. YYSTYPE YYFAR *yya[3];
  766. yyinitdebug(yya, 3);
  767. #endif
  768. {
  769. #line 225 ".\parse.y"
  770.  yyval.ptree = newStmtNode(BreakK); 
  771. #line 772 "parse.c"
  772. }
  773. }
  774. break;
  775. case 41:
  776. {
  777. #ifdef YYDEBUG
  778. YYSTYPE YYFAR *yya[3];
  779. yyinitdebug(yya, 3);
  780. #endif
  781. {
  782. #line 228 ".\parse.y"
  783.  yyval.ptree = yyattribute(1 - 2).ptree; 
  784. #line 785 "parse.c"
  785. }
  786. }
  787. break;
  788. case 42:
  789. {
  790. #ifdef YYDEBUG
  791. YYSTYPE YYFAR *yya[2];
  792. yyinitdebug(yya, 2);
  793. #endif
  794. {
  795. #line 230 ".\parse.y"
  796.  yyval.ptree = NULL; 
  797. #line 798 "parse.c"
  798. }
  799. }
  800. break;
  801. case 43:
  802. {
  803. #ifdef YYDEBUG
  804. YYSTYPE YYFAR *yya[6];
  805. yyinitdebug(yya, 6);
  806. #endif
  807. {
  808. #line 233 ".\parse.y"
  809.  yyval.ptree = newStmtNode(IfK);
  810.                   yyval.ptree -> child[0] = yyattribute(3 - 5).ptree;
  811.                   yyval.ptree -> child[1] = yyattribute(5 - 5).ptree;
  812.                 
  813. #line 814 "parse.c"
  814. }
  815. }
  816. break;
  817. case 44:
  818. {
  819. #ifdef YYDEBUG
  820. YYSTYPE YYFAR *yya[8];
  821. yyinitdebug(yya, 8);
  822. #endif
  823. {
  824. #line 238 ".\parse.y"
  825.  yyval.ptree = newStmtNode(IfK);
  826.                   yyval.ptree -> child[0] = yyattribute(3 - 7).ptree;
  827.                   yyval.ptree -> child[1] = yyattribute(5 - 7).ptree;
  828.   yyval.ptree -> child[2] = yyattribute(7 - 7).ptree;
  829.                 
  830. #line 831 "parse.c"
  831. }
  832. }
  833. break;
  834. case 45:
  835. {
  836. #ifdef YYDEBUG
  837. YYSTYPE YYFAR *yya[6];
  838. yyinitdebug(yya, 6);
  839. #endif
  840. {
  841. #line 245 ".\parse.y"
  842.  yyval.ptree = newStmtNode(WhileK);
  843.                   yyval.ptree -> child[0] = yyattribute(3 - 5).ptree;
  844.                   yyval.ptree -> child[1] = yyattribute(5 - 5).ptree;
  845.                 
  846. #line 847 "parse.c"
  847. }
  848. }
  849. break;
  850. case 46:
  851. {
  852. #ifdef YYDEBUG
  853. YYSTYPE YYFAR *yya[3];
  854. yyinitdebug(yya, 3);
  855. #endif
  856. {
  857. #line 251 ".\parse.y"
  858.  yyval.ptree = newStmtNode(ReturnK);
  859.                   yyval.ptree -> child[0] = NULL;
  860.                 
  861. #line 862 "parse.c"
  862. }
  863. }
  864. break;
  865. case 47:
  866. {
  867. #ifdef YYDEBUG
  868. YYSTYPE YYFAR *yya[4];
  869. yyinitdebug(yya, 4);
  870. #endif
  871. {
  872. #line 255 ".\parse.y"
  873.  yyval.ptree = newStmtNode(ReturnK);
  874.                   yyval.ptree -> child[0] = yyattribute(2 - 3).ptree;
  875.                 
  876. #line 877 "parse.c"
  877. }
  878. }
  879. break;
  880. case 48:
  881. {
  882. #ifdef YYDEBUG
  883. YYSTYPE YYFAR *yya[4];
  884. yyinitdebug(yya, 4);
  885. #endif
  886. {
  887. #line 260 ".\parse.y"
  888.  yyval.ptree = newStmtNode(AssignK);
  889.                   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  890.                   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  891.                 
  892. #line 893 "parse.c"
  893. }
  894. }
  895. break;
  896. case 49:
  897. {
  898. #ifdef YYDEBUG
  899. YYSTYPE YYFAR *yya[2];
  900. yyinitdebug(yya, 2);
  901. #endif
  902. {
  903. #line 265 ".\parse.y"
  904.  yyval.ptree = yyattribute(1 - 1).ptree; 
  905. #line 906 "parse.c"
  906. }
  907. }
  908. break;
  909. case 50:
  910. {
  911. #ifdef YYDEBUG
  912. YYSTYPE YYFAR *yya[2];
  913. yyinitdebug(yya, 2);
  914. #endif
  915. {
  916. #line 268 ".\parse.y"
  917.  yyval.ptree = newExpNode(IdK);
  918.                   yyval.ptree -> attr.name = savedIdName;
  919.                 
  920. #line 921 "parse.c"
  921. }
  922. }
  923. break;
  924. case 51:
  925. {
  926. #ifdef YYDEBUG
  927. YYSTYPE YYFAR *yya[5];
  928. yyinitdebug(yya, 5);
  929. #endif
  930. {
  931. #line 272 ".\parse.y"
  932.  yyval.ptree = newExpNode(IdK);
  933.   yyval.ptree -> attr.name = savedIdName;
  934.                   yyval.ptree -> child[0] = yyattribute(3 - 4).ptree;
  935.                 
  936. #line 937 "parse.c"
  937. }
  938. }
  939. break;
  940. case 52:
  941. {
  942. #ifdef YYDEBUG
  943. YYSTYPE YYFAR *yya[4];
  944. yyinitdebug(yya, 4);
  945. #endif
  946. {
  947. #line 278 ".\parse.y"
  948.  yyval.ptree = newExpNode(OpK);
  949.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  950.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  951.   yyval.ptree -> attr.op = OR;
  953. #line 954 "parse.c"
  954. }
  955. }
  956. break;
  957. case 53:
  958. {
  959. #ifdef YYDEBUG
  960. YYSTYPE YYFAR *yya[4];
  961. yyinitdebug(yya, 4);
  962. #endif
  963. {
  964. #line 284 ".\parse.y"
  965.  yyval.ptree = newExpNode(OpK);
  966.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  967.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  968.   yyval.ptree -> attr.op = AND;
  970. #line 971 "parse.c"
  971. }
  972. }
  973. break;
  974. case 54:
  975. {
  976. #ifdef YYDEBUG
  977. YYSTYPE YYFAR *yya[4];
  978. yyinitdebug(yya, 4);
  979. #endif
  980. {
  981. #line 290 ".\parse.y"
  982.  yyval.ptree = newExpNode(OpK);
  983.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  984.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  985.   yyval.ptree -> attr.op = LT;
  986.   yyval.ptree -> type = Boolean;
  988. #line 989 "parse.c"
  989. }
  990. }
  991. break;
  992. case 55:
  993. {
  994. #ifdef YYDEBUG
  995. YYSTYPE YYFAR *yya[4];
  996. yyinitdebug(yya, 4);
  997. #endif
  998. {
  999. #line 297 ".\parse.y"
  1000.  yyval.ptree = newExpNode(OpK);
  1001.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1002.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1003.   yyval.ptree -> attr.op = LE;
  1004.   yyval.ptree -> type = Boolean;
  1006. #line 1007 "parse.c"
  1007. }
  1008. }
  1009. break;
  1010. case 56:
  1011. {
  1012. #ifdef YYDEBUG
  1013. YYSTYPE YYFAR *yya[4];
  1014. yyinitdebug(yya, 4);
  1015. #endif
  1016. {
  1017. #line 304 ".\parse.y"
  1018.  yyval.ptree = newExpNode(OpK);
  1019.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1020.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1021.   yyval.ptree -> attr.op = GT;
  1022.   yyval.ptree -> type = Boolean;
  1024. #line 1025 "parse.c"
  1025. }
  1026. }
  1027. break;
  1028. case 57:
  1029. {
  1030. #ifdef YYDEBUG
  1031. YYSTYPE YYFAR *yya[4];
  1032. yyinitdebug(yya, 4);
  1033. #endif
  1034. {
  1035. #line 311 ".\parse.y"
  1036.  yyval.ptree = newExpNode(OpK);
  1037.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1038.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1039.   yyval.ptree -> attr.op = GE;
  1040.   yyval.ptree -> type = Boolean;
  1042. #line 1043 "parse.c"
  1043. }
  1044. }
  1045. break;
  1046. case 58:
  1047. {
  1048. #ifdef YYDEBUG
  1049. YYSTYPE YYFAR *yya[4];
  1050. yyinitdebug(yya, 4);
  1051. #endif
  1052. {
  1053. #line 318 ".\parse.y"
  1054.  yyval.ptree = newExpNode(OpK);
  1055.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1056.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1057.   yyval.ptree -> attr.op = EQ;
  1058.   yyval.ptree -> type = Boolean;
  1060. #line 1061 "parse.c"
  1061. }
  1062. }
  1063. break;
  1064. case 59:
  1065. {
  1066. #ifdef YYDEBUG
  1067. YYSTYPE YYFAR *yya[4];
  1068. yyinitdebug(yya, 4);
  1069. #endif
  1070. {
  1071. #line 325 ".\parse.y"
  1072.  yyval.ptree = newExpNode(OpK);
  1073.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1074.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1075.   yyval.ptree -> attr.op = NEQ;
  1076.   yyval.ptree -> type = Boolean;
  1078. #line 1079 "parse.c"
  1079. }
  1080. }
  1081. break;
  1082. case 60:
  1083. {
  1084. #ifdef YYDEBUG
  1085. YYSTYPE YYFAR *yya[4];
  1086. yyinitdebug(yya, 4);
  1087. #endif
  1088. {
  1089. #line 332 ".\parse.y"
  1090.  yyval.ptree = newExpNode(OpK);
  1091.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1092.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1093.   yyval.ptree -> attr.op = PLUS;
  1095. #line 1096 "parse.c"
  1096. }
  1097. }
  1098. break;
  1099. case 61:
  1100. {
  1101. #ifdef YYDEBUG
  1102. YYSTYPE YYFAR *yya[4];
  1103. yyinitdebug(yya, 4);
  1104. #endif
  1105. {
  1106. #line 338 ".\parse.y"
  1107.  yyval.ptree = newExpNode(OpK);
  1108.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1109.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1110.   yyval.ptree -> attr.op = SUB;
  1112. #line 1113 "parse.c"
  1113. }
  1114. }
  1115. break;
  1116. case 62:
  1117. {
  1118. #ifdef YYDEBUG
  1119. YYSTYPE YYFAR *yya[4];
  1120. yyinitdebug(yya, 4);
  1121. #endif
  1122. {
  1123. #line 344 ".\parse.y"
  1124.  yyval.ptree = newExpNode(OpK);
  1125.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1126.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1127.   yyval.ptree -> attr.op = MUT;
  1129. #line 1130 "parse.c"
  1130. }
  1131. }
  1132. break;
  1133. case 63:
  1134. {
  1135. #ifdef YYDEBUG
  1136. YYSTYPE YYFAR *yya[4];
  1137. yyinitdebug(yya, 4);
  1138. #endif
  1139. {
  1140. #line 350 ".\parse.y"
  1141.  yyval.ptree = newExpNode(OpK);
  1142.   yyval.ptree -> child[0] = yyattribute(1 - 3).ptree;
  1143.   yyval.ptree -> child[1] = yyattribute(3 - 3).ptree;
  1144.   yyval.ptree -> attr.op = DIV;
  1146. #line 1147 "parse.c"
  1147. }
  1148. }
  1149. break;
  1150. case 64:
  1151. {
  1152. #ifdef YYDEBUG
  1153. YYSTYPE YYFAR *yya[2];
  1154. yyinitdebug(yya, 2);
  1155. #endif
  1156. {
  1157. #line 356 ".\parse.y"
  1158.  yyval.ptree = yyattribute(1 - 1).ptree; 
  1159. #line 1160 "parse.c"
  1160. }
  1161. }
  1162. break;
  1163. case 65:
  1164. {
  1165. #ifdef YYDEBUG
  1166. YYSTYPE YYFAR *yya[4];
  1167. yyinitdebug(yya, 4);
  1168. #endif
  1169. {
  1170. #line 360 ".\parse.y"
  1171.  yyval.ptree = yyattribute(2 - 3).ptree; 
  1172. #line 1173 "parse.c"
  1173. }
  1174. }
  1175. break;
  1176. case 66:
  1177. {
  1178. #ifdef YYDEBUG
  1179. YYSTYPE YYFAR *yya[2];
  1180. yyinitdebug(yya, 2);
  1181. #endif
  1182. {
  1183. #line 362 ".\parse.y"
  1184.  yyval.ptree = yyattribute(1 - 1).ptree; 
  1185. #line 1186 "parse.c"
  1186. }
  1187. }
  1188. break;
  1189. case 67:
  1190. {
  1191. #ifdef YYDEBUG
  1192. YYSTYPE YYFAR *yya[2];
  1193. yyinitdebug(yya, 2);
  1194. #endif
  1195. {
  1196. #line 364 ".\parse.y"
  1197.  yyval.ptree = yyattribute(1 - 1).ptree; 
  1198. #line 1199 "parse.c"
  1199. }
  1200. }
  1201. break;
  1202. case 68:
  1203. {
  1204. #ifdef YYDEBUG
  1205. YYSTYPE YYFAR *yya[2];
  1206. yyinitdebug(yya, 2);
  1207. #endif
  1208. {
  1209. #line 366 ".\parse.y"
  1210.  yyval.ptree = newExpNode(NumK);
  1211.       yyval.ptree -> type = Integer;
  1212.       yyval.ptree -> attr.val.i = atoi(tokenString);
  1213.     
  1214. #line 1215 "parse.c"
  1215. }
  1216. }
  1217. break;
  1218. case 69:
  1219. {
  1220. #ifdef YYDEBUG
  1221. YYSTYPE YYFAR *yya[2];
  1222. yyinitdebug(yya, 2);
  1223. #endif
  1224. {
  1225. #line 371 ".\parse.y"
  1226.  yyval.ptree = newExpNode(FnumK);
  1227.       yyval.ptree -> type = Float;
  1228.       yyval.ptree -> attr.val.f = atof(tokenString);
  1229.     
  1230. #line 1231 "parse.c"
  1231. }
  1232. }
  1233. break;
  1234. case 70:
  1235. {
  1236. #ifdef YYDEBUG
  1237. YYSTYPE YYFAR *yya[2];
  1238. yyinitdebug(yya, 2);
  1239. #endif
  1240. {
  1241. #line 376 ".\parse.y"
  1242.  yyval.ptree = newExpNode(CharK);
  1243.       yyval.ptree -> type = Char;
  1244.       yyval.ptree -> attr.val.i = *(tokenString + 1);
  1245.     
  1246. #line 1247 "parse.c"
  1247. }
  1248. }
  1249. break;
  1250. case 71:
  1251. {
  1252. #ifdef YYDEBUG
  1253. YYSTYPE YYFAR *yya[3];
  1254. yyinitdebug(yya, 3);
  1255. #endif
  1256. {
  1257. #line 381 ".\parse.y"
  1258.  yyval.ptree = yyattribute(2 - 2).ptree;
  1259.       yyval.ptree -> attr.op = NOT;
  1260.     
  1261. #line 1262 "parse.c"
  1262. }
  1263. }
  1264. break;
  1265. case 72:
  1266. {
  1267. #ifdef YYDEBUG
  1268. YYSTYPE YYFAR *yya[5];
  1269. yyinitdebug(yya, 5);
  1270. #endif
  1271. {
  1272. #line 386 ".\parse.y"
  1273.  yyval.ptree = newStmtNode(CallK);
  1274.   yyval.ptree -> attr.name = yyattribute(1 - 4).ptree -> attr.name;
  1275.                   yyval.ptree -> child[0] = yyattribute(3 - 4).ptree;
  1276.                 
  1277. #line 1278 "parse.c"
  1278. }
  1279. }
  1280. break;
  1281. case 73:
  1282. {
  1283. #ifdef YYDEBUG
  1284. YYSTYPE YYFAR *yya[4];
  1285. yyinitdebug(yya, 4);
  1286. #endif
  1287. {
  1288. #line 392 ".\parse.y"
  1289.  TreeNode * t = yyattribute(1 - 3).ptree;
  1290.   if (t != NULL)
  1291.   { while (t->sibling != NULL)
  1292. t = t->sibling;
  1293. t->sibling = yyattribute(3 - 3).ptree;
  1294. yyval.ptree = yyattribute(1 - 3).ptree; }
  1295.   else yyval.ptree = yyattribute(3 - 3).ptree;
  1297. #line 1298 "parse.c"
  1298. }
  1299. }
  1300. break;
  1301. case 74:
  1302. {
  1303. #ifdef YYDEBUG
  1304. YYSTYPE YYFAR *yya[2];
  1305. yyinitdebug(yya, 2);
  1306. #endif
  1307. {
  1308. #line 401 ".\parse.y"
  1309.  yyval.ptree = yyattribute(1 - 1).ptree; 
  1310. #line 1311 "parse.c"
  1311. }
  1312. }
  1313. break;
  1314. case 75:
  1315. {
  1316. #ifdef YYDEBUG
  1317. YYSTYPE YYFAR *yya[2];
  1318. yyinitdebug(yya, 2);
  1319. #endif
  1320. {
  1321. #line 404 ".\parse.y"
  1322.  yyval.ptree = yyattribute(1 - 1).ptree; 
  1323. #line 1324 "parse.c"
  1324. }
  1325. }
  1326. break;
  1327. case 76:
  1328. {
  1329. #line 406 ".\parse.y"
  1330.  yyval.ptree = NULL; 
  1331. #line 1332 "parse.c"
  1332. }
  1333. break;
  1334. default:
  1335. yyassert(0);
  1336. break;
  1337. }
  1338. }
  1339. #ifdef YYDEBUG
  1340. YYCONST yysymbol_t YYNEARFAR YYBASED_CODE YYDCDECL yysymbol[] = {
  1341. { "$end", 0 },
  1342. { "error", 256 },
  1343. { "INT", 259 },
  1344. { "CHAR", 260 },
  1345. { "FLOAT", 261 },
  1346. { "IF", 262 },
  1347. { "ELSE", 263 },
  1348. { "WHILE", 264 },
  1349. { "VOID", 265 },
  1350. { "RETURN", 266 },
  1351. { "BREAK", 267 },
  1352. { "CONTINUE", 268 },
  1353. { "ID", 269 },
  1354. { "NUM", 270 },
  1355. { "FNUM", 271 },
  1356. { "SCHAR", 272 },
  1357. { "PLUS", 273 },
  1358. { "SUB", 274 },
  1359. { "MUT", 275 },
  1360. { "DIV", 276 },
  1361. { "LT", 277 },
  1362. { "LE", 278 },
  1363. { "GT", 279 },
  1364. { "GE", 280 },
  1365. { "EQ", 281 },
  1366. { "NEQ", 282 },
  1367. { "AND", 283 },
  1368. { "OR", 284 },
  1369. { "NOT", 285 },
  1370. { "ASSIGN", 286 },
  1371. { "SEMI", 287 },
  1372. { "COMMA", 288 },
  1373. { "LP", 289 },
  1374. { "RP", 290 },
  1375. { "LSP", 291 },
  1376. { "RSP", 292 },
  1377. { "LFP", 293 },
  1378. { "RFP", 294 },
  1379. { NULL, 0 }
  1380. };
  1382. YYCONST char *YYCONST YYNEARFAR YYBASED_CODE YYDCDECL yyrule[] = {
  1383. "$accept: program",
  1384. "program: dec_list",
  1385. "dec_list: dec_list dec",
  1386. "dec_list: dec",
  1387. "dec: var_dec",
  1388. "dec: fun_dec",
  1389. "dec: fun_def",
  1390. "id: ID",
  1391. "fid:",
  1392. "var_dec: type_spec id_list SEMI",
  1393. "id_list: id_list COMMA var",
  1394. "id_list: var",
  1395. "id_list: id_list COMMA id ASSIGN simple_exp",
  1396. "id_list: id ASSIGN simple_exp",
  1397. "type_spec: INT",
  1398. "type_spec: FLOAT",
  1399. "type_spec: CHAR",
  1400. "type_spec: VOID",
  1401. "fun_def: type_spec id fid LP params RP comp_stmt",
  1402. "fun_def: id fid LP params RP comp_stmt",
  1403. "fun_dec: type_spec id fid LP params RP SEMI",
  1404. "fun_dec: id fid LP params RP SEMI",
  1405. "params: param_list",
  1406. "params:",
  1407. "param_list: param_list COMMA param",
  1408. "param_list: param",
  1409. "param: type_spec",
  1410. "param: type_spec id",
  1411. "param: type_spec id LSP RSP",
  1412. "param: type_spec id LSP simple_exp RSP",
  1413. "comp_stmt: LFP local_dec stmt_list RFP",
  1414. "local_dec: local_dec var_dec",
  1415. "local_dec:",
  1416. "stmt_list: stmt_list stmt",
  1417. "stmt_list:",
  1418. "stmt: exp_stmt",
  1419. "stmt: sele_stmt",
  1420. "stmt: iter_stmt",
  1421. "stmt: return_stmt",
  1422. "stmt: comp_stmt",
  1423. "stmt: CONTINUE SEMI",
  1424. "stmt: BREAK SEMI",
  1425. "exp_stmt: exp SEMI",
  1426. "exp_stmt: SEMI",
  1427. "sele_stmt: IF LP exp RP stmt",
  1428. "sele_stmt: IF LP exp RP stmt ELSE stmt",
  1429. "iter_stmt: WHILE LP exp RP stmt",
  1430. "return_stmt: RETURN SEMI",
  1431. "return_stmt: RETURN exp SEMI",
  1432. "exp: var ASSIGN exp",
  1433. "exp: simple_exp",
  1434. "var: id",
  1435. "var: id LSP simple_exp RSP",
  1436. "simple_exp: simple_exp OR simple_exp",
  1437. "simple_exp: simple_exp AND simple_exp",
  1438. "simple_exp: simple_exp LT simple_exp",
  1439. "simple_exp: simple_exp LE simple_exp",
  1440. "simple_exp: simple_exp GT simple_exp",
  1441. "simple_exp: simple_exp GE simple_exp",
  1442. "simple_exp: simple_exp EQ simple_exp",
  1443. "simple_exp: simple_exp NEQ simple_exp",
  1444. "simple_exp: simple_exp PLUS simple_exp",
  1445. "simple_exp: simple_exp SUB simple_exp",
  1446. "simple_exp: simple_exp MUT simple_exp",
  1447. "simple_exp: simple_exp DIV simple_exp",
  1448. "simple_exp: factor",
  1449. "factor: LP exp RP",
  1450. "factor: var",
  1451. "factor: call",
  1452. "factor: NUM",
  1453. "factor: FNUM",
  1454. "factor: SCHAR",
  1455. "factor: NOT factor",
  1456. "call: var LP args RP",
  1457. "arg_list: arg_list COMMA exp",
  1458. "arg_list: exp",
  1459. "args: arg_list",
  1460. "args:"
  1461. };
  1462. #endif
  1464. YYCONST yyreduction_t YYNEARFAR YYBASED_CODE YYDCDECL yyreduction[] = {
  1465. { 0, 1, -1 },
  1466. { 1, 1, 0 },
  1467. { 2, 2, 1 },
  1468. { 2, 1, 2 },
  1469. { 3, 1, 3 },
  1470. { 3, 1, 4 },
  1471. { 3, 1, 5 },
  1472. { 4, 1, 6 },
  1473. { 5, 0, 7 },
  1474. { 6, 3, 8 },
  1475. { 7, 3, 9 },
  1476. { 7, 1, 10 },
  1477. { 7, 5, 11 },
  1478. { 7, 3, 12 },
  1479. { 8, 1, 13 },
  1480. { 8, 1, 14 },
  1481. { 8, 1, 15 },
  1482. { 8, 1, 16 },
  1483. { 9, 7, 17 },
  1484. { 9, 6, 18 },
  1485. { 10, 7, 19 },
  1486. { 10, 6, 20 },
  1487. { 11, 1, 21 },
  1488. { 11, 0, 22 },
  1489. { 12, 3, 23 },
  1490. { 12, 1, 24 },
  1491. { 13, 1, 25 },
  1492. { 13, 2, 26 },
  1493. { 13, 4, 27 },
  1494. { 13, 5, 28 },
  1495. { 14, 4, 29 },
  1496. { 15, 2, 30 },
  1497. { 15, 0, 31 },
  1498. { 16, 2, 32 },
  1499. { 16, 0, 33 },
  1500. { 17, 1, 34 },
  1501. { 17, 1, 35 },
  1502. { 17, 1, 36 },
  1503. { 17, 1, 37 },
  1504. { 17, 1, 38 },
  1505. { 17, 2, 39 },
  1506. { 17, 2, 40 },
  1507. { 18, 2, 41 },
  1508. { 18, 1, 42 },
  1509. { 19, 5, 43 },
  1510. { 19, 7, 44 },
  1511. { 20, 5, 45 },
  1512. { 21, 2, 46 },
  1513. { 21, 3, 47 },
  1514. { 22, 3, 48 },
  1515. { 22, 1, 49 },
  1516. { 23, 1, 50 },
  1517. { 23, 4, 51 },
  1518. { 24, 3, 52 },
  1519. { 24, 3, 53 },
  1520. { 24, 3, 54 },
  1521. { 24, 3, 55 },
  1522. { 24, 3, 56 },
  1523. { 24, 3, 57 },
  1524. { 24, 3, 58 },
  1525. { 24, 3, 59 },
  1526. { 24, 3, 60 },
  1527. { 24, 3, 61 },
  1528. { 24, 3, 62 },
  1529. { 24, 3, 63 },
  1530. { 24, 1, 64 },
  1531. { 25, 3, 65 },
  1532. { 25, 1, 66 },
  1533. { 25, 1, 67 },
  1534. { 25, 1, 68 },
  1535. { 25, 1, 69 },
  1536. { 25, 1, 70 },
  1537. { 25, 2, 71 },
  1538. { 26, 4, 72 },
  1539. { 27, 3, 73 },
  1540. { 27, 1, 74 },
  1541. { 28, 1, 75 },
  1542. { 28, 0, 76 }
  1543. };
  1545. int YYNEAR YYDCDECL yytokenaction_size = 187;
  1546. YYCONST yytokenaction_t YYNEARFAR YYBASED_CODE YYDCDECL yytokenaction[] = {
  1547. { 97, YYAT_SHIFT, 49 },
  1548. { 97, YYAT_SHIFT, 50 },
  1549. { 97, YYAT_SHIFT, 51 },
  1550. { 97, YYAT_SHIFT, 52 },
  1551. { 97, YYAT_SHIFT, 53 },
  1552. { 97, YYAT_SHIFT, 54 },
  1553. { 97, YYAT_SHIFT, 55 },
  1554. { 97, YYAT_SHIFT, 56 },
  1555. { 97, YYAT_SHIFT, 57 },
  1556. { 97, YYAT_SHIFT, 58 },
  1557. { 97, YYAT_SHIFT, 59 },
  1558. { 97, YYAT_SHIFT, 60 },
  1559. { 95, YYAT_SHIFT, 1 },
  1560. { 95, YYAT_SHIFT, 2 },
  1561. { 95, YYAT_SHIFT, 3 },
  1562. { 73, YYAT_SHIFT, 51 },
  1563. { 73, YYAT_SHIFT, 52 },
  1564. { 130, YYAT_SHIFT, 132 },
  1565. { 95, YYAT_SHIFT, 4 },
  1566. { 97, YYAT_SHIFT, 102 },
  1567. { 66, YYAT_SHIFT, 49 },
  1568. { 66, YYAT_SHIFT, 50 },
  1569. { 66, YYAT_SHIFT, 51 },
  1570. { 66, YYAT_SHIFT, 52 },
  1571. { 66, YYAT_SHIFT, 53 },
  1572. { 66, YYAT_SHIFT, 54 },
  1573. { 66, YYAT_SHIFT, 55 },
  1574. { 66, YYAT_SHIFT, 56 },
  1575. { 66, YYAT_SHIFT, 57 },
  1576. { 66, YYAT_SHIFT, 58 },
  1577. { 66, YYAT_SHIFT, 59 },
  1578. { 66, YYAT_SHIFT, 60 },
  1579. { 47, YYAT_SHIFT, 49 },
  1580. { 47, YYAT_SHIFT, 50 },
  1581. { 47, YYAT_SHIFT, 51 },
  1582. { 47, YYAT_SHIFT, 52 },
  1583. { 47, YYAT_SHIFT, 53 },
  1584. { 47, YYAT_SHIFT, 54 },
  1585. { 47, YYAT_SHIFT, 55 },
  1586. { 47, YYAT_SHIFT, 56 },
  1587. { 47, YYAT_SHIFT, 57 },
  1588. { 47, YYAT_SHIFT, 58 },
  1589. { 47, YYAT_SHIFT, 59 },
  1590. { 47, YYAT_SHIFT, 60 },
  1591. { 33, YYAT_SHIFT, 49 },
  1592. { 33, YYAT_SHIFT, 50 },
  1593. { 33, YYAT_SHIFT, 51 },
  1594. { 33, YYAT_SHIFT, 52 },
  1595. { 33, YYAT_SHIFT, 53 },
  1596. { 33, YYAT_SHIFT, 54 },
  1597. { 33, YYAT_SHIFT, 55 },
  1598. { 33, YYAT_SHIFT, 56 },
  1599. { 33, YYAT_SHIFT, 57 },
  1600. { 33, YYAT_SHIFT, 58 },
  1601. { 33, YYAT_SHIFT, 59 },
  1602. { 33, YYAT_SHIFT, 60 },
  1603. { 83, YYAT_SHIFT, 49 },
  1604. { 83, YYAT_SHIFT, 50 },
  1605. { 83, YYAT_SHIFT, 51 },
  1606. { 83, YYAT_SHIFT, 52 },
  1607. { 83, YYAT_SHIFT, 53 },
  1608. { 83, YYAT_SHIFT, 54 },
  1609. { 83, YYAT_SHIFT, 55 },
  1610. { 83, YYAT_SHIFT, 56 },
  1611. { 83, YYAT_SHIFT, 57 },
  1612. { 83, YYAT_SHIFT, 58 },
  1613. { 83, YYAT_SHIFT, 59 },
  1614. { 82, YYAT_SHIFT, 49 },
  1615. { 82, YYAT_SHIFT, 50 },
  1616. { 82, YYAT_SHIFT, 51 },
  1617. { 82, YYAT_SHIFT, 52 },
  1618. { 82, YYAT_SHIFT, 53 },
  1619. { 82, YYAT_SHIFT, 54 },
  1620. { 82, YYAT_SHIFT, 55 },
  1621. { 82, YYAT_SHIFT, 56 },
  1622. { 82, YYAT_SHIFT, 57 },
  1623. { 82, YYAT_SHIFT, 58 },
  1624. { 132, YYAT_SHIFT, 103 },
  1625. { 126, YYAT_SHIFT, 129 },
  1626. { 132, YYAT_SHIFT, 104 },
  1627. { 125, YYAT_SHIFT, 128 },
  1628. { 132, YYAT_SHIFT, 105 },
  1629. { 132, YYAT_SHIFT, 106 },
  1630. { 132, YYAT_SHIFT, 107 },
  1631. { 81, YYAT_SHIFT, 49 },
  1632. { 81, YYAT_SHIFT, 50 },
  1633. { 81, YYAT_SHIFT, 51 },
  1634. { 81, YYAT_SHIFT, 52 },
  1635. { 81, YYAT_SHIFT, 53 },
  1636. { 81, YYAT_SHIFT, 54 },
  1637. { 81, YYAT_SHIFT, 55 },
  1638. { 81, YYAT_SHIFT, 56 },
  1639. { 80, YYAT_SHIFT, 49 },
  1640. { 80, YYAT_SHIFT, 50 },
  1641. { 80, YYAT_SHIFT, 51 },
  1642. { 80, YYAT_SHIFT, 52 },
  1643. { 80, YYAT_SHIFT, 53 },
  1644. { 80, YYAT_SHIFT, 54 },
  1645. { 80, YYAT_SHIFT, 55 },
  1646. { 80, YYAT_SHIFT, 56 },
  1647. { 121, YYAT_SHIFT, 127 },
  1648. { 84, YYAT_SHIFT, 93 },
  1649. { 132, YYAT_SHIFT, 108 },
  1650. { 48, YYAT_SHIFT, 5 },
  1651. { 48, YYAT_SHIFT, 27 },
  1652. { 48, YYAT_SHIFT, 28 },
  1653. { 48, YYAT_SHIFT, 29 },
  1654. { 84, YYAT_SHIFT, 86 },
  1655. { 132, YYAT_SHIFT, 86 },
  1656. { 119, YYAT_SHIFT, 27 },
  1657. { 119, YYAT_SHIFT, 28 },
  1658. { 119, YYAT_SHIFT, 29 },
  1659. { 7, YYAT_SHIFT, 1 },
  1660. { 7, YYAT_SHIFT, 2 },
  1661. { 7, YYAT_SHIFT, 3 },
  1662. { 64, YYAT_SHIFT, 1 },
  1663. { 64, YYAT_SHIFT, 2 },
  1664. { 64, YYAT_SHIFT, 3 },
  1665. { 7, YYAT_SHIFT, 4 },
  1666. { 48, YYAT_SHIFT, 30 },
  1667. { 116, YYAT_SHIFT, 124 },
  1668. { 64, YYAT_SHIFT, 4 },
  1669. { 7, YYAT_SHIFT, 5 },
  1670. { 48, YYAT_SHIFT, 31 },
  1671. { 119, YYAT_SHIFT, 30 },
  1672. { 38, YYAT_SHIFT, 1 },
  1673. { 38, YYAT_SHIFT, 2 },
  1674. { 38, YYAT_SHIFT, 3 },
  1675. { 119, YYAT_SHIFT, 31 },
  1676. { 107, YYAT_SHIFT, 123 },
  1677. { 117, YYAT_SHIFT, 21 },
  1678. { 38, YYAT_SHIFT, 4 },
  1679. { 24, YYAT_SHIFT, 1 },
  1680. { 24, YYAT_SHIFT, 2 },
  1681. { 24, YYAT_SHIFT, 3 },
  1682. { 117, YYAT_SHIFT, 22 },
  1683. { 72, YYAT_SHIFT, 51 },
  1684. { 72, YYAT_SHIFT, 52 },
  1685. { 24, YYAT_SHIFT, 4 },
  1686. { 79, YYAT_SHIFT, 49 },
  1687. { 79, YYAT_SHIFT, 50 },
  1688. { 79, YYAT_SHIFT, 51 },
  1689. { 79, YYAT_SHIFT, 52 },
  1690. { 78, YYAT_SHIFT, 49 },
  1691. { 78, YYAT_SHIFT, 50 },
  1692. { 78, YYAT_SHIFT, 51 },
  1693. { 78, YYAT_SHIFT, 52 },
  1694. { 77, YYAT_SHIFT, 49 },
  1695. { 77, YYAT_SHIFT, 50 },
  1696. { 77, YYAT_SHIFT, 51 },
  1697. { 77, YYAT_SHIFT, 52 },
  1698. { 76, YYAT_SHIFT, 49 },
  1699. { 76, YYAT_SHIFT, 50 },
  1700. { 76, YYAT_SHIFT, 51 },
  1701. { 76, YYAT_SHIFT, 52 },
  1702. { 17, YYAT_SHIFT, 21 },
  1703. { 26, YYAT_SHIFT, 43 },
  1704. { 106, YYAT_SHIFT, 122 },
  1705. { 17, YYAT_REDUCE, 8 },
  1706. { 46, YYAT_SHIFT, 68 },
  1707. { 17, YYAT_SHIFT, 22 },
  1708. { 26, YYAT_SHIFT, 22 },
  1709. { 46, YYAT_SHIFT, 48 },
  1710. { 16, YYAT_SHIFT, 19 },
  1711. { 16, YYAT_SHIFT, 20 },
  1712. { 105, YYAT_SHIFT, 120 },
  1713. { 104, YYAT_SHIFT, 119 },
  1714. { 103, YYAT_SHIFT, 118 },
  1715. { 101, YYAT_SHIFT, 5 },
  1716. { 100, YYAT_SHIFT, 109 },
  1717. { 89, YYAT_SHIFT, 96 },
  1718. { 71, YYAT_SHIFT, 92 },
  1719. { 70, YYAT_SHIFT, 91 },
  1720. { 65, YYAT_SHIFT, 89 },
  1721. { 63, YYAT_SHIFT, 85 },
  1722. { 62, YYAT_SHIFT, 84 },
  1723. { 45, YYAT_SHIFT, 67 },
  1724. { 42, YYAT_SHIFT, 5 },
  1725. { 40, YYAT_SHIFT, 64 },
  1726. { 39, YYAT_SHIFT, 63 },
  1727. { 37, YYAT_SHIFT, 61 },
  1728. { 36, YYAT_SHIFT, 22 },
  1729. { 32, YYAT_SHIFT, 48 },
  1730. { 23, YYAT_SHIFT, 38 },
  1731. { 18, YYAT_SHIFT, 24 },
  1732. { 6, YYAT_ACCEPT, 0 },
  1733. { 0, YYAT_SHIFT, 5 }
  1734. };
  1736. YYCONST yystateaction_t YYNEARFAR YYBASED_CODE YYDCDECL yystateaction[] = {
  1737. { -83, 1, YYAT_DEFAULT, 64 },
  1738. { 0, 0, YYAT_REDUCE, 14 },
  1739. { 0, 0, YYAT_REDUCE, 16 },
  1740. { 0, 0, YYAT_REDUCE, 15 },
  1741. { 0, 0, YYAT_REDUCE, 17 },
  1742. { 0, 0, YYAT_REDUCE, 7 },
  1743. { 185, 1, YYAT_ERROR, 0 },
  1744. { -147, 1, YYAT_REDUCE, 1 },
  1745. { 0, 0, YYAT_REDUCE, 3 },
  1746. { 0, 0, YYAT_REDUCE, 4 },
  1747. { 0, 0, YYAT_REDUCE, 5 },
  1748. { 0, 0, YYAT_REDUCE, 6 },
  1749. { 0, 0, YYAT_DEFAULT, 101 },
  1750. { 0, 0, YYAT_REDUCE, 8 },
  1751. { 0, 0, YYAT_REDUCE, 2 },
  1752. { 0, 0, YYAT_REDUCE, 11 },
  1753. { -124, 1, YYAT_ERROR, 0 },
  1754. { -131, 1, YYAT_REDUCE, 51 },
  1755. { -105, 1, YYAT_ERROR, 0 },
  1756. { 0, 0, YYAT_REDUCE, 9 },
  1757. { 0, 0, YYAT_DEFAULT, 101 },
  1758. { 0, 0, YYAT_DEFAULT, 119 },
  1759. { 0, 0, YYAT_DEFAULT, 119 },
  1760. { -106, 1, YYAT_ERROR, 0 },
  1761. { -127, 1, YYAT_REDUCE, 23 },
  1762. { 0, 0, YYAT_REDUCE, 10 },
  1763. { -130, 1, YYAT_REDUCE, 51 },
  1764. { 0, 0, YYAT_REDUCE, 69 },
  1765. { 0, 0, YYAT_REDUCE, 70 },
  1766. { 0, 0, YYAT_REDUCE, 71 },
  1767. { 0, 0, YYAT_DEFAULT, 119 },
  1768. { 0, 0, YYAT_DEFAULT, 119 },
  1769. { -107, 1, YYAT_REDUCE, 67 },
  1770. { -229, 1, YYAT_REDUCE, 13 },
  1771. { 0, 0, YYAT_REDUCE, 65 },
  1772. { 0, 0, YYAT_REDUCE, 68 },
  1773. { -110, 1, YYAT_REDUCE, 51 },
  1774. { -112, 1, YYAT_DEFAULT, 97 },
  1775. { -134, 1, YYAT_REDUCE, 23 },
  1776. { -111, 1, YYAT_ERROR, 0 },
  1777. { -110, 1, YYAT_REDUCE, 22 },
  1778. { 0, 0, YYAT_REDUCE, 25 },
  1779. { -92, 1, YYAT_REDUCE, 26 },
  1780. { 0, 0, YYAT_DEFAULT, 119 },
  1781. { 0, 0, YYAT_REDUCE, 72 },
  1782. { -114, 1, YYAT_ERROR, 0 },
  1783. { -127, 1, YYAT_REDUCE, 67 },
  1784. { -241, 1, YYAT_REDUCE, 50 },
  1785. { -166, 1, YYAT_REDUCE, 77 },
  1786. { 0, 0, YYAT_DEFAULT, 119 },
  1787. { 0, 0, YYAT_DEFAULT, 119 },
  1788. { 0, 0, YYAT_DEFAULT, 119 },
  1789. { 0, 0, YYAT_DEFAULT, 119 },
  1790. { 0, 0, YYAT_DEFAULT, 119 },
  1791. { 0, 0, YYAT_DEFAULT, 119 },
  1792. { 0, 0, YYAT_DEFAULT, 119 },
  1793. { 0, 0, YYAT_DEFAULT, 119 },
  1794. { 0, 0, YYAT_DEFAULT, 119 },
  1795. { 0, 0, YYAT_DEFAULT, 119 },
  1796. { 0, 0, YYAT_DEFAULT, 119 },
  1797. { 0, 0, YYAT_DEFAULT, 119 },
  1798. { 0, 0, YYAT_REDUCE, 52 },
  1799. { -115, 1, YYAT_ERROR, 0 },
  1800. { -113, 1, YYAT_DEFAULT, 84 },
  1801. { -144, 1, YYAT_ERROR, 0 },
  1802. { -118, 1, YYAT_REDUCE, 27 },
  1803. { -253, 1, YYAT_REDUCE, 12 },
  1804. { 0, 0, YYAT_REDUCE, 66 },
  1805. { 0, 0, YYAT_DEFAULT, 119 },
  1806. { 0, 0, YYAT_REDUCE, 75 },
  1807. { -118, 1, YYAT_ERROR, 0 },
  1808. { -117, 1, YYAT_REDUCE, 76 },
  1809. { -139, 1, YYAT_REDUCE, 61 },
  1810. { -260, 1, YYAT_REDUCE, 62 },
  1811. { 0, 0, YYAT_REDUCE, 63 },
  1812. { 0, 0, YYAT_REDUCE, 64 },
  1813. { -122, 1, YYAT_REDUCE, 55 },
  1814. { -126, 1, YYAT_REDUCE, 56 },
  1815. { -130, 1, YYAT_REDUCE, 57 },
  1816. { -134, 1, YYAT_REDUCE, 58 },
  1817. { -181, 1, YYAT_REDUCE, 59 },
  1818. { -189, 1, YYAT_REDUCE, 60 },
  1819. { -206, 1, YYAT_REDUCE, 54 },
  1820. { -217, 1, YYAT_REDUCE, 53 },
  1821. { -186, 1, YYAT_ERROR, 0 },
  1822. { 0, 0, YYAT_REDUCE, 21 },
  1823. { 0, 0, YYAT_REDUCE, 32 },
  1824. { 0, 0, YYAT_REDUCE, 19 },
  1825. { 0, 0, YYAT_REDUCE, 24 },
  1826. { -122, 1, YYAT_DEFAULT, 119 },
  1827. { 0, 0, YYAT_REDUCE, 49 },
  1828. { 0, 0, YYAT_REDUCE, 73 },
  1829. { 0, 0, YYAT_DEFAULT, 119 },
  1830. { 0, 0, YYAT_REDUCE, 20 },
  1831. { 0, 0, YYAT_REDUCE, 18 },
  1832. { -247, 1, YYAT_REDUCE, 34 },
  1833. { 0, 0, YYAT_REDUCE, 28 },
  1834. { -273, 1, YYAT_ERROR, 0 },
  1835. { 0, 0, YYAT_REDUCE, 74 },
  1836. { 0, 0, YYAT_REDUCE, 31 },
  1837. { -125, 1, YYAT_DEFAULT, 132 },
  1838. { -101, 1, YYAT_ERROR, 0 },
  1839. { 0, 0, YYAT_REDUCE, 29 },
  1840. { -122, 1, YYAT_ERROR, 0 },
  1841. { -123, 1, YYAT_ERROR, 0 },
  1842. { -122, 1, YYAT_DEFAULT, 119 },
  1843. { -130, 1, YYAT_ERROR, 0 },
  1844. { -158, 1, YYAT_ERROR, 0 },
  1845. { 0, 0, YYAT_REDUCE, 43 },
  1846. { 0, 0, YYAT_REDUCE, 30 },
  1847. { 0, 0, YYAT_REDUCE, 39 },
  1848. { 0, 0, YYAT_REDUCE, 33 },
  1849. { 0, 0, YYAT_REDUCE, 35 },
  1850. { 0, 0, YYAT_REDUCE, 36 },
  1851. { 0, 0, YYAT_REDUCE, 37 },
  1852. { 0, 0, YYAT_REDUCE, 38 },
  1853. { -167, 1, YYAT_ERROR, 0 },
  1854. { -156, 1, YYAT_REDUCE, 51 },
  1855. { 0, 0, YYAT_DEFAULT, 119 },
  1856. { -161, 1, YYAT_DEFAULT, 101 },
  1857. { 0, 0, YYAT_REDUCE, 47 },
  1858. { -187, 1, YYAT_ERROR, 0 },
  1859. { 0, 0, YYAT_REDUCE, 41 },
  1860. { 0, 0, YYAT_REDUCE, 40 },
  1861. { 0, 0, YYAT_REDUCE, 42 },
  1862. { -210, 1, YYAT_ERROR, 0 },
  1863. { -212, 1, YYAT_ERROR, 0 },
  1864. { 0, 0, YYAT_REDUCE, 48 },
  1865. { 0, 0, YYAT_DEFAULT, 132 },
  1866. { 0, 0, YYAT_DEFAULT, 132 },
  1867. { -246, 1, YYAT_REDUCE, 44 },
  1868. { 0, 0, YYAT_REDUCE, 46 },
  1869. { -185, 1, YYAT_DEFAULT, 119 },
  1870. { 0, 0, YYAT_REDUCE, 45 }
  1871. };
  1873. int YYNEAR YYDCDECL yynontermgoto_size = 74;
  1875. YYCONST yynontermgoto_t YYNEARFAR YYBASED_CODE YYDCDECL yynontermgoto[] = {
  1876. { 119, 36 },
  1877. { 132, 110 },
  1878. { 30, -1 },
  1879. { 30, 44 },
  1880. { 132, 133 },
  1881. { 132, 112 },
  1882. { 132, 113 },
  1883. { 132, 114 },
  1884. { 132, 115 },
  1885. { 132, 116 },
  1886. { 7, 14 },
  1887. { 7, 13 },
  1888. { 20, 26 },
  1889. { 7, 9 },
  1890. { 129, 131 },
  1891. { 7, 12 },
  1892. { 7, 11 },
  1893. { 7, 10 },
  1894. { 119, 126 },
  1895. { 119, 46 },
  1896. { 119, 47 },
  1897. { 119, 34 },
  1898. { 119, 35 },
  1899. { 101, 117 },
  1900. { 48, 69 },
  1901. { 95, 99 },
  1902. { 101, 16 },
  1903. { 95, 101 },
  1904. { 64, 42 },
  1905. { 48, 71 },
  1906. { 48, 70 },
  1907. { 20, 25 },
  1908. { 128, 130 },
  1909. { 64, 88 },
  1910. { 118, 125 },
  1911. { 95, 100 },
  1912. { 89, -1 },
  1913. { 89, 32 },
  1914. { 89, 97 },
  1915. { 38, 62 },
  1916. { 38, 40 },
  1917. { 38, 41 },
  1918. { 101, 15 },
  1919. { 0, 6 },
  1920. { 0, 7 },
  1921. { 0, 8 },
  1922. { 105, 121 },
  1923. { 100, 111 },
  1924. { 92, 98 },
  1925. { 86, 95 },
  1926. { 84, 94 },
  1927. { 68, 90 },
  1928. { 63, 87 },
  1929. { 60, 83 },
  1930. { 59, 82 },
  1931. { 58, 81 },
  1932. { 57, 80 },
  1933. { 56, 79 },
  1934. { 55, 78 },
  1935. { 54, 77 },
  1936. { 53, 76 },
  1937. { 52, 75 },
  1938. { 51, 74 },
  1939. { 50, 73 },
  1940. { 49, 72 },
  1941. { 43, 66 },
  1942. { 42, 65 },
  1943. { 31, 45 },
  1944. { 24, 39 },
  1945. { 22, 37 },
  1946. { 21, 33 },
  1947. { 17, 23 },
  1948. { 13, 18 },
  1949. { 12, 17 }
  1950. };
  1952. YYCONST yystategoto_t YYNEARFAR YYBASED_CODE YYDCDECL yystategoto[] = {
  1953. { 42, 7 },
  1954. { 0, -1 },
  1955. { 0, -1 },
  1956. { 0, -1 },
  1957. { 0, -1 },
  1958. { 0, -1 },
  1959. { 0, -1 },
  1960. { 7, -1 },
  1961. { 0, -1 },
  1962. { 0, -1 },
  1963. { 0, -1 },
  1964. { 0, -1 },
  1965. { 69, 101 },
  1966. { 67, -1 },
  1967. { 0, -1 },
  1968. { 0, -1 },
  1969. { 0, -1 },
  1970. { 66, -1 },
  1971. { 0, -1 },
  1972. { 0, -1 },
  1973. { 8, -1 },
  1974. { 46, 89 },
  1975. { 45, 89 },
  1976. { 0, -1 },
  1977. { 57, 38 },
  1978. { 0, -1 },
  1979. { 0, -1 },
  1980. { 0, -1 },
  1981. { 0, -1 },
  1982. { 0, -1 },
  1983. { -22, 89 },
  1984. { 45, 119 },
  1985. { 0, -1 },
  1986. { 0, -1 },
  1987. { 0, -1 },
  1988. { 0, -1 },
  1989. { 0, -1 },
  1990. { 0, -1 },
  1991. { 28, 64 },
  1992. { 0, -1 },
  1993. { 0, -1 },
  1994. { 0, -1 },
  1995. { 62, -1 },
  1996. { 41, 89 },
  1997. { 0, -1 },
  1998. { 0, -1 },
  1999. { 0, -1 },
  2000. { 0, -1 },
  2001. { 2, 119 },
  2002. { 40, 89 },
  2003. { 39, 89 },
  2004. { 38, 89 },
  2005. { 37, 89 },
  2006. { 36, 89 },
  2007. { 35, 89 },
  2008. { 34, 89 },
  2009. { 33, 89 },
  2010. { 32, 89 },
  2011. { 31, 89 },
  2012. { 30, 89 },
  2013. { 29, 89 },
  2014. { 0, -1 },
  2015. { 0, -1 },
  2016. { 38, -1 },
  2017. { 20, -1 },
  2018. { 0, -1 },
  2019. { 0, -1 },
  2020. { 0, -1 },
  2021. { 29, 119 },
  2022. { 0, -1 },
  2023. { 0, -1 },
  2024. { 0, -1 },
  2025. { 0, -1 },
  2026. { 0, -1 },
  2027. { 0, -1 },
  2028. { 0, -1 },
  2029. { 0, -1 },
  2030. { 0, -1 },
  2031. { 0, -1 },
  2032. { 0, -1 },
  2033. { 0, -1 },
  2034. { 0, -1 },
  2035. { 0, -1 },
  2036. { 0, -1 },
  2037. { 36, -1 },
  2038. { 0, -1 },
  2039. { 34, -1 },
  2040. { 0, -1 },
  2041. { 0, -1 },
  2042. { 14, 119 },
  2043. { 0, -1 },
  2044. { 0, -1 },
  2045. { 26, 119 },
  2046. { 0, -1 },
  2047. { 0, -1 },
  2048. { 19, -1 },
  2049. { 0, -1 },
  2050. { 0, -1 },
  2051. { 0, -1 },
  2052. { 0, -1 },
  2053. { 30, 132 },
  2054. { 19, -1 },
  2055. { 0, -1 },
  2056. { 0, -1 },
  2057. { 0, -1 },
  2058. { 24, 119 },
  2059. { 0, -1 },
  2060. { 0, -1 },
  2061. { 0, -1 },
  2062. { 0, -1 },
  2063. { 0, -1 },
  2064. { 0, -1 },
  2065. { 0, -1 },
  2066. { 0, -1 },
  2067. { 0, -1 },
  2068. { 0, -1 },
  2069. { 0, -1 },
  2070. { 0, -1 },
  2071. { 12, 119 },
  2072. { -4, -1 },
  2073. { 0, -1 },
  2074. { 0, -1 },
  2075. { 0, -1 },
  2076. { 0, -1 },
  2077. { 0, -1 },
  2078. { 0, -1 },
  2079. { 0, -1 },
  2080. { 0, -1 },
  2081. { 15, 132 },
  2082. { -3, 132 },
  2083. { 0, -1 },
  2084. { 0, -1 },
  2085. { -13, 119 },
  2086. { 0, -1 }
  2087. };
  2089. YYCONST yydestructor_t YYNEARFAR *YYNEAR YYDCDECL yydestructorptr = NULL;
  2091. YYCONST yytokendest_t YYNEARFAR *YYNEAR YYDCDECL yytokendestptr = NULL;
  2092. int YYNEAR YYDCDECL yytokendest_size = 0;
  2094. YYCONST yytokendestbase_t YYNEARFAR *YYNEAR YYDCDECL yytokendestbaseptr = NULL;
  2095. int YYNEAR YYDCDECL yytokendestbase_size = 0;
  2096. #line 408 ".\parse.y"
  2099. void yyerror(const char * message)
  2100. { fprintf(listing,"Syntax error at line %d: %sn",lineno,message);
  2101.   fprintf(listing,"Current token: ");
  2102.   printToken(yychar,tokenString);
  2103.   Error = TRUE;
  2104. }
  2106. /* yylex calls getToken to make Yacc/Bison output
  2107.  * compatible with ealier versions of the TINY scanner
  2108.  */
  2109. #ifdef YYPROTOTYPE
  2110. int YYCDECL yygettoken(void)
  2111. #else
  2112. int YYCDECL yygettoken()
  2113. #endif
  2114. {
  2115. return yylex();
  2116. }
  2118. static TokenType yylex(void)
  2119. { return getToken(); }
  2121. TreeNode * parse(void)
  2122. { yyparse();
  2123.   return savedTree;
  2124. }