X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=includes%2FRtsFlags.h;h=77097872a20abd3d27bc09dc42e844afa2d09913;hb=8b18faef8aeaf40150c208272a2fc117611e8ae8;hp=db196a975b028b618904e578d3f60236defb0d38;hpb=6eee9f878a34f4b3ea4b3b3435a1f9b5beae6210;p=ghc-hetmet.git diff --git a/includes/RtsFlags.h b/includes/RtsFlags.h index db196a9..7709787 100644 --- a/includes/RtsFlags.h +++ b/includes/RtsFlags.h @@ -60,6 +60,7 @@ struct DEBUG_FLAGS { rtsBool sanity; /* 'S' warning: might be expensive! */ rtsBool stable; /* 't' */ rtsBool prof; /* 'p' */ + rtsBool eventlog; /* 'e' */ rtsBool gran; /* 'r' */ rtsBool par; /* 'P' */ rtsBool linker; /* 'l' the object linker */ @@ -67,6 +68,7 @@ struct DEBUG_FLAGS { rtsBool stm; /* 'm' */ rtsBool squeeze; /* 'z' stack squeezing & lazy blackholing */ rtsBool hpc; /* 'c' coverage */ + rtsBool timestamp; /* add timestamps to traces */ }; struct COST_CENTRE_FLAGS { @@ -113,6 +115,12 @@ struct PROFILING_FLAGS { }; +#ifdef EVENTLOG +struct EVENTLOG_FLAGS { + rtsBool doEventLogging; +}; +#endif + struct CONCURRENT_FLAGS { int ctxtSwitchTime; /* in milliseconds */ int ctxtSwitchTicks; /* derived */ @@ -183,6 +191,7 @@ struct PAR_FLAGS { rtsBool parGcEnabled; /* enable parallel GC */ rtsBool parGcGen; /* do parallel GC in this generation * and higher only */ + rtsBool parGcLoadBalancing; /* do load-balancing in parallel GC */ }; #endif /* THREADED_RTS */ @@ -306,12 +315,6 @@ struct TICKY_FLAGS { FILE *tickyFile; }; -struct TRACE_FLAGS { - rtsBool sched; /* trace scheduler events for profiling */ - rtsBool gc; /* trace GC events */ - rtsBool timestamp; /* add timestamps to traces */ -}; - #ifdef USE_PAPI #define MAX_PAPI_USER_EVENTS 8 @@ -340,8 +343,10 @@ typedef struct _RTS_FLAGS { struct DEBUG_FLAGS DebugFlags; struct COST_CENTRE_FLAGS CcFlags; struct PROFILING_FLAGS ProfFlags; +#ifdef EVENTLOG + struct EVENTLOG_FLAGS EventLogFlags; +#endif struct TICKY_FLAGS TickyFlags; - struct TRACE_FLAGS TraceFlags; #if defined(THREADED_RTS) || defined(PAR) struct PAR_FLAGS ParFlags;