--- a/RegressionTests__FileStreamTest.st	Tue Jan 10 19:25:48 2012 +0100
+++ b/RegressionTests__FileStreamTest.st	Tue Jan 10 19:28:54 2012 +0100
@@ -196,21 +196,26 @@
     "read a file - check count read with files size.
      Do this in 20 threads"
 
-    |sz|
+    |sz verbose|
+
+    verbose := false.
 
     self createTestFile.
 
     sz := 'testFile' asFilename fileSize.
 
     20 timesRepeat:[
-        [self readFileExpecting:sz. 'done' printCR.] fork.
+        [
+            self readFileExpecting:sz. 
+            verbose ifTrue:[ 'done' printCR ].
+        ] fork.
     ].
 
     "
      self new testRead2
     "
 
-    "Modified: / 12.8.1998 / 13:30:55 / cg"
+    "Modified: / 10-01-2012 / 19:28:45 / cg"
 !
 
 testRead3