---

yaml
---
r: 6173
b: refs/heads/master
c: 7bfe4db
h: refs/heads/master
i:
  6171: a52565c
v: v3

Author: David Rajchenbach-Teller

[refs]

@@ -1,2 +1,2 @@
 ---
-refs/heads/master: bc1316aaf4f2609b6f8542242d9c3ca65d0853bd
+refs/heads/master: 7bfe4dba807ae908a247a34a4f72d0b610e6376f

trunk/src/test/stdtest/rope.rs

@@ -2,6 +2,7 @@ import std::str;
 import std::rope::*;
 import std::option;
 import std::uint;
+import std::vec;
 
 //Utility function, used for sanity check
 fn rope_to_string(r: rope) -> str {
@@ -146,3 +147,18 @@ fn char_at1() {
     assert eq(r2, r3);
     assert eq(bal2, bal3);
 }
+
+#[test]
+fn concat1() {
+    //Generate a reasonable rope
+    let chunk = of_str(@ "123456789");
+    let r = empty();
+    uint::range(0u, 10u){|_i|
+        r = append_rope(r, chunk);
+    }
+
+    //Same rope, obtained with rope::concat
+    let r2 = concat(vec::init_elt(chunk, 10u));
+
+    assert eq(r, r2);
+}