projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Change the representation of the MVar blocked queue
[ghc-hetmet.git]
/
includes
/
rts
/
storage
/
Block.h
diff --git
a/includes/rts/storage/Block.h
b/includes/rts/storage/Block.h
index
3114bea
..
d6a4d4c
100644
(file)
--- a/
includes/rts/storage/Block.h
+++ b/
includes/rts/storage/Block.h
@@
-109,7
+109,8
@@
typedef struct bdescr_ {
#else
-INLINE_HEADER bdescr *Bdescr(StgPtr p)
+EXTERN_INLINE bdescr *Bdescr(StgPtr p);
+EXTERN_INLINE bdescr *Bdescr(StgPtr p)
{
return (bdescr *)
((((W_)p & MBLOCK_MASK & ~BLOCK_MASK) >> (BLOCK_SHIFT-BDESCR_SHIFT))