:art: Improve array

diff --git a/src/lib/array.c b/src/lib/array.c
index 73679ef8fe7a328d5bc3e5ec077301724282f99a..ee5b6cc3f602097a339e924365fe1b49a99c6758 100644 (file)
--- a/src/lib/array.c
+++ b/src/lib/array.c
@@ -223,7 +223,7 @@ static INSTR(ArraySlice) {
   for(m_int i = start, j = 0; i != end; i += op, ++j) {
     m_bit buf[ARRAY_SIZE(in)];
     m_vector_get(in, i, &buf);
-    m_vector_set(ARRAY(out), i, buf);
+    m_vector_set(ARRAY(out), j, buf);
   }
   *(M_Object*)REG(-SZ_INT) = out;
 }