This ensures that, when cross-syntaxing the compiler, the host
system's cref is loaded, not the cref from the target system.
#| -*-Scheme-*-
-$Id: compiler.sf,v 1.1 1994/11/19 02:09:58 adams Exp $
+$Id: compiler.sf,v 1.2 1994/12/06 17:44:22 adams Exp $
Copyright (c) 1988-1994 Massachusetts Institute of Technology
;;;; Script to incrementally syntax the compiler
\f
;; Guarantee that the package modeller is loaded.
-(if (not (name->package '(CROSS-REFERENCE)))
- (with-working-directory-pathname "../cref" (lambda () (load "make"))))
+(load-option 'CREF)
;; Guarantee that the compiler's package structure exists.
(if (not (name->package '(COMPILER)))