mirror of
https://gitee.com/zlgopen/awtk.git
synced 2024-12-03 04:27:44 +08: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)
|
|
|
|
|