--- a/reports/Builder__TestReport.st	Fri Jun 06 10:29:34 2014 +0200
+++ b/reports/Builder__TestReport.st	Fri Jun 06 10:36:27 2014 +0200
@@ -271,46 +271,46 @@
 
     outcome result: (TestResult stateError).
     format writeTestCase: testcase outcome: outcome time: time exception: exception.
-    Transcript show:'ERROR'.
+    Transcript show:'...ERROR'.
     self errorOutcomes add:outcome.      
     nerror := nerror + 1.
 
     "Created: / 03-08-2011 / 15:00:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 06-06-2014 / 01:00:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-06-2014 / 09:34:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 addFailure: testcase detail: exception
 
     outcome result: (TestResult stateFail).
     format writeTestCase: testcase outcome: outcome time: time exception: exception.
-    Transcript show:'FAILED'.
+    Transcript show:'...FAILED'.
     self failureOutcomes add: outcome.
     nfailed := nfailed + 1.
 
     "Created: / 03-08-2011 / 15:00:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 06-06-2014 / 01:00:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-06-2014 / 09:34:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 addPass: testcase
 
     outcome result: TestResult statePass.
     format writeTestCase: testcase outcome: outcome time: time exception: nil.
-    Transcript show:'OK'.
+    Transcript show:'...OK'.
     npassed := npassed + 1.
 
     "Created: / 03-08-2011 / 15:19:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 06-06-2014 / 01:00:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-06-2014 / 09:34:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 addSkipped: testcase
 
     outcome result: TestResult stateSkip.
     format writeTestCase: testcase outcome: outcome time: time exception: nil.
-    Transcript show:'SKIPPED'.
+    Transcript show:'...SKIPPED'.
     nskipped := nskipped + 1.
 
     "Created: / 21-11-2012 / 15:35:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 06-06-2014 / 00:59:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-06-2014 / 09:34:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !TestReport::Result methodsFor:'initialization'!
@@ -419,7 +419,7 @@
 lightForkCase:aTestCase debugged: debugged timeout: timeout
     | thread sema stime etime timeouted error stack log logPos |
 
-    Transcript show:'forking...'.
+    Transcript show:'F'.
     sema := Semaphore new.
     stime := OperatingSystem getMillisecondTime.
     log := false.
@@ -430,13 +430,13 @@
     thread name: ('Testcase execution thread (%1)' bindWith: aTestCase).
     thread resume.
 
-    Transcript show: 'waiting for child...'.
+    Transcript show: 'W'.
     (sema waitWithTimeout:timeout) isNil ifTrue: [
-        Transcript show: 'timeout...'.
+        Transcript show: 'T'.
         stack := String streamContents:[:s |  ReportRunner dumpProcessesOn:s ].
         thread terminate.
         timeouted := true.
-        Transcript show: 'killed...'.
+        Transcript show: 'K'.
     ].
 
     etime := OperatingSystem getMillisecondTime.
@@ -448,14 +448,14 @@
                      time: etime - stime
                 exception: error
                stacktrace: stack.
-         Transcript show:'ERROR'
+         Transcript show:'...ERROR'
     ].
 
     outcome := nil.
     Transcript cr.
 
     "Created: / 12-01-2012 / 17:42:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 06-06-2014 / 09:19:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 06-06-2014 / 09:33:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 unixForkCase:aTestCase debugged: debugged timeout: timeout