Fixed load sequence bug.

diff --git a/v8/src/runtime/coerce.scm b/v8/src/runtime/coerce.scm
index 9b7ff26da3dca708f5eb7d3de0ec4b81cf17a818..52242538e0c3710821a8db73057482f3e118fd31 100644 (file)
--- a/v8/src/runtime/coerce.scm
+++ b/v8/src/runtime/coerce.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: coerce.scm,v 1.2 1996/07/26 14:38:01 adams Exp $
+$Id: coerce.scm,v 1.3 1996/07/26 14:58:45 adams Exp $
 
 Copyright (c) 1996 Massachusetts Institute of Technology
 
@@ -206,7 +206,7 @@ MIT in each case. |#
          (max (system-hunk3-cxr2 info)))
       (cons min max))))
 
-(define coerce-to-compiled-procedure)
+;;(define coerce-to-compiled-procedure)
 
 (define (initialize-package!)
   (set! coerce-to-compiled-procedure

diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg
index 6d14d3a5c90a34274fe1f5bcf96db954341de444..168894a5e1601c0b99d88e43bb0a813ec377fed2 100644 (file)
--- a/v8/src/runtime/runtime.pkg
+++ b/v8/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: runtime.pkg,v 14.275 1996/07/26 14:38:16 adams Exp $
+$Id: runtime.pkg,v 14.276 1996/07/26 14:58:55 adams Exp $
 
 Copyright (c) 1988-96 Massachusetts Institute of Technology
 
@@ -3314,4 +3314,5 @@ MIT in each case. |#
   (files "coerce")
   (parent ())
   (export ()
-         coerce-to-compiled-procedure))
+         ;;coerce-to-compiled-procedure
+         ))