projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Improve error reporting for kind errors (fix Trac #1633)
[ghc-hetmet.git]
/
rts
/
Capability.h
diff --git
a/rts/Capability.h
b/rts/Capability.h
index
0f61fad
..
d2fcc5e
100644
(file)
--- a/
rts/Capability.h
+++ b/
rts/Capability.h
@@
-148,7
+148,7
@@
struct Capability_ {
INLINE_HEADER Capability *
regTableToCapability (StgRegTable *reg)
{
INLINE_HEADER Capability *
regTableToCapability (StgRegTable *reg)
{
- return (Capability *)((void *)((unsigned char*)reg - FIELD_OFFSET(Capability,r)));
+ return (Capability *)((void *)((unsigned char*)reg - STG_FIELD_OFFSET(Capability,r)));
}
// Initialise the available capabilities.
}
// Initialise the available capabilities.