mirror of
https://github.com/snoyberg/keter.git
synced 2024-12-15 01:23:09 +03:00
10 lines
208 B
Haskell
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"
|