X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Frts%2FSchedule.h;h=516cabfb31da4267880c143223a9e7e8502ccd90;hb=845db8182942e006a9164e41e9839adb39f24268;hp=59d900f47e3c415585e90908798deed84888faac;hpb=50b99d58fe3f6912b78341aa277fbbdc6c3cf677;p=ghc-hetmet.git diff --git a/ghc/rts/Schedule.h b/ghc/rts/Schedule.h index 59d900f..516cabf 100644 --- a/ghc/rts/Schedule.h +++ b/ghc/rts/Schedule.h @@ -127,7 +127,7 @@ void initThread(StgTSO *tso, nat stack_size); /* Context switch flag. * Locks required : sched_mutex */ -extern nat RTS_VAR(context_switch); +extern int RTS_VAR(context_switch); extern rtsBool RTS_VAR(interrupted); /* In Select.c */