[Pkg] The Trunk: Tests-ar.91.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Sep 2 05:57:05 UTC 2010


Andreas Raab uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-ar.91.mcz

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

Name: Tests-ar.91
Author: ar
Time: 1 September 2010, 10:56:37.047 pm
UUID: 53dae328-bdb6-cd40-94c7-19bb71d28b0f
Ancestors: Tests-eem.90

Reclassify methods to fix various package dependencies.
Update package dependency tests.

=============== Diff against Tests-eem.90 ===============

Item was changed:
  ----- Method: PackageDependencyTest>>testToolBuilder (in category 'tests') -----
  testToolBuilder
  	self testPackage: 'ToolBuilder-Kernel' dependsExactlyOn: #(
  		Collections
  		Files
  		Graphics
  		Kernel
  		SUnit
+ 		System
  	).!

Item was changed:
  ----- Method: PackageDependencyTest>>testBalloon (in category 'tests') -----
  testBalloon
  	self testPackage: 'Balloon' dependsExactlyOn: #(
+ 		Kernel Collections Graphics System
- 		Kernel Collections Graphics Morphic System
  	).!

Item was changed:
  ----- Method: PackageDependencyTest>>testCollections (in category 'tests') -----
  testCollections
  	self testPackage: 'Collections' dependsExactlyOn: #(
- 		Balloon
  		Compiler
  		Kernel
  		Compression
  		Exceptions
  		Files
  		Graphics
- 		Morphic
- 		MorphicExtras
  		Multilingual
- 		Network
  		System
  		'ToolBuilder-Kernel'
  	).!

Item was changed:
  ----- Method: PackageDependencyTest>>testEtoys (in category 'tests') -----
  testEtoys
  	self testPackage: 'EToys' dependsExactlyOn: #(
  		Balloon
  		Collections
  		Compiler
  		Exceptions
  		Files
  		Graphics
  		Kernel
  		Morphic
  		MorphicExtras
  		Network
  		Protocols
  		System
  		'ToolBuilder-Kernel'
  		Tools
+ 		SUnit
  	).!

Item was changed:
  ----- Method: PackageDependencyTest>>testSound (in category 'tests') -----
  testSound
  	self testPackage: 'Sound' dependsExactlyOn: #(
  		Collections
  		Balloon
- 		EToys
  		Files
  		Graphics
  		Kernel
  		Morphic
  		MorphicExtras
  		Network
  		System
  		'ToolBuilder-Kernel'
  		Tools
  	).!

Item was changed:
  ----- Method: PackageDependencyTest>>testShoutCore (in category 'tests') -----
  testShoutCore
  	self testPackage: 'ShoutCore' dependsExactlyOn: #(
  		Collections
  		Graphics
  		Kernel
  		Monticello
  		System
+ 		Compiler
  	).!

Item was changed:
  ----- Method: PackageDependencyTest>>testSUnitGUI (in category 'tests') -----
  testSUnitGUI
  	self testPackage: 'SUnitGUI' dependsExactlyOn: #(
  		Collections
  		Graphics
  		Kernel
  		PackageInfo
  		SUnit
  		System
  		'ToolBuilder-Kernel'
  		Tools
- 		Morphic	"WindowColorSpec"
  	).!

Item was added:
+ ----- Method: ExceptionTests>>testHandlerReentrancy (in category 'testing') -----
+ testHandlerReentrancy
+ 
+ 	| callingOrder |
+ 	"Handlers are not re-entrant by default, so inner is not activated twice"
+ 	callingOrder := String streamContents: [:stream |
+ 		[[stream nextPut: $s. Notification signal]
+ 		
+ 			"Inner handler"
+ 			on: Notification do: [:ex |
+ 				stream nextPut: $i.
+ 				ex pass]]
+ 		
+ 			"outer handler"
+ 			on: Notification do: [:ex |
+ 				stream nextPut: $o.
+ 				Notification signal]].
+ 		
+ 	self assert: callingOrder = 'sio'.
+ 
+ 	"Now make inner re-entrant"
+ 	callingOrder := String streamContents: [:stream |
+ 		[[stream nextPut: $s. Notification signal]
+ 		
+ 			"Inner handler"
+ 			on: Notification do: [:ex |
+ 				stream nextPut: $i.
+ 				ex rearmHandlerDuring: [ex pass]]]
+ 		
+ 			"outer handler"
+ 			on: Notification do: [:ex |
+ 				stream nextPut: $o.
+ 				Notification signal]].
+ 		
+ 	self assert: callingOrder = 'sioi'.!



More information about the Packages mailing list