diff options
Diffstat (limited to 'ghc/rts')
| -rw-r--r-- | ghc/rts/Storage.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/rts/Storage.c b/ghc/rts/Storage.c index 1c14265f49..195f410e5d 100644 --- a/ghc/rts/Storage.c +++ b/ghc/rts/Storage.c @@ -772,7 +772,7 @@ dirty_MUT_VAR(StgRegTable *reg, StgClosure *p) bdescr *bd; if (p->header.info == &stg_MUT_VAR_CLEAN_info) { p->header.info = &stg_MUT_VAR_DIRTY_info; - bd = Bdescr(p); + bd = Bdescr((StgPtr)p); if (bd->gen_no > 0) recordMutableCap(p,cap,bd->gen_no); } } |