X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2FStg.h;h=8e3da0f6d3c3ffba6f660326d82bd75e20907803;hp=a63b7ec2d6f43d980375f2fd9b90c9238c7a3620;hb=143f4381d242e4a1c3174e8a0732a1e48f00a1aa;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1 diff --git a/includes/Stg.h b/includes/Stg.h index a63b7ec..8e3da0f 100644 --- a/includes/Stg.h +++ b/includes/Stg.h @@ -127,8 +127,8 @@ typedef StgWord64 LW_; #define EF_(f) extern F_ f(void) typedef StgWord StgWordArray[]; -#define EI_ extern StgWordArray -#define II_ static StgWordArray +#define EI_(X) extern StgWordArray (X) GNU_ATTRIBUTE(aligned (8)) +#define II_(X) static StgWordArray (X) GNU_ATTRIBUTE(aligned (8)) /* ----------------------------------------------------------------------------- Tail calls