summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--app/Main.hs14
-rw-r--r--package.yaml2
2 files changed, 15 insertions, 1 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 5273780..b299fec 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -1,7 +1,19 @@
module Main where
import Lib
+import Rainbow
+import qualified Data.ByteString as BS
+
+myChunks :: [Chunk String]
+myChunks = [ chunk "This is Red" & fore red, chunk "\n",
+ chunk "And Violettes are Blue" & fore blue, chunk "\n" ]
+
+myPrintedChunks :: IO ()
+myPrintedChunks = mapM_ BS.putStr
+ . chunksToByteStrings toByteStringsColors256
+ $ myChunks
main :: IO ()
-main = do putStrLn "we will call some func from Main now"
+main = do putStrLn "we will play with Rainbow package ant then call some func from our Lib."
+ myPrintedChunks
someFunc
diff --git a/package.yaml b/package.yaml
index 6ee5d74..69a7a06 100644
--- a/package.yaml
+++ b/package.yaml
@@ -11,6 +11,8 @@ copyright: "2018 Miguel"
dependencies:
- base >= 4.7 && < 5
+- bytestring
+- rainbow
library:
source-dirs: src