---

yaml
---
r: 14247
b: refs/heads/try
c: d679c0e
h: refs/heads/master
i:
  14245: c214924
  14243: 4d51533
  14239: c87d1d9
v: v3

Author: brson

[refs]

@@ -2,5 +2,5 @@
 refs/heads/master: 61b1875c16de39c166b0f4d54bba19f9c6777d1a
 refs/heads/snap-stage1: e33de59e47c5076a89eadeb38f4934f58a3618a6
 refs/heads/snap-stage3: 4a81779abd786ff22d71434c6d9a5917ea4cdfff
-refs/heads/try: 3edad3555e1f5c01572f32e84480383c1ae2b472
+refs/heads/try: d679c0eb3486408ca7575eb70a0fc55a0d3de235
 refs/tags/release-0.1: 1f5c5126e96c79d22cb7862f75304136e204f105

branches/try/src/libcore/iter.rs

@@ -73,6 +73,16 @@ fn foldl<A,B:copy,IA:iterable<A>>(self: IA, b0: B, blk: fn(B, A) -> B) -> B {
     ret b;
 }
 
+fn foldr<A:copy,B:copy,IA:iterable<A>>(
+    self: IA, b0: B, blk: fn(A, B) -> B) -> B {
+
+    let b = b0;
+    reverse(self) {|a|
+        b = blk(a, b);
+    }
+    ret b;
+}
+
 fn to_list<A:copy,IA:iterable<A>>(self: IA) -> [A] {
     foldl::<A,[A],IA>(self, [], {|r, a| r + [a]})
 }
@@ -238,4 +248,13 @@ fn test_reverse() {
 #[test]
 fn test_count() {
     assert count([1, 2, 1, 2, 1], 1) == 3u;
+}
+
+#[test]
+fn test_foldr() {
+    fn sub(&&a: int, &&b: int) -> int {
+        a - b
+    }
+    let sum = foldr([1, 2, 3, 4], 0, sub);
+    assert sum == -2;
 }