From 6c34602ead1322b83f06c1e49f3ba1407021b358 Mon Sep 17 00:00:00 2001
From: igor <igorcielniak.contact@gmail.com>
Date: Wed, 18 Feb 2026 12:22:16 +0100
Subject: [PATCH] extended the test for dynamic arrays

---
 tests/arr_dynamic.expected | 20 ++++++++++++++++-
 tests/arr_dynamic.sl       | 44 ++++++++++++++++++++++++++++++++++----
 2 files changed, 59 insertions(+), 5 deletions(-)

diff --git a/tests/arr_dynamic.expected b/tests/arr_dynamic.expected
index 9062604..e3b1791 100644
--- a/tests/arr_dynamic.expected
+++ b/tests/arr_dynamic.expected
@@ -1,6 +1,24 @@
+0
+1
 1
 3
 4
 10
 20
-30
\ No newline at end of file
+30
+99
+8
+3
+10
+99
+30
+30
+99
+10
+0
+0
+3
+6
+7
+8
+9
\ No newline at end of file
diff --git a/tests/arr_dynamic.sl b/tests/arr_dynamic.sl
index 7784a05..ea0b59c 100644
--- a/tests/arr_dynamic.sl
+++ b/tests/arr_dynamic.sl
@@ -3,21 +3,57 @@ import ../stdlib/io.sl
 import ../stdlib/arr.sl
 
 word main
+    # arr_new / arr_len / arr_cap / arr_data
     0 arr_new
 
+    dup arr_len puti cr
     dup arr_cap puti cr
+    dup arr_data over 24 + == puti cr
 
+    # arr_push
     10 swap arr_push
     20 swap arr_push
     30 swap arr_push
 
+    # arr_len / arr_cap after growth
     dup arr_len puti cr
     dup arr_cap puti cr
 
-    # print elements via explicit offsets: data[i] = @ (arr_data + i*8)
-    dup arr_data 0 8 * + @ puti cr
-    dup arr_data 1 8 * + @ puti cr
-    dup arr_data 2 8 * + @ puti cr
+    # arr_get
+    dup 0 swap arr_get puti cr
+    dup 1 swap arr_get puti cr
+    dup 2 swap arr_get puti cr
+
+    # arr_set
+    dup 99 swap 1 swap arr_set
+    dup 1 swap arr_get puti cr
+
+    # arr_reserve (with len > 0 so element copy path is exercised)
+    8 swap arr_reserve
+    dup arr_cap puti cr
+    dup arr_len puti cr
+    dup 0 swap arr_get puti cr
+    dup 1 swap arr_get puti cr
+    dup 2 swap arr_get puti cr
+
+    # arr_pop (including empty pop)
+    arr_pop puti cr
+    arr_pop puti cr
+    arr_pop puti cr
+    arr_pop puti cr
+    dup arr_len puti cr
 
     arr_free
+
+    # arr_to_dyn (convert std list to dynamic array)
+    [ 7 8 9 ] dup arr_to_dyn
+    dup arr_len puti cr
+    dup arr_cap puti cr
+    dup 0 swap arr_get puti cr
+    dup 1 swap arr_get puti cr
+    dup 2 swap arr_get puti cr
+    arr_free
+
+    # free list allocation: bytes = (len + 1) * 8
+    dup @ 1 + 8 * free
 end