{-# LANGUAGE OverloadedStrings, RankNTypes, FlexibleContexts #-}

module Session where

import qualified Data.ByteString as B

startSession :: B.ByteString
startSession = ">>> debug-me session starting"

sessionDone :: IO ()
sessionDone = do
	putStrLn ""
	putStrLn ">>> debug-me session is done"