summaryrefslogtreecommitdiff
path: root/ghc/rts/posix
diff options
context:
space:
mode:
authorsimonmar <unknown>2005-10-26 13:58:40 +0000
committersimonmar <unknown>2005-10-26 13:58:40 +0000
commit4305e52b992a150854511af248a75d2154020b02 (patch)
treee631cffd7cc1d5b396b17642276d61ab23804a2e /ghc/rts/posix
parent03aaa24e66ad6191d160c3d12377b4e56feaa435 (diff)
downloadhaskell-4305e52b992a150854511af248a75d2154020b02.tar.gz
[project @ 2005-10-26 13:58:40 by simonmar]
forkOS_createThreadWrapper: oops, better use the result from rts_evalStableIO()
Diffstat (limited to 'ghc/rts/posix')
-rw-r--r--ghc/rts/posix/OSThreads.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/rts/posix/OSThreads.c b/ghc/rts/posix/OSThreads.c
index 6b5918bf62..07bd762130 100644
--- a/ghc/rts/posix/OSThreads.c
+++ b/ghc/rts/posix/OSThreads.c
@@ -139,7 +139,7 @@ forkOS_createThreadWrapper ( void * entry )
{
Capability *cap;
cap = rts_lock();
- rts_evalStableIO(cap, (HsStablePtr) entry, NULL);
+ cap = rts_evalStableIO(cap, (HsStablePtr) entry, NULL);
rts_unlock(cap);
return NULL;
}