Failed

osx-64 / Tests-osx-64 / MacOSX64.GeneralRules.Tests.Migrated.ReSmalllintTest.testReturnInEnsure (from GeneralRules-Tests)

Error Message

RBMessageNode>> #anySatisfy:

Stacktrace

MessageNotUnderstood
RBMessageNode>> #anySatisfy:
RBMessageNode(Object)>>doesNotUnderstand: #anySatisfy:
ReReturnInEnsureRule>>afterCheck:mappings:
[ :map |
				(self
					afterCheck: aNode
					mappings: (self flattenMatchMap: map))
						ifTrue: [
							aCriticBlock cull: (self critiqueFor: aNode) ] ] in [ :matcher |
		matcher
			match: aNode
			onSuccess: [ :map |
				(self
					afterCheck: aNode
					mappings: (self flattenMatchMap: map))
						ifTrue: [
							aCriticBlock cull: (self critiqueFor: aNode) ] ]
			onFailure: [  ] ] in ReReturnInEnsureRule(ReNodeMatchRule)>>check:forCritiquesDo:
FullBlockClosure(BlockClosure)>>cull:
[ aBlock cull: context ] in RBMessageNode(RBProgramNode)>>match:onSuccess:onFailure:
True>>ifTrue:ifFalse:
RBMessageNode(RBProgramNode)>>match:onSuccess:onFailure:
[ :matcher |
		matcher
			match: aNode
			onSuccess: [ :map |
				(self
					afterCheck: aNode
					mappings: (self flattenMatchMap: map))
						ifTrue: [
							aCriticBlock cull: (self critiqueFor: aNode) ] ]
			onFailure: [  ] ] in ReReturnInEnsureRule(ReNodeMatchRule)>>check:forCritiquesDo:
Set>>do:
ReReturnInEnsureRule(ReNodeMatchRule)>>check:forCritiquesDo:
[ :node |
						r
							check: node
							forCritiquesDo: [ :crit |
								crit sourceAnchor initializeEnitity: method.
								self addCritique: crit ] ] in [ :r |
				ast := method ast.
				"for rewrite rules, we run every rule on a copy of the ast"
				r isRewriteRule ifTrue: [ ast := ast copy  ].
				ast nodesDo: [ :node |
						r
							check: node
							forCritiquesDo: [ :crit |
								crit sourceAnchor initializeEnitity: method.
								self addCritique: crit ] ] ] in [ :selector | | method ast |
			method := aClass>>selector.
			self getCritiquesAbout: method by: methodRules.
			nodeRules do: [ :r |
				ast := method ast.
				"for rewrite rules, we run every rule on a copy of the ast"
				r isRewriteRule ifTrue: [ ast := ast copy  ].
				ast nodesDo: [ :node |
						r
							check: node
							forCritiquesDo: [ :crit |
								crit sourceAnchor initializeEnitity: method.
								self addCritique: crit ] ] ]] in ReSmalllintChecker>>checkMethodsForClass:
RBMessageNode(RBProgramNode)>>nodesDo:
[ :each | each nodesDo: aBlock ] in RBSequenceNode(RBProgramNode)>>nodesDo:
OrderedCollection>>do:
RBSequenceNode(RBProgramNode)>>nodesDo:
[ :each | each nodesDo: aBlock ] in RBMethodNode(RBProgramNode)>>nodesDo:
OrderedCollection>>do:
RBMethodNode(RBProgramNode)>>nodesDo:
[ :r |
				ast := method ast.
				"for rewrite rules, we run every rule on a copy of the ast"
				r isRewriteRule ifTrue: [ ast := ast copy  ].
				ast nodesDo: [ :node |
						r
							check: node
							forCritiquesDo: [ :crit |
								crit sourceAnchor initializeEnitity: method.
								self addCritique: crit ] ] ] in [ :selector | | method ast |
			method := aClass>>selector.
			self getCritiquesAbout: method by: methodRules.
			nodeRules do: [ :r |
				ast := method ast.
				"for rewrite rules, we run every rule on a copy of the ast"
				r isRewriteRule ifTrue: [ ast := ast copy  ].
				ast nodesDo: [ :node |
						r
							check: node
							forCritiquesDo: [ :crit |
								crit sourceAnchor initializeEnitity: method.
								self addCritique: crit ] ] ]] in ReSmalllintChecker>>checkMethodsForClass:
