From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Tue, 5 Sep 1995 18:48:37 +0000 (+0000)
Subject: Fixed errant paren.
X-Git-Tag: 20090517-FFI~5988
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=c9deeda2b73a942f799a4db481fb0e8b6a42f42c;p=mit-scheme.git

Fixed errant paren.
---

diff --git a/v8/src/compiler/midend/dataflow.scm b/v8/src/compiler/midend/dataflow.scm
index 9e69aa7c4..a83ced1f1 100644
--- a/v8/src/compiler/midend/dataflow.scm
+++ b/v8/src/compiler/midend/dataflow.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: dataflow.scm,v 1.19 1995/08/19 22:43:34 adams Exp $
+$Id: dataflow.scm,v 1.20 1995/09/05 18:48:37 adams Exp $
 
-Copyright (c) 1994 Massachusetts Institute of Technology
+Copyright (c) 1994-1995 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -1465,7 +1465,7 @@ MIT in each case. |#
 (define (graph/dataflow! graph)
   (graph/for-each-node graph
     (lambda (node) (set-node/values! node 'NOT-CACHED)))
-  (graph/for-each-node graph node/initialize-cache!)))
+  (graph/for-each-node graph node/initialize-cache!)
   ;; Trivial closures need to
   (graph/initialize-closure-procedures! graph)
   (let ((queue  (queue/make)))