From 8c6245fac35cdc9a1ef743d29eea9176448d350d Mon Sep 17 00:00:00 2001 From: Frederick Yin Date: Mon, 13 Mar 2023 18:23:48 +0800 Subject: Package into cabal project --- src/Color.hs | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 src/Color.hs (limited to 'src/Color.hs') diff --git a/src/Color.hs b/src/Color.hs new file mode 100644 index 0000000..1d63fcd --- /dev/null +++ b/src/Color.hs @@ -0,0 +1,13 @@ +module Color where + +red :: String -> String +red s = "\x001b[31m" ++ s ++ "\x001b[0m" + +green :: String -> String +green s = "\x001b[32m" ++ s ++ "\x001b[0m" + +yellow :: String -> String +yellow s = "\x001b[33m" ++ s ++ "\x001b[0m" + +blue :: String -> String +blue s = "\x001b[34m" ++ s ++ "\x001b[0m" -- cgit v1.2.3