[Pkg] The Trunk: SUnit-fbs.100.mcz

[commits at source.squeak.org]

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

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

Name: SUnit-fbs.100
Author: fbs
Time: 14 July 2014, 10:30:22.506 pm
UUID: f789d123-bd90-ce4d-b4be-0790efcb70d0
Ancestors: SUnit-fbs.99

Better error messages make for easier CI debugging.

(It would be better if we could just ask a Class for its uncategorised methods, but such a utility doesn't exist yet.)

=============== Diff against SUnit-fbs.99 ===============

Item was changed:
  ----- Method: ClassTestCase>>testUnCategorizedMethods (in category 'tests') -----
  testUnCategorizedMethods
+ 	| categories slips uncategorisedMethods |
- 	| categories slips  |
  	categories := self categoriesForClass: self targetClass.
  	slips := categories select: [:each | each = #'as yet unclassified'].
+ 	
+ 	uncategorisedMethods := self targetClass organization listAtCategoryNamed: #'as yet unclassified'.
+ 	
+ 	self assert: slips isEmpty description: ('{1} has uncategorised methods: {2}' format: {self targetClass. (uncategorisedMethods collect: #printString) asCommaString}).!
- 	self should: [slips isEmpty].	!