The cold boot file "make.com" must contain an scode expression.

Extended to ensure that this is true as the compiler dumps a
COMPILED-MODULE structure.

diff --git a/v8/src/runtime/runtime.cbf b/v8/src/runtime/runtime.cbf
index 4df009d518fd2fd0b02b036a40df01993448d79b..e5491b809626177b8954452f5ccca24b607d213e 100644 (file)
--- a/v8/src/runtime/runtime.cbf
+++ b/v8/src/runtime/runtime.cbf
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: runtime.cbf,v 1.2 1993/08/11 19:13:10 cph Exp $
+$Id: runtime.cbf,v 1.3 1995/07/27 21:07:21 adams Exp $
 
-Copyright (c) 1988-93 Massachusetts Institute of Technology
+Copyright (c) 1988-95 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -33,4 +33,12 @@ promotional, or sales literature without prior written consent from
 MIT in each case. |#
 
 (fluid-let ((compiler:coalescing-constant-warnings? #f))
-  (compile-directory "."))
\ No newline at end of file
+  (compile-directory "."))
+
+(in-package (->environment '(runtime compiler-info))
+  (let ((make.com  ((make-primitive-procedure 'binary-fasload) "make.com")))
+    (if (compiled-module? make.com)
+       (begin
+         (fresh-line)
+         (display ";Fixing \"make.com\" for cold load")
+         (fasdump (compiled-module/expression make.com) "make.com")))))