equal
deleted
inserted
replaced
143 |
143 |
144 "Created: / 31.10.2000 / 20:21:52 / cg" |
144 "Created: / 31.10.2000 / 20:21:52 / cg" |
145 ! |
145 ! |
146 |
146 |
147 alwaysTrue |
147 alwaysTrue |
148 ^ true.! |
148 ^ true. |
|
149 ! |
149 |
150 |
150 doConstantIntegerShift |
151 doConstantIntegerShift |
151 "arithmetic tests. |
152 "arithmetic tests. |
152 Notice, the arithmetic tests are both performed via regular sends |
153 Notice, the arithmetic tests are both performed via regular sends |
153 and via constructed performs. The reason is to test both inlined |
154 and via constructed performs. The reason is to test both inlined |
163 " |
164 " |
164 self testIntegerShifts3 |
165 self testIntegerShifts3 |
165 " |
166 " |
166 |
167 |
167 "Created: / 6.6.1999 / 14:47:51 / cg" |
168 "Created: / 6.6.1999 / 14:47:51 / cg" |
168 "Modified: / 9.6.1999 / 17:49:57 / cg"! |
169 "Modified: / 9.6.1999 / 17:49:57 / cg" |
|
170 ! |
169 |
171 |
170 flagsSlot |
172 flagsSlot |
171 "arithmetic tests. |
173 "arithmetic tests. |
172 Notice, the arithmetic tests are both performed via regular sends |
174 Notice, the arithmetic tests are both performed via regular sends |
173 and via constructed performs. The reason is to test both inlined |
175 and via constructed performs. The reason is to test both inlined |
178 " |
180 " |
179 self testIntegerShifts3 |
181 self testIntegerShifts3 |
180 " |
182 " |
181 |
183 |
182 "Created: / 6.6.1999 / 14:47:51 / cg" |
184 "Created: / 6.6.1999 / 14:47:51 / cg" |
183 "Modified: / 9.6.1999 / 17:49:57 / cg"! |
185 "Modified: / 9.6.1999 / 17:49:57 / cg" |
|
186 ! |
184 |
187 |
185 num_00000000000007FFF |
188 num_00000000000007FFF |
186 ^ 16r00000000000007FFF |
189 ^ 16r00000000000007FFF |
187 |
190 |
188 "Modified: / 4.6.1999 / 15:29:31 / cg" |
191 "Modified: / 4.6.1999 / 15:29:31 / cg" |
942 |
945 |
943 self test:[ self doConstantIntegerShift == 1]. |
946 self test:[ self doConstantIntegerShift == 1]. |
944 |
947 |
945 " |
948 " |
946 self testIntegerShifts3 |
949 self testIntegerShifts3 |
947 "! |
950 " |
|
951 ! |
948 |
952 |
949 testLargeAddition |
953 testLargeAddition |
950 "general conversion & arithmetic tests. |
954 "general conversion & arithmetic tests. |
951 Notice, the arithmetic tests are both performed via regular sends |
955 Notice, the arithmetic tests are both performed via regular sends |
952 and via constructed performs. The reason is to test both inlined |
956 and via constructed performs. The reason is to test both inlined |