--- a/RegressionTests__ExceptionTest.st	Tue May 28 14:26:53 2013 +0200
+++ b/RegressionTests__ExceptionTest.st	Wed May 29 01:54:26 2013 +0200
@@ -141,7 +141,7 @@
     zero := 0.
 
     trace := OrderedCollection new.
-    self should:[
+    self shouldnt:[
         Error handle:[:ex |
             trace add:5.
         ] do:[
@@ -157,7 +157,7 @@
         ].
     ] raise:Error.
 
-    self assert:(trace asArray = #(1 5 3)).
+    self assert:(trace asArray = #(1 5 3 5)).
 !
 
 test08_error_in_unwind2
@@ -188,7 +188,7 @@
         ].
     ] raise:Error.
 
-    self assert:(trace asArray = #(1 5 3 6)).
+    self assert:(trace asArray = #(1 5 3 5)).
 
 
     "Created: / 24-08-2011 / 14:02:01 / cg"