summaryrefslogtreecommitdiff
path: root/rts/RtsAPI.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/RtsAPI.c')
-rw-r--r--rts/RtsAPI.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/RtsAPI.c b/rts/RtsAPI.c
index fb91fafdd3..2b3ad74a17 100644
--- a/rts/RtsAPI.c
+++ b/rts/RtsAPI.c
@@ -564,7 +564,7 @@ rts_lock (void)
}
cap = NULL;
- waitForReturnCapability(&cap, task);
+ waitForCapability(&cap, task);
if (task->incall->prev_stack == NULL) {
// This is a new outermost call from C into Haskell land.