aboutsummaryrefslogtreecommitdiff
path: root/tests/programs/stdbuf.zc
diff options
context:
space:
mode:
Diffstat (limited to 'tests/programs/stdbuf.zc')
-rw-r--r--tests/programs/stdbuf.zc18
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/programs/stdbuf.zc b/tests/programs/stdbuf.zc
new file mode 100644
index 0000000..ab8f9dc
--- /dev/null
+++ b/tests/programs/stdbuf.zc
@@ -0,0 +1,18 @@
+include "src/lib/std.zc";
+fn main() {
+ let a = arena(8), p, q, b, i = 0, s = 0;
+ p = Arena.alloc(a, 4);
+ q = Arena.alloc(a, 4);
+ put_n(q - p); put_c(' ');
+ Arena.reset(a);
+ put_n(Arena.alloc(a, 4) == p); put_c(' ');
+ b = bnew(8);
+ while (i < 4) { Buf.set(b, i, 'A' + i); i++; }
+ i = 0;
+ while (i < Buf.length(b)) { s = s + Buf.get(b, i); i++; }
+ put_n(s); put_c(' ');
+ put_n(Buf.capacity(b)); put_c(10);
+ free(d*a);
+ free(d*b);
+ return 0;
+}