haskell/stackage
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage.git synced 2026-01-25 13:41:56 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

Output build.log on error

Browse Source
This commit is contained in:
Michael Snoyman 2014-04-04 08:21:17 +03:00
parent 7f5293592b
commit ef84d1201a
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Stackage/Build.hs
View File

@ -19,6 +19,7 @@ import System.IO (BufferMode (NoBuffering),
import qualified System.IO.UTF8 import qualified System.IO.UTF8
import System.Process (rawSystem, runProcess, import System.Process (rawSystem, runProcess,
waitForProcess) waitForProcess)
import qualified Data.ByteString.Lazy.Char8 as L8
defaultBuildSettings :: Maybe Int -- ^ argument to -j defaultBuildSettings :: Maybe Int -- ^ argument to -j
-> GhcMajorVersion -> GhcMajorVersion
@ -105,6 +106,7 @@ build settings' bp = do
ec <- waitForProcess ph ec <- waitForProcess ph
unless (ec == ExitSuccess) $ do unless (ec == ExitSuccess) $ do
putStrLn "Build failed, please see build.log" putStrLn "Build failed, please see build.log"
L8.readFile "build.log" >>= L8.putStr
exitWith ec exitWith ec
putStrLn "Build completed successfully, checking for module name conflicts" putStrLn "Build completed successfully, checking for module name conflicts"