diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2017-02-23 13:22:48 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-02-23 17:26:44 -0500 |
| commit | a20433326eabd759502d9c170c3cc44ce6128a04 (patch) | |
| tree | 72ba807d45f05460dcfad02d437d9b79c0518481 /includes/rts | |
| parent | 0a77cedb914a67b8bd7c4af1f87714dc497fec3e (diff) | |
| download | haskell-a20433326eabd759502d9c170c3cc44ce6128a04.tar.gz | |
JSON profiler reports
This introduces a JSON output format for cost-centre profiler reports.
It's not clear whether this is really something we want to introduce
given that we may also move to a more Haskell-driven output pipeline in
the future, but I nevertheless found this helpful, so I thought I would
put it up.
Test Plan: Compile a program with `-prof -fprof-auto`; run with `+RTS
-pj`
Reviewers: austin, erikd, simonmar
Reviewed By: simonmar
Subscribers: duncan, maoe, thomie, simonmar
Differential Revision: https://phabricator.haskell.org/D3132
Diffstat (limited to 'includes/rts')
| -rw-r--r-- | includes/rts/Flags.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/includes/rts/Flags.h b/includes/rts/Flags.h index 0412415aca..ebcf973742 100644 --- a/includes/rts/Flags.h +++ b/includes/rts/Flags.h @@ -115,7 +115,7 @@ typedef struct _COST_CENTRE_FLAGS { # define COST_CENTRES_SUMMARY 1 # define COST_CENTRES_VERBOSE 2 /* incl. serial time profile */ # define COST_CENTRES_ALL 3 -# define COST_CENTRES_XML 4 +# define COST_CENTRES_JSON 4 int profilerTicks; /* derived */ int msecsPerTick; /* derived */ @@ -136,7 +136,7 @@ typedef struct _PROFILING_FLAGS { Time heapProfileInterval; /* time between samples */ uint32_t heapProfileIntervalTicks; /* ticks between samples (derived) */ - bool includeTSOs; + bool includeTSOs; bool showCCSOnException; |