--- a/ProcessorScheduler.st	Mon Oct 29 17:05:17 2012 +0000
+++ b/ProcessorScheduler.st	Mon Oct 29 22:07:56 2012 +0000
@@ -434,6 +434,16 @@
     ^ KnownProcesses select:[:p | p notNil and:[p ~~ 0]]
 !
 
+knownProcessesDo:aBlock
+    "evaluate aBlock for each (living) processes in the system"
+
+    KnownProcesses do:[:p | 
+        (p notNil and:[p ~~ 0]) ifTrue:[aBlock value:p]
+    ]
+
+    "Created: / 26-10-2012 / 13:02:33 / cg"
+!
+
 maxNumberOfProcesses
     "return the limit on the number of processes;
      the default is nil (i.e. unlimited)."
@@ -3385,15 +3395,15 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.261 2012/07/20 16:36:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.262 2012/10/26 11:18:55 cg Exp $'
 !
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.261 2012/07/20 16:36:22 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.262 2012/10/26 11:18:55 cg Exp §'
 !
 
 version_SVN
-    ^ '$Id: ProcessorScheduler.st 10829 2012-07-25 08:45:15Z vranyj1 $'
+    ^ '$Id: ProcessorScheduler.st 10858 2012-10-29 22:07:56Z vranyj1 $'
 ! !
 
 ProcessorScheduler initialize!