@@ -168,6 +168,7 @@ performBuild' pb@PerformBuild {..} = withBuildDir $ \builddir -> do
168 $ \ClosedStream Inherited Inherited -> return ()
168 $ \ClosedStream Inherited Inherited -> return ()
169 pbLog $ encodeUtf8 "Copying built-in Haddocks\n"
169 pbLog $ encodeUtf8 "Copying built-in Haddocks\n"
170 copyBuiltInHaddocks (pbDocDir pb)
170 copyBuiltInHaddocks (pbDocDir pb)
171+ pbLog $ encodeUtf8 "Finished copying built-in Haddocks\n"
172 sem <- atomically $ newTSem pbJobs
173 sem <- atomically $ newTSem pbJobs
173 active <- newTVarIO (0 :: Int)
174 active <- newTVarIO (0 :: Int)
@@ -288,7 +289,7 @@ singleBuild pb@PerformBuild {..} SingleBuild {..} =
288 log' t = do
289 log' t = do
289 i <- readTVarIO sbActive
290 i <- readTVarIO sbActive
290 errs <- readTVarIO sbErrsVar
291 errs <- readTVarIO sbErrsVar
291− pbLog $ encodeUtf8 $ concat
292+ when False $ pbLog $ encodeUtf8 $ concat
293 , " (pending: "
294 , " (pending: "
294 , tshow i
295 , tshow i
@@ -367,7 +368,6 @@ singleBuild pb@PerformBuild {..} SingleBuild {..} =
367 args = "haddock"
368 args = "haddock"
368 : "--hyperlink-source"
369 : "--hyperlink-source"
369 : "--html"
370 : "--html"
371 : "--html-location=../$pkg-$version/"
371 : "--html-location=../$pkg-$version/"
372 : hfsOpts
372 : hfsOpts
@@ -416,12 +416,15 @@ singleBuild pb@PerformBuild {..} SingleBuild {..} =
416 warn t = atomically $ modifyTVar sbWarningsVar (. (t:))
416 warn t = atomically $ modifyTVar sbWarningsVar (. (t:))
418 updateErrs exc = do
418 updateErrs exc = do
420+ DependencyFailed _ -> return ()
419− log' $ concat
422+ log' $ concat
420− [ display (piName sbPackageInfo)
423+ [ display (piName sbPackageInfo)
422− , tshow exc
425+ , tshow exc
424− atomically $ modifyTVar sbErrsVar $ insertMap (piName sbPackageInfo) exc'
427+ atomically $ modifyTVar sbErrsVar $ insertMap (piName sbPackageInfo) exc'
427 case fromException exc of
430 case fromException exc of