Commit 64754697 authored by simonpj@microsoft.com's avatar simonpj@microsoft.com
Browse files

Make simplifier report which phase it is doing in -ddump output

parent ae019a20
...@@ -390,7 +390,7 @@ simplifyPgm mode switches hsc_env us imp_rule_base guts ...@@ -390,7 +390,7 @@ simplifyPgm mode switches hsc_env us imp_rule_base guts
text "", text "",
pprSimplCount counts_out]); pprSimplCount counts_out]);
endPass dflags "Simplify" Opt_D_verbose_core2core binds'; endPass dflags ("Simplify phase " ++ phase_info ++ " done") Opt_D_verbose_core2core binds';
return (counts_out, guts { mg_binds = binds' }) return (counts_out, guts { mg_binds = binds' })
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment