From 7133a728596918544601a18e3090281eaff34ad1 Mon Sep 17 00:00:00 2001 From: melody! Date: Wed, 7 Aug 2024 21:23:52 -0400 Subject: did stuff --- app/Screen.hs | 7 +++++++ 1 file changed, 7 insertions(+) create mode 100644 app/Screen.hs (limited to 'app/Screen.hs') diff --git a/app/Screen.hs b/app/Screen.hs new file mode 100644 index 0000000..9962cde --- /dev/null +++ b/app/Screen.hs @@ -0,0 +1,7 @@ +module Screen + ( clear + ) where + +clear :: IO () +clear = putStr "\ESC[H\ESC[2J" + -- cgit 1.4.1-2-gfad0