Moved FOR-EVERY to utils.scm

diff --git a/v8/src/compiler/midend/split.scm b/v8/src/compiler/midend/split.scm
index 1f3f5c28e43e5381232f09cce2ef4ef0386ced45..7284923aed23479c43dc4a204c45b314c1fa24bf 100644 (file)
--- a/v8/src/compiler/midend/split.scm
+++ b/v8/src/compiler/midend/split.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: split.scm,v 1.5 1995/08/19 22:42:51 adams Exp $
+$Id: split.scm,v 1.6 1995/09/04 21:55:10 adams Exp $
 
 Copyright (c) 1994 Massachusetts Institute of Technology
 
@@ -310,9 +310,6 @@ MIT in each case. |#
 (define (split/new-name prefix)
   (new-variable prefix))
 
-(define (for-every things proc)
-  (for-each proc things))
-
 (define (operator-is-unique? call-site)
   ;; Call-site is an application structure, or a symbol denoting an
   ;; external known call site.