--- a/ProcessorScheduler.st Tue Sep 07 16:45:29 2004 +0200
+++ b/ProcessorScheduler.st Tue Sep 07 16:51:43 2004 +0200
@@ -811,20 +811,20 @@
dispatchAction := [self dispatch].
handlerAction := [:ex |
- ('Processor [info]: ignored signal (', ex signal printString, ')') infoPrintCR.
- ex return
- ].
+ ('Processor [info]: ignored signal (', ex signal printString, ')') infoPrintCR.
+ ex return
+ ].
ignoredSignals := SignalSet
- with:TerminateProcessRequest
- with:AbortSignal.
+ with:TerminateProcessRequest
+ with:AbortOperationRequest.
"/
"/ I made this an extra call to dispatch; this allows recompilation
"/ of the dispatch-handling code in the running system.
"/
[dispatching] whileTrue:[
- ignoredSignals handle:handlerAction do:dispatchAction
+ ignoredSignals handle:handlerAction do:dispatchAction
].
"/ we arrive here in standalone Apps,
@@ -3318,7 +3318,7 @@
!ProcessorScheduler class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.223 2004-08-31 14:25:27 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.224 2004-09-07 14:51:43 stefan Exp $'
! !
ProcessorScheduler initialize!