Commit b8766c9a authored by Simon Marlow's avatar Simon Marlow

Make it so that -Ds implies -ls

parent c6660342
......@@ -58,6 +58,11 @@ void initTracing (void)
initMutex(&trace_utx);
#endif
#define TRACE_FLAG(name, class) \
class = RtsFlags.TraceFlags.name ? 1 : 0;
TRACE_FLAG(scheduler, TRACE_sched);
#ifdef DEBUG
#define DEBUG_FLAG(name, class) \
class = RtsFlags.DebugFlags.name ? 1 : 0;
......@@ -80,11 +85,6 @@ void initTracing (void)
DEBUG_FLAG(sparks, DEBUG_sparks);
#endif
#define TRACE_FLAG(name, class) \
class = RtsFlags.TraceFlags.name ? 1 : 0;
TRACE_FLAG(scheduler, TRACE_sched);
eventlog_enabled = !RtsFlags.TraceFlags.trace_stderr && (
TRACE_sched
#ifdef DEBUG
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment