(R-LOOP)
* (setq tables (construct-tables1 cc nts terms fis follows))
(LIST
(LIST (CONS '(0 . INT) (MK-ACTION 'SHIFT 18 0 0 0))
(CONS '(0 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(0 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(0 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(0 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(0 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(0 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(0 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(0 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(0 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(0 . LB) (MK-ACTION 'SHIFT 19 0 0 0))
(CONS '(0 . REC) (MK-ACTION 'SHIFT 23 0 0 0))
(CONS '(1 . EOF) (MK-ACTION 'REDUCE 0 0 '(PROG) 1))
(CONS '(2 . SI) (MK-ACTION 'SHIFT 9 0 0 0))
(CONS '(3 . COLON) (MK-ACTION 'REDUCE 0 3 '(DECL) 2))
(CONS '(4 . RB) (MK-ACTION 'SHIFT 10 0 0 0))
(CONS '(5 . COLON) (MK-ACTION 'REDUCE 0 4 '(DECL) 5))
(CONS '(6 . SI) (MK-ACTION 'SHIFT 11 0 0 0))
(CONS '(7 . BI) (MK-ACTION 'REDUCE 0 6 '(PDECLLIST) 3))
(CONS '(8 . BI) (MK-ACTION 'REDUCE 0 8 '(PDECLLIST) 0))
(CONS '(8 . PROCKW) (MK-ACTION 'SHIFT 26 0 0 0))
(CONS '(9 . INT) (MK-ACTION 'SHIFT 18 0 0 0))
(CONS '(9 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(9 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(9 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(9 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(9 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(9 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(9 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(9 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(9 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(9 . LB) (MK-ACTION 'SHIFT 19 0 0 0))
(CONS '(9 . REC) (MK-ACTION 'SHIFT 23 0 0 0))
(CONS '(10 . INT) (MK-ACTION 'SHIFT 20 0 0 0))
(CONS '(11 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(11 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(11 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(11 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(11 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(11 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(11 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(11 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(11 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(11 . REC) (MK-ACTION 'SHIFT 23 0 0 0))
(CONS '(12 . BI) (MK-ACTION 'SHIFT 57 0 0 0))
(CONS '(13 . SI) (MK-ACTION 'SHIFT 58 0 0 0))
(CONS '(13 . BI) (MK-ACTION 'REDUCE 0 7 '(PDECLLIST) 1))
(CONS '(14 . COLON) (MK-ACTION 'SHIFT 63 0 0 0))
(CONS '(15 . EOF) (MK-ACTION 'REDUCE 0 1 '(BLK) 4))
(CONS '(16 . EOF) (MK-ACTION 'REDUCE 0 2 '(BLK) 1))
(CONS '(17 . COLON) (MK-ACTION 'SHIFT 2 0 0 0))
(CONS '(18 . IDENT) (MK-ACTION 'SHIFT 3 0 0 0))
(CONS '(19 . INTEGER) (MK-ACTION 'SHIFT 4 0 0 0))
(CONS '(20 . IDENT) (MK-ACTION 'SHIFT 5 0 0 0))
(CONS '(21 . EOF) (MK-ACTION 'REDUCE 0 11 '(PROC) 7))
(CONS '(22 . EOF) (MK-ACTION 'REDUCE 0 12 '(PROC) 1))
(CONS '(23 . NI) (MK-ACTION 'SHIFT 8 0 0 0))
(CONS '(24 . SI) (MK-ACTION 'SHIFT 59 0 0 0))
(CONS '(24 . BI) (MK-ACTION 'REDUCE 0 9 '(PDECLREST) 1))
(CONS '(25 . BI) (MK-ACTION 'REDUCE 0 10 '(PDECLREST) 3))
(CONS '(26 . IDENT) (MK-ACTION 'SHIFT 60 0 0 0))
(CONS '(27 . RP) (MK-ACTION 'SHIFT 61 0 0 0))
(CONS '(28 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(28 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(28 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(28 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(28 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(28 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(28 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(28 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(28 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(29 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(29 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(29 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(29 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(29 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(29 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(29 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(29 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(29 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(30 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(30 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(30 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(30 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(30 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(30 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(30 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(31 . SI) (MK-ACTION 'REDUCE 0 32 '(GC) 4))
(CONS '(31 . BI) (MK-ACTION 'REDUCE 0 32 '(GC) 4))
(CONS '(32 . BI) (MK-ACTION 'REDUCE 0 26 '(SPROCREST) 3))
(CONS '(33 . BI) (MK-ACTION 'REDUCE 0 22 '(SPROCLIST) 3))
(CONS '(34 . SI) (MK-ACTION 'SHIFT 29 0 0 0))
(CONS '(34 . BI) (MK-ACTION 'REDUCE 0 25 '(SPROCREST) 1))
(CONS '(35 . BI) (MK-ACTION 'REDUCE 0 27 '(GCLIST) 3))
(CONS '(36 . SI) (MK-ACTION 'REDUCE 0 21 '(SPROC) 5))
(CONS '(36 . BI) (MK-ACTION 'REDUCE 0 21 '(SPROC) 5))
(CONS '(36 . EOF) (MK-ACTION 'REDUCE 0 21 '(SPROC) 5))
(CONS '(37 . BI) (MK-ACTION 'REDUCE 0 30 '(GCREST) 3))
(CONS '(38 . SI) (MK-ACTION 'SHIFT 30 0 0 0))
(CONS '(38 . BI) (MK-ACTION 'REDUCE 0 31 '(GCREST) 1))
(CONS '(39 . BI) (MK-ACTION 'SHIFT 31 0 0 0))
(CONS '(40 . SI) (MK-ACTION 'REDUCE 0 19 '(SPROC) 4))
(CONS '(40 . BI) (MK-ACTION 'REDUCE 0 19 '(SPROC) 4))
(CONS '(40 . EOF) (MK-ACTION 'REDUCE 0 19 '(SPROC) 4))
(CONS '(41 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(41 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(41 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(41 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(41 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(41 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(41 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(41 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(41 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(42 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(42 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(42 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(42 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(42 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(42 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(42 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(43 . IDENT) (MK-ACTION 'SHIFT 65 0 0 0))
(CONS '(44 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(44 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(44 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(44 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(44 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(44 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(44 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(45 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(45 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(45 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(45 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(45 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(45 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(45 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(45 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(45 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(45 . BI) (MK-ACTION 'REDUCE 0 24 '(SPROCLIST) 0))
(CONS '(46 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(46 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(46 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(46 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(46 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(46 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(46 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(46 . BI) (MK-ACTION 'REDUCE 0 29 '(GCLIST) 0))
(CONS '(47 . NI) (MK-ACTION 'SHIFT 81 0 0 0))
(CONS '(48 . LP) (MK-ACTION 'SHIFT 99 0 0 0))
(CONS '(49 . SI) (MK-ACTION 'REDUCE 0 20 '(SPROC) 4))
(CONS '(49 . BI) (MK-ACTION 'REDUCE 0 20 '(SPROC) 4))
(CONS '(49 . EOF) (MK-ACTION 'REDUCE 0 20 '(SPROC) 4))
(CONS '(50 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(50 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(50 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(50 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(50 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(50 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(50 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(51 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(51 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(51 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(51 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(51 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(51 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(51 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(51 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(51 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(52 . BI) (MK-ACTION 'SHIFT 36 0 0 0))
(CONS '(53 . RP) (MK-ACTION 'REDUCE 0 35 '(EXP) 3))
(CONS '(53 . RB) (MK-ACTION 'REDUCE 0 35 '(EXP) 3))
(CONS '(53 . NI) (MK-ACTION 'REDUCE 0 35 '(EXP) 3))
(CONS '(53 . SI) (MK-ACTION 'REDUCE 0 35 '(EXP) 3))
(CONS '(53 . BI) (MK-ACTION 'REDUCE 0 35 '(EXP) 3))
(CONS '(53 . EOF) (MK-ACTION 'REDUCE 0 35 '(EXP) 3))
(CONS '(54 . MINUS) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . PLUS) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . TIMES) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . DIV) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . REM) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . EQ) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . LT) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . GT) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . NE) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . LE) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . GE) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . AND) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . OR) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . RP) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . RB) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . NI) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . SI) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . BI) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(54 . EOF) (MK-ACTION 'REDUCE 0 38 '(SIMPLE) 3))
(CONS '(55 . SI) (MK-ACTION 'REDUCE 0 18 '(SPROC) 4))
(CONS '(55 . BI) (MK-ACTION 'REDUCE 0 18 '(SPROC) 4))
(CONS '(55 . EOF) (MK-ACTION 'REDUCE 0 18 '(SPROC) 4))
(CONS '(56 . MINUS) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . PLUS) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . TIMES) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . DIV) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . REM) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . EQ) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . LT) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . GT) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . NE) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . LE) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . GE) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . AND) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . OR) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . COLONEQ) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . RP) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . RB) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . NI) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . SI) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . BI) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(56 . EOF) (MK-ACTION 'REDUCE 0 43 '(VAR) 4))
(CONS '(57 . COLON) (MK-ACTION 'SHIFT 6 0 0 0))
(CONS '(58 . PROCKW) (MK-ACTION 'SHIFT 26 0 0 0))
(CONS '(59 . PROCKW) (MK-ACTION 'SHIFT 26 0 0 0))
(CONS '(60 . LP) (MK-ACTION 'SHIFT 27 0 0 0))
(CONS '(61 . NI) (MK-ACTION 'SHIFT 28 0 0 0))
(CONS '(62 . BI) (MK-ACTION 'SHIFT 14 0 0 0))
(CONS '(63 . SI) (MK-ACTION 'REDUCE 0 5 '(PDECL) 8))
(CONS '(63 . BI) (MK-ACTION 'REDUCE 0 5 '(PDECL) 8))
(CONS '(64 . SI) (MK-ACTION 'REDUCE 0 15 '(SPROC) 3))
(CONS '(64 . BI) (MK-ACTION 'REDUCE 0 15 '(SPROC) 3))
(CONS '(64 . EOF) (MK-ACTION 'REDUCE 0 15 '(SPROC) 3))
(CONS '(65 . SI) (MK-ACTION 'REDUCE 0 16 '(SPROC) 3))
(CONS '(65 . BI) (MK-ACTION 'REDUCE 0 16 '(SPROC) 3))
(CONS '(65 . EOF) (MK-ACTION 'REDUCE 0 16 '(SPROC) 3))
(CONS '(66 . SI) (MK-ACTION 'REDUCE 0 17 '(SPROC) 3))
(CONS '(66 . BI) (MK-ACTION 'REDUCE 0 17 '(SPROC) 3))
(CONS '(66 . EOF) (MK-ACTION 'REDUCE 0 17 '(SPROC) 3))
(CONS '(67 . BI) (MK-ACTION 'SHIFT 40 0 0 0))
(CONS '(68 . SI) (MK-ACTION 'SHIFT 41 0 0 0))
(CONS '(68 . BI) (MK-ACTION 'REDUCE 0 23 '(SPROCLIST) 1))
(CONS '(69 . COLONEQ) (MK-ACTION 'SHIFT 42 0 0 0))
(CONS '(70 . SI) (MK-ACTION 'REDUCE 0 13 '(SPROC) 1))
(CONS '(70 . BI) (MK-ACTION 'REDUCE 0 13 '(SPROC) 1))
(CONS '(70 . EOF) (MK-ACTION 'REDUCE 0 13 '(SPROC) 1))
(CONS '(71 . SI) (MK-ACTION 'REDUCE 0 14 '(SPROC) 1))
(CONS '(71 . BI) (MK-ACTION 'REDUCE 0 14 '(SPROC) 1))
(CONS '(71 . EOF) (MK-ACTION 'REDUCE 0 14 '(SPROC) 1))
(CONS '(72 . QUEST) (MK-ACTION 'SHIFT 43 0 0 0))
(CONS '(73 . EXCLAIM) (MK-ACTION 'SHIFT 44 0 0 0))
(CONS '(74 . NI) (MK-ACTION 'SHIFT 45 0 0 0))
(CONS '(75 . NI) (MK-ACTION 'SHIFT 46 0 0 0))
(CONS '(76 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(76 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(76 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(76 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(76 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(76 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(76 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(77 . IDENT) (MK-ACTION 'SHIFT 48 0 0 0))
(CONS '(78 . BI) (MK-ACTION 'SHIFT 49 0 0 0))
(CONS '(79 . SI) (MK-ACTION 'SHIFT 50 0 0 0))
(CONS '(79 . BI) (MK-ACTION 'REDUCE 0 28 '(GCLIST) 1))
(CONS '(80 . NI) (MK-ACTION 'SHIFT 51 0 0 0))
(CONS '(81 . SKIP) (MK-ACTION 'SHIFT 70 0 0 0))
(CONS '(81 . STOP) (MK-ACTION 'SHIFT 71 0 0 0))
(CONS '(81 . INPUT) (MK-ACTION 'SHIFT 72 0 0 0))
(CONS '(81 . OUTPUT) (MK-ACTION 'SHIFT 73 0 0 0))
(CONS '(81 . SEQ) (MK-ACTION 'SHIFT 74 0 0 0))
(CONS '(81 . IF) (MK-ACTION 'SHIFT 75 0 0 0))
(CONS '(81 . WHILE) (MK-ACTION 'SHIFT 76 0 0 0))
(CONS '(81 . CALL) (MK-ACTION 'SHIFT 77 0 0 0))
(CONS '(81 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(82 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(82 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(82 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(82 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(82 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(83 . TRUE) (MK-ACTION 'REDUCE 0 45 '(DOP) 1))
(CONS '(83 . FALSE) (MK-ACTION 'REDUCE 0 45 '(DOP) 1))
(CONS '(83 . IDENT) (MK-ACTION 'REDUCE 0 45 '(DOP) 1))
(CONS '(83 . LP) (MK-ACTION 'REDUCE 0 45 '(DOP) 1))
(CONS '(83 . INTEGER) (MK-ACTION 'REDUCE 0 45 '(DOP) 1))
(CONS '(84 . TRUE) (MK-ACTION 'REDUCE 0 44 '(DOP) 1))
(CONS '(84 . FALSE) (MK-ACTION 'REDUCE 0 44 '(DOP) 1))
(CONS '(84 . IDENT) (MK-ACTION 'REDUCE 0 44 '(DOP) 1))
(CONS '(84 . LP) (MK-ACTION 'REDUCE 0 44 '(DOP) 1))
(CONS '(84 . INTEGER) (MK-ACTION 'REDUCE 0 44 '(DOP) 1))
(CONS '(85 . TRUE) (MK-ACTION 'REDUCE 0 46 '(DOP) 1))
(CONS '(85 . FALSE) (MK-ACTION 'REDUCE 0 46 '(DOP) 1))
(CONS '(85 . IDENT) (MK-ACTION 'REDUCE 0 46 '(DOP) 1))
(CONS '(85 . LP) (MK-ACTION 'REDUCE 0 46 '(DOP) 1))
(CONS '(85 . INTEGER) (MK-ACTION 'REDUCE 0 46 '(DOP) 1))
(CONS '(86 . TRUE) (MK-ACTION 'REDUCE 0 47 '(DOP) 1))
(CONS '(86 . FALSE) (MK-ACTION 'REDUCE 0 47 '(DOP) 1))
(CONS '(86 . IDENT) (MK-ACTION 'REDUCE 0 47 '(DOP) 1))
(CONS '(86 . LP) (MK-ACTION 'REDUCE 0 47 '(DOP) 1))
(CONS '(86 . INTEGER) (MK-ACTION 'REDUCE 0 47 '(DOP) 1))
(CONS '(87 . TRUE) (MK-ACTION 'REDUCE 0 48 '(DOP) 1))
(CONS '(87 . FALSE) (MK-ACTION 'REDUCE 0 48 '(DOP) 1))
(CONS '(87 . IDENT) (MK-ACTION 'REDUCE 0 48 '(DOP) 1))
(CONS '(87 . LP) (MK-ACTION 'REDUCE 0 48 '(DOP) 1))
(CONS '(87 . INTEGER) (MK-ACTION 'REDUCE 0 48 '(DOP) 1))
(CONS '(88 . TRUE) (MK-ACTION 'REDUCE 0 49 '(DOP) 1))
(CONS '(88 . FALSE) (MK-ACTION 'REDUCE 0 49 '(DOP) 1))
(CONS '(88 . IDENT) (MK-ACTION 'REDUCE 0 49 '(DOP) 1))
(CONS '(88 . LP) (MK-ACTION 'REDUCE 0 49 '(DOP) 1))
(CONS '(88 . INTEGER) (MK-ACTION 'REDUCE 0 49 '(DOP) 1))
(CONS '(89 . TRUE) (MK-ACTION 'REDUCE 0 50 '(DOP) 1))
(CONS '(89 . FALSE) (MK-ACTION 'REDUCE 0 50 '(DOP) 1))
(CONS '(89 . IDENT) (MK-ACTION 'REDUCE 0 50 '(DOP) 1))
(CONS '(89 . LP) (MK-ACTION 'REDUCE 0 50 '(DOP) 1))
(CONS '(89 . INTEGER) (MK-ACTION 'REDUCE 0 50 '(DOP) 1))
(CONS '(90 . TRUE) (MK-ACTION 'REDUCE 0 51 '(DOP) 1))
(CONS '(90 . FALSE) (MK-ACTION 'REDUCE 0 51 '(DOP) 1))
(CONS '(90 . IDENT) (MK-ACTION 'REDUCE 0 51 '(DOP) 1))
(CONS '(90 . LP) (MK-ACTION 'REDUCE 0 51 '(DOP) 1))
(CONS '(90 . INTEGER) (MK-ACTION 'REDUCE 0 51 '(DOP) 1))
(CONS '(91 . TRUE) (MK-ACTION 'REDUCE 0 52 '(DOP) 1))
(CONS '(91 . FALSE) (MK-ACTION 'REDUCE 0 52 '(DOP) 1))
(CONS '(91 . IDENT) (MK-ACTION 'REDUCE 0 52 '(DOP) 1))
(CONS '(91 . LP) (MK-ACTION 'REDUCE 0 52 '(DOP) 1))
(CONS '(91 . INTEGER) (MK-ACTION 'REDUCE 0 52 '(DOP) 1))
(CONS '(92 . TRUE) (MK-ACTION 'REDUCE 0 53 '(DOP) 1))
(CONS '(92 . FALSE) (MK-ACTION 'REDUCE 0 53 '(DOP) 1))
(CONS '(92 . IDENT) (MK-ACTION 'REDUCE 0 53 '(DOP) 1))
(CONS '(92 . LP) (MK-ACTION 'REDUCE 0 53 '(DOP) 1))
(CONS '(92 . INTEGER) (MK-ACTION 'REDUCE 0 53 '(DOP) 1))
(CONS '(93 . TRUE) (MK-ACTION 'REDUCE 0 54 '(DOP) 1))
(CONS '(93 . FALSE) (MK-ACTION 'REDUCE 0 54 '(DOP) 1))
(CONS '(93 . IDENT) (MK-ACTION 'REDUCE 0 54 '(DOP) 1))
(CONS '(93 . LP) (MK-ACTION 'REDUCE 0 54 '(DOP) 1))
(CONS '(93 . INTEGER) (MK-ACTION 'REDUCE 0 54 '(DOP) 1))
(CONS '(94 . TRUE) (MK-ACTION 'REDUCE 0 55 '(DOP) 1))
(CONS '(94 . FALSE) (MK-ACTION 'REDUCE 0 55 '(DOP) 1))
(CONS '(94 . IDENT) (MK-ACTION 'REDUCE 0 55 '(DOP) 1))
(CONS '(94 . LP) (MK-ACTION 'REDUCE 0 55 '(DOP) 1))
(CONS '(94 . INTEGER) (MK-ACTION 'REDUCE 0 55 '(DOP) 1))
(CONS '(95 . TRUE) (MK-ACTION 'REDUCE 0 56 '(DOP) 1))
(CONS '(95 . FALSE) (MK-ACTION 'REDUCE 0 56 '(DOP) 1))
(CONS '(95 . IDENT) (MK-ACTION 'REDUCE 0 56 '(DOP) 1))
(CONS '(95 . LP) (MK-ACTION 'REDUCE 0 56 '(DOP) 1))
(CONS '(95 . INTEGER) (MK-ACTION 'REDUCE 0 56 '(DOP) 1))
(CONS '(96 . RP) (MK-ACTION 'REDUCE 0 34 '(EXP) 2))
(CONS '(96 . RB) (MK-ACTION 'REDUCE 0 34 '(EXP) 2))
(CONS '(96 . NI) (MK-ACTION 'REDUCE 0 34 '(EXP) 2))
(CONS '(96 . SI) (MK-ACTION 'REDUCE 0 34 '(EXP) 2))
(CONS '(96 . BI) (MK-ACTION 'REDUCE 0 34 '(EXP) 2))
(CONS '(96 . EOF) (MK-ACTION 'REDUCE 0 34 '(EXP) 2))
(CONS '(97 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(97 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(97 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(97 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(97 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(97 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(97 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(98 . RP) (MK-ACTION 'SHIFT 54 0 0 0))
(CONS '(99 . RP) (MK-ACTION 'SHIFT 55 0 0 0))
(CONS '(100 . RB) (MK-ACTION 'SHIFT 56 0 0 0))
(CONS '(101 . MINUS) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . PLUS) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . TIMES) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . DIV) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . REM) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . EQ) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . LT) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . GT) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . NE) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . LE) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . GE) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . AND) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . OR) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . RP) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . RB) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . NI) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . SI) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . BI) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(101 . EOF) (MK-ACTION 'REDUCE 0 37 '(SIMPLE) 1))
(CONS '(102 . MINUS) (MK-ACTION 'SHIFT 83 0 0 0))
(CONS '(102 . PLUS) (MK-ACTION 'SHIFT 84 0 0 0))
(CONS '(102 . TIMES) (MK-ACTION 'SHIFT 85 0 0 0))
(CONS '(102 . DIV) (MK-ACTION 'SHIFT 86 0 0 0))
(CONS '(102 . REM) (MK-ACTION 'SHIFT 87 0 0 0))
(CONS '(102 . EQ) (MK-ACTION 'SHIFT 88 0 0 0))
(CONS '(102 . LT) (MK-ACTION 'SHIFT 89 0 0 0))
(CONS '(102 . GT) (MK-ACTION 'SHIFT 90 0 0 0))
(CONS '(102 . NE) (MK-ACTION 'SHIFT 91 0 0 0))
(CONS '(102 . LE) (MK-ACTION 'SHIFT 92 0 0 0))
(CONS '(102 . GE) (MK-ACTION 'SHIFT 93 0 0 0))
(CONS '(102 . AND) (MK-ACTION 'SHIFT 94 0 0 0))
(CONS '(102 . OR) (MK-ACTION 'SHIFT 95 0 0 0))
(CONS '(102 . RP) (MK-ACTION 'REDUCE 0 33 '(EXP) 1))
(CONS '(102 . RB) (MK-ACTION 'REDUCE 0 33 '(EXP) 1))
(CONS '(102 . NI) (MK-ACTION 'REDUCE 0 33 '(EXP) 1))
(CONS '(102 . SI) (MK-ACTION 'REDUCE 0 33 '(EXP) 1))
(CONS '(102 . BI) (MK-ACTION 'REDUCE 0 33 '(EXP) 1))
(CONS '(102 . EOF) (MK-ACTION 'REDUCE 0 33 '(EXP) 1))
(CONS '(103 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(103 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(103 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(103 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(103 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(104 . MINUS) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . PLUS) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . TIMES) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . DIV) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . REM) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . EQ) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . LT) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . GT) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . NE) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . LE) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . GE) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . AND) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . OR) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . RP) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . RB) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . NI) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . SI) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . BI) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(104 . EOF) (MK-ACTION 'REDUCE 0 36 '(SIMPLE) 1))
(CONS '(105 . TRUE) (MK-ACTION 'REDUCE 0 57 '(MOP) 1))
(CONS '(105 . FALSE) (MK-ACTION 'REDUCE 0 57 '(MOP) 1))
(CONS '(105 . IDENT) (MK-ACTION 'REDUCE 0 57 '(MOP) 1))
(CONS '(105 . LP) (MK-ACTION 'REDUCE 0 57 '(MOP) 1))
(CONS '(105 . INTEGER) (MK-ACTION 'REDUCE 0 57 '(MOP) 1))
(CONS '(106 . TRUE) (MK-ACTION 'REDUCE 0 58 '(MOP) 1))
(CONS '(106 . FALSE) (MK-ACTION 'REDUCE 0 58 '(MOP) 1))
(CONS '(106 . IDENT) (MK-ACTION 'REDUCE 0 58 '(MOP) 1))
(CONS '(106 . LP) (MK-ACTION 'REDUCE 0 58 '(MOP) 1))
(CONS '(106 . INTEGER) (MK-ACTION 'REDUCE 0 58 '(MOP) 1))
(CONS '(107 . MINUS) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . PLUS) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . TIMES) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . DIV) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . REM) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . EQ) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . LT) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . GT) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . NE) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . LE) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . GE) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . AND) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . OR) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . RP) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . RB) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . NI) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . SI) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . BI) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(107 . EOF) (MK-ACTION 'REDUCE 0 40 '(LITERAL) 1))
(CONS '(108 . MINUS) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . PLUS) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . TIMES) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . DIV) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . REM) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . EQ) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . LT) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . GT) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . NE) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . LE) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . GE) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . AND) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . OR) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . RP) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . RB) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . NI) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . SI) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . BI) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(108 . EOF) (MK-ACTION 'REDUCE 0 41 '(LITERAL) 1))
(CONS '(109 . MINUS) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . PLUS) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . TIMES) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . DIV) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . REM) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . EQ) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . LT) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . GT) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . NE) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . LE) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . GE) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . AND) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . OR) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . COLONEQ) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . RP) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . LB) (MK-ACTION 'SHIFT 97 0 0 0))
(CONS '(109 . RB) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . NI) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . SI) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . BI) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(109 . EOF) (MK-ACTION 'REDUCE 0 42 '(VAR) 1))
(CONS '(110 . MINUS) (MK-ACTION 'SHIFT 105 0 0 0))
(CONS '(110 . NOT) (MK-ACTION 'SHIFT 106 0 0 0))
(CONS '(110 . TRUE) (MK-ACTION 'SHIFT 107 0 0 0))
(CONS '(110 . FALSE) (MK-ACTION 'SHIFT 108 0 0 0))
(CONS '(110 . IDENT) (MK-ACTION 'SHIFT 109 0 0 0))
(CONS '(110 . LP) (MK-ACTION 'SHIFT 110 0 0 0))
(CONS '(110 . INTEGER) (MK-ACTION 'SHIFT 111 0 0 0))
(CONS '(111 . MINUS) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . PLUS) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . TIMES) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . DIV) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . REM) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . EQ) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . LT) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . GT) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . NE) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . LE) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . GE) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . AND) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . OR) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . RP) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . RB) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . NI) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . SI) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . BI) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1))
(CONS '(111 . EOF) (MK-ACTION 'REDUCE 0 39 '(LITERAL) 1)))
; This is the goto table
'((9 . BLK) (GOTO 15)) '((0 . BLK) (GOTO 1))
'((11 . PROC) (GOTO 21)) '((9 . PROC) (GOTO 16))
'((0 . PROC) (GOTO 16)) '((8 . PDECLLIST) (GOTO 12))
'((59 . PDECL) (GOTO 24)) '((58 . PDECL) (GOTO 24))
'((8 . PDECL) (GOTO 13)) '((9 . DECL) (GOTO 17))
'((0 . DECL) (GOTO 17)) '((45 . SPROCLIST) (GOTO 67))
'((59 . PDECLREST) (GOTO 25)) '((58 . PDECLREST) (GOTO 7))
'((41 . SPROCREST) (GOTO 33)) '((29 . SPROCREST) (GOTO 32))
'((50 . GCREST) (GOTO 35)) '((30 . GCREST) (GOTO 37))
'((81 . SPROC) (GOTO 52)) '((51 . SPROC) (GOTO 39))
'((45 . SPROC) (GOTO 68)) '((41 . SPROC) (GOTO 34))
'((29 . SPROC) (GOTO 34)) '((28 . SPROC) (GOTO 62))
'((11 . SPROC) (GOTO 22)) '((9 . SPROC) (GOTO 22))
'((0 . SPROC) (GOTO 22)) '((46 . GCLIST) (GOTO 78))
'((50 . GC) (GOTO 38)) '((46 . GC) (GOTO 79))
'((30 . GC) (GOTO 38)) '((110 . EXP) (GOTO 98))
'((97 . EXP) (GOTO 100)) '((76 . EXP) (GOTO 47))
'((50 . EXP) (GOTO 80)) '((46 . EXP) (GOTO 80))
'((44 . EXP) (GOTO 66)) '((42 . EXP) (GOTO 64))
'((30 . EXP) (GOTO 80)) '((110 . LITERAL) (GOTO 101))
'((103 . LITERAL) (GOTO 101)) '((97 . LITERAL) (GOTO 101))
'((82 . LITERAL) (GOTO 101)) '((76 . LITERAL) (GOTO 101))
'((50 . LITERAL) (GOTO 101)) '((46 . LITERAL) (GOTO 101))
'((44 . LITERAL) (GOTO 101)) '((42 . LITERAL) (GOTO 101))
'((30 . LITERAL) (GOTO 101)) '((110 . SIMPLE) (GOTO 102))
'((103 . SIMPLE) (GOTO 96)) '((97 . SIMPLE) (GOTO 102))
'((82 . SIMPLE) (GOTO 53)) '((76 . SIMPLE) (GOTO 102))
'((50 . SIMPLE) (GOTO 102)) '((46 . SIMPLE) (GOTO 102))
'((44 . SIMPLE) (GOTO 102)) '((42 . SIMPLE) (GOTO 102))
'((30 . SIMPLE) (GOTO 102)) '((102 . DOP) (GOTO 82))
'((110 . MOP) (GOTO 103)) '((97 . MOP) (GOTO 103))
'((76 . MOP) (GOTO 103)) '((50 . MOP) (GOTO 103))
'((46 . MOP) (GOTO 103)) '((44 . MOP) (GOTO 103))
'((42 . MOP) (GOTO 103)) '((30 . MOP) (GOTO 103))
'((110 . VAR) (GOTO 104)) '((103 . VAR) (GOTO 104))
'((97 . VAR) (GOTO 104)) '((82 . VAR) (GOTO 104))
'((81 . VAR) (GOTO 69)) '((76 . VAR) (GOTO 104))
'((51 . VAR) (GOTO 69)) '((50 . VAR) (GOTO 104))
'((46 . VAR) (GOTO 104)) '((45 . VAR) (GOTO 69))
'((44 . VAR) (GOTO 104)) '((42 . VAR) (GOTO 104))
'((41 . VAR) (GOTO 69)) '((30 . VAR) (GOTO 104))
'((29 . VAR) (GOTO 69)) '((28 . VAR) (GOTO 69))
'((11 . VAR) (GOTO 69)) '((9 . VAR) (GOTO 69))
'((0 . VAR) (GOTO 69)))
Back to the main page