[Pkg] The Trunk: SystemChangeNotification-Tests-fn.27.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Feb 26 13:06:34 UTC 2018


Fabio Niephaus uploaded a new version of SystemChangeNotification-Tests to project The Trunk:
http://source.squeak.org/trunk/SystemChangeNotification-Tests-fn.27.mcz

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

Name: SystemChangeNotification-Tests-fn.27
Author: fn
Time: 26 February 2018, 2:06:31.146356 pm
UUID: e7f994ba-43f9-4288-8a7f-cbab1f93d380
Ancestors: SystemChangeNotification-Tests-pre.26

Rename SystemChangeErrorHandling to SystemChangeErrorHandlingTest. SystemChangeErrorHandlingTest was there before, but empty. I'm assuming something went wrong when someone wanted to rename the class.

===  text below is ignored ===
Ancestors: SystemChangeNotification-Tests-pre.26

SystemChangeNotification-Tests-pre.26:
	Fixes a test case for the system change notifications.


D	SystemChangeErrorHandling
D	SystemChangeErrorHandling>>handleEventWithError:
D	SystemChangeErrorHandling>>handleEventWithHalt:
D	SystemChangeErrorHandling>>setUp
D	SystemChangeErrorHandling>>storeEvent1:
D	SystemChangeErrorHandling>>storeEvent2:
D	SystemChangeErrorHandling>>storeEvent3:
D	SystemChangeErrorHandling>>tearDown
D	SystemChangeErrorHandling>>testErrorOperation
D	SystemChangeErrorHandling>>testHaltOperation
D	SystemChangeErrorHandling>>testUnhandledEventOperation
M	SystemChangeErrorHandlingTest
A	SystemChangeErrorHandlingTest>>handleEventWithError:
A	SystemChangeErrorHandlingTest>>handleEventWithHalt:
A	SystemChangeErrorHandlingTest>>setUp
A	SystemChangeErrorHandlingTest>>storeEvent1:
A	SystemChangeErrorHandlingTest>>storeEvent2:
A	SystemChangeErrorHandlingTest>>storeEvent3:
A	SystemChangeErrorHandlingTest>>tearDown
A	SystemChangeErrorHandlingTest>>testErrorOperation
A	SystemChangeErrorHandlingTest>>testHaltOperation
A	SystemChangeErrorHandlingTest>>testUnhandledEventOperation

=============== Diff against SystemChangeNotification-Tests-pre.26 ===============

Item was removed:
- SystemChangeTestRoot subclass: #SystemChangeErrorHandling
- 	instanceVariableNames: 'capturedEvents'
- 	classVariableNames: ''
- 	poolDictionaries: ''
- 	category: 'SystemChangeNotification-Tests'!
- 
- !SystemChangeErrorHandling commentStamp: 'bp 12/4/2009 10:37' prior: 0!
- This class tests the error handing of the notification mechanism to ensure that one client that receives a system change cannot lock up the complete system.!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>handleEventWithError: (in category 'Event Notifications') -----
- handleEventWithError: event
- 
- 	self error: 'Example of event handling code that throws an error.'!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>handleEventWithHalt: (in category 'Event Notifications') -----
- handleEventWithHalt: event
- 
- 	self halt: 'Example of event handling code that contains a halt.'!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>setUp (in category 'Running') -----
- setUp
- 
- 	super setUp.
- 	capturedEvents := OrderedCollection new!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>storeEvent1: (in category 'Event Notifications') -----
- storeEvent1: anEvent
- 
- 	capturedEvents add: anEvent!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>storeEvent2: (in category 'Event Notifications') -----
- storeEvent2: anEvent
- 
- 	capturedEvents add: anEvent!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>storeEvent3: (in category 'Event Notifications') -----
- storeEvent3: anEvent
- 
- 	capturedEvents add: anEvent!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>tearDown (in category 'Running') -----
- tearDown
- 
- 	capturedEvents := nil.
- 	super tearDown!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>testErrorOperation (in category 'Testing') -----
- testErrorOperation
- 
- 	| notifier wasCaptured |
- 	notifier := self systemChangeNotifier.
- 	wasCaptured := false.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent1:.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent2:.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #handleEventWithError:.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent3:.
- 	[notifier classAdded: self class inCategory: #FooCat] on: Error do: [:exc |
- 		wasCaptured := true.
- 		self assert: (capturedEvents size = 3)].
- 	self assert: wasCaptured.!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>testHaltOperation (in category 'Testing') -----
- testHaltOperation
- 	
- 	| notifier wasCaptured |
- 	notifier := self systemChangeNotifier.
- 	wasCaptured := false.
- 	notifier notify: self ofAllSystemChangesUsing: #storeEvent1:.
- 	notifier notify: self ofAllSystemChangesUsing: #storeEvent2:.
- 	notifier notify: self ofAllSystemChangesUsing: #handleEventWithHalt:.
- 	notifier notify: self ofAllSystemChangesUsing: #storeEvent3:.
- 	[notifier classAdded: self class inCategory: #FooCat] on: Halt do: [:exc |
- 		wasCaptured := true.
- 		self assert: (capturedEvents size = 3)].
- 	self assert: wasCaptured.!

