From 336c707dcc8c339964d9928e876fef22054bed89 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 24 Aug 1988 21:21:07 +0000
Subject: [PATCH] Load cref if not already loaded.

---
 v7/src/compiler/machines/bobcat/compiler.sf | 3 +++
 1 file changed, 3 insertions(+)

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
-- 
2.25.1