From: Lucas Bajolet <r4pass@hotmail.com>
Date: Wed, 28 Jan 2015 15:58:48 +0000 (-0500)
Subject: lib/standard/ropes: Fixed concatenation routine for Concat + FlatString
X-Git-Tag: v0.7.1~2^2~1
X-Git-Url: http://nitlanguage.org

lib/standard/ropes: Fixed concatenation routine for Concat + FlatString

Signed-off-by: Lucas Bajolet <r4pass@hotmail.com>
---

diff --git a/lib/standard/ropes.nit b/lib/standard/ropes.nit
index 8186ec9..68593fd 100644
--- a/lib/standard/ropes.nit
+++ b/lib/standard/ropes.nit
@@ -155,7 +155,7 @@ private class Concat
 		else
 			var r = right
 			var rlen = r.length
-			if rlen + slen > maxlen then return new Concat(left, new Concat(r, s))
+			if rlen + slen > maxlen then return new Concat(self, s)
 			return new Concat(left, r + s)
 		end
 	end