Merge pull request #36 from maoe/exit

Relax the return type of exit
2015-03-19 19:19:14 -07:00 · 2015-03-19 19:19:14 -07:00 · 45219bc991
commit 45219bc991
parent ac0cd1d853 a53c80e987
1 changed files with 1 additions and 1 deletions
--- a/src/Turtle/Prelude.hs
+++ b/src/Turtle/Prelude.hs
@ -533,7 +533,7 @@ sleep n = threadDelay (truncate (n * 10^(6::Int)))

    An exit code of @0@ indicates success
 -}
-exit :: Int -> IO ()
+exit :: Int -> IO a
 exit 0 = exitWith  ExitSuccess
 exit n = exitWith (ExitFailure n)