Initial compiler should have cref support.

diff --git a/v7/src/etc/c-initial-bands.sh b/v7/src/etc/c-initial-bands.sh
index 4dedbc204e8e07736a28801cad2288934070eeb2..dddb747ead3d259db209dc677c6284dc4303dd25 100755 (executable)
--- a/v7/src/etc/c-initial-bands.sh
+++ b/v7/src/etc/c-initial-bands.sh
@@ -1,6 +1,6 @@
 #!/bin/sh
 #
-# $Id: c-initial-bands.sh,v 1.1 2007/04/04 05:08:19 riastradh Exp $
+# $Id: c-initial-bands.sh,v 1.2 2007/04/09 16:44:06 cph Exp $
 #
 # Copyright 2007 Massachusetts Institute of Technology
 #
@@ -31,10 +31,13 @@ EOF
 )
 
 microcode/scheme --library lib --large <<EOF
-(load "microcode/sf+compiler.so")
-(load-option 'SF)
-(with-working-directory-pathname "compiler"
-  (lambda ()
-    (load "machines/C/make")))
-(load-option '*PARSER)
-(disk-save "lib/compiler.com")
+(begin
+  (load "microcode/sf+compiler.so")
+  (load-option (quote SF))
+  (with-working-directory-pathname "compiler"
+    (lambda ()
+      (load "machines/C/make")))
+  (load-option (quote *PARSER))
+  (load-option (quote CREF))
+  (disk-save "lib/compiler.com"))
+EOF