Mercurial > repos > tabletprog

diff modules/array.tp @ 191:abde5d2918cf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix infinite loop in array join
author Mike Pavone <pavone@retrodev.com>
date Mon, 26 Aug 2013 19:50:02 -0700
parents 35d2cc193d99
children fd9005253861
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: {