61e952a · distributed-process

git.iko.soy/distributed-process

Switch to monad-control>=0.4.

commit61e952abd1191321bf47a4f004d9136f41a4d2c9 authorMathieu Boespflug <m@tweag.io> dateMon 2 Nov 2015, 18:49 (11 years ago) parente219567

2 files changed+5−3

unifiedsplit

distributed-process.cabal+1−1

@@ -56,7 +56,7 @@ Library

5656 rank1dynamic >= 0.1 && < 0.4,

5757 syb >= 0.3 && < 0.7,

5858 transformers-base >= 0.3 && < 0.5,

59− monad-control >= 0.3 && < 0.4

59+ monad-control >= 0.4

6060 Exposed-modules: Control.Distributed.Process,

6161 Control.Distributed.Process.Closure,

6262 Control.Distributed.Process.Debug,

src/Control/Distributed/Process/Internal/Types.hs+4−2

@@ -359,9 +359,11 @@ newtype Process a = Process {

359359instance MonadBase IO Process where

360360 liftBase = liftIO

361361

362+newtype StMProcess a = StMProcess { unStMProcess :: StM (ReaderT LocalProcess IO) a }

363+

364+

362365instance MonadBaseControl IO Process where

363− newtype StM Process a =

364− StMProcess { unStMProcess :: StM (ReaderT LocalProcess IO) a }

366+ type StM Process a = StMProcess a

365367

366368 liftBaseWith f = Process $ liftBaseWith $ \run ->

367369 f $ fmap StMProcess . run . unProcess