string := @use("rel:string.hb")
buffer := @use("rel:buffer.hb")

log := fn(message: ^u8, level: u8): void {
	message_length := @inline(string.length, message);
	*(message + message_length) = level
	@eca(i32, 3, 1, message, message_length + 1)
	return
}

error := fn(message: ^u8): void return log(message, 0)
warn := fn(message: ^u8): void return log(message, 1)
info := fn(message: ^u8): void return log(message, 2)
debug := fn(message: ^u8): void return log(message, 3)
trace := fn(message: ^u8): void return log(message, 4)