X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=includes%2FRegs.h;h=c219838ab82acdd0b940a676167a465e2df2d965;hp=29c04b302fc7c10c69b42f0ce44aba7df8d30704;hb=34cc75e1a62638f2833815746ebce0a9114dc26b;hpb=74e1368d4688ee16f6decdf2cd3ebe27506b26ba

diff --git a/includes/Regs.h b/includes/Regs.h
index 29c04b3..c219838 100644
--- a/includes/Regs.h
+++ b/includes/Regs.h
@@ -397,7 +397,7 @@ GLOBAL_REG_DECL(bdescr *,HpAlloc,REG_HpAlloc)
    -------------------------------------------------------------------------- */
 
 
-#define FunReg ((StgFunTable *)((void *)BaseReg - FIELD_OFFSET(struct PartCapability_, r)))
+#define FunReg ((StgFunTable *)((void *)BaseReg - STG_FIELD_OFFSET(struct PartCapability_, r)))
 
 #define stg_EAGER_BLACKHOLE_info  (FunReg->stgEagerBlackholeInfo)
 #define stg_gc_enter_1            (FunReg->stgGCEnter1)