diff options
| author | Joachim Breitner <mail@joachim-breitner.de> | 2015-10-08 14:07:02 +0200 |
|---|---|---|
| committer | Joachim Breitner <mail@joachim-breitner.de> | 2015-11-06 15:55:21 +0100 |
| commit | 761639c60d80273b2036de72c56b7dfa26cd5be8 (patch) | |
| tree | 7eb581cbb407d8f0a0a441d465880183702db11b /compiler/coreSyn/CoreLint.hs | |
| parent | 5d3221aeefd3fab8c7ded74110997571805ab2ec (diff) | |
| download | haskell-wip/T10918.tar.gz | |
Make Call Arity aggressive only in the second runwip/T10918
not that I believe that this is a viable solution, but it should be a
way to work around
https://ghc.haskell.org/trac/ghc/ticket/10918#comment:10
and hopefully tell me whether the whole thing is actually useful.
Diffstat (limited to 'compiler/coreSyn/CoreLint.hs')
| -rw-r--r-- | compiler/coreSyn/CoreLint.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/coreSyn/CoreLint.hs b/compiler/coreSyn/CoreLint.hs index da08c21fca..20c70e2dc1 100644 --- a/compiler/coreSyn/CoreLint.hs +++ b/compiler/coreSyn/CoreLint.hs @@ -224,7 +224,7 @@ coreDumpFlag CoreDoFloatInwards = Just Opt_D_verbose_core2core coreDumpFlag (CoreDoFloatOutwards {}) = Just Opt_D_verbose_core2core coreDumpFlag CoreLiberateCase = Just Opt_D_verbose_core2core coreDumpFlag CoreDoStaticArgs = Just Opt_D_verbose_core2core -coreDumpFlag CoreDoCallArity = Just Opt_D_dump_call_arity +coreDumpFlag (CoreDoCallArity {}) = Just Opt_D_dump_call_arity coreDumpFlag CoreDoStrictness = Just Opt_D_dump_stranal coreDumpFlag CoreDoWorkerWrapper = Just Opt_D_dump_worker_wrapper coreDumpFlag CoreDoSpecialising = Just Opt_D_dump_spec |