Don't use LOAD-OPTION to load cref; it probably doesn't exist on the
authorChris Hanson <org/chris-hanson/cph>
Tue, 29 May 2001 21:25:33 +0000 (21:25 +0000)
committerChris Hanson <org/chris-hanson/cph>
Tue, 29 May 2001 21:25:33 +0000 (21:25 +0000)
host system (outside of MIT), and this will cause an error if the user
has MITSCHEME_INF_DIRECTORY set.

v7/src/cref/cref.sf

index 78be8ce9ddba0737d7df34a24f7e1cd534b44635..c4582f40d7d1cbbaef02ef0ce4150d878f92acc9 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: cref.sf,v 1.11 2001/05/29 19:58:28 cph Exp $
+$Id: cref.sf,v 1.12 2001/05/29 21:25:33 cph Exp $
 
 Copyright (c) 1988-2001 Massachusetts Institute of Technology
 
@@ -31,7 +31,8 @@ USA.
 
 (if (file-exists? "../runtime/runtime.glo")
     (begin
-      (load "make")
+      (if (not (name->package '(CROSS-REFERENCE)))
+         (load "make"))
       (cref/generate-constructors "cref")
       (sf-conditionally "cref.con")
       (sf-conditionally "cref.ldr")))
\ No newline at end of file