File tree Expand file tree Collapse file tree 2 files changed +1
-7
lines changed Expand file tree Collapse file tree 2 files changed +1
-7
lines changed Original file line number Diff line number Diff line change @@ -74,17 +74,10 @@ benchOptsParser = BenchmarkOpts
74
74
<*> switch (long " no-run-benchmarks" <>
75
75
help " Disable running of benchmarks. (Benchmarks will still be built.)" )
76
76
77
- addCoverageFlags :: BuildOpts -> BuildOpts
78
- addCoverageFlags bopts
79
- | toCoverage $ boptsTestOpts bopts
80
- = bopts { boptsGhcOptions = " -fhpc" : boptsGhcOptions bopts }
81
- | otherwise = bopts
82
-
83
77
-- | Parser for build arguments.
84
78
buildOptsParser :: Command
85
79
-> Parser BuildOpts
86
80
buildOptsParser cmd =
87
- fmap addCoverageFlags $
88
81
BuildOpts <$> target <*> libProfiling <*> exeProfiling <*>
89
82
haddock <*> haddockDeps <*> dryRun <*> ghcOpts <*>
90
83
flags <*> copyBins <*> preFetch <*> buildSubset <*>
Original file line number Diff line number Diff line change @@ -727,6 +727,7 @@ configureOptsNoDir econfig bco deps wanted isLocal package = concat
727
727
allGhcOptions = concat
728
728
[ Map. findWithDefault [] Nothing (configGhcOptions config)
729
729
, Map. findWithDefault [] (Just $ packageName package) (configGhcOptions config)
730
+ , concat [[" -fhpc" , " -fforce-recomp" ] | isLocal && toCoverage (boptsTestOpts bopts)]
730
731
, if includeExtraOptions
731
732
then boptsGhcOptions bopts
732
733
else []
You can’t perform that action at this time.
0 commit comments