changeset 191:abde5d2918cf

Fix infinite loop in array join
author Mike Pavone <pavone@retrodev.com>
date Mon, 26 Aug 2013 19:50:02 -0700
parents 372cbd2cd243
children a868a2aec930
files modules/array.tp
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/modules/array.tp	Mon Aug 26 18:59:38 2013 -0700
+++ b/modules/array.tp	Mon Aug 26 19:50:02 2013 -0700
@@ -110,6 +110,7 @@
 			l <- length
 			while: { idx < l } do: {
 				str <- str . sep . (get: idx)
+				idx <- idx + 1
 			}
 			str
 		} else: {