From f70052e9dd0492e2e73e96b54ae97c5ee6bf24a3 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Mon, 5 Mar 2007 14:45:50 +0000 Subject: [PATCH] forkProcess: startTimer() in the child, because the timer will be reset --- rts/Schedule.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/rts/Schedule.c b/rts/Schedule.c index b405759..e328b5b 100644 --- a/rts/Schedule.c +++ b/rts/Schedule.c @@ -2195,6 +2195,10 @@ forkProcess(HsStablePtr *entry cap->returning_tasks_tl = NULL; #endif + // On Unix, all timers are reset in the child, so we need to start + // the timer again. + startTimer(); + cap = rts_evalStableIO(cap, entry, NULL); // run the action rts_checkSchedStatus("forkProcess",cap); -- 1.7.10.4