ableos/sysdata/programs/time_driver/src/main.hb

stn := @use("../../../libraries/stn/src/lib.hb")
log := stn.log
mem := stn.memory
s := stn.string
page := 0

main := fn(): void {
	page += mem.request_page(1)
	port_str := "\0\0\{47}\0"
	a := @eca(u8, 3, 3, port_str, 4)

	n := 5000000
	loop {
		if n == 0 break
		n -= 1
		stack_reclamation_edge_case := 0
	}
	td := s.display_int(a, page)
	log.debug(td)
	
	return
}