[commit: packages/process] master: Add `/Since: 1.2.0.0/` annotations to recently added entities (7710899)
git at git.haskell.org
git at git.haskell.org
Wed Nov 20 21:09:16 UTC 2013
Repository : ssh://git@git.haskell.org/process
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/7710899de8fa259314cfeaef5452b2e2dcdfee8f/process
>---------------------------------------------------------------
commit 7710899de8fa259314cfeaef5452b2e2dcdfee8f
Author: Herbert Valerio Riedel <hvr at gnu.org>
Date: Wed Nov 20 21:56:32 2013 +0100
Add `/Since: 1.2.0.0/` annotations to recently added entities
...and update changelog
Signed-off-by: Herbert Valerio Riedel <hvr at gnu.org>
>---------------------------------------------------------------
7710899de8fa259314cfeaef5452b2e2dcdfee8f
System/Process.hs | 4 ++++
System/Process/Internals.hs | 2 ++
changelog | 3 +++
3 files changed, 9 insertions(+)
diff --git a/System/Process.hs b/System/Process.hs
index cc7acb4..9b8b85d 100644
--- a/System/Process.hs
+++ b/System/Process.hs
@@ -224,6 +224,7 @@ createProcess cp = do
-- arguments. It does not wait for the program to finish, but returns the
-- 'ProcessHandle'.
--
+-- /Since: 1.2.0.0/
spawnProcess :: FilePath -> [String] -> IO ProcessHandle
spawnProcess cmd args = do
(_,_,_,p) <- createProcess_ "spawnProcess" (proc cmd args)
@@ -232,6 +233,7 @@ spawnProcess cmd args = do
-- | Creates a new process to run the specified shell command.
-- It does not wait for the program to finish, but returns the 'ProcessHandle'.
--
+-- /Since: 1.2.0.0/
spawnCommand :: String -> IO ProcessHandle
spawnCommand cmd = do
(_,_,_,p) <- createProcess_ "spawnCommand" (shell cmd)
@@ -245,6 +247,7 @@ spawnCommand cmd = do
-- arguments, and wait for it to finish. If the command returns a non-zero
-- exit code, an exception is raised.
--
+-- /Since: 1.2.0.0/
callProcess :: FilePath -> [String] -> IO ()
callProcess cmd args = do
(_,_,_,p) <- createProcess_ "callCommand" (proc cmd args) { delegate_ctlc = True }
@@ -256,6 +259,7 @@ callProcess cmd args = do
-- | Creates a new process to run the specified shell command. If the
-- command returns a non-zero exit code, an exception is raised.
--
+-- /Since: 1.2.0.0/
callCommand :: String -> IO ()
callCommand cmd = do
(_,_,_,p) <- createProcess_ "callCommand" (shell cmd) { delegate_ctlc = True }
diff --git a/System/Process/Internals.hs b/System/Process/Internals.hs
index 797535c..b00280f 100644
--- a/System/Process/Internals.hs
+++ b/System/Process/Internals.hs
@@ -176,6 +176,8 @@ data CreateProcess = CreateProcess{
delegate_ctlc:: Bool -- ^ Delegate control-C handling. Use this for interactive console processes to let them handle control-C themselves (see below for details).
--
-- On Windows this has no effect.
+ --
+ -- /Since: 1.2.0.0/
}
data CmdSpec
diff --git a/changelog b/changelog
index 542b995..15b04e8 100644
--- a/changelog
+++ b/changelog
@@ -4,6 +4,9 @@
* Remove NHC specific code
* Add support for `base-4.7.0.0`
* Improve `showCommandForUser` to reduce redundant quoting
+ * New functions `callProcess`, `callCommand`, `spawnProcess` and `spawnCommand`
+ * Implement WCE handling according to http://www.cons.org/cracauer/sigint.html
+ * New `delegate_ctlc` field in `CreateProcess` for WCE handling
* Use `ExitFailure (-signum)` on Unix when a proc is terminated due to
a signal.
* Deprecate `module System.Cmd`
More information about the ghc-commits
mailing list