asakul
/
atradebot
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
Browse Source

Removed tick logging

master
Denis Tereshkin 7 years ago
parent
38eef4f4d2
commit
339ecb66a6
1 changed files with 1 additions and 1 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 2
      src/Bot.hs

2
src/Bot.hs
Unescape View File

@ -77,7 +77,7 @@ startBot conf = do
forever $ do forever $ do
tick <- BC.readChan tickChan tick <- BC.readChan tickChan
when (datatype tick == LastTradePrice) $ do when (datatype tick == LastTradePrice) $ do
debugM "ATradeBot.QS" $ "Incoming tick: " ++ show tick --debugM "ATradeBot.QS" $ "Incoming tick: " ++ show tick
atomicModifyIORef' ref (\s -> ((M.insert (security tick) tick s), ())) atomicModifyIORef' ref (\s -> ((M.insert (security tick) tick s), ()))

Write Preview
Loading…
Cancel
Save