[commit: haddock] master: Disambiguate ‘die’ in test runners. (dba02d6)

git at git.haskell.org git at git.haskell.org
Sat May 3 13:41:30 UTC 2014


Repository : ssh://git@git.haskell.org/haddock

On branch  : master
Link       : http://git.haskell.org/haddock.git/commitdiff/dba02d6df32534aac5d257f2d28596238d248942

>---------------------------------------------------------------

commit dba02d6df32534aac5d257f2d28596238d248942
Author: Mateusz Kowalczyk <fuuzetsu at fuuzetsu.co.uk>
Date:   Sat May 3 15:40:11 2014 +0200

    Disambiguate ‘die’ in test runners.


>---------------------------------------------------------------

dba02d6df32534aac5d257f2d28596238d248942
 html-test/run.lhs  |    2 +-
 latex-test/run.lhs |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/html-test/run.lhs b/html-test/run.lhs
index 153ab32..a866436 100755
--- a/html-test/run.lhs
+++ b/html-test/run.lhs
@@ -41,7 +41,7 @@ main = do
 test :: IO ()
 test = do
   x <- doesFileExist haddockPath
-  unless x $ die "you need to run 'cabal build' successfully first"
+  unless x $ System.Exit.die "you need to run 'cabal build' successfully first"
 
   contents <- getDirectoryContents testDir
   args <- getArgs
diff --git a/latex-test/run.lhs b/latex-test/run.lhs
index 423dc6f..c1d48d9 100755
--- a/latex-test/run.lhs
+++ b/latex-test/run.lhs
@@ -41,7 +41,7 @@ main = do
 test :: IO ()
 test = do
   x <- doesFileExist haddockPath
-  unless x $ die "you need to run 'cabal build' successfully first"
+  unless x $ System.Exit.die "you need to run 'cabal build' successfully first"
 
   contents <- getDirectoryContents testDir
 



More information about the ghc-commits mailing list