Item was removed:
- ----- Method: SystemChangeErrorHandling>>testUnhandledEventOperation (in category 'Testing') -----
- testUnhandledEventOperation
- 
- 	| notifier wasCaptured |
- 	notifier := self systemChangeNotifier.
- 	wasCaptured := false.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent1:.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent2:.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #zork:.
- 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent3:.
- 	[notifier classAdded: self class inCategory: #FooCat] on: MessageNotUnderstood do: [:exc |
- 		wasCaptured := true.
- 		self assert: (capturedEvents size = 3)].
- 	self assert: wasCaptured.!

Item was changed:
  SystemChangeTestRoot subclass: #SystemChangeErrorHandlingTest
  	instanceVariableNames: 'capturedEvents'
  	classVariableNames: ''
  	poolDictionaries: ''
  	category: 'SystemChangeNotification-Tests'!
+ 
+ !SystemChangeErrorHandlingTest commentStamp: 'bp 12/4/2009 10:37' prior: 0!
+ This class tests the error handing of the notification mechanism to ensure that one client that receives a system change cannot lock up the complete system.!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>handleEventWithError: (in category 'Event Notifications') -----
+ handleEventWithError: event
+ 
+ 	self error: 'Example of event handling code that throws an error.'!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>handleEventWithHalt: (in category 'Event Notifications') -----
+ handleEventWithHalt: event
+ 
+ 	self halt: 'Example of event handling code that contains a halt.'!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>setUp (in category 'Running') -----
+ setUp
+ 
+ 	super setUp.
+ 	capturedEvents := OrderedCollection new!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>storeEvent1: (in category 'Event Notifications') -----
+ storeEvent1: anEvent
+ 
+ 	capturedEvents add: anEvent!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>storeEvent2: (in category 'Event Notifications') -----
+ storeEvent2: anEvent
+ 
+ 	capturedEvents add: anEvent!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>storeEvent3: (in category 'Event Notifications') -----
+ storeEvent3: anEvent
+ 
+ 	capturedEvents add: anEvent!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>tearDown (in category 'Running') -----
+ tearDown
+ 
+ 	capturedEvents := nil.
+ 	super tearDown!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>testErrorOperation (in category 'Testing') -----
+ testErrorOperation
+ 
+ 	| notifier wasCaptured |
+ 	notifier := self systemChangeNotifier.
+ 	wasCaptured := false.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent1:.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent2:.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #handleEventWithError:.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent3:.
+ 	[notifier classAdded: self class inCategory: #FooCat] on: Error do: [:exc |
+ 		wasCaptured := true.
+ 		self assert: (capturedEvents size = 3)].
+ 	self assert: wasCaptured.!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>testHaltOperation (in category 'Testing') -----
+ testHaltOperation
+ 	
+ 	| notifier wasCaptured |
+ 	notifier := self systemChangeNotifier.
+ 	wasCaptured := false.
+ 	notifier notify: self ofAllSystemChangesUsing: #storeEvent1:.
+ 	notifier notify: self ofAllSystemChangesUsing: #storeEvent2:.
+ 	notifier notify: self ofAllSystemChangesUsing: #handleEventWithHalt:.
+ 	notifier notify: self ofAllSystemChangesUsing: #storeEvent3:.
+ 	[notifier classAdded: self class inCategory: #FooCat] on: Halt do: [:exc |
+ 		wasCaptured := true.
+ 		self assert: (capturedEvents size = 3)].
+ 	self assert: wasCaptured.!

Item was added:
+ ----- Method: SystemChangeErrorHandlingTest>>testUnhandledEventOperation (in category 'Testing') -----
+ testUnhandledEventOperation
+ 
+ 	| notifier wasCaptured |
+ 	notifier := self systemChangeNotifier.
+ 	wasCaptured := false.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent1:.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent2:.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #zork:.
+ 	notifier notify: self ofSystemChangesOfItem: #class change: #Added using: #storeEvent3:.
+ 	[notifier classAdded: self class inCategory: #FooCat] on: MessageNotUnderstood do: [:exc |
+ 		wasCaptured := true.
+ 		self assert: (capturedEvents size = 3)].
+ 	self assert: wasCaptured.!



More information about the Packages mailing list