--- 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