remove #variable part from "varNode binding variable". Now #binding r…

…eturns actual variable.

src/NautilusRefactoring/RBGlobalNode.extension.st

@@ -3,5 +3,5 @@ Extension { #name : #RBGlobalNode }
 { #category : #'*NautilusRefactoring' }
 RBGlobalNode >> executeRenameRefactoringBy: aNautilusRefactoring [
 
-	self binding variable executeRenameRefactoringBy: aNautilusRefactoring inClass: self methodNode methodClass
+	self binding executeRenameRefactoringBy: aNautilusRefactoring inClass: self methodNode methodClass
 ]

src/OpalCompiler-Core/OCASTTranslatorForEffect.class.st

@@ -117,5 +117,5 @@ OCASTTranslatorForEffect >> visitVariableNode: aVariableNode [
 	| binding |
 	binding := aVariableNode binding.
 	(binding isLiteralVariable or: [ binding isUndeclared ])
-		ifTrue: [ methodBuilder addLiteral: binding variable ]
+		ifTrue: [ methodBuilder addLiteral: binding ]
 ]

src/Reflectivity/MetalinkTargetResolver.class.st

@@ -148,5 +148,5 @@ MetalinkTargetResolver class >> temporaryNamed: aTempVarName inMethod: aMethodNa
 { #category : #'resolving - private' }
 MetalinkTargetResolver class >> usingNodesForVariable: aVarOrSlot in: classes [
 	^ (classes flatCollect: [ :c | c variableNodes ])
-		select: [ :each | each binding variable == aVarOrSlot ]
+		select: [ :each | each binding == aVarOrSlot ]
 ]

src/Reflectivity/RFASTTranslator.class.st

@@ -299,7 +299,7 @@ RFASTTranslator >> visitVariableNode: aVariableNode [
 	self emitMetaLinkBefore: aVariableNode.
 	aVariableNode hasMetalinkInstead
 				ifTrue: [ self emitMetaLinkInstead: aVariableNode ]
-				ifFalse: [ self visitVariableValue: aVariableNode binding variable].
+				ifFalse: [ self visitVariableValue: aVariableNode binding].
 	self emitMetaLinkAfterNoEnsure: aVariableNode.
 
 

src/Reflectivity/RFASTTranslatorForEffect.class.st

@@ -137,7 +137,7 @@ RFASTTranslatorForEffect >> visitVariableNode: aVariableNode [
 	"when visiting a variable for effect, we could push it and then pop it, but we do nothing"
 	binding := aVariableNode binding.
 	(binding isLiteralVariable or: [ binding isUndeclared ])
-		ifTrue: [ methodBuilder addLiteral: binding variable ].
+		ifTrue: [ methodBuilder addLiteral: binding ].
 
 	self emitMetaLinkAfterNoEnsure: aVariableNode.
 

src/Reflectivity/RFSemanticAnalyzer.class.st

@@ -44,7 +44,7 @@ RFSemanticAnalyzer >> analyseForLinksForNodes: aNode [
 { #category : #visiting }
 RFSemanticAnalyzer >> analyseForLinksForVariables: aVariableNode [
 	| variable generator |
-	variable := aVariableNode binding variable.
+	variable := aVariableNode binding.
 	variable hasMetalink
 		ifFalse: [ ^ self ].
 	generator := HookGeneratorForVariables entity: variable node: aVariableNode.

src/Reflectivity/RFVariableReification.class.st

@@ -36,5 +36,5 @@ RFVariableReification >> genForLiteralVariable [
 RFVariableReification >> genForRBVariableNode [
 
 	entity isTemp ifTrue: [ ^self error: 'Temps can not be reified yet' ]. 
-	^RFLiteralVariableNode value: entity binding variable
+	^RFLiteralVariableNode value: entity binding
 ]

src/Reflectivity/Variable.extension.st

@@ -21,7 +21,7 @@ Variable >> assignmentNodes [
 Variable >> astNodes [
 	"by default we search the usingMethods for all AST nodes"
 	^self usingMethods flatCollect: [ :method | 
-		method variableNodes select: [: each| each binding variable == self ]]
+		method variableNodes select: [: each| each binding == self ]]
 ]
 
 { #category : #'*Reflectivity' }