Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
jberryman
GHC
Commits
8ba55ae0
Commit
8ba55ae0
authored
Nov 21, 2013
by
Simon Peyton Jones
Browse files
Add debug dump of the list of Cmm proc points
parent
b3f9c910
Changes
1
Hide whitespace changes
Inline
Side-by-side
compiler/cmm/CmmPipeline.hs
View file @
8ba55ae0
...
...
@@ -83,6 +83,7 @@ cpsTop hsc_env proc =
minimalProcPointSet
(
targetPlatform
dflags
)
call_pps
g
else
return
call_pps
dumpIfSet_dyn
dflags
Opt_D_dump_cmm
"Proc points"
(
ppr
l
$$
ppr
proc_points
$$
ppr
g
)
let
noncall_pps
=
proc_points
`
setDifference
`
call_pps
when
(
not
(
setNull
noncall_pps
)
&&
dopt
Opt_D_dump_cmm
dflags
)
$
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment