Fixed typo.

diff --git a/v8/src/compiler/midend/inlate.scm b/v8/src/compiler/midend/inlate.scm
index b9087dce633e7c2f1294d3c30cef38226dda4467..775234ec88990f985cdc390caf2b3c179261d4c5 100644 (file)
--- a/v8/src/compiler/midend/inlate.scm
+++ b/v8/src/compiler/midend/inlate.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: inlate.scm,v 1.6 1995/08/18 23:54:03 adams Exp $
+$Id: inlate.scm,v 1.7 1995/08/19 15:29:50 adams Exp $
 
 Copyright (c) 1994-1995 Massachusetts Institute of Technology
 
@@ -53,7 +53,7 @@ MIT in each case. |#
 (define (inlate/sequence+ form outer-form)
   ;; Kludge
   (if (not (open-block? form))
-      (inlate/sequence form)
+      (inlate/sequence form outer-form)
       (inlate/remember
        (let ((form* (open-block-components form unscan-defines)))
         (if (sequence? form*)