blob: 0cad82a5feb41d744be1e4965e9e0fcacd2167d5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
use sys
use "types"
use "errno"
use "cstrconv"
use "slcp"
use "die"
pkg std =
const nanosleep : (nsecs : uint64 -> errno)
$noret const exit : (status:int -> void)
pkglocal const bgetcwd : (buf : byte[:] -> errno)
;;
const nanosleep = {nsecs
var req, rem
var s, ns
s = (nsecs / 1_000_000_000 : int64)
ns = (nsecs % 1_000_000_000 : int64)
req = [.sec = s, .nsec = ns]
-> (sys.nanosleep(&req, &rem) : errno)
}
const exit = {status
sys.exit(status)
}
const bgetcwd = {buf
var res
res = (sys.__getcwd(buf) : errno)
if res == 0
-> (cstrlen(buf) : errno)
elif res == Enomem
-> Erange
else
-> res
;;
}
|
