added a function to convert the buildt in array to a dynamic array

This commit is contained in:
IgorCielniak
2026-02-10 11:31:39 +01:00
parent 08892c97bb
commit 2f5b1f40b1
2 changed files with 10 additions and 2 deletions

View File

@@ -11,6 +11,14 @@
import mem.sl
#arr_to_dyn [* | std_arr] -> [* | dyn_arr]
word arr_to_dyn
dup @ dup dup 3 + alloc dup rot !
dup rot 2 * swap 8 + swap ! dup 16 +
dup 8 + dup -rot ! 0 swap 3 pick dup @
8 * swap 8 + swap memcpy 2drop drop nip
end
#arr_new [* | cap] -> [* | arr]
# Create a new array with given initial capacity (minimum 1)
word arr_new

View File

@@ -55,7 +55,7 @@ end
#memdump [*, len | addr] -> [* | addr]
word memdump
for
dup c@ puti cr 1 +
dup @ puti cr 8 +
end
end