From 4ff7d0b15769c360b3f54e857a6880edbcd46d26 Mon Sep 17 00:00:00 2001 From: simonmar Date: Tue, 16 Dec 2003 13:19:13 +0000 Subject: [PATCH] [project @ 2003-12-16 13:19:01 by simonmar] ANSIfy --- ghc/rts/Task.c | 2 +- ghc/rts/Task.h | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/ghc/rts/Task.c b/ghc/rts/Task.c index c720538..6579abc 100644 --- a/ghc/rts/Task.c +++ b/ghc/rts/Task.c @@ -200,7 +200,7 @@ stopTaskManager () } void -resetTaskManagerAfterFork () +resetTaskManagerAfterFork ( void ) { rts_n_waiting_tasks = 0; taskCount = 0; diff --git a/ghc/rts/Task.h b/ghc/rts/Task.h index ee59987..fcea419 100644 --- a/ghc/rts/Task.h +++ b/ghc/rts/Task.h @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team 2001- + * (c) The GHC Team 2001-2003 * * Types + prototypes for functions in Task.c * (RTS subsystem for handling tasks, agents thay may execute STG code). @@ -28,7 +28,7 @@ extern TaskInfo *taskIds; extern void startTaskManager ( nat maxTasks, void (*taskStart)(void) ); extern void stopTaskManager ( void ); -void resetTaskManagerAfterFork (); +extern void resetTaskManagerAfterFork ( void ); extern void startTask ( void (*taskStart)(void) ); -- 1.7.10.4