keter/test/logfile.hs
Michael Snoyman 3c4ad2799f LogFile
2012-05-17 07:15:25 +03:00

10 lines
208 B
Haskell

{-# LANGUAGE OverloadedStrings #-}
import Keter.LogFile
import Keter.Prelude
main = runKIO print $ do
Right lf <- start "log/test"
addChunk lf "foo\n"
addChunk lf "bar\n"
addChunk lf "baz\n"