avoid a delegating send in handler-return action.
--- a/Exception.st Sat Jul 31 16:33:42 1999 +0200
+++ b/Exception.st Sat Jul 31 16:34:56 1999 +0200
@@ -1479,7 +1479,7 @@
con := handlerContext.
resumeBlock := rejectBlock := handlerContext := suspendedContext := nil.
- con unwind
+ con unwind:nil
"Modified: 27.3.1997 / 16:46:39 / cg"
!
@@ -1901,6 +1901,6 @@
!Exception class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Exception.st,v 1.74 1999-07-31 13:54:48 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Exception.st,v 1.75 1999-07-31 14:34:56 cg Exp $'
! !
Exception initialize!