diff options
author | Joey Hess <joeyh@joeyh.name> | 2020-06-10 15:08:44 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2020-06-10 15:08:44 -0400 |
commit | a077594770132b4a07b168936d07385ff0c618d6 (patch) | |
tree | b18ee77e8594cfe1be10c4b57ee5b7e0618d91ab /src/System/Console/Concurrent.hs | |
parent | 8cda76848192a019529ceee9fcdb45088f9608e8 (diff) |
Revert "Added dependency on concurrent-output; removed embedded copy."
This reverts commit dbd3ba3400a3097498252097540ffe8075b00833.
Still has the same problem as in 2018!
Diffstat (limited to 'src/System/Console/Concurrent.hs')
-rw-r--r-- | src/System/Console/Concurrent.hs | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/src/System/Console/Concurrent.hs b/src/System/Console/Concurrent.hs new file mode 100644 index 00000000..12447637 --- /dev/null +++ b/src/System/Console/Concurrent.hs @@ -0,0 +1,44 @@ +-- | +-- Copyright: 2015 Joey Hess <id@joeyh.name> +-- License: BSD-2-clause +-- +-- Concurrent output handling. +-- +-- > import Control.Concurrent.Async +-- > import System.Console.Concurrent +-- > +-- > main = withConcurrentOutput $ +-- > outputConcurrent "washed the car\n" +-- > `concurrently` +-- > outputConcurrent "walked the dog\n" +-- > `concurrently` +-- > createProcessConcurrent (proc "ls" []) + +{-# LANGUAGE CPP #-} + +module System.Console.Concurrent ( + -- * Concurrent output + withConcurrentOutput, + Outputable(..), + outputConcurrent, + errorConcurrent, + ConcurrentProcessHandle, +#ifndef mingw32_HOST_OS + createProcessConcurrent, +#endif + waitForProcessConcurrent, + createProcessForeground, + flushConcurrentOutput, + lockOutput, + -- * Low level access to the output buffer + OutputBuffer, + StdHandle(..), + bufferOutputSTM, + outputBufferWaiterSTM, + waitAnyBuffer, + waitCompleteLines, + emitOutputBuffer, +) where + +import System.Console.Concurrent.Internal + |