X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fghci%2FkeepCAFsForGHCi.c;h=f125d4c4d0154ccbe1e4064c25f0339f78e9d3ad;hp=0aabbedea09105325b18cd095c1e02649e9eae3f;hb=18691d440f90a3dff4ef538091c886af505e5cf5;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1

diff --git a/compiler/ghci/keepCAFsForGHCi.c b/compiler/ghci/keepCAFsForGHCi.c
index 0aabbed..f125d4c 100644
--- a/compiler/ghci/keepCAFsForGHCi.c
+++ b/compiler/ghci/keepCAFsForGHCi.c
@@ -1,5 +1,4 @@
 #include "Rts.h"
-#include "Storage.h"
 
 // This file is only included when GhcBuildDylibs is set in mk/build.mk.
 // It contains an __attribute__((constructor)) function (run prior to main())
@@ -7,9 +6,11 @@
 // This is required so that GHCi can use dynamic libraries instead of HSxyz.o
 // files.
 
+#ifdef DYNAMIC
 static void keepCAFsForGHCi() __attribute__((constructor));
 
 static void keepCAFsForGHCi()
 {
     keepCAFs = 1;
 }
+#endif