diff options
author | Duncan Coutts <duncan@well-typed.com> | 2012-07-03 19:57:05 +0100 |
---|---|---|
committer | Mikolaj Konarski <mikolaj@well-typed.com> | 2012-07-10 17:53:48 +0200 |
commit | 45c80482b537158bbe2d9b9f755ac3d3d02e73f5 (patch) | |
tree | c6a4611733699170355cfc8db4b0397deb933129 /rts/Trace.h | |
parent | 38397354574eb09e8d8f29e56e7e2943363fc0d0 (diff) | |
download | haskell-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.h | 19 |
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, |