Failed

osx-64 / Tests-osx-64 / MacOSX64.General.Rules.Tests.ReSmalllintTest.testCodeCruftLeftInMethods (from General-Rules-Tests)

Error Message

Assertion failed

Stacktrace

TestFailure
Assertion failed
ReSmalllintTest(TestAsserter)>>assert:description:resumable:
ReSmalllintTest(TestAsserter)>>assert:description:
ReSmalllintTest(Object)>>assert:
[ :method |
		self assert: (critiques anySatisfy: [ :crit |
			crit entity = method ]) ] in ReSmalllintTest>>assertResult:hasAllMethodsInEnvironment:
[ :method | aBlock value: method ] in [ :aClass |
		self methodsForClass: aClass do: [ :method | aBlock value: method ].
		self methodsForClass: aClass class do: [ :method | aBlock value: method ] ] in RBSelectorEnvironment(RBBrowserEnvironment)>>methodsDo:
[ :each :meth | (self includesSelector: each in: aClass) ifTrue: [ aBlock value: meth ] ] in RBSelectorEnvironment(RBBrowserEnvironment)>>methodsForClass:do:
MethodDictionary>>keysAndValuesDo:
RBSmalllintTestObject class(Behavior)>>selectorsAndMethodsDo:
RBSelectorEnvironment(RBBrowserEnvironment)>>methodsForClass:do:
[ :aClass |
		self methodsForClass: aClass do: [ :method | aBlock value: method ].
		self methodsForClass: aClass class do: [ :method | aBlock value: method ] ] in RBSelectorEnvironment(RBBrowserEnvironment)>>methodsDo:
[ :each |
		| class |
		class := self systemDictionary at: each ifAbsent: [ nil ].
		(class isNotNil and: [ environment includesClass: class ])
			ifTrue: [ aBlock value: class ] ] in RBSelectorEnvironment>>classesDo:
[ :association | aBlock value: association key ] in IdentityDictionary(Dictionary)>>keysDo:
[ :each | each ifNotNil: [ aBlock value: each ] ] in IdentityDictionary(Dictionary)>>associationsDo:
Array(SequenceableCollection)>>do:
IdentityDictionary(Dictionary)>>associationsDo:
IdentityDictionary(Dictionary)>>keysDo:
RBSelectorEnvironment>>classesDo:
RBSelectorEnvironment(RBBrowserEnvironment)>>methodsDo:
ReSmalllintTest>>assertResult:hasAllMethodsInEnvironment:
ReSmalllintTest>>assertResultOfRule:hasSameSelectorsAsEnvironment:
ReSmalllintTest>>ruleFor:plusSelectors:
ReSmalllintTest>>testCodeCruftLeftInMethods
ReSmalllintTest(TestCase)>>performTest