#BUGFIX by Maren
class: Win32OperatingSystem class
changed: #terminateAllChildProcessesOf: (send #ifFalse: instead of #inform:)
typo
--- a/Win32OperatingSystem.st Wed May 08 15:04:54 2019 +0200
+++ b/Win32OperatingSystem.st Tue May 14 14:49:41 2019 +0200
@@ -1092,6 +1092,7 @@
"Modified: 7.1.1997 / 19:36:11 / stefan"
! !
+
!Win32OperatingSystem class methodsFor:'OS signal constants'!
sigABRT
@@ -7953,7 +7954,7 @@
[toDo notEmpty] whileTrue:[
someParentPid := toDo removeFirst.
(childrenPerPid at:someParentPid ifAbsent:#()) do:[:eachChildPid |
- (alreadyIncluded includes:eachChildPid) inform:[
+ (alreadyIncluded includes:eachChildPid) ifFalse:[
toTerminate addFirst:eachChildPid.
alreadyIncluded add:eachChildPid.
]
@@ -7963,6 +7964,8 @@
toTerminate do:[:eachPid |
self terminateProcess:eachPid
].
+
+ "Modified: / 14-05-2019 / 14:48:01 / Maren"
!
terminateProcess:processHandleOrPid