#FEATURE by exept
class: GenericException
added: #reRaise
changed: #doRaise
care for nil suspendedContext
--- a/GenericException.st Sat Sep 07 13:56:01 2019 +0200
+++ b/GenericException.st Sun Sep 08 00:20:30 2019 +0200
@@ -2150,7 +2150,9 @@
"is nil a valid originator? If so, we need an extra
instanceVariable to record the originator setting"
originator isNil ifTrue:[
- originator := suspendedContext homeReceiver
+ suspendedContext notNil ifTrue:[
+ originator := suspendedContext homeReceiver
+ ].
].
signal isNil ifTrue:[
@@ -2494,6 +2496,17 @@
^ self doRaise
"Created: / 10-08-2010 / 09:50:54 / cg"
+!
+
+reRaise
+ "reraise a previously caught exception (on the current context)"
+
+ <context: #return>
+
+ ^ self doRaise
+
+
+
! !
!GenericException methodsFor:'setup'!