scheduleThreadOn: use TSO_LOCKED even on the non-threaded RTS
authorSimon Marlow <marlowsd@gmail.com>
Wed, 30 Mar 2011 10:11:47 +0000 (10:11 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Wed, 30 Mar 2011 10:11:47 +0000 (10:11 +0000)
rts/Schedule.c

index 7c945e0..382ba97 100644 (file)
@@ -1874,9 +1874,9 @@ scheduleThread(Capability *cap, StgTSO *tso)
 void
 scheduleThreadOn(Capability *cap, StgWord cpu USED_IF_THREADS, StgTSO *tso)
 {
-#if defined(THREADED_RTS)
     tso->flags |= TSO_LOCKED; // we requested explicit affinity; don't
                              // move this thread from now on.
+#if defined(THREADED_RTS)
     cpu %= RtsFlags.ParFlags.nNodes;
     if (cpu == cap->no) {
        appendToRunQueue(cap,tso);