[Pkg-haskell-commits] [SCM] haskell-testpack branch, master, updated. debian/1.0.2-1-4-gb0d6b36

[John Goerzen]

The following commit has been merged in the master branch:
commit 2b054939c75af26098ddd9cbb28ba867e1262021
Author: John Goerzen <jgoerzen at complete.org>
Date:   Wed Jul 19 02:26:58 2006 +0100

    Windows doesn't have signals

diff --git a/MissingH/Cmd.hs b/MissingH/Cmd.hs
index d10e662..affcf7d 100644
--- a/MissingH/Cmd.hs
+++ b/MissingH/Cmd.hs
@@ -411,6 +411,8 @@ cmdfailed funcname command args failcode = do
     warningM (logbase ++ "." ++ funcname) errormsg
     ioError e
 
+#ifndef mingw32_HOST_OS
+#ifndef __HUGS__
 cmdsignalled :: String -> FilePath -> [String] -> Signal -> IO a
 cmdsignalled funcname command args failcode = do
     let errormsg = "Command " ++ command ++ " " ++ (show args) ++
@@ -418,6 +420,8 @@ cmdsignalled funcname command args failcode = do
     let e = userError (errormsg)
     warningM (logbase ++ "." ++ funcname) errormsg
     ioError e
+#endif
+#endif
 
 #ifndef mingw32_HOST_OS
 #ifndef __HUGS__

-- 
haskell-testpack