1
0
Fork 0
forked from AbleOS/ableos
ableOS_v1Change/sysdata/programs/tests/src/main.hb
2024-07-20 04:10:15 -05:00

29 lines
584 B
Plaintext

stn := @use("../../../libraries/stn/src/lib.hb");
.{log, string, memory, buffer} := stn
service_search := fn(): void {
a := "\{01}\0"
@eca(void, 3, a, string.length)
return
}
main := fn(): int {
// Create a buffer
num := 2
buffer_id := buffer.create()
buffer.send_message(buffer_id)
memory_pages := memory.request_page(3)
buffer.receive_message(buffer_id, memory_pages, 4096 * 3)
log.info("abc\0")
memory.release_page(memory_pages, 3)
window := windo.create_window()
// todo: abstract this out
port_str := "\0\{70}\0"
a := @eca(u8, 3, 3, port_str, 2)
return 0
}