projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
ae019a2
)
Make simplifier report which phase it is doing in -ddump output
author
simonpj@microsoft.com
<unknown>
Thu, 18 May 2006 16:34:48 +0000
(16:34 +0000)
committer
simonpj@microsoft.com
<unknown>
Thu, 18 May 2006 16:34:48 +0000
(16:34 +0000)
compiler/simplCore/SimplCore.lhs
patch
|
blob
|
history
diff --git
a/compiler/simplCore/SimplCore.lhs
b/compiler/simplCore/SimplCore.lhs
index
24c8603
..
2fd1026
100644
(file)
--- a/
compiler/simplCore/SimplCore.lhs
+++ b/
compiler/simplCore/SimplCore.lhs
@@
-390,7
+390,7
@@
simplifyPgm mode switches hsc_env us imp_rule_base guts
text "",
pprSimplCount counts_out]);
text "",
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' })
}