[squeak-dev] The Trunk: SUnitGUI-tpr.93.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Jan 16 02:08:29 UTC 2023


tim Rowledge uploaded a new version of SUnitGUI to project The Trunk:
http://source.squeak.org/trunk/SUnitGUI-tpr.93.mcz

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

Name: SUnitGUI-tpr.93
Author: tpr
Time: 15 January 2023, 6:08:28.334724 pm
UUID: e4a4c5b7-4ce8-4791-9758-3f4663b9ac2a
Ancestors: SUnitGUI-ct.92

Remove some variable shadowing

=============== Diff against SUnitGUI-ct.92 ===============

Item was changed:
  ----- Method: TestRunner>>findClassesForCategories: (in category 'utilities') -----
  findClassesForCategories: aCollection
  
+ 	| items |
+ 	aCollection ifEmpty:
+ 		[^ self baseClass withAllSubclasses asSet ].
+ 	items := aCollection gather:
+ 		[:category |
+ 		(self environment organization listAtCategoryNamed: category)
+ 			collect: [ :each | self environment valueOf: each]
+ 			thenSelect: [ :each | each includesBehavior: self baseClass ]].
- 	| environment items |
- 	aCollection isEmpty 
- 		ifTrue: [ ^ self baseClass withAllSubclasses asSet ].
- 	environment := self environment.
- 	items := aCollection gather: [ :category |
- 		((environment organization listAtCategoryNamed: category)
- 			collect: [ :each | environment valueOf: each ])
- 			select: [ :each | each includesBehavior: self baseClass ] ].
  	^ items asSet.!



More information about the Squeak-dev mailing list