blob: 5840ceeddeafe91c3a807f3341b747ef3571df87 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
{-# LANGUAGE OverloadedStrings, RankNTypes, FlexibleContexts #-}
module Session where
import qualified Data.ByteString as B
startSession :: B.ByteString
startSession = ">>> debug-me session started"
sessionDone :: IO ()
sessionDone = do
putStrLn ""
putStrLn ">>> debug-me session ended"
|