From: Chris Hanson Date: Wed, 24 Aug 1988 21:21:07 +0000 (+0000) Subject: Load cref if not already loaded. X-Git-Tag: 20090517-FFI~12586 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=336c707dcc8c339964d9928e876fef22054bed89;p=mit-scheme.git Load cref if not already loaded. --- diff --git a/v7/src/compiler/machines/bobcat/compiler.sf b/v7/src/compiler/machines/bobcat/compiler.sf index 6c7d97b7a..90009ca13 100644 --- a/v7/src/compiler/machines/bobcat/compiler.sf +++ b/v7/src/compiler/machines/bobcat/compiler.sf @@ -49,6 +49,9 @@ '("instr1" "instr2" "instr3" "instr4"))))))) ((package/reference (find-package '(COMPILER DECLARATIONS)) 'SYNTAX-FILES!)) + +(if (not (name->package '(CROSS-REFERENCE))) + (with-working-directory-pathname "/scheme/cref" (lambda () (load "make")))) (cref/generate-all "comp") (sf "comp.con" "comp.bcon") (sf "comp.ldr" "comp.bldr") \ No newline at end of file