A new version of KernelTests was added to project The Inbox:
http://source.squeak.org/inbox/KernelTests-jar.395.mcz==================== Summary ====================
Name: KernelTests-jar.395
Author: jar
Time: 31 March 2021, 11:14:30.909212 pm
UUID: b63793d5-9635-c942-a9c5-132e788a8eda
Ancestors: KernelTests-mt.394
complementing Kernel-jar.1384 (The Inbox)
=============== Diff against KernelTests-mt.394 ===============
Item was added:
+ ----- Method: ProcessTest>>testNestedUnwind (in category 'tests') -----
+ testNestedUnwind
+ "Test all nested unwind blocks are correctly unwound; all unwind blocks halfway through their execution should be completed or at least attempted to complete, not only the innermost one"
+
+ | p x1 x2 x3 |
+ x1 := x2 := x3 := false.
+ p :=
+ [
+ [
+ [ ] ensure: [ "halfway through completion when suspended"
+ [ ] ensure: [ "halfway through completion when suspended"
+ Processor activeProcess suspend.
+ x1 := true].
+ x2 := true]
+ ] ensure: [ "not started yet when suspended"
+ x3 := true]
+ ] fork.
+ Processor yield.
+ p terminate.
+
+ self assert: x1 & x2 & x3!