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

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)