d1a6274 · typeable/ether

git.iko.soy/typeable/ether

Compile without warnings

commitd1a62749b3ec9474bd5a7724a84d08a08eba88a3 authorIndex Int <vlad.z.4096@gmail.com> dateFri 19 Jun 2015, 15:09 (11 years ago) parentdaca884

2 files changed+2−4

unifiedsplit

src/Control/Ether/Util.hs−2

@@ -9,8 +9,6 @@ module Control.Ether.Util

99 , fmap

1010 ) where

1111

12−import qualified Control.Monad.Signatures as Sig

13−import qualified Control.Monad.Trans.Writer as Trans

1412import Prelude hiding (fmap)

1513

1614#if __GLASGOW_HASKELL__ < 710

src/Control/Monad/Trans/Ether/Writer.hs+2−2

@@ -86,10 +86,10 @@ instance Monoid w => Lift.LiftLocal (WriterT tag w)

8686instance Monoid w => Lift.LiftCatch (WriterT tag w)

8787

8888instance Monoid w' => Lift.LiftListen (WriterT tag w') where

89− liftListen listen m = WriterT $ Lift.liftListen listen (coerce m)

89+ liftListen listen' m = WriterT $ Lift.liftListen listen' (coerce m)

9090

9191instance Monoid w' => Lift.LiftPass (WriterT tag w') where

92− liftPass pass m = WriterT $ Lift.liftPass pass (coerce m)

92+ liftPass pass' m = WriterT $ Lift.liftPass pass' (coerce m)

9393

9494instance Monoid w => Lift.LiftCallCC (WriterT tag w) where

9595 liftCallCC callCC f = WriterT $ Lift.liftCallCC callCC (coerce f)