diff --git a/smalltalksrc/Slang/CCodeGenerator.class.st b/smalltalksrc/Slang/CCodeGenerator.class.st
index a5db77f2ac..d926c0f6a7 100644
--- a/smalltalksrc/Slang/CCodeGenerator.class.st
+++ b/smalltalksrc/Slang/CCodeGenerator.class.st
@@ -1934,7 +1934,7 @@ CCodeGenerator >> generateCASTEqual: tast [
 ]
 
 { #category : #utilities }
-CCodeGenerator >> generateCASTForBuiltinConstructAsArgumentFor: msgNode [
+CCodeGenerator >> generateCASTForBuiltinConstructFor: msgNode [
 	"Generate CAST for a message node assuming it is a built in construct.
 	If the message node can not be translated as a built in construct, return nil. 
 	"
@@ -1942,9 +1942,7 @@ CCodeGenerator >> generateCASTForBuiltinConstructAsArgumentFor: msgNode [
 	| action |
 	(self shouldGenerateAsInterpreterProxySend: msgNode) ifTrue:
 		[^nil].
-	action := castAsArgumentTranslationDict
-				at: msgNode selector
-				ifAbsent: [castTranslationDict at: msgNode selector ifAbsent: [ ^nil ]].
+	action := castTranslationDict at: msgNode selector ifAbsent: [ ^nil ].
 	^ self perform: action with: msgNode
 ]
 
diff --git a/smalltalksrc/Slang/TSendNode.class.st b/smalltalksrc/Slang/TSendNode.class.st
index 74930cea90..4dfe9f6e1f 100644
--- a/smalltalksrc/Slang/TSendNode.class.st
+++ b/smalltalksrc/Slang/TSendNode.class.st
@@ -93,7 +93,7 @@ TSendNode >> asCASTIn: aCCodeGenerator [
 
 	| construct |
 	construct := aCCodeGenerator 
-		             generateCASTForBuiltinConstructAsArgumentFor: self.
+		             generateCASTForBuiltinConstructFor: self.
 	construct ifNil: [ 
 		construct := (self asCASTAsFieldReferenceIn: aCCodeGenerator) ifNotNil: [ :e | e] ifNil: [ 
 			self asCASTAsFunctionCallIn: aCCodeGenerator ]].