Block.st
changeset 23432 2aa324c941dd
parent 23040 e1ee1b6f7e66
child 23688 287442aafcd9
--- a/Block.st	Fri Oct 12 18:13:48 2018 +0200
+++ b/Block.st	Fri Oct 12 20:00:15 2018 +0200
@@ -389,6 +389,7 @@
 ! !
 
 
+
 !Block methodsFor:'Compatibility-ANSI'!
 
 argumentCount
@@ -669,6 +670,7 @@
 ! !
 
 
+
 !Block methodsFor:'accessing'!
 
 home
@@ -2317,6 +2319,16 @@
     "
 
     "
+     [
+        1 foo
+     ] on:MessageNotUnderstood do:[:ex | 
+        ^ self
+     ] ensure:[ 
+        Transcript showCR:'ensure ensured'
+     ].
+    "
+
+    "
      |e|
 
      e := 0.