From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Fri, 26 Jul 1996 14:58:55 +0000 (+0000)
Subject: Fixed load sequence bug.
X-Git-Tag: 20090517-FFI~5424
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d76db95899660c74c0206695a81b14c76b0d1c59;p=mit-scheme.git

Fixed load sequence bug.
---

diff --git a/v8/src/runtime/coerce.scm b/v8/src/runtime/coerce.scm
index 9b7ff26da..52242538e 100644
--- 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 6d14d3a5c..168894a5e 100644
--- 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
+	  ))