diff options
author | Simon Marlow <marlowsd@gmail.com> | 2009-08-29 09:47:27 +0000 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2009-08-29 09:47:27 +0000 |
commit | a5288c551349a0adab0d931a429b10a096d9444d (patch) | |
tree | 245dd2dfd2b4e23f3fc8ae474b709289b60e5f15 /includes/rts/Flags.h | |
parent | c51229b2bfd3b1a61d3966db894210ef848f0a6d (diff) | |
download | haskell-a5288c551349a0adab0d931a429b10a096d9444d.tar.gz |
Unify event logging and debug tracing.
- tracing facilities are now enabled with -DTRACING, and -DDEBUG
additionally enables debug-tracing. -DEVENTLOG has been
removed.
- -debug now implies -eventlog
- events can be printed to stderr instead of being sent to the
binary .eventlog file by adding +RTS -v (which is implied by the
+RTS -Dx options).
- -Dx debug messages can be sent to the binary .eventlog file
by adding +RTS -l. This should help debugging by reducing
the impact of debug tracing on execution time.
- Various debug messages that duplicated the information in events
have been removed.
Diffstat (limited to 'includes/rts/Flags.h')
-rw-r--r-- | includes/rts/Flags.h | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/includes/rts/Flags.h b/includes/rts/Flags.h index d9e3be97de..3d0230a376 100644 --- a/includes/rts/Flags.h +++ b/includes/rts/Flags.h @@ -65,13 +65,12 @@ struct DEBUG_FLAGS { rtsBool sanity; /* 'S' warning: might be expensive! */ rtsBool stable; /* 't' */ rtsBool prof; /* 'p' */ - rtsBool eventlog; /* 'e' */ rtsBool linker; /* 'l' the object linker */ rtsBool apply; /* 'a' */ rtsBool stm; /* 'm' */ rtsBool squeeze; /* 'z' stack squeezing & lazy blackholing */ rtsBool hpc; /* 'c' coverage */ - rtsBool timestamp; /* add timestamps to traces */ + rtsBool sparks; /* 'r' */ }; struct COST_CENTRE_FLAGS { @@ -118,11 +117,12 @@ struct PROFILING_FLAGS { }; -#ifdef EVENTLOG -struct EVENTLOG_FLAGS { - rtsBool doEventLogging; +struct TRACE_FLAGS { + rtsBool trace_stderr; + rtsBool timestamp; /* show timestamp in stderr output */ + + rtsBool scheduler; /* trace scheduler events */ }; -#endif struct CONCURRENT_FLAGS { int ctxtSwitchTime; /* in milliseconds */ @@ -184,9 +184,7 @@ 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 TRACE_FLAGS TraceFlags; struct TICKY_FLAGS TickyFlags; #if defined(THREADED_RTS) |