From fff27219456d145cdb67502dd591dee32b01ce89 Mon Sep 17 00:00:00 2001
From: Philipp Haller <hallerp@gmail.com>
Date: Tue, 8 Mar 2011 15:31:46 +0000
Subject: Closes #2239.

---
 src/library/scala/collection/immutable/Stream.scala | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/src/library/scala/collection/immutable/Stream.scala b/src/library/scala/collection/immutable/Stream.scala
index 50b086a881..26fa86861c 100644
--- a/src/library/scala/collection/immutable/Stream.scala
+++ b/src/library/scala/collection/immutable/Stream.scala
@@ -324,6 +324,22 @@ self =>
     else tail.foldLeft(op(z, head))(op)
   }
 
+  /** Stream specialization of reduceLeft which allows GC to collect
+   *  along the way.
+   */
+  override final def reduceLeft[B >: A](f: (B, A) => B): B = {
+    if (this.isEmpty) throw new UnsupportedOperationException("empty.reduceLeft")
+    else {
+      var reducedRes: B = this.head
+      var left = this.tail
+      while (!left.isEmpty) {
+        reducedRes = f(reducedRes, left.head)
+        left = left.tail
+      }
+      reducedRes
+    }
+  }
+
   /** Returns all the elements of this stream that satisfy the
    *  predicate <code>p</code>. The order of the elements is preserved.
    *
-- 
cgit v1.2.3