Set>>do:
[ :selector | | method ast |
			method := aClass>>selector.
			self getCritiquesAbout: method by: methodRules.
			nodeRules do: [ :r |
				ast := method ast.
				"for rewrite rules, we run every rule on a copy of the ast"
				r isRewriteRule ifTrue: [ ast := ast copy  ].
				ast nodesDo: [ :node |
						r
							check: node
							forCritiquesDo: [ :crit |
								crit sourceAnchor initializeEnitity: method.
								self addCritique: crit ] ] ]] in ReSmalllintChecker>>checkMethodsForClass:
[:each :meth | 
			(self includesSelector: each in: aClass) ifTrue: [aBlock value: each]] in RBClassEnvironment(RBBrowserEnvironment)>>selectorsForClass:do:
MethodDictionary>>keysAndValuesDo:
RBSmalllintTestObject class(Behavior)>>selectorsAndMethodsDo:
RBClassEnvironment(RBBrowserEnvironment)>>selectorsForClass:do:
ReSmalllintChecker>>checkMethodsForClass:
[ :class |
			self checkClass: class.
			self checkMethodsForClass: class.
			
			self checkClass: class classSide.
			self checkMethodsForClass: class classSide ] in ReSmalllintChecker(RBSmalllintChecker)>>run
[ :each | | newLabel |
			"Special handling for first and last element"
			(count = 0 or: [ count + 1 = size or: [(Time millisecondsSince: lastUpdate) >= msecs]]) 
				ifTrue: [ 
					bar current: count.
					oldLabel = (newLabel := (labelBlock cull: each) ifNil: [oldLabel]) 
						ifFalse: [
							bar label: newLabel.
							oldLabel := newLabel ].
				lastUpdate := Time millisecondClockValue ].
			aBlock value: each.
			count := count + 1 ] in [:bar |
		labelBlock := aStringOrBlock isString
			ifTrue: [
				bar label: aStringOrBlock.
				[ :dummyItem | aStringOrBlock] ]
			ifFalse: [ aStringOrBlock ].

		self do: [ :each | | newLabel |
			"Special handling for first and last element"
			(count = 0 or: [ count + 1 = size or: [(Time millisecondsSince: lastUpdate) >= msecs]]) 
				ifTrue: [ 
					bar current: count.
					oldLabel = (newLabel := (labelBlock cull: each) ifNil: [oldLabel]) 
						ifFalse: [
							bar label: newLabel.
							oldLabel := newLabel ].
				lastUpdate := Time millisecondClockValue ].
			aBlock value: each.
			count := count + 1 ] ] in Array(Collection)>>do:displayingProgress:every:
Array(SequenceableCollection)>>do:
[:bar |
		labelBlock := aStringOrBlock isString
			ifTrue: [
				bar label: aStringOrBlock.
				[ :dummyItem | aStringOrBlock] ]
			ifFalse: [ aStringOrBlock ].

		self do: [ :each | | newLabel |
			"Special handling for first and last element"
			(count = 0 or: [ count + 1 = size or: [(Time millisecondsSince: lastUpdate) >= msecs]]) 
				ifTrue: [ 
					bar current: count.
					oldLabel = (newLabel := (labelBlock cull: each) ifNil: [oldLabel]) 
						ifFalse: [
							bar label: newLabel.
							oldLabel := newLabel ].
				lastUpdate := Time millisecondClockValue ].
			aBlock value: each.
			count := count + 1 ] ] in Array(Collection)>>do:displayingProgress:every:
FullBlockClosure(BlockClosure)>>cull:
[ ^ block cull: self ] in [ self prepareForRunning.
	  CurrentJob value: self during: [ ^ block cull: self ] ] in Job>>run
[ activeProcess
			psValueAt: index
			put: anObject.
		aBlock value ] in CurrentJob(DynamicVariable)>>value:during:
FullBlockClosure(BlockClosure)>>ensure:
CurrentJob(DynamicVariable)>>value:during:
CurrentJob class(DynamicVariable class)>>value:during:
[ self prepareForRunning.
	  CurrentJob value: self during: [ ^ block cull: self ] ] in Job>>run
FullBlockClosure(BlockClosure)>>ensure:
Job>>run
NonInteractiveUIManager(UIManager)>>displayProgress:from:to:during:
ByteString(String)>>displayProgressFrom:to:during:
Array(Collection)>>do:displayingProgress:every:
Array(Collection)>>do:displayingProgress:
ReSmalllintChecker(RBSmalllintChecker)>>run
ReSmalllintChecker>>run
ReSmalllintTest>>runRuleFor:onEnvironment:
ReSmalllintTest>>ruleFor:plusSelectors:
ReSmalllintTest>>ruleFor:
ReSmalllintTest>>testReturnInEnsure
ReSmalllintTest(TestCase)>>performTest