X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FException.cmm;h=e6c0c0ff353a219585367e71d8d6dc86469b0336;hb=0d88de0b114a391712bc117d42928b49fba4d66a;hp=f3564e453fae316279acec5f56b41e430607ff44;hpb=82f8341d3d87d9127c968baa9c3376e3f26caa81;p=ghc-hetmet.git diff --git a/rts/Exception.cmm b/rts/Exception.cmm index f3564e4..e6c0c0f 100644 --- a/rts/Exception.cmm +++ b/rts/Exception.cmm @@ -13,7 +13,9 @@ #include "Cmm.h" #include "RaiseAsync.h" +#ifdef __PIC__ import base_GHCziBase_True_closure; +#endif /* ----------------------------------------------------------------------------- Exception Primitives