A new version of Kernel was added to project The Inbox:
http://source.squeak.org/inbox/Kernel-ct.1251.mcz==================== Summary ====================
Name: Kernel-ct.1251
Author: ct
Time: 30 July 2019, 6:43:00.244625 pm
UUID: 86bd73cc-a91c-3644-82f4-3efa8777333d
Ancestors: Kernel-mt.1250
Convenience methods for exception handling
=============== Diff against Kernel-mt.1250 ===============
Item was added:
+ ----- Method: BlockClosure>>on:ensure: (in category 'exceptions') -----
+ on: exceptionOrExceptionSet ensure: aBlock
+
+ ^ self
+ on: exceptionOrExceptionSet
+ do: [:exception |
+ aBlock value.
+ exception pass]!
Item was added:
+ ----- Method: BlockClosure>>onInterruptEnsure: (in category 'exceptions') -----
+ onInterruptEnsure: aBlock
+ "Evaluate myself, evaluate aBlock if any error was thrown or the thread is going to be terminated"
+
+ | success result |
+ success := false.
+ [result := self value.
+ success := true]
+ ensure: [success ifFalse: aBlock].
+ ^ result!