mirror of
https://github.com/odin-lang/Odin.git
synced 2025-12-29 17:34:34 +00:00
27 lines
605 B
Odin
27 lines
605 B
Odin
//+build darwin
|
|
//+private
|
|
package runtime
|
|
|
|
foreign import libc "system:System.framework"
|
|
|
|
@(default_calling_convention="c")
|
|
foreign libc {
|
|
@(link_name="__stderrp")
|
|
_stderr: rawptr
|
|
|
|
@(link_name="fwrite")
|
|
_fwrite :: proc(ptr: rawptr, size: uint, nmemb: uint, stream: rawptr) -> uint ---
|
|
|
|
@(link_name="__error")
|
|
_get_errno :: proc() -> ^i32 ---
|
|
}
|
|
|
|
_stderr_write :: proc "contextless" (data: []byte) -> (int, _OS_Errno) {
|
|
ret := _fwrite(raw_data(data), 1, len(data), _stderr)
|
|
if ret < len(data) {
|
|
err := _get_errno()
|
|
return int(ret), _OS_Errno(err^ if err != nil else 0)
|
|
}
|
|
return int(ret), 0
|
|
}
|