Skip to content

Commit 8eb9ecb

Browse files
author
Dmitry Bogatov
committed
Fix build with aeson >= 2.0.0
1 parent fba4ef9 commit 8eb9ecb

1 file changed

Lines changed: 5 additions & 0 deletions

File tree

src/TDLib/EventLoop.hs

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,4 @@
1+
{-# LANGUAGE CPP #-}
12
{-# LANGUAGE ExistentialQuantification #-}
23

34
-- | A heavyweight TDLib effect intepreter written using event loop
@@ -20,7 +21,11 @@ import Control.Monad
2021
import Control.Monad.Loops
2122
import Data.Aeson
2223
import Data.ByteString.Lazy (toStrict)
24+
#if MIN_VERSION_aeson(2,0,0)
25+
import qualified Data.Aeson.KeyMap as HM
26+
#else
2327
import qualified Data.HashMap.Strict as HM
28+
#endif
2429
import Data.IntMap.Strict (IntMap)
2530
import qualified Data.IntMap.Strict as M
2631
import Data.Maybe

0 commit comments

Comments
 (0)