summaryrefslogtreecommitdiff
path: root/rts/Trace.h
diff options
context:
space:
mode:
authorDuncan Coutts <duncan@well-typed.com>2012-07-03 19:57:05 +0100
committerMikolaj Konarski <mikolaj@well-typed.com>2012-07-10 17:53:48 +0200
commit45c80482b537158bbe2d9b9f755ac3d3d02e73f5 (patch)
treec6a4611733699170355cfc8db4b0397deb933129 /rts/Trace.h
parent38397354574eb09e8d8f29e56e7e2943363fc0d0 (diff)
downloadhaskell-45c80482b537158bbe2d9b9f755ac3d3d02e73f5.tar.gz
Have a go at fixing the heap info DTrace build failue on OSX
This patch will need to be tested by someone on OSX. Fixed a couple wrong names: CapsetID vs EventCapsetID gc__sync vs gc__global__sync
Diffstat (limited to 'rts/Trace.h')
-rw-r--r--rts/Trace.h19
1 files changed, 0 insertions, 19 deletions
diff --git a/rts/Trace.h b/rts/Trace.h
index 6141003026..dcd00b8cc1 100644
--- a/rts/Trace.h
+++ b/rts/Trace.h
@@ -364,7 +364,6 @@ INLINE_HEADER void dtraceStartup (int num_caps) {
HASKELLEVENT_GC_DONE(cap)
#define dtraceGcGlobalSync(cap) \
HASKELLEVENT_GC_GLOBAL_SYNC(cap)
-/* FIXME: leads to a validate failure on OS X (Lion)
#define dtraceEventGcStats(heap_capset, gens, \
copies, slop, fragmentation, \
par_n_threads, \
@@ -389,20 +388,6 @@ INLINE_HEADER void dtraceStartup (int num_caps) {
HASKELLEVENT_HEAP_SIZE(heap_capset, size)
#define dtraceEventHeapLive(heap_capset, live) \
HASKELLEVENT_HEAP_LIVE(heap_capset, live)
- */
-#define dtraceEventGcStats(heap_capset, gens, \
- copies, slop, fragmentation, \
- par_n_threads, \
- par_max_copied, \
- par_tot_copied)
-#define dtraceHeapInfo(heap_capset, gens, \
- maxHeapSize, allocAreaSize, \
- mblockSize, blockSize)
-#define dtraceEventHeapAllocated(cap, heap_capset, \
- allocated)
-#define dtraceEventHeapSize(heap_capset, size)
-#define dtraceEventHeapLive(heap_capset, live)
-
#define dtraceCapsetCreate(capset, capset_type) \
HASKELLEVENT_CAPSET_CREATE(capset, capset_type)
#define dtraceCapsetDelete(capset) \
@@ -552,9 +537,7 @@ INLINE_HEADER void traceEventMigrateThread(Capability *cap STG_UNUSED,
INLINE_HEADER void traceCapCreate(Capability *cap STG_UNUSED)
{
traceCapEvent(cap, EVENT_CAP_CREATE);
-/* FIXME: leads to a validate failure on OS X (Lion)
dtraceCapCreate((EventCapNo)cap->no);
- */
}
INLINE_HEADER void traceCapDelete(Capability *cap STG_UNUSED)
@@ -653,9 +636,7 @@ INLINE_HEADER void traceEventGcDone(Capability *cap STG_UNUSED)
INLINE_HEADER void traceEventGcGlobalSync(Capability *cap STG_UNUSED)
{
traceGcEvent(cap, EVENT_GC_GLOBAL_SYNC);
-/* FIXME: leads to a validate failure on OS X (Lion)
dtraceGcGlobalSync((EventCapNo)cap->no);
- */
}
INLINE_HEADER void traceEventGcStats(Capability *cap STG_UNUSED,