mirror of
https://github.com/Ed94/Odin.git
synced 2026-06-23 06:05:00 -07:00
flysand7
31 lines
683 B
Odin
31 lines
683 B
Odin
package main
|
|
|
|
import "core:intrinsics"
|
|
|
|
SUS_exit :: uintptr(60)
|
|
SUS_write ::uintptr(1)
|
|
STDOUT_FILENO :: int(1)
|
|
|
|
sus_write :: proc "contextless" (fd: int, buf: cstring, size: uint) -> int {
|
|
return int(intrinsics.syscall(
|
|
SUS_write,
|
|
cast(uintptr) fd,
|
|
cast(uintptr) cast(rawptr) buf,
|
|
cast(uintptr) size
|
|
))
|
|
}
|
|
|
|
@(link_name = "sussy_baka")
|
|
sus_exit :: proc "contextless" (code: $T)->! {
|
|
intrinsics.syscall(SUS_exit, uintptr(code))
|
|
unreachable()
|
|
}
|
|
|
|
sus :: proc {sus_write, sus_exit}
|
|
|
|
@(link_name="_start", export) _start :: proc "c" ()->! {
|
|
str :: cstring("Hello, world!\n")
|
|
sus_write(STDOUT_FILENO, str, uint(14));
|
|
sus_exit(0)
|
|
}
|