Process.st
changeset 8495 54d0be6dd343
parent 8354 29521306c01f
child 8544 732ed0a3d7ca
--- a/Process.st	Mon Aug 30 17:48:45 2004 +0200
+++ b/Process.st	Mon Aug 30 17:49:25 2004 +0200
@@ -1695,26 +1695,26 @@
 
         "/ register an interrupt action and resume that process.
         self interruptWith:[
-            Signal noHandlerSignal handle:[:ex |
-                ex parameter signal == TerminateSignal ifTrue:[
+            NoHandlerError handle:[:ex |
+                ex parameter signal == TerminateProcessRequest ifTrue:[
                     ex return.
                 ].
                 ex reject.
             ] do:[
-                TerminateSignal raise.
+                TerminateProcessRequest raise.
             ].
             self terminateNoSignal.
         ].
     ] ifFalse:[
         "/ terminating myself
 
-        Signal noHandlerSignal handle:[:ex |
-            ex parameter signal == TerminateSignal ifTrue:[
+        NoHandlerError handle:[:ex |
+            ex parameter signal == TerminateProcessRequest ifTrue:[
                 ex return.
             ].
             ex reject.
         ] do:[
-            TerminateSignal raise.
+            TerminateProcessRequest raise.
         ].
         self terminateNoSignal.
     ]
@@ -1971,7 +1971,7 @@
 !Process class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.144 2004-05-13 18:48:49 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Process.st,v 1.145 2004-08-30 15:49:25 stefan Exp $'
 ! !
 
 Process initialize!