summaryrefslogtreecommitdiff
path: root/rts/Trace.h
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Trace.h')
-rw-r--r--rts/Trace.h11
1 files changed, 11 insertions, 0 deletions
diff --git a/rts/Trace.h b/rts/Trace.h
index eed362e7b6..a4b4cc173b 100644
--- a/rts/Trace.h
+++ b/rts/Trace.h
@@ -473,6 +473,8 @@ void dtraceUserMarkerWrapper(Capability *cap, char *msg);
allocated)
#define dtraceEventHeapSize(heap_capset, size) \
HASKELLEVENT_HEAP_SIZE(heap_capset, size)
+#define dtraceEventBlocksSize(heap_capset, size) \
+ HASKELLEVENT_BLOCKS_SIZE(heap_capset, size)
#define dtraceEventHeapLive(heap_capset, live) \
HASKELLEVENT_HEAP_LIVE(heap_capset, live)
#define dtraceCapsetCreate(capset, capset_type) \
@@ -539,6 +541,7 @@ void dtraceUserMarkerWrapper(Capability *cap, char *msg);
#define dtraceEventHeapAllocated(cap, heap_capset, \
allocated) /* nothing */
#define dtraceEventHeapSize(heap_capset, size) /* nothing */
+#define dtraceEventBlocksSize(heap_capset, size) /* nothing */
#define dtraceEventHeapLive(heap_capset, live) /* nothing */
#define dtraceCapCreate(cap) /* nothing */
#define dtraceCapDelete(cap) /* nothing */
@@ -796,6 +799,14 @@ INLINE_HEADER void traceEventHeapSize(Capability *cap STG_UNUSED,
dtraceEventHeapSize(heap_capset, heap_size);
}
+INLINE_HEADER void traceEventBlocksSize(Capability *cap STG_UNUSED,
+ CapsetID heap_capset STG_UNUSED,
+ W_ heap_size STG_UNUSED)
+{
+ traceHeapEvent(cap, EVENT_BLOCKS_SIZE, heap_capset, heap_size);
+ dtraceEventBlocksSize(heap_capset, heap_size);
+}
+
INLINE_HEADER void traceEventHeapLive(Capability *cap STG_UNUSED,
CapsetID heap_capset STG_UNUSED,
W_ heap_live STG_UNUSED)