New tracing interface

[ghc-hetmet.git] / rts / Schedule.h

diff --git a/rts/Schedule.h b/rts/Schedule.h
index 37b0794..3adb70f 100644 (file)
--- a/rts/Schedule.h
+++ b/rts/Schedule.h
@@ -117,8 +117,7 @@ extern int RTS_VAR(context_switch);
  */
 #define SCHED_RUNNING       0  /* running as normal */
 #define SCHED_INTERRUPTING  1  /* ^C detected, before threads are deleted */
-#define SCHED_INTERRUPTED   2  /* ^C detected, after threads deleted */
-#define SCHED_SHUTTING_DOWN 3  /* final shutdown */
+#define SCHED_SHUTTING_DOWN 2  /* final shutdown */
 
 extern rtsBool RTS_VAR(sched_state);
 
@@ -315,11 +314,6 @@ emptyThreadQueues(Capability *cap)
     ;
 }
 
-#ifdef DEBUG
-void sched_belch(char *s, ...)
-   GNU_ATTRIBUTE(format (printf, 1, 2));
-#endif
-
 #endif /* !IN_STG_CODE */
 
 STATIC_INLINE void