summaryrefslogtreecommitdiff
path: root/src/Utility/Process/Shim.hs
blob: 08694d5db4bfea67623f370f96e605c223708bda (plain)
1
2
3
4
5
6
7
8
9
10
11
12
module Utility.Process.Shim (module X, createProcess, waitForProcess) where

import System.Process as X hiding (createProcess, waitForProcess)
import Utility.ConcurrentOutput (createProcessConcurrent, waitForProcessConcurrent)
import System.IO
import System.Exit

createProcess :: CreateProcess -> IO (Maybe Handle, Maybe Handle, Maybe Handle, ProcessHandle) 
createProcess = createProcessConcurrent

waitForProcess :: ProcessHandle -> IO ExitCode
waitForProcess = waitForProcessConcurrent