[project @ 2004-11-10 04:17:50 by wolfgang]
[ghc-hetmet.git] / ghc / rts / Schedule.h
index 59d900f..516cabf 100644 (file)
@@ -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 */