minor refactors

src/IllimaniProfiler-Experiment/IllCodeRewriter.class.st

@@ -12,13 +12,13 @@ Class {
 { #category : 'private' }
 IllCodeRewriter >> cloneMethodWithTenureSelector: anIllSender [
 
-	| compiledMethod newSelector |
-	compiledMethod := anIllSender method copy.
-	newSelector := self defaultTenureSelector: compiledMethod selector.
+	| clonedMethod newSelector |
+	clonedMethod := anIllSender method copy.
+	newSelector := self defaultTenureSelector: clonedMethod selector.
 
-	compiledMethod selector: newSelector.
+	clonedMethod selector: newSelector.
 
-	^ compiledMethod
+	^ clonedMethod
 ]
 
 { #category : 'private' }
@@ -50,17 +50,17 @@ IllCodeRewriter >> storeBackupSenders: senders caller: initialCaller [
 { #category : 'api' }
 IllCodeRewriter >> tenureCallingSenders: senders initialCaller: initialCaller [
 
-	| compiledMethod |
+	| clonedMethod |
 	self storeBackupSenders: senders caller: initialCaller.
 
 	initialCaller method methodClass methodDict
 		at: initialCaller selector
 		put: (self tenureMessageSendFor: initialCaller method offset: initialCaller offset).
 
 	senders do: [ :anIllSender |
-		compiledMethod := self cloneMethodWithTenureSelector: anIllSender.
-		compiledMethod := self tenureMessageSendFor: compiledMethod offset: anIllSender offset.
-		self installMethod: compiledMethod ]
+		clonedMethod := self cloneMethodWithTenureSelector: anIllSender.
+		clonedMethod := self tenureMessageSendFor: clonedMethod offset: anIllSender offset.
+		self installMethod: clonedMethod ]
 ]
 
 { #category : 'private' }
@@ -75,8 +75,8 @@ IllCodeRewriter >> tenureMessageSendFor: compiledMethod offset: offset [
 	irSendNode := (irSequences select: #isSend) detect: [ :e | e selector = messageSendSelector ].
 	irSendNode selector: newMessageSendSelector.
 
-	newMessageSendSelector := ir generate selector: compiledMethod selector; yourself.
-	^ newMessageSendSelector
+	newCompiledMethod := ir generate selector: compiledMethod selector; yourself.
+	^ newCompiledMethod
 ]
 
 { #category : 'private' }