mirror of
https://github.com/c3lang/c3c.git
synced 2026-02-27 12:01:16 +00:00
36 lines
799 B
C
36 lines
799 B
C
module libc::os;
|
|
|
|
$if (env::COMPILER_LIBC_AVAILABLE && env::OS_TYPE == OsType.LINUX)
|
|
|
|
extern fn int* __errno_location();
|
|
macro int errno() => *__errno_location();
|
|
macro void errno_set(int err) => *(__errno_location()) = err;
|
|
|
|
$elif (env::COMPILER_LIBC_AVAILABLE && env::OS_TYPE == OsType.MACOSX)
|
|
|
|
extern fn int* __error();
|
|
macro int errno() => *__error();
|
|
macro void errno_set(int err) => *(__error()) = err;
|
|
|
|
$elif (env::COMPILER_LIBC_AVAILABLE && env::OS_TYPE == OsType.WIN32)
|
|
|
|
macro int errno()
|
|
{
|
|
int holder;
|
|
_get_errno(&holder);
|
|
return holder;
|
|
}
|
|
|
|
macro void errno_set(int err) => _set_errno(err);
|
|
|
|
extern fn void _get_errno(int* result);
|
|
extern fn void _set_errno(int err);
|
|
|
|
$else
|
|
|
|
tlocal int _errno_c3 = 0;
|
|
fn void errno_set(int err) => _errno_c3 = err;
|
|
fn int errno() => _errno_c3;
|
|
|
|
$endif
|