equal
deleted
inserted
replaced
171 |
171 |
172 !GenericException class methodsFor:'initialization'! |
172 !GenericException class methodsFor:'initialization'! |
173 |
173 |
174 initialize |
174 initialize |
175 NotifierString := 'unknown exception'. |
175 NotifierString := 'unknown exception'. |
176 StrictRaising := false. "set to true to check weather a signal may be raised proceedable" |
176 StrictRaising := false. "set to true to check whether a signal may be raised proceedable" |
177 |
177 |
178 "Modified: / 04-08-1999 / 09:06:26 / stefan" |
178 "Modified: / 04-08-1999 / 09:06:26 / stefan" |
179 "Modified: / 17-11-2010 / 17:53:13 / cg" |
179 "Modified: / 17-11-2010 / 17:53:13 / cg" |
180 ! ! |
180 ! ! |
181 |
181 |
198 "Created: / 23.7.1999 / 13:45:49 / stefan" |
198 "Created: / 23.7.1999 / 13:45:49 / stefan" |
199 "Modified: / 24.7.1999 / 13:21:25 / stefan" |
199 "Modified: / 24.7.1999 / 13:21:25 / stefan" |
200 ! ! |
200 ! ! |
201 |
201 |
202 |
202 |
203 !GenericException class methodsFor:'Compatibility-Dolphin'! |
|
204 |
|
205 signal:messageText |
|
206 "raise a signal proceedable or nonproceedable (whichever is right). |
|
207 The argument is used as messageText." |
|
208 |
|
209 <context: #return> |
|
210 |
|
211 ^ (self newException |
|
212 suspendedContext:thisContext sender |
|
213 errorString:messageText) |
|
214 raiseSignal. |
|
215 |
|
216 "Modified: / 10-08-2010 / 09:41:56 / cg" |
|
217 ! ! |
|
218 |
203 |
219 !GenericException class methodsFor:'Compatibility-Squeak'! |
204 !GenericException class methodsFor:'Compatibility-Squeak'! |
220 |
205 |
221 signal |
206 signal |
222 "raise a signal proceedable or nonproceedable (whichever is right). |
207 "raise a signal proceedable or nonproceedable (whichever is right). |
2322 ! ! |
2307 ! ! |
2323 |
2308 |
2324 !GenericException class methodsFor:'documentation'! |
2309 !GenericException class methodsFor:'documentation'! |
2325 |
2310 |
2326 version |
2311 version |
2327 ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.134 2013-03-26 14:20:21 cg Exp $' |
2312 ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.136 2013-04-17 18:22:11 cg Exp $' |
2328 ! |
2313 ! |
2329 |
2314 |
2330 version_CVS |
2315 version_CVS |
2331 ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.134 2013-03-26 14:20:21 cg Exp $' |
2316 ^ '$Header: /cvs/stx/stx/libbasic/GenericException.st,v 1.136 2013-04-17 18:22:11 cg Exp $' |
2332 ! ! |
2317 ! ! |
2333 |
2318 |
2334 |
2319 |
2335 GenericException initialize! |
2320 GenericException initialize! |