From 92551b526bd70e831b292f0829a1ec3c438708a6 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Tue, 29 May 2001 21:25:33 +0000 Subject: [PATCH] Don't use LOAD-OPTION to load cref; it probably doesn't exist on the host system (outside of MIT), and this will cause an error if the user has MITSCHEME_INF_DIRECTORY set. --- v7/src/cref/cref.sf | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/v7/src/cref/cref.sf b/v7/src/cref/cref.sf index 78be8ce9d..c4582f40d 100644 --- a/v7/src/cref/cref.sf +++ b/v7/src/cref/cref.sf @@ -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 -- 2.25.1