diff options
Diffstat (limited to 'tests/programs/bstr_io.zc')
| -rw-r--r-- | tests/programs/bstr_io.zc | 35 |
1 files changed, 19 insertions, 16 deletions
diff --git a/tests/programs/bstr_io.zc b/tests/programs/bstr_io.zc index 9cf7ca9..8b1f2af 100644 --- a/tests/programs/bstr_io.zc +++ b/tests/programs/bstr_io.zc @@ -1,22 +1,25 @@ +namespace; +include rt; + 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 fd = rt.bopen(path, 1); + let n = rt.bwrite(fd, msg, rt.len_s(msg)); + rt.syscall(rt.SYS_CLOSE, fd, 0, 0); + fd = rt.bopen(path, 0); + let buf = rt.new_s(7); + let g = rt.bread(fd, buf, 7); + rt.syscall(rt.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); + let envb = rt.new_s(16); + let k = rt.bgetenv(name, envb, 16); + rt.put_s(buf); rt.put_c(32); + rt.put_n(n); rt.put_c(32); + rt.put_n(g); rt.put_c(32); + rt.put_n(buf == msg); rt.put_c(32); + rt.put_n(k); rt.put_c(32); + rt.put_n(rt.at_s(envb, 0)); rt.put_c(32); + rt.put_n(rt.at_s(envb, 5)); rt.put_c(10); return 0; } |