RTS tidyup sweep, first phase

[ghc-hetmet.git] / rts / hooks / OnExit.c

diff --git a/rts/hooks/OnExit.c b/rts/hooks/OnExit.c
index dd4c3b4..e8019c0 100644 (file)
--- a/rts/hooks/OnExit.c
+++ b/rts/hooks/OnExit.c
@@ -4,6 +4,7 @@
  *
  * ---------------------------------------------------------------------------*/
 
+#include "PosixSource.h"
 #include "Rts.h"
 
 /* Note: by the time this hook has been called, Haskell land