IgorCielniak/l2
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

small fix in arr.sl

Browse Source
This commit is contained in:
IgorCielniak
2026-02-10 17:47:59 +01:00
parent 2b48e2d7e6
commit 709377a45b
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
stdlib/arr.sl
View File

@@ -13,7 +13,7 @@ import mem.sl
#arr_to_dyn [* | std_arr] -> [* | dyn_arr] #arr_to_dyn [* | std_arr] -> [* | dyn_arr]
word arr_to_dyn word arr_to_dyn
dup @ dup dup 3 + alloc dup rot ! dup @ dup dup 2 * 3 + alloc dup rot !
dup rot 2 * swap 8 + swap ! dup 16 + dup rot 2 * swap 8 + swap ! dup 16 +
dup 8 + dup -rot ! 0 swap 3 pick dup @ dup 8 + dup -rot ! 0 swap 3 pick dup @
8 * swap 8 + swap memcpy 2drop drop nip 8 * swap 8 + swap memcpy 2drop drop nip
@@ -125,4 +125,4 @@ end
# Set element at index i to x # Set element at index i to x
word arr_set word arr_set
arr_data swap 8 * + swap ! arr_data swap 8 * + swap !
end end