path: root/src/System/Process
diff options
authorJoey Hess2020-06-10 14:40:29 -0400
committerJoey Hess2020-06-10 14:40:29 -0400
commitdbd3ba3400a3097498252097540ffe8075b00833 (patch)
tree1f319032876e2b7ed217ce4c0ec541e033eee1ad /src/System/Process
parent8deac74e2c6d07537ee0c95928af069c8558390e (diff)
Added dependency on concurrent-output; removed embedded copy.
Trying again what failed in 2018 (commit 02eca2ae4cf51d8e83d94d8359e15ac053451109). I hope the problem was a broken old version of concurrent-output and that it will be ok now. This commit was sponsored by Denis Dzyubenko on Patreon.
Diffstat (limited to 'src/System/Process')
1 files changed, 0 insertions, 34 deletions
diff --git a/src/System/Process/Concurrent.hs b/src/System/Process/Concurrent.hs
deleted file mode 100644
index 0e00e4fd..00000000
--- a/src/System/Process/Concurrent.hs
+++ /dev/null
@@ -1,34 +0,0 @@
--- |
--- Copyright: 2015 Joey Hess <>
--- License: BSD-2-clause
--- The functions exported by this module are intended to be drop-in
--- replacements for those from System.Process, when converting a whole
--- program to use System.Console.Concurrent.
-module System.Process.Concurrent where
-import System.Console.Concurrent
-import System.Console.Concurrent.Internal (ConcurrentProcessHandle(..))
-import System.Process hiding (createProcess, waitForProcess)
-import System.IO
-import System.Exit
--- | Calls `createProcessConcurrent`
--- You should use the waitForProcess in this module on the resulting
--- ProcessHandle. Using System.Process.waitForProcess instead can have
--- mildly unexpected results.
-createProcess :: CreateProcess -> IO (Maybe Handle, Maybe Handle, Maybe Handle, ProcessHandle)
-createProcess p = do
- (i, o, e, ConcurrentProcessHandle h) <- createProcessConcurrent p
- return (i, o, e, h)
--- | Calls `waitForProcessConcurrent`
--- You should only use this on a ProcessHandle obtained by calling
--- createProcess from this module. Using this with a ProcessHandle
--- obtained from System.Process.createProcess etc will have extremely
--- unexpected results; it can wait a very long time before returning.
-waitForProcess :: ProcessHandle -> IO ExitCode
-waitForProcess = waitForProcessConcurrent . ConcurrentProcessHandle