update

tests/arr_static_sort.sl

@@ -0,0 +1,29 @@
+import ../stdlib/stdlib.sl
+import ../stdlib/io.sl
+import ../stdlib/arr.sl
+
+word free_static
+    dup @ 1 + 8 * free
+end
+
+word main
+    [ 4 1 3 2 ] dup arr_sort
+    dup 0 swap arr_get_static puti cr
+    dup 1 swap arr_get_static puti cr
+    dup 2 swap arr_get_static puti cr
+    dup 3 swap arr_get_static puti cr
+    free_static
+
+    [ 9 5 7 ] dup arr_sorted
+    dup 0 swap arr_get_static puti cr
+    dup 1 swap arr_get_static puti cr
+    dup 2 swap arr_get_static puti cr
+
+    swap
+    dup 0 swap arr_get_static puti cr
+    dup 1 swap arr_get_static puti cr
+    dup 2 swap arr_get_static puti cr
+
+    free_static
+    free_static
+end