Nicolas Cellier uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-nice.460.mcz

==================== Summary ====================

Name: Tests-nice.460
Author: nice
Time: 30 April 2021, 9:36:50.260749 pm
UUID: 2996ccbb-9955-4399-ace4-4a61c14fc0d0
Ancestors: Tests-nice.459

Integrate test from Jaromir showing the expected behavior of outer. Thanks Jaromir.

See
https://source.squeak.org/treated/Tests-jar.454.diff
https://source.squeak.org/treated/Tests-jar.455.diff
https://source.squeak.org/treated/Tests-jar.456.diff

=============== Diff against Tests-nice.459 ===============

Item was added:
+ ----- Method: ExceptionTester>>doubleOuterTestResults (in category 'signaledException results') -----
+ doubleOuterTestResults
+ 
+ 	^OrderedCollection new
+ 		add: self doSomethingString;
+ 		add: self doYetAnotherThingString;
+ 		add: self doSomethingElseString;
+ 		yourself!

Item was added:
+ ----- Method: ExceptionTester>>simpleOuterDefaultReturnTest (in category 'signaledException tests') -----
+ simpleOuterDefaultReturnTest
+ 	"uses #resume"
+ 
+ 	[[self doSomething.
+ 	MyTestNotification signal.
+ 	"self doSomethingElse"
+ 	self doSomethingExceptional]
+ 		on: MyTestNotification
+ 		do: [:ex | ex outer]. self doSomethingElse]
+ 				on: MyTestNotification
+ 				do: [:ex | self doYetAnotherThing. ex resume]!

Item was added:
+ ----- Method: ExceptionTester>>simpleOuterDefaultReturnTestResults (in category 'signaledException results') -----
+ simpleOuterDefaultReturnTestResults
+ 
+ 	^OrderedCollection new
+ 		add: self doSomethingString;
+ 		add: self doYetAnotherThingString;
+ 		add: self doSomethingElseString;
+ 		yourself!

Item was added:
+ ----- Method: ExceptionTester>>simpleOuterReturnTest (in category 'signaledException tests') -----
+ simpleOuterReturnTest
+ 	"uses #resume"
+ 
+ 	[[self doSomething.
+ 	MyTestNotification signal.
+ 	"self doSomethingElse"
+ 	self doSomethingExceptional]
+ 		on: MyTestNotification
+ 		do: [:ex | ex outer. ex return]. self doSomethingElse]
+ 				on: MyTestNotification
+ 				do: [:ex | self doYetAnotherThing. ex resume]!

Item was added:
+ ----- Method: ExceptionTester>>simpleOuterReturnTestResults (in category 'signaledException results') -----
+ simpleOuterReturnTestResults
+ 
+ 	^OrderedCollection new
+ 		add: self doSomethingString;
+ 		add: self doYetAnotherThingString;
+ 		add: self doSomethingElseString;
+ 		yourself!

Item was added:
+ ----- Method: ExceptionTests>>testDoubleOuterDoubleResumeTest (in category 'tests - ExceptionTester') -----
+ testDoubleOuterDoubleResumeTest
+ 
+ 	| path |
+ 	path := ''.
+ 	[path := path, '1'.
+ 		[path := path, '2'.
+ 			[1/0] on: ZeroDivide do: [:ex | ex outer. path := path, '5'. ex return]. 
+ 			path := path, '6'
+ 		] on: ZeroDivide do: [:ex | ex outer. path := path, '4'. ex resume].
+ 		path := path, '7'
+ 	] on: ZeroDivide do: [:ex | path := path, '3'. ex resume].
+ 	self assert: path = '1234567'!

Item was added:
+ ----- Method: ExceptionTests>>testDoubleOuterTest (in category 'tests - ExceptionTester') -----
+ testDoubleOuterTest
+ 	self assertSuccess: (ExceptionTester new runTest: #doubleOuterTest ) !

Item was added:
+ ----- Method: ExceptionTests>>testSimpleOuterReturn (in category 'tests - ExceptionTester') -----
+ testSimpleOuterReturn
+ 	self assertSuccess: (ExceptionTester new runTest: #simpleOuterReturnTest ) !