diff --git a/compiler/generic/core.lisp b/compiler/generic/core.lisp
index 247b80bd447028bdcfcc2877d258c734c9b21eb3..24cdc6c374e10378d0e5ffb171c92b8064ea4fd5 100644
--- a/compiler/generic/core.lisp
+++ b/compiler/generic/core.lisp
@@ -94,7 +94,7 @@
 		   (:assembly-routine "Undefined assembler routine: ~S")
 		   (:foreign "Unknown foreign symbol: ~S"))
 		 name))
-	(lisp::fixup-code-object code offset value kind)))))
+	(vm:fixup-code-object code offset value kind)))))
 
 
 ;;; REFERENCE-CORE-FUNCTION  --  Internal