on master help sign in
Fix CI
c7ae66eAndrzej Rybczak
effectful-core/effectful-core.cabal+1−1
@@ -69,7 +69,7 @@ library
69 build-depends: effectful-internal-utils
69 build-depends: effectful-internal-utils
70
70
71 build-depends: base >= 4.13 && < 5
71 build-depends: base >= 4.13 && < 5
72− , containers >= 0.6.5.1
72+ , containers >= 0.6
73 , exceptions >= 0.10.4
73 , exceptions >= 0.10.4
74 , monad-control >= 1.0.3
74 , monad-control >= 1.0.3
75 , primitive >= 0.7.3.0
75 , primitive >= 0.7.3.0
effectful/effectful.cabal+3−3
@@ -62,12 +62,12 @@ library
62
62
63 build-depends: base >= 4.13 && < 5
63 build-depends: base >= 4.13 && < 5
64 , async >= 2.2.2
64 , async >= 2.2.2
65− , directory >= 1.3.7.0
65+ , directory >= 1.3.2
66 , effectful-core >= 0.1 && < 0.1.1
66 , effectful-core >= 0.1 && < 0.1.1
67− , process >= 1.6.12
67+ , process >= 1.6.9
68 , resourcet >= 1.2.4.3
68 , resourcet >= 1.2.4.3
69 , time >= 1.9.2
69 , time >= 1.9.2
70− , stm >= 2.5.0.2
70+ , stm >= 2.5.0.0
71 , unliftio >= 0.2.20
71 , unliftio >= 0.2.20
72
72
73 hs-source-dirs: src
73 hs-source-dirs: src
effectful/src/Effectful/Process.hs+5
@@ -1,3 +1,4 @@
1+{-# LANGUAGE CPP #-}
1-- | Lifted version of "System.Process".
2-- | Lifted version of "System.Process".
2module Effectful.Process
3module Effectful.Process
3 ( -- * The effect
4 ( -- * The effect
@@ -30,7 +31,9 @@ module Effectful.Process
30 , P.showCommandForUser
31 , P.showCommandForUser
31 , P.Pid
32 , P.Pid
32 , getPid
33 , getPid
34+#if MIN_VERSION_process(1,6,12)
33 , getCurrentPid
35 , getCurrentPid
36+#endif
34
37
35 -- * Process completion
38 -- * Process completion
36 , waitForProcess
39 , waitForProcess
@@ -143,9 +146,11 @@ cleanupProcess = unsafeEff_ . P.cleanupProcess
143getPid :: Process :> es => P.ProcessHandle -> Eff es (Maybe P.Pid)
146getPid :: Process :> es => P.ProcessHandle -> Eff es (Maybe P.Pid)
144getPid = unsafeEff_ . P.getPid
147getPid = unsafeEff_ . P.getPid
145
148
149+#if MIN_VERSION_process(1,6,12)
146-- | Lifted 'P.getCurrentPid'.
150-- | Lifted 'P.getCurrentPid'.
147getCurrentPid :: Process :> es => Eff es P.Pid
151getCurrentPid :: Process :> es => Eff es P.Pid
148getCurrentPid = unsafeEff_ P.getCurrentPid
152getCurrentPid = unsafeEff_ P.getCurrentPid
153+#endif
149
154
150----------------------------------------
155----------------------------------------
151-- Process completion
156-- Process completion