equal
deleted
inserted
replaced
283 |
283 |
284 newException |
284 newException |
285 "{ Pragma: +inlineNew }" |
285 "{ Pragma: +inlineNew }" |
286 "answer a new exception object for this signal" |
286 "answer a new exception object for this signal" |
287 |
287 |
288 ^ Notification basicNew setSignal:self. |
288 ^ Query basicNew setSignal:self. |
289 |
289 |
290 " |
290 " |
291 |querySignal| |
291 |querySignal| |
292 querySignal := QuerySignal new. |
292 querySignal := QuerySignal new. |
293 querySignal handle:[:ex| self halt] do:[querySignal raiseRequest]. |
293 querySignal handle:[:ex| self halt] do:[querySignal raiseRequest]. |
498 ! ! |
498 ! ! |
499 |
499 |
500 !QuerySignal class methodsFor:'documentation'! |
500 !QuerySignal class methodsFor:'documentation'! |
501 |
501 |
502 version |
502 version |
503 ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.41 2005-01-24 12:29:58 stefan Exp $' |
503 ^ '$Header: /cvs/stx/stx/libbasic/QuerySignal.st,v 1.42 2005-01-25 07:59:23 stefan Exp $' |
504 ! ! |
504 ! ! |