Fix join/empty first string semantics.

Unbusts at least autoref.t on Rakudo JVM.
Raku · Jun 21, 2013 · cfe397c · cfe397c
1 parent eba21ca
commit cfe397c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/vm/jvm/runtime/org/perl6/nqp/runtime/Ops.java b/src/vm/jvm/runtime/org/perl6/nqp/runtime/Ops.java
@@ -2578,7 +2578,7 @@ public static String join(String delimiter, SixModelObject arr, ThreadContext tc
 
         final int numElems = (int) arr.elems(tc);
         for (int i = 0; i < numElems; i++) {
-            if (sb.length() > 0) {
+            if (i > 0) {
                 sb.append(delimiter);
             }
             if (prim == StorageSpec.BP_STR) {