From fcff38543be6a1b321641f26aa349cf0f02d66bb Mon Sep 17 00:00:00 2001
From: Julian Hurst <ark@mansus.space>
Date: Wed, 12 Mar 2025 04:14:25 +0100
Subject: Initial commit

---
 tui/tui.ha | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 tui/tui.ha

(limited to 'tui/tui.ha')

diff --git a/tui/tui.ha b/tui/tui.ha
new file mode 100644
index 0000000..871f847
--- /dev/null
+++ b/tui/tui.ha
@@ -0,0 +1,14 @@
+use fmt;
+use io;
+use unix::tty;
+
+export fn init() (io::file | tty::error) = {
+	const f = tty::open()?;
+	clear(f);
+	return f;
+
+};
+
+export fn clear(out: io::file) void = {
+	fmt::fprint(out, "\x1B[2J\x1B[1;1H")!;
+};
-- 
cgit v1.2.3