diff options
author | Simon Marlow <marlowsd@gmail.com> | 2016-08-02 13:09:32 +0100 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2016-08-03 08:07:34 +0100 |
commit | 4dcbbd1db1dc18aa07b031fcbad2cf94c0334d3f (patch) | |
tree | 7c47018a0bc532b672ac730e306d1a4ecb2de5e1 /rts/Trace.h | |
parent | d1fe08ec15230d5a6c3025ef798a8c911d2fa1c7 (diff) | |
download | haskell-4dcbbd1db1dc18aa07b031fcbad2cf94c0334d3f.tar.gz |
Remove the DEBUG_<blah> variables, use RtsFlags directly
Diffstat (limited to 'rts/Trace.h')
-rw-r--r-- | rts/Trace.h | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/rts/Trace.h b/rts/Trace.h index 8b531f130a..ccdad7a06c 100644 --- a/rts/Trace.h +++ b/rts/Trace.h @@ -45,23 +45,23 @@ enum CapsetType { CapsetTypeCustom = CAPSET_TYPE_CUSTOM, // Message classes // ----------------------------------------------------------------------------- -// debugging flags, set with +RTS -D<something> -extern int DEBUG_sched; -extern int DEBUG_interp; -extern int DEBUG_weak; -extern int DEBUG_gccafs; -extern int DEBUG_gc; -extern int DEBUG_block_alloc; -extern int DEBUG_sanity; -extern int DEBUG_stable; -extern int DEBUG_stm; -extern int DEBUG_prof; -extern int DEBUG_gran; -extern int DEBUG_par; -extern int DEBUG_linker; -extern int DEBUG_squeeze; -extern int DEBUG_hpc; -extern int DEBUG_sparks; +// shorthand for RtsFlags.DebugFlags.<blah>, useful with debugTrace() +#define DEBUG_sched RtsFlags.DebugFlags.scheduler +#define DEBUG_interp RtsFlags.DebugFlags.interp +#define DEBUG_weak RtsFlags.DebugFlags.weak +#define DEBUG_gccafs RtsFlags.DebugFlags.gccafs +#define DEBUG_gc RtsFlags.DebugFlags.gc +#define DEBUG_block_alloc RtsFlags.DebugFlags.alloc +#define DEBUG_sanity RtsFlags.DebugFlags.sanity +#define DEBUG_stable RtsFlags.DebugFlags.stable +#define DEBUG_stm RtsFlags.DebugFlags.stm +#define DEBUG_prof RtsFlags.DebugFlags.prof +#define DEBUG_gran RtsFlags.DebugFlags.gran +#define DEBUG_par RtsFlags.DebugFlags.par +#define DEBUG_linker RtsFlags.DebugFlags.linker +#define DEBUG_squeeze RtsFlags.DebugFlags.squeeze +#define DEBUG_hpc RtsFlags.DebugFlags.hpc +#define DEBUG_sparks RtsFlags.DebugFlags.sparks // events extern int TRACE_sched; |