added two packages from stackage and playing with them

1 files changed, 13 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