1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
fn main() {
let path = b"/tmp/zc-bstr.txt";
let msg = b"byte-io";
let fd = bopen(path, 1);
let n = bwrite(fd, msg, len_s(msg));
syscall(SYS_CLOSE, fd, 0, 0);
fd = bopen(path, 0);
let buf = new_s(7);
let g = bread(fd, buf, 7);
syscall(SYS_CLOSE, fd, 0, 0);
let name = b"ZC_BSTR";
let envb = new_s(16);
let k = bgetenv(name, envb, 16);
put_s(buf); put_c(32);
put_n(n); put_c(32);
put_n(g); put_c(32);
put_n(buf == msg); put_c(32);
put_n(k); put_c(32);
put_n(at_s(envb, 0)); put_c(32);
put_n(at_s(envb, 5)); put_c(10);
return 0;
}
|
