projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Tweak ./boot
[ghc-hetmet.git]
/
rts
/
Updates.h
diff --git
a/rts/Updates.h
b/rts/Updates.h
index
98e9e5a
..
10fa09b
100644
(file)
--- a/
rts/Updates.h
+++ b/
rts/Updates.h
@@
-268,7
+268,7
@@
no_slop:
write_barrier(); \
bd = Bdescr((P_)p1); \
if (bd->gen_no != 0) { \
write_barrier(); \
bd = Bdescr((P_)p1); \
if (bd->gen_no != 0) { \
- recordMutableGenLock(p1, &generations[bd->gen_no]); \
+ recordMutableGenLock(p1, bd->gen_no); \
SET_INFO(p1, &stg_IND_OLDGEN_info); \
TICK_UPD_OLD_IND(); \
and_then; \
SET_INFO(p1, &stg_IND_OLDGEN_info); \
TICK_UPD_OLD_IND(); \
and_then; \