add debugging for odd OOM or hang on 5 architectures, all where configure runs sha224sum
This commit is contained in:
parent
6fbf4ab776
commit
238a935f9c
1 changed files with 5 additions and 0 deletions
|
@ -7,6 +7,7 @@ import Control.Applicative
|
|||
import System.Environment (getArgs)
|
||||
import Control.Monad.IfElse
|
||||
import Control.Monad
|
||||
import System.IO
|
||||
|
||||
import Build.TestConfig
|
||||
import Build.Version
|
||||
|
@ -62,7 +63,11 @@ shaTestCases l = map make l
|
|||
key = "sha" ++ show n
|
||||
search [] = return Nothing
|
||||
search (c:cmds) = do
|
||||
putStr $ "(" ++ c
|
||||
hFlush stdout
|
||||
sha <- externalSHA c n "/dev/null"
|
||||
putStr $ ":" ++ show sha ++ ")"
|
||||
hFlush stdout
|
||||
if sha == Right knowngood
|
||||
then return $ Just c
|
||||
else search cmds
|
||||
|
|
Loading…
Reference in a new issue