[squeak-dev] The Trunk: Tests-fbs.285.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Jan 9 12:32:57 UTC 2014


Frank Shearar uploaded a new version of Tests to project The Trunk:
http://source.squeak.org/trunk/Tests-fbs.285.mcz

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

Name: Tests-fbs.285
Author: fbs
Time: 9 January 2014, 12:32:14.059 pm
UUID: 8a2dc139-e417-ff40-8a02-1077909eff36
Ancestors: Tests-fbs.284

More "more descriptive errors" items: I missed these last time round.

=============== Diff against Tests-fbs.284 ===============

Item was changed:
  ----- Method: EnvironmentTest>>testUndeclare (in category 'binding tests') -----
  testUndeclare
  	| one two |
  	one := env undeclare: #Griffle.
  	two := env bindingOf: #Griffle.
+ 	self assert: two equals: one description: '#bindingOf: value doesn''t match that returned by #undeclare'.
- 	self assert: one == two description: '#bindingOf: value doesn''t match that returned by #undeclare'.
  	self assert: Global equals: one class description: 'Type of binding'.
  	self assert: nil equals: one value description: 'Value of binding'.!

Item was changed:
  ----- Method: MCPackageTest>>testUnload (in category 'tests') -----
  testUnload
  	| mock |
  	self mockPackage unload.
+ 	self deny: (Smalltalk hasClassNamed: #MCMockClassA) description: 'Class not removed'.
+ 	self deny: (MCSnapshotTest includesSelector: #mockClassExtension) description: 'Extension method not removed'.
- 	self deny: (Smalltalk hasClassNamed: #MCMockClassA).
- 	self deny: (MCSnapshotTest includesSelector: #mockClassExtension).
  
  	mock := (Smalltalk at: #MCMock).
+ 	self assert: (mock subclasses noneSatisfy: [:c | c name = #MCMockClassA]) description: 'Can still find the "removed" subclass'.!
- 	self assert: (mock subclasses noneSatisfy: [:c | c name = #MCMockClassA])!



More information about the Squeak-dev mailing list