X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FCapability.h;h=ba0695c8ee23ac7590626d77e81ed6997db3b8d8;hb=e50364a5a8e5d736445cd8e5b10a813ec0a5a2e0;hp=b6f6440cb8692ccccba63e56c72e56bcd7397075;hpb=022ee7c728822c4dd5be226f75e44557b4a3d9a1;p=ghc-hetmet.git

diff --git a/rts/Capability.h b/rts/Capability.h
index b6f6440..ba0695c 100644
--- a/rts/Capability.h
+++ b/rts/Capability.h
@@ -143,12 +143,10 @@ struct Capability_ {
 
 // Converts a *StgRegTable into a *Capability.
 //
-#define OFFSET(s_type, field) ((size_t)&(((s_type*)0)->field))
-
 INLINE_HEADER Capability *
 regTableToCapability (StgRegTable *reg)
 {
-    return (Capability *)((void *)((unsigned char*)reg - OFFSET(Capability,r)));
+    return (Capability *)((void *)((unsigned char*)reg - FIELD_OFFSET(Capability,r)));
 }
 
 // Initialise the available capabilities.