File tree Expand file tree Collapse file tree
Cabal/src/Distribution/Simple/Test
cabal-install/src/Distribution/Client Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -159,10 +159,11 @@ runTest verbHandles pkg_descr lbi clbi hpcMarkupInfo flags suite = do
159159 -- readable test log
160160 suiteLog <-
161161 ( \ s ->
162- (\ l -> l{logFile = finalLogName l})
163- . fromMaybe (error $ " panic! read @TestSuiteLog " ++ show s)
164- $ readMaybe s -- TODO: eradicateNoParse
165- ) <$> readFile tempLog
162+ (\ l -> l{logFile = finalLogName l})
163+ . fromMaybe (error $ " panic! read @TestSuiteLog " ++ show s)
164+ $ readMaybe s -- TODO: eradicateNoParse
165+ )
166+ <$> readFile tempLog
166167
167168 -- Write summary notice to log file indicating start of test suite
168169 appendFile (logFile suiteLog) $ summarizeSuiteStart testName'
Original file line number Diff line number Diff line change @@ -147,7 +147,8 @@ symlinkBinaries
147147 publicBinDir <- canonicalizePath symlinkBinDir
148148 -- TODO: do we want to do this here? :
149149 -- createDirectoryIfMissing True publicBinDir
150- catMaybes <$> sequenceA
150+ catMaybes
151+ <$> sequenceA
151152 [ do
152153 privateBinDir <- pkgBinDir pkg ipid
153154 ok <-
Original file line number Diff line number Diff line change @@ -458,7 +458,8 @@ runProjectBuildPhase
458458 verbosity
459459 ProjectBaseContext {.. }
460460 ProjectBuildContext {.. } =
461- Map. union (previousBuildOutcomes pkgsBuildStatus) <$> rebuildTargets
461+ Map. union (previousBuildOutcomes pkgsBuildStatus)
462+ <$> rebuildTargets
462463 verbosity
463464 projectConfig
464465 distDirLayout
Original file line number Diff line number Diff line change @@ -855,7 +855,8 @@ writePlanGhcEnvironment
855855 | compilerFlavor compiler == GHC
856856 , supportsPkgEnvFiles (getImplInfo compiler) =
857857 -- TODO: check ghcjs compat
858- Just <$> writeGhcEnvironmentFile
858+ Just
859+ <$> writeGhcEnvironmentFile
859860 path
860861 platform
861862 (compilerVersion compiler)
You can’t perform that action at this time.
0 commit comments