summaryrefslogtreecommitdiffhomepage
path: root/Session.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-04-18 14:18:16 -0400
committerJoey Hess <joeyh@joeyh.name>2017-04-18 14:20:09 -0400
commit9102a47c6c68039a288a6ee8f43fe14b034ce356 (patch)
treee88eefe101db6381625518c68c7d8ed9e1fe3bac /Session.hs
parentccdb5a3c6a28cc6745d337bdb67e62d70216ef7e (diff)
downloaddebug-me-9102a47c6c68039a288a6ee8f43fe14b034ce356.tar.gz
add --replay option
This commit was sponsored by Ole-Morten Duesund on Patreon.
Diffstat (limited to 'Session.hs')
-rw-r--r--Session.hs13
1 files changed, 13 insertions, 0 deletions
diff --git a/Session.hs b/Session.hs
new file mode 100644
index 0000000..e7bf674
--- /dev/null
+++ b/Session.hs
@@ -0,0 +1,13 @@
+{-# 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"