diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2019-05-29 16:56:08 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-06-07 10:21:57 -0400 |
| commit | 0b7372f68c0bc9cafc30e227b574abf1d5b16df5 (patch) | |
| tree | f1b33e977ed5fb858ba102815260136a89d1735c /rts/Trace.h | |
| parent | e963beb54a243f011396942d2add644e3f3dd8ae (diff) | |
| download | haskell-0b7372f68c0bc9cafc30e227b574abf1d5b16df5.tar.gz | |
Add HEAP_PROF_SAMPLE_END event to mark end of samples
This allows a user to observe how long a sampling period lasts so that
the time taken can be removed from the profiling output.
Fixes #16697
Diffstat (limited to 'rts/Trace.h')
| -rw-r--r-- | rts/Trace.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Trace.h b/rts/Trace.h index 74b960ce31..17e3dc7040 100644 --- a/rts/Trace.h +++ b/rts/Trace.h @@ -288,6 +288,7 @@ void traceTaskDelete_ (Task *task); void traceHeapProfBegin(StgWord8 profile_id); void traceHeapProfSampleBegin(StgInt era); +void traceHeapProfSampleEnd(StgInt era); void traceHeapProfSampleString(StgWord8 profile_id, const char *label, StgWord residency); #if defined(PROFILING) @@ -335,6 +336,7 @@ void flushTrace(void); #define traceHeapProfBegin(profile_id) /* nothing */ #define traceHeapProfCostCentre(ccID, label, module, srcloc, is_caf) /* nothing */ #define traceHeapProfSampleBegin(era) /* nothing */ +#define traceHeapProfSampleEnd(era) /* nothing */ #define traceHeapProfSampleCostCentre(profile_id, stack, residency) /* nothing */ #define traceHeapProfSampleString(profile_id, label, residency) /* nothing */ |