a

1 files changed, 11 insertions, 0 deletions

diff --git a/tests/programs/sys.zc b/tests/programs/sys.zc
new file mode 100644
index 0000000..52924fa
--- /dev/null
+++ b/tests/programs/sys.zc
@@ -0,0 +1,11 @@
+include "src/lib/std.zc";
+fn main() {
+	let s, n;
+	n = Host.writefile("/tmp/zc-sys-out.txt", "zy");
+	s = readfile("/tmp/zc-sys-out.txt");
+	put_n(n); put_c(' '); put_s(s); put_c(' ');
+	if (Host.now() > 1000000000) put_s("time\n");
+	else put_s("notime\n");
+	free(d*s);
+	return 0;
+}