X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FLinkerInternals.h;h=deb9af2d994cccee210195ee073cb8ea9fb20a5b;hb=3943920735d121c55d1ae09c00c34503b979d0cf;hp=0763703a323463878608005ecd51152655f92ac8;hpb=52f5a164e64fe5c443445cfc59345920506b4f2a;p=ghc-hetmet.git diff --git a/ghc/rts/LinkerInternals.h b/ghc/rts/LinkerInternals.h index 0763703..deb9af2 100644 --- a/ghc/rts/LinkerInternals.h +++ b/ghc/rts/LinkerInternals.h @@ -1,5 +1,4 @@ /* ----------------------------------------------------------------------------- - * $Id: LinkerInternals.h,v 1.6 2002/06/09 13:37:44 matthewc Exp $ * * (c) The GHC Team, 2000 * @@ -77,6 +76,12 @@ typedef struct _ObjectCode { unsigned int pltIndex; #endif +#ifdef darwin_TARGET_OS + char* jump_islands; + unsigned long island_start_symbol; + unsigned long n_islands; +#endif + } ObjectCode; extern ObjectCode *objects;