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 /rts/Schedule.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 'rts/Schedule.h')
-rw-r--r-- | rts/Schedule.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Schedule.h b/rts/Schedule.h index c83b6fdcb6..1214fd8784 100644 --- a/rts/Schedule.h +++ b/rts/Schedule.h @@ -12,7 +12,7 @@ #include "rts/OSThreads.h" #include "Capability.h" -#include "eventlog/EventLog.h" +#include "Trace.h" #pragma GCC visibility push(hidden) @@ -136,7 +136,7 @@ appendToRunQueue (Capability *cap, StgTSO *tso) setTSOLink(cap, cap->run_queue_tl, tso); } cap->run_queue_tl = tso; - postEvent (cap, EVENT_THREAD_RUNNABLE, tso->id, 0); + traceSchedEvent (cap, EVENT_THREAD_RUNNABLE, tso, 0); } /* Push a thread on the beginning of the run queue. |