mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

merge with git-repair

Browse source
This commit is contained in:
Joey Hess 2013-11-19 17:08:57 -04:00
parent 423e933800
commit b1ed98636b
5 changed files with 12 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Utility/Misc.hs
View file

@ -15,6 +15,7 @@ import Foreign
import Data.Char
import Data.List
import Control.Applicative
import System.Exit
#ifndef mingw32_HOST_OS
import System.Posix.Process (getAnyProcessStatus)
import Utility.Exception
@ -136,3 +137,7 @@ reapZombies = do
#else
reapZombies = return ()
#endif
exitBool :: Bool -> IO a
exitBool False = exitFailure
exitBool True = exitSuccess