From 9f076a02084843d54bcb6d8c63c443e9af820b67 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Thu, 11 Sep 2008 15:38:27 +0000 Subject: [PATCH] Use OSThreadProcAttr for workerStart --- rts/Schedule.c | 2 +- rts/Schedule.h | 4 +++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/rts/Schedule.c b/rts/Schedule.c index 7f59f09..a41dd67 100644 --- a/rts/Schedule.c +++ b/rts/Schedule.c @@ -1912,7 +1912,7 @@ scheduleWaitThread (StgTSO* tso, /*[out]*/HaskellObj* ret, Capability *cap) * ------------------------------------------------------------------------- */ #if defined(THREADED_RTS) -void +void OSThreadProcAttr workerStart(Task *task) { Capability *cap; diff --git a/rts/Schedule.h b/rts/Schedule.h index 45aa000..6ed7598 100644 --- a/rts/Schedule.h +++ b/rts/Schedule.h @@ -70,7 +70,9 @@ StgWord findRetryFrameHelper (StgTSO *tso); * Called from STG : NO * Locks assumed : none */ -void workerStart(Task *task); +#if defined(THREADED_RTS) +void OSThreadProcAttr workerStart(Task *task); +#endif #if defined(GRAN) void awaken_blocked_queue(StgBlockingQueueElement *q, StgClosure *node); -- 1.7.10.4