X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FHsFFI.c;h=38a520da009afe56ee1dbd3db61afd8748bd4f81;hp=d59c7a40a348f9273b46100e1b96a0e65aeae804;hb=e5c3b478b3cd1707cf122833822f44b2ac09b8e9;hpb=ab0e778ccfde61aed4c22679b24d175fc6cc9bf3

diff --git a/rts/HsFFI.c b/rts/HsFFI.c
index d59c7a4..38a520d 100644
--- a/rts/HsFFI.c
+++ b/rts/HsFFI.c
@@ -2,13 +2,14 @@
  *
  * (c) The GHC Team, 2005
  *
- * RTS entry points as mandated by the FFI addendum to the Haskell 98 report
+ * RTS entry points as mandated by the FFI section of the Haskell report
  *
  * ---------------------------------------------------------------------------*/
 
+#include "PosixSource.h"
 #include "HsFFI.h"
 #include "Rts.h"
-#include "Storage.h"
+
 #include "Stable.h"
 
 // hs_init and hs_exit are defined in RtsStartup.c