Eliot Miranda uploaded a new version of KernelTests to project The Trunk: http://source.squeak.org/trunk/KernelTests-ct.389.mcz
==================== Summary ====================
Name: KernelTests-ct.389 Author: ct Time: 1 November 2020, 7:54:42.403428 pm UUID: 7c294d2e-59a7-9746-b613-997d1aa4521c Ancestors: KernelTests-ul.386
Extend tests for Context #runSimulated:. Depends on Kernel-ct.1359.
=============== Diff against KernelTests-ul.386 ===============
Item was added: + ----- Method: BlockClosureTest>>return: (in category 'private') ----- + return: something + + ^ something!
Item was changed: ----- Method: BlockClosureTest>>testRunSimulated (in category 'tests') ----- testRunSimulated + self assert: Rectangle equals: + (Context runSimulated: aBlockClosure asContext) class. + self assert: 42 equals: + (Context runSimulated: [self return: 42]). + self + should: [Context runSimulated: [self halt]] + raise: Halt.! - self assert: Rectangle equals: (Context runSimulated: aBlockClosure asContext) class!
Item was added: + ----- Method: BlockClosureTest>>testRunSimulatedContextAtEachStep (in category 'tests') ----- + testRunSimulatedContextAtEachStep + + | context | + context := aBlockClosure asContext. + self assert: Rectangle equals: (thisContext + runSimulated: context + contextAtEachStep: [:ctxt | self assert: + [ctxt == context or: [ctxt hasSender: context]]]) class.!