From a7f4e7d343bcc5ea7692d07b904bb6bbec6eae68 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Wed, 7 Nov 1990 20:21:48 +0000
Subject: [PATCH] Added a few c:'s 'cause the lisp package doesn't use the c
 package.

---
 code/load.lisp | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/code/load.lisp b/code/load.lisp
index aca34561d..cabd86509 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.15 1990/11/06 14:06:32 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/load.lisp,v 1.16 1990/11/07 20:21:48 wlott Exp $
 ;;;
 ;;; Loader for Spice Lisp.
 ;;; Written by Skef Wholey and Rob MacLachlan.
@@ -761,18 +761,18 @@
        (let ((implementation (car *current-code-format*))
 	     (version (cdr *current-code-format*)))
 	 (unless (= implementation
-		    #.(c:backend-fasl-file-implementation *backend*))
+		    #.(c:backend-fasl-file-implementation c:*backend*))
 	   (error "~A was compiled for a ~A, but this is a ~A"
 		  *Fasl-file*
 		  (or (elt c:fasl-file-implementations implementation)
 		      "unknown machine")
 		  (or (elt c:fasl-file-implementations
-			   #.(c:backend-fasl-file-implementation *backend*))
+			   #.(c:backend-fasl-file-implementation c:*backend*))
 		      "unknown machine")))
-	 (unless (= version #.(c:backend-fasl-file-version *backend*))
+	 (unless (= version #.(c:backend-fasl-file-version c:*backend*))
 	   (error "~A was compiled for fasl-file version ~A, ~
 	           but this is version ~A"
-	    *Fasl-file* version #.(c:backend-fasl-file-version *backend*)))
+	    *Fasl-file* version #.(c:backend-fasl-file-version c:*backend*)))
 	 (let ((box-num ,nitems)
 	       (code-length ,size))
 	   (declare (fixnum box-num code-length))
-- 
GitLab