changeset 21669 | e4f126423851 |
parent 21667 | f77efdbadc44 |
child 21678 | f765433a638d |
--- a/Block.st Thu Mar 23 09:01:27 2017 +0100 +++ b/Block.st Fri Mar 24 09:34:19 2017 +0100 @@ -2418,6 +2418,20 @@ ifCurtailed:[ e := 1 ]. self assert:(e == 0). " + + + " + |e| + + e := 0. + [ + 1 foo + ] on:MessageNotUnderstood do:[:ex | 2 bla] + ifCurtailed:[ e := 1 ]. + self assert:(e == 0). + " + + "Modified (comment): / 23-03-2017 / 19:10:31 / stefan" ! on:anExceptionHandler do:exceptionBlock on:anExceptionHandler2 do:anExceptionBlock2