add missing files (part of #3171 fix)

[ghc-hetmet.git] / includes / RtsGlobals.h

diff --git a/includes/RtsGlobals.h b/includes/RtsGlobals.h
new file mode 100644 (file)
index 0000000..476f112
--- /dev/null
+++ b/includes/RtsGlobals.h
@@ -0,0 +1,21 @@
+/* -----------------------------------------------------------------------------
+ *
+ * (c) The GHC Team, 2006-2009
+ *
+ * The RTS stores some "global" values on behalf of libraries, so that
+ * some libraries can ensure that certain top-level things are shared
+ * even when multiple versions of the library are loaded.  e.g. see
+ * Data.Typeable and GHC.Conc.
+ *
+ * ---------------------------------------------------------------------------*/
+
+#ifndef RTSGLOBALS_H
+#define RTSGLOBALS_H
+
+void initGlobalStore(void);
+void exitGlobalStore(void);
+
+StgStablePtr getOrSetTypeableStore(StgStablePtr value);
+StgStablePtr getOrSetSignalHandlerStore(StgStablePtr value);
+
+#endif