diff --git a/basis/compiler/cfg/alias-analysis/alias-analysis.factor b/basis/compiler/cfg/alias-analysis/alias-analysis.factor
index 6786332ed2..dcd38277c7 100644
--- a/basis/compiler/cfg/alias-analysis/alias-analysis.factor
+++ b/basis/compiler/cfg/alias-analysis/alias-analysis.factor
@@ -296,7 +296,7 @@ M: gc-map-insn analyze-aliases
     def-acs
     clear-recent-stores ;
 
-M: factor-call-insn analyze-aliases
+M: alien-call-insn analyze-aliases
     def-acs
     clear-recent-stores
     clear-live-slots ;
diff --git a/basis/compiler/cfg/instructions/instructions.factor b/basis/compiler/cfg/instructions/instructions.factor
index 50d536d8f2..3acdfe2c19 100644
--- a/basis/compiler/cfg/instructions/instructions.factor
+++ b/basis/compiler/cfg/instructions/instructions.factor
@@ -834,16 +834,17 @@ UNION: conditional-branch-insn
 UNION: ##read ##slot ##slot-imm ##vm-field ##alien-global ;
 UNION: ##write ##set-slot ##set-slot-imm ##set-vm-field ;
 
-UNION: alien-call-insn ##alien-invoke ##alien-indirect ;
-
-UNION: factor-call-insn
-alien-call-insn ;
+UNION: alien-call-insn
+    ##alien-assembly
+    ##alien-indirect
+    ##alien-invoke ;
 
 UNION: gc-map-insn
-##call-gc
-##box
-##box-long-long
-factor-call-insn ;
+    ##call-gc
+    ##box
+    ##box-long-long
+    ##alien-indirect
+    ##alien-invoke ;
 
 M: gc-map-insn clone call-next-method [ clone ] change-gc-map ;