Skip to content
Snippets Groups Projects
Commit e7eb94c0 authored by Sergey Vinokurov's avatar Sergey Vinokurov Committed by Oleg Grenrus
Browse files

-dsuppress-all is already detected as simple via 'isPrefixOf "-dsuppress-"'

parent 9c81fa63
No related branches found
No related tags found
No related merge requests found
...@@ -219,7 +219,7 @@ normaliseGhcArgs (Just ghcVersion) PackageDescription{..} ghcArgs ...@@ -219,7 +219,7 @@ normaliseGhcArgs (Just ghcVersion) PackageDescription{..} ghcArgs
simpleFlags :: Set String simpleFlags :: Set String
simpleFlags = Set.fromList . mconcat $ simpleFlags = Set.fromList . mconcat $
[ [ "-n", "-#include", "-Rghc-timing", "-dsuppress-all", "-dstg-stats" [ [ "-n", "-#include", "-Rghc-timing", "-dstg-stats"
, "-dth-dec-file", "-dsource-stats", "-dverbose-core2core" , "-dth-dec-file", "-dsource-stats", "-dverbose-core2core"
, "-dverbose-stg2stg", "-dcore-lint", "-dstg-lint", "-dcmm-lint" , "-dverbose-stg2stg", "-dcore-lint", "-dstg-lint", "-dcmm-lint"
, "-dasm-lint", "-dannot-lint", "-dshow-passes", "-dfaststring-stats" , "-dasm-lint", "-dannot-lint", "-dshow-passes", "-dfaststring-stats"
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment