Fix incorrectly hidden RTS symbols

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

diff --git a/includes/rts/PrimFloat.h b/includes/rts/PrimFloat.h
new file mode 100644 (file)
index 0000000..7d137a7
--- /dev/null
+++ b/includes/rts/PrimFloat.h
@@ -0,0 +1,18 @@
+/* -----------------------------------------------------------------------------
+ *
+ * (c) The GHC Team, 1998-2009
+ *
+ * Primitive floating-point operations
+ *
+ * To understand the structure of the RTS headers, see the wiki:
+ *   http://hackage.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes
+ *
+ * ---------------------------------------------------------------------------*/
+
+#ifndef RTS_PRIMFLOAT_H
+#define RTS_PRIMFLOAT_H
+
+StgDouble __int_encodeDouble (I_ j, I_ e);
+StgFloat  __int_encodeFloat (I_ j, I_ e);
+
+#endif /* RTS_PRIMFLOAT_H */