SingleLogger misses and repeats log messages
Closed this issue · 3 comments
vshabanov commented
import System.Log.FastLogger
import Control.Monad
main = do
(put, close) <- newFastLogger1 $ LogStdout 2
forM_ [1..10] $ \ i -> put $ toLogStr $ show i <> "\n"
close
outputs
2
3
4
5
6
7
8
9
9
10
I suspect the issue is in
it drops
ologmsg
and repeats nlogmsg
.kazu-yamamoto commented
@vshabanov You are right. Would you send a PR?
kazu-yamamoto commented
I think nlogmsg:q
should be ologmsg:q
.
vshabanov commented
Added a PR. Tested it, and it seems to fix the issue.