[commit: ghc] master: Remove the definition of die, which is now provided by System.Exit (ef35d4c)
git at git.haskell.org
git at git.haskell.org
Mon Apr 28 10:00:20 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/ef35d4cfcfcb9b0b733f1ec8ec16a1e0020be1f5/ghc
>---------------------------------------------------------------
commit ef35d4cfcfcb9b0b733f1ec8ec16a1e0020be1f5
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Fri Apr 25 00:06:08 2014 +0100
Remove the definition of die, which is now provided by System.Exit
>---------------------------------------------------------------
ef35d4cfcfcb9b0b733f1ec8ec16a1e0020be1f5
testsuite/timeout/timeout.hs | 4 ----
1 file changed, 4 deletions(-)
diff --git a/testsuite/timeout/timeout.hs b/testsuite/timeout/timeout.hs
index 0806687..f78baa1 100644
--- a/testsuite/timeout/timeout.hs
+++ b/testsuite/timeout/timeout.hs
@@ -33,10 +33,6 @@ main = do
_ -> die ("Can't parse " ++ show secs ++ " as a number of seconds")
_ -> die ("Bad arguments " ++ show args)
-die :: String -> IO ()
-die msg = do hPutStrLn stderr ("timeout: " ++ msg)
- exitWith (ExitFailure 1)
-
timeoutMsg :: String
timeoutMsg = "Timeout happened...killing process..."
More information about the ghc-commits
mailing list