From 5adc7cf997d481a6afb3ed95573d6eff44cbdd5b Mon Sep 17 00:00:00 2001
From: Xander <xander@icth.xyz>
Date: Mon, 3 Jul 2023 15:27:49 +0200
Subject: Added clear screen function

---
 kernel/main.dats | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'kernel/main.dats')

diff --git a/kernel/main.dats b/kernel/main.dats
index dfbaa49..bbd201a 100644
--- a/kernel/main.dats
+++ b/kernel/main.dats
@@ -4,6 +4,7 @@ staload "kernel/writer.sats"
 dynload "kernel/writer.dats"
 
 implement main0 () = (
-  put_string("         Hello world\n");
+  clear_screen();
+  put_string("Hello world\n");
   put_string("GOEIENDSG\n");
   put_string("GOEIENDSG"))
-- 
cgit v1.2.3