From 895fe6aa21372b5aaa03a9f4fcac80106ce32baa Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Sat, 1 Dec 1990 11:27:25 +0000 Subject: [PATCH] Qualify fixup-code-object as being in the VM package. --- code/load.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/code/load.lisp b/code/load.lisp index 231276fb4..6c7d1ca26 100644 --- a/code/load.lisp +++ b/code/load.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman (FAHLMAN@CMUC). ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/load.lisp,v 1.19 1990/11/24 08:41:46 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/load.lisp,v 1.20 1990/12/01 11:27:25 wlott Exp $ ;;; ;;; Loader for Spice Lisp. ;;; Written by Skef Wholey and Rob MacLachlan. @@ -862,7 +862,7 @@ (gethash sym *foreign-symbols* 0) (unless found (error "Unknown foreign symbol: ~S" sym)) - (fixup-code-object code-object (read-arg 4) value kind)) + (vm:fixup-code-object code-object (read-arg 4) value kind)) code-object)) (define-fop (fop-assembler-code 144) @@ -880,7 +880,7 @@ (gethash routine *assembler-routines*) (unless found (error "Undefined assembler routine: ~S" routine)) - (fixup-code-object code-object (read-arg 4) value kind)) + (vm:fixup-code-object code-object (read-arg 4) value kind)) code-object)) -- GitLab