a

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;
+}