diff -r d17d7a5d19f2 -r dbf69a604f15 quickSelfTest/SelfTest.st
--- a/quickSelfTest/SelfTest.st	Mon Aug 01 09:39:59 2011 +0200
+++ b/quickSelfTest/SelfTest.st	Mon Aug 01 09:46:36 2011 +0200
@@ -44,7 +44,7 @@
 suite addTest:(RegressionTests::EnumerationTests suite).
 suite addTest:(RegressionTests::ExceptionTest suite).
 
-result := suite run.
+result := suite runBeforeEachDo:[:test | Stdout << ('running ',test printString). Stdout cr ].
 TestResultReporter report:result format:#xml_perfPublisher as:'testresult.xml'.
 
 "/Autoload allSubclassesDo:[:cls |