Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Protect OVERLAPS pragma with CPP.

Browse source
This commit is contained in:
John MacFarlane 2017-08-20 11:13:42 -07:00
parent ba3088f0b3
commit e334d7dc38
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/Text/Pandoc/Class.hs
View file

@ -866,7 +866,11 @@ instance (MonadTrans t, PandocMonad m, Functor (t m),
putCommonState = lift . putCommonState
logOutput = lift . logOutput
#if MIN_VERSION_base(4,8,0)
instance {-# OVERLAPS #-} PandocMonad m => PandocMonad (ParsecT s st m) where
#else
instance PandocMonad m => PandocMonad (ParsecT s st m) where
#endif
lookupEnv = lift . lookupEnv
getCurrentTime = lift getCurrentTime
getCurrentTimeZone = lift getCurrentTimeZone