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