summaryrefslogtreecommitdiff
path: root/rts/Schedule.c
diff options
context:
space:
mode:
authorandy@galois.com <unknown>2007-06-26 04:19:58 +0000
committerandy@galois.com <unknown>2007-06-26 04:19:58 +0000
commit5598dbc2d946f94ec4253450987d7a56336ef54a (patch)
treef24307271217c632395e34e0349d33766041ff07 /rts/Schedule.c
parentd7230e532eb485db85d4e446d7fba4192507b3ba (diff)
downloadhaskell-5598dbc2d946f94ec4253450987d7a56336ef54a.tar.gz
Cleanup Hpc sub-system, remove hpc-tracer implementation.
Diffstat (limited to 'rts/Schedule.c')
-rw-r--r--rts/Schedule.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/rts/Schedule.c b/rts/Schedule.c
index f3d956a990..c61287f9f9 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -1813,9 +1813,6 @@ scheduleHandleThreadFinished (Capability *cap STG_UNUSED, Task *task, StgTSO *t)
debugTrace(DEBUG_sched, "--++ thread %lu (%s) finished",
(unsigned long)t->id, whatNext_strs[t->what_next]);
- /* Inform the Hpc that a thread has finished */
- hs_hpc_thread_finished_event(t);
-
#if defined(GRAN)
endThread(t, CurrentProc); // clean-up the thread
#elif defined(PARALLEL_HASKELL)