--- 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"