Christoph Thiede uploaded a new version of SUnit to project The Trunk:
http://source.squeak.org/trunk/SUnit-ct.143.mcz

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

Name: SUnit-ct.143
Author: ct
Time: 16 June 2022, 12:13:59.403149 pm
UUID: b3ffa47c-94c0-3741-8e7f-d91bb9732841
Ancestors: SUnit-pre.142

ClassTestCase: Continues migration from #targetClass to #classToBeTested. Complements SUnit-pre.142.

=============== Diff against SUnit-pre.142 ===============

Item was changed:
  ----- Method: ClassTestCase>>targetClass (in category 'private') -----
  targetClass
  
+ 	self flag: #deprecate.
  	^ self classToBeTested!

Item was changed:
  ----- Method: ClassTestCase>>testClassComment (in category 'tests') -----
  testClassComment
+ 	self shouldnt: [self classToBeTested organization hasNoComment].!
- 	self shouldnt: [self targetClass organization hasNoComment].!

Item was changed:
  ----- Method: ClassTestCase>>testNew (in category 'tests') -----
  testNew
  	"This should not throw an exception."
+ 	self classToBeTested new.!
- 	self targetClass new.!

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