equal
deleted
inserted
replaced
176 "false->0; true->1" |
176 "false->0; true->1" |
177 |
177 |
178 ^ 1 |
178 ^ 1 |
179 ! ! |
179 ! ! |
180 |
180 |
|
181 !True methodsFor:'debugging'! |
|
182 |
|
183 haltIfFalse |
|
184 "halt if the receiver is false" |
|
185 |
|
186 <resource: #skipInDebuggersWalkBack> |
|
187 |
|
188 ^ self |
|
189 |
|
190 " |
|
191 3 haltIfNil |
|
192 nil haltIfNil |
|
193 " |
|
194 |
|
195 "Created: / 17-07-2017 / 17:42:56 / cg" |
|
196 ! |
|
197 |
|
198 haltIfTrue |
|
199 "halt if the receiver is true" |
|
200 |
|
201 <resource: #skipInDebuggersWalkBack> |
|
202 |
|
203 self halt |
|
204 |
|
205 " |
|
206 3 haltIfNil |
|
207 nil haltIfNil |
|
208 |
|
209 true haltIfTrue |
|
210 false haltIfFalse |
|
211 " |
|
212 |
|
213 "Created: / 17-07-2017 / 17:43:32 / cg" |
|
214 ! ! |
|
215 |
181 !True methodsFor:'logical operations'! |
216 !True methodsFor:'logical operations'! |
182 |
217 |
183 & aBoolean |
218 & aBoolean |
184 "return true if both the receiver and the argument are true |
219 "return true if both the receiver and the argument are true |
185 (since the receiver is true, return the argument, aBoolen) |
220 (since the receiver is true, return the argument, aBoolen) |