X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FmkNativeHdr.c;h=8bf707bf3633cf1533da1bbdeadf9f83cf55cc93;hb=b41b49bd7129775944fdf6305db513c1a1648ff2;hp=c04d158ff33fb2396622c8d78e7e7b3b3445889f;hpb=7457757f193b28b5fe8fee01edbed012c2fda897;p=ghc-hetmet.git diff --git a/ghc/includes/mkNativeHdr.c b/ghc/includes/mkNativeHdr.c index c04d158..8bf707b 100644 --- a/ghc/includes/mkNativeHdr.c +++ b/ghc/includes/mkNativeHdr.c @@ -1,5 +1,5 @@ /* -------------------------------------------------------------------------- - * $Id: mkNativeHdr.c,v 1.9 2002/07/17 09:21:49 simonmar Exp $ + * $Id: mkNativeHdr.c,v 1.10 2002/07/21 11:46:34 panne Exp $ * * (c) The GHC Team, 1992-1998 * @@ -7,10 +7,10 @@ * * ------------------------------------------------------------------------*/ -#include - #include "Stg.h" +#include + #define OFFSET(table, x) ((StgUnion *) &(x) - (StgUnion *) (&table)) #define OFFSET_R1 OFFSET(RegTable, RegTable.rR1)