mirror of
https://gitee.com/Vancouver2017/luban-lite-t3e-pro.git
synced 2025-12-14 18:38:55 +00:00
12 lines
250 B
Forth
12 lines
250 B
Forth
var a = typed_array_create("i8", 8)
|
|
typed_array_push(a, 1, 2, 3, 4, 5, 6, 7, 8);
|
|
|
|
var b = wbuffer_attach(a.data, a.bytes)
|
|
assert(wbuffer_write_int8(b, 1, 2, 3, 4) == 4)
|
|
assert(b.cursor==4)
|
|
assert(b.capacity==8)
|
|
|
|
print(b.data, b.cursor, b.capacity)
|
|
|
|
|