diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-02-21 16:33:08 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-02-21 16:33:08 +0000 |
| commit | 5d9f7faf4c6519af8da750919c986ffcda660030 (patch) | |
| tree | c39238c1399ab2e3d5c19ecc0c49ea8cb705c24e /ghc/rts | |
| parent | 15f6c4cff24c2b9ffc1191733ddb48c5f72d15be (diff) | |
| download | haskell-5d9f7faf4c6519af8da750919c986ffcda660030.tar.gz | |
warning fix
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); } } |