ftp.ee.pdx.edu

home *** CD-ROM | disk | FTP | other *** search

/ ftp.ee.pdx.edu / 2014.02.ftp.ee.pdx.edu.tar / ftp.ee.pdx.edu / pub / users / Harry / compilers / p9 / tst / bool.out.bak < prev next >

Wrap

Text File | 2006-02-07 | 23KB | 832 lines

PROGRAM IS VAR b: boolean := FALSE; c: boolean := b; d: boolean := b; i: integer := 0; j: integer := i; BEGIN b := (i < j); b := (i <= j); b := (i > j); b := (i >= j); b := (i = j); b := (i <> j); b := NOT c; b := (c AND d); b := (c OR d); IF (i < j) THEN i := 101; i := 102; ELSE i := 103; i := 104; END; IF (i <= j) THEN i := 105; i := 106; ELSE i := 107; i := 108; END; IF (i > j) THEN i := 109; i := 110; ELSE i := 111; i := 112; END; IF (i >= j) THEN i := 113; i := 114; ELSE i := 115; i := 116; END; IF (i = j) THEN i := 117; i := 118; ELSE i := 119; i := 120; END; IF (i <> j) THEN i := 121; i := 122; ELSE i := 123; i := 124; END; IF NOT c THEN i := 125; i := 126; ELSE i := 127; i := 128; END; IF (c AND d) THEN i := 129; i := 130; ELSE i := 131; i := 132; END; IF (c OR d) THEN i := 133; i := 134; ELSE i := 135; i := 136; END; b := ((i < j) AND d); b := ((i <= j) AND d); b := ((i > j) AND d); b := ((i >= j) AND d); b := ((i = j) AND d); b := (NOT c AND d); b := ((c AND d) AND d); b := ((c OR d) AND d); b := (c OR (i < j)); b := (c OR (i <= j)); b := (c OR (i > j)); b := (c OR (i >= j)); b := (c OR (i = j)); b := (c OR NOT c); b := (c OR (c AND d)); b := (c OR (c OR d)); b := ((NOT (((i = 1) OR NOT (i = 2)) AND NOT ((i = 3) OR (i = 4))) OR NOT (((i = 5) OR NOT (i = 6)) AND NOT ((i = 7) OR (i = 8)))) AND (NOT (((i = 9) OR NOT (i = 10)) AND NOT ((i = 11) OR (i = 12))) OR NOT (((i = 13) OR NOT (i = 14)) AND NOT ((i = 15) OR (i = 16))))); b := ((NOT (((i = 17) AND NOT (i = 18)) OR NOT ((i = 19) AND (i = 20))) AND NOT (((i = 21) AND NOT (i = 22)) OR NOT ((i = 23) AND (i = 24)))) OR (NOT (((i = 25) AND NOT (i = 26)) OR NOT ((i = 27) AND (i = 28))) AND NOT (((i = 29) AND NOT (i = 30)) OR NOT ((i = 31) AND (i = 32))))); END; maxLexicalLevel = 0 ===== Intermediate Code Follows ===== ! MAIN... mainEntry ! VAR INITIALIZATION... t1 := 0 b := t1 ! VAR INITIALIZATION... c := b ! VAR INITIALIZATION... d := b ! VAR INITIALIZATION... t2 := 0 i := t2 ! VAR INITIALIZATION... j := i ! ASSIGNMENT STMT... t3 := &b if i < j then goto Label_1 (integer) t4 := 0 goto Label_2 Label_1: t4 := 1 Label_2: *t3 := t4 ! ASSIGNMENT STMT... t5 := &b if i <= j then goto Label_3 (integer) t6 := 0 goto Label_4 Label_3: t6 := 1 Label_4: *t5 := t6 ! ASSIGNMENT STMT... t7 := &b if i > j then goto Label_5 (integer) t8 := 0 goto Label_6 Label_5: t8 := 1 Label_6: *t7 := t8 ! ASSIGNMENT STMT... t9 := &b if i >= j then goto Label_7 (integer) t10 := 0 goto Label_8 Label_7: t10 := 1 Label_8: *t9 := t10 ! ASSIGNMENT STMT... t11 := &b if i = j then goto Label_9 (integer) t12 := 0 goto Label_10 Label_9: t12 := 1 Label_10: *t11 := t12 ! ASSIGNMENT STMT... t13 := &b if i != j then goto Label_11 (integer) t14 := 0 goto Label_12 Label_11: t14 := 1 Label_12: *t13 := t14 ! ASSIGNMENT STMT... t15 := &b if c = 0 then goto Label_13 (integer) goto Label_14 Label_13: t16 := 1 goto Label_15 Label_14: t16 := 0 Label_15: *t15 := t16 ! ASSIGNMENT STMT... t17 := &b if c = 0 then goto Label_17 (integer) goto Label_19 Label_19: if d = 0 then goto Label_17 (integer) goto Label_16 Label_16: t18 := 1 goto Label_18 Label_17: t18 := 0 Label_18: *t17 := t18 ! ASSIGNMENT STMT... t19 := &b if c = 0 then goto Label_23 (integer) goto Label_20 Label_23: if d = 0 then goto Label_21 (integer) goto Label_20 Label_20: t20 := 1 goto Label_22 Label_21: t20 := 0 Label_22: *t19 := t20 ! IF... if i < j then goto Label_24 (integer) goto Label_25 Label_24: ! THEN... ! ASSIGNMENT STMT... t21 := &i t22 := 101 *t21 := t22 ! ASSIGNMENT STMT... t23 := &i t24 := 102 *t23 := t24 goto Label_26 Label_25: ! ELSE... ! ASSIGNMENT STMT... t25 := &i t26 := 103 *t25 := t26 ! ASSIGNMENT STMT... t27 := &i t28 := 104 *t27 := t28 ! END IF... Label_26: ! IF... if i <= j then goto Label_27 (integer) goto Label_28 Label_27: ! THEN... ! ASSIGNMENT STMT... t29 := &i t30 := 105 *t29 := t30 ! ASSIGNMENT STMT... t31 := &i t32 := 106 *t31 := t32 goto Label_29 Label_28: ! ELSE... ! ASSIGNMENT STMT... t33 := &i t34 := 107 *t33 := t34 ! ASSIGNMENT STMT... t35 := &i t36 := 108 *t35 := t36 ! END IF... Label_29: ! IF... if i > j then goto Label_30 (integer) goto Label_31 Label_30: ! THEN... ! ASSIGNMENT STMT... t37 := &i t38 := 109 *t37 := t38 ! ASSIGNMENT STMT... t39 := &i t40 := 110 *t39 := t40 goto Label_32 Label_31: ! ELSE... ! ASSIGNMENT STMT... t41 := &i t42 := 111 *t41 := t42 ! ASSIGNMENT STMT... t43 := &i t44 := 112 *t43 := t44 ! END IF... Label_32: ! IF... if i >= j then goto Label_33 (integer) goto Label_34 Label_33: ! THEN... ! ASSIGNMENT STMT... t45 := &i t46 := 113 *t45 := t46 ! ASSIGNMENT STMT... t47 := &i t48 := 114 *t47 := t48 goto Label_35 Label_34: ! ELSE... ! ASSIGNMENT STMT... t49 := &i t50 := 115 *t49 := t50 ! ASSIGNMENT STMT... t51 := &i t52 := 116 *t51 := t52 ! END IF... Label_35: ! IF... if i = j then goto Label_36 (integer) goto Label_37 Label_36: ! THEN... ! ASSIGNMENT STMT... t53 := &i t54 := 117 *t53 := t54 ! ASSIGNMENT STMT... t55 := &i t56 := 118 *t55 := t56 goto Label_38 Label_37: ! ELSE... ! ASSIGNMENT STMT... t57 := &i t58 := 119 *t57 := t58 ! ASSIGNMENT STMT... t59 := &i t60 := 120 *t59 := t60 ! END IF... Label_38: ! IF... if i != j then goto Label_39 (integer) goto Label_40 Label_39: ! THEN... ! ASSIGNMENT STMT... t61 := &i t62 := 121 *t61 := t62 ! ASSIGNMENT STMT... t63 := &i t64 := 122 *t63 := t64 goto Label_41 Label_40: ! ELSE... ! ASSIGNMENT STMT... t65 := &i t66 := 123 *t65 := t66 ! ASSIGNMENT STMT... t67 := &i t68 := 124 *t67 := t68 ! END IF... Label_41: ! IF... if c = 0 then goto Label_42 (integer) goto Label_43 Label_42: ! THEN... ! ASSIGNMENT STMT... t69 := &i t70 := 125 *t69 := t70 ! ASSIGNMENT STMT... t71 := &i t72 := 126 *t71 := t72 goto Label_44 Label_43: ! ELSE... ! ASSIGNMENT STMT... t73 := &i t74 := 127 *t73 := t74 ! ASSIGNMENT STMT... t75 := &i t76 := 128 *t75 := t76 ! END IF... Label_44: ! IF... if c = 0 then goto Label_46 (integer) goto Label_47 Label_47: if d = 0 then goto Label_46 (integer) goto Label_45 Label_45: ! THEN... ! ASSIGNMENT STMT... t77 := &i t78 := 129 *t77 := t78 ! ASSIGNMENT STMT... t79 := &i t80 := 130 *t79 := t80 goto Label_48 Label_46: ! ELSE... ! ASSIGNMENT STMT... t81 := &i t82 := 131 *t81 := t82 ! ASSIGNMENT STMT... t83 := &i t84 := 132 *t83 := t84 ! END IF... Label_48: ! IF... if c = 0 then goto Label_51 (integer) goto Label_49 Label_51: if d = 0 then goto Label_50 (integer) goto Label_49 Label_49: ! THEN... ! ASSIGNMENT STMT... t85 := &i t86 := 133 *t85 := t86 ! ASSIGNMENT STMT... t87 := &i t88 := 134 *t87 := t88 goto Label_52 Label_50: ! ELSE... ! ASSIGNMENT STMT... t89 := &i t90 := 135 *t89 := t90 ! ASSIGNMENT STMT... t91 := &i t92 := 136 *t91 := t92 ! END IF... Label_52: ! ASSIGNMENT STMT... t93 := &b if i < j then goto Label_56 (integer) goto Label_54 Label_56: if d = 0 then goto Label_54 (integer) goto Label_53 Label_53: t94 := 1 goto Label_55 Label_54: t94 := 0 Label_55: *t93 := t94 ! ASSIGNMENT STMT... t95 := &b if i <= j then goto Label_60 (integer) goto Label_58 Label_60: if d = 0 then goto Label_58 (integer) goto Label_57 Label_57: t96 := 1 goto Label_59 Label_58: t96 := 0 Label_59: *t95 := t96 ! ASSIGNMENT STMT... t97 := &b if i > j then goto Label_64 (integer) goto Label_62 Label_64: if d = 0 then goto Label_62 (integer) goto Label_61 Label_61: t98 := 1 goto Label_63 Label_62: t98 := 0 Label_63: *t97 := t98 ! ASSIGNMENT STMT... t99 := &b if i >= j then goto Label_68 (integer) goto Label_66 Label_68: if d = 0 then goto Label_66 (integer) goto Label_65 Label_65: t100 := 1 goto Label_67 Label_66: t100 := 0 Label_67: *t99 := t100 ! ASSIGNMENT STMT... t101 := &b if i = j then goto Label_72 (integer) goto Label_70 Label_72: if d = 0 then goto Label_70 (integer) goto Label_69 Label_69: t102 := 1 goto Label_71 Label_70: t102 := 0 Label_71: *t101 := t102 ! ASSIGNMENT STMT... t103 := &b if c = 0 then goto Label_76 (integer) goto Label_74 Label_76: if d = 0 then goto Label_74 (integer) goto Label_73 Label_73: t104 := 1 goto Label_75 Label_74: t104 := 0 Label_75: *t103 := t104 ! ASSIGNMENT STMT... t105 := &b if c = 0 then goto Label_78 (integer) goto Label_81 Label_81: if d = 0 then goto Label_78 (integer) goto Label_80 Label_80: if d = 0 then goto Label_78 (integer) goto Label_77 Label_77: t106 := 1 goto Label_79 Label_78: t106 := 0 Label_79: *t105 := t106 ! ASSIGNMENT STMT... t107 := &b if c = 0 then goto Label_86 (integer) goto Label_85 Label_86: if d = 0 then goto Label_83 (integer) goto Label_85 Label_85: if d = 0 then goto Label_83 (integer) goto Label_82 Label_82: t108 := 1 goto Label_84 Label_83: t108 := 0 Label_84: *t107 := t108 ! ASSIGNMENT STMT... t109 := &b if c = 0 then goto Label_90 (integer) goto Label_87 Label_90: if i < j then goto Label_87 (integer) goto Label_88 Label_87: t110 := 1 goto Label_89 Label_88: t110 := 0 Label_89: *t109 := t110 ! ASSIGNMENT STMT... t111 := &b if c = 0 then goto Label_94 (integer) goto Label_91 Label_94: if i <= j then goto Label_91 (integer) goto Label_92 Label_91: t112 := 1 goto Label_93 Label_92: t112 := 0 Label_93: *t111 := t112 ! ASSIGNMENT STMT... t113 := &b if c = 0 then goto Label_98 (integer) goto Label_95 Label_98: if i > j then goto Label_95 (integer) goto Label_96 Label_95: t114 := 1 goto Label_97 Label_96: t114 := 0 Label_97: *t113 := t114 ! ASSIGNMENT STMT... t115 := &b if c = 0 then goto Label_102 (integer) goto Label_99 Label_102: if i >= j then goto Label_99 (integer) goto Label_100 Label_99: t116 := 1 goto Label_101 Label_100: t116 := 0 Label_101: *t115 := t116 ! ASSIGNMENT STMT... t117 := &b if c = 0 then goto Label_106 (integer) goto Label_103 Label_106: if i = j then goto Label_103 (integer) goto Label_104 Label_103: t118 := 1 goto Label_105 Label_104: t118 := 0 Label_105: *t117 := t118 ! ASSIGNMENT STMT... t119 := &b if c = 0 then goto Label_110 (integer) goto Label_107 Label_110: if c = 0 then goto Label_107 (integer) goto Label_108 Label_107: t120 := 1 goto Label_109 Label_108: t120 := 0 Label_109: *t119 := t120 ! ASSIGNMENT STMT... t121 := &b if c = 0 then goto Label_114 (integer) goto Label_111 Label_114: if c = 0 then goto Label_112 (integer) goto Label_115 Label_115: if d = 0 then goto Label_112 (integer) goto Label_111 Label_111: t122 := 1 goto Label_113 Label_112: t122 := 0 Label_113: *t121 := t122 ! ASSIGNMENT STMT... t123 := &b if c = 0 then goto Label_119 (integer) goto Label_116 Label_119: if c = 0 then goto Label_120 (integer) goto Label_116 Label_120: if d = 0 then goto Label_117 (integer) goto Label_116 Label_116: t124 := 1 goto Label_118 Label_117: t124 := 0 Label_118: *t123 := t124 ! ASSIGNMENT STMT... t125 := &b t127 := 1 if i = t127 then goto Label_126 (integer) goto Label_127 Label_127: t128 := 2 if i = t128 then goto Label_124 (integer) goto Label_126 Label_126: t129 := 3 if i = t129 then goto Label_124 (integer) goto Label_128 Label_128: t130 := 4 if i = t130 then goto Label_124 (integer) goto Label_125 Label_125: t131 := 5 if i = t131 then goto Label_129 (integer) goto Label_130 Label_130: t132 := 6 if i = t132 then goto Label_124 (integer) goto Label_129 Label_129: t133 := 7 if i = t133 then goto Label_124 (integer) goto Label_131 Label_131: t134 := 8 if i = t134 then goto Label_124 (integer) goto Label_122 Label_124: t135 := 9 if i = t135 then goto Label_133 (integer) goto Label_134 Label_134: t136 := 10 if i = t136 then goto Label_121 (integer) goto Label_133 Label_133: t137 := 11 if i = t137 then goto Label_121 (integer) goto Label_135 Label_135: t138 := 12 if i = t138 then goto Label_121 (integer) goto Label_132 Label_132: t139 := 13 if i = t139 then goto Label_136 (integer) goto Label_137 Label_137: t140 := 14 if i = t140 then goto Label_121 (integer) goto Label_136 Label_136: t141 := 15 if i = t141 then goto Label_121 (integer) goto Label_138 Label_138: t142 := 16 if i = t142 then goto Label_121 (integer) goto Label_122 Label_121: t126 := 1 goto Label_123 Label_122: t126 := 0 Label_123: *t125 := t126 ! ASSIGNMENT STMT... t143 := &b t145 := 17 if i = t145 then goto Label_145 (integer) goto Label_144 Label_145: t146 := 18 if i = t146 then goto Label_144 (integer) goto Label_142 Label_144: t147 := 19 if i = t147 then goto Label_146 (integer) goto Label_142 Label_146: t148 := 20 if i = t148 then goto Label_143 (integer) goto Label_142 Label_143: t149 := 21 if i = t149 then goto Label_148 (integer) goto Label_147 Label_148: t150 := 22 if i = t150 then goto Label_147 (integer) goto Label_142 Label_147: t151 := 23 if i = t151 then goto Label_149 (integer) goto Label_142 Label_149: t152 := 24 if i = t152 then goto Label_139 (integer) goto Label_142 Label_142: t153 := 25 if i = t153 then goto Label_152 (integer) goto Label_151 Label_152: t154 := 26 if i = t154 then goto Label_151 (integer) goto Label_140 Label_151: t155 := 27 if i = t155 then goto Label_153 (integer) goto Label_140 Label_153: t156 := 28 if i = t156 then goto Label_150 (integer) goto Label_140 Label_150: t157 := 29 if i = t157 then goto Label_155 (integer) goto Label_154 Label_155: t158 := 30 if i = t158 then goto Label_154 (integer) goto Label_140 Label_154: t159 := 31 if i = t159 then goto Label_156 (integer) goto Label_140 Label_156: t160 := 32 if i = t160 then goto Label_139 (integer) goto Label_140 Label_139: t144 := 1 goto Label_141 Label_140: t144 := 0 Label_141: *t143 := t144 ! MAIN EXIT... mainExit =======================================