diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2017-09-04 08:15:08 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-09-05 07:20:01 -0400 |
| commit | 24e50f988f775c6bba7d1daaee2e23c13650aa3b (patch) | |
| tree | ab6204b9b3d51c02f4ed6cf06060f707adf88a92 /rts/eventlog | |
| parent | 822abbb1b4300ebaa3f12014b9fc477261283143 (diff) | |
| download | haskell-24e50f988f775c6bba7d1daaee2e23c13650aa3b.tar.gz | |
rts: Add heap breakdown type for -hT
Test Plan: Build, program with `-eventlog`, try running with `+RTS -h`
Reviewers: austin, erikd, simonmar
Subscribers: rwbarton, thomie
GHC Trac Issues: #14096
Differential Revision: https://phabricator.haskell.org/D3922
Diffstat (limited to 'rts/eventlog')
| -rw-r--r-- | rts/eventlog/EventLog.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/eventlog/EventLog.c b/rts/eventlog/EventLog.c index c8b4485be3..619d576b93 100644 --- a/rts/eventlog/EventLog.c +++ b/rts/eventlog/EventLog.c @@ -1109,6 +1109,8 @@ static HeapProfBreakdown getHeapProfBreakdown(void) return HEAP_PROF_BREAKDOWN_RETAINER; case HEAP_BY_LDV: return HEAP_PROF_BREAKDOWN_BIOGRAPHY; + case HEAP_BY_CLOSURE_TYPE: + return HEAP_PROF_BREAKDOWN_CLOSURE_TYPE; default: barf("getHeapProfBreakdown: unknown heap profiling mode"); } |