TestCase.st
changeset 758 b61a3defd6c7
parent 755 b62e3bf07b81
child 763 5e18fecc685b
--- a/TestCase.st	Wed Jul 31 17:46:47 2019 +0200
+++ b/TestCase.st	Fri Aug 16 16:29:33 2019 +0200
@@ -1126,7 +1126,12 @@
 
     [
         didSetup := false.
-        self setUp.
+        Error handle:[:ex |
+            Transcript showCR:'error in setup: ',ex description.
+            ex reject.
+        ] do:[
+            self setUp.
+        ].
         didSetup := true.
         self performTest.
     ] ensure: [