RTS tidyup sweep, first phase

[ghc-hetmet.git] / includes / rts / Signals.h

diff --git a/includes/Signals.h b/includes/rts/Signals.h
similarity index 62%
rename from includes/Signals.h
rename to includes/rts/Signals.h
index a5907bb..8d9e0fd 100644 (file)
--- a/includes/Signals.h
+++ b/includes/rts/Signals.h
@@ -1,18 +1,21 @@
 /* -----------------------------------------------------------------------------
  *
- * (c) The GHC Team, 1998-2005
+ * (c) The GHC Team, 1998-2009
  *
  * RTS signal handling 
  *
  * ---------------------------------------------------------------------------*/
 
-#ifndef SIGNALS_H
-#define SIGNALS_H
+#ifndef RTS_SIGNALS_H
+#define RTS_SIGNALS_H
 
+/* NB. #included in Haskell code, no prototypes in here. */
+
+/* arguments to stg_sig_install() */
 #define STG_SIG_DFL   (-1)
 #define STG_SIG_IGN   (-2)
 #define STG_SIG_ERR   (-3)
 #define STG_SIG_HAN   (-4)
 #define STG_SIG_RST   (-5)
 
-#endif /* SIGNALS_H */
+#endif /* RTS_SIGNALS_H */