The Inbox: Tests-jar.464.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Inbox: Tests-jar.464.mcz

commits-2
A new version of Tests was added to project The Inbox:
http://source.squeak.org/inbox/Tests-jar.464.mcz

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

Name: Tests-jar.464
Author: jar
Time: 15 May 2021, 5:01:13.98097 pm
UUID: aa197ba6-106c-1a42-84d4-31d65052037f
Ancestors: Tests-jar.463

complement Kernel-jar.1407 - implement re-signallig an already existing exception

=============== Diff against Tests-jar.463 ===============

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

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

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

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

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

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

Item was added:
+ ----- Method: ExceptionTester>>simpleResignalVsOuter1Test (in category 'signaledException tests') -----
+ simpleResignalVsOuter1Test
+
+ [self doSomething.
+ MyTestNotification signal.
+ self doSomethingExceptional]
+ on: MyTestNotification
+ do: [:ex1 |
+ [ex1 signal. self doSomethingExceptional] "re-signal started searching for its handler here"
+ on: MyTestNotification "re-signal found and used this handler"
+ do: [:ex2 | self doYetAnotherThing].
+ self doSomethingElse]!

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

Item was added:
+ ----- Method: ExceptionTester>>simpleResignalVsOuter2Test (in category 'signaledException tests') -----
+ simpleResignalVsOuter2Test
+
+ [self doSomething.
+ MyTestNotification signal.
+ self doSomethingExceptional]
+ on: MyTestNotification
+ do: [:ex1 |
+ [ex1 outer. self doYetAnotherThing] "#outer reached its default handler and resumed"
+ on: MyTestNotification "this handler is out of #outer's search scope"
+ do: [:ex2 | self doSomethingExceptional].
+ self doSomethingElse]!

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

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

Item was changed:
  ----- Method: ExceptionTests>>testSimpleResignalDoubleResume (in category 'tests - ExceptionTester') -----
  testSimpleResignalDoubleResume
  self assertSuccess: (ExceptionTester new runTest: #simpleResignalDoubleResumeTest ) !

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

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

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