--- a/Process.st Mon Aug 24 16:36:04 1998 +0200
+++ b/Process.st Mon Aug 24 18:30:10 1998 +0200
@@ -1384,6 +1384,11 @@
wasBlocked := OperatingSystem blockInterrupts.
[
+ state == #osWait ifTrue:[
+ self terminateNoSignal.
+ ^ self.
+ ].
+
self suspendedContext isNil ifTrue:[
self terminateNoSignal.
^ self
@@ -1417,7 +1422,7 @@
self terminateNoSignal.
]
- "Modified: 10.10.1997 / 12:06:42 / cg"
+ "Modified: / 24.8.1998 / 18:29:46 / cg"
!
terminateAllSubprocesses
@@ -1510,6 +1515,6 @@
!Process class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.92 1998-08-03 20:57:47 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.93 1998-08-24 16:30:10 cg Exp $'
! !
Process initialize!