--- a/RegressionTests__DelayTest.st	Wed Oct 24 16:18:57 2012 +0200
+++ b/RegressionTests__DelayTest.st	Wed Oct 24 18:19:11 2012 +0200
@@ -40,15 +40,15 @@
         ]
     ] forkAt:(Processor activePriority - 1).
 
-    self assert:(n == nil).
+    self assert:(n == nil).     "because the process has lower prio and should not run"
 
-    Delay waitForSeconds:0.1.
+    Delay waitForSeconds:0.05.
 
-    self assert:(n == 0).
+    self assert:(n == 0).       "because I should have interrupted the process"
 
     Delay waitForSeconds:1.5.
 
-    self assert:(n == 10).
+    self assert:(n == 10).      "because process should be complete now"
 
     "
      self basicNew test1