summaryrefslogtreecommitdiff
path: root/rts
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-03-20 10:04:46 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-03-20 10:04:46 +0000
commit5cdb1ff5e889d3361e80e7b01bcb90b682dd9136 (patch)
treef5f5398937246ec5ab84ef5c319e8d3820653101 /rts
parent77998ef4dc3277c3037460125d8fc8a7dc8ead75 (diff)
downloadhaskell-5cdb1ff5e889d3361e80e7b01bcb90b682dd9136.tar.gz
Fix bug in setThreadAffinity() (Linux)
Diffstat (limited to 'rts')
-rw-r--r--rts/posix/OSThreads.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/posix/OSThreads.c b/rts/posix/OSThreads.c
index 9bcd56f8ad..84b111fcb7 100644
--- a/rts/posix/OSThreads.c
+++ b/rts/posix/OSThreads.c
@@ -224,7 +224,7 @@ setThreadAffinity (nat n, nat m)
nproc = getNumberOfProcessors();
CPU_ZERO(&cs);
for (i = n; i < nproc; i+=m) {
- CPU_SET(n, &cs);
+ CPU_SET(i, &cs);
}
sched_setaffinity(0, sizeof(cpu_set_t), &cs);
}