From: Ben.Lippmeier@anu.edu.au Date: Tue, 6 Oct 2009 05:34:14 +0000 (+0000) Subject: Use C syntax for casting. 'stgCast' appears to have gone away. X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=dbade27af3bececc3e91cb6e4d52d10d9a5b7976 Use C syntax for casting. 'stgCast' appears to have gone away. --- diff --git a/rts/sm/Scav.c b/rts/sm/Scav.c index 5e38777..c799de7 100644 --- a/rts/sm/Scav.c +++ b/rts/sm/Scav.c @@ -261,7 +261,7 @@ scavenge_srt (StgClosure **srt, nat srt_bitmap) // If the SRT entry hasn't got bit 0 set, the SRT entry points to a // closure that's fixed at link-time, and no extra magic is required. if ( (unsigned long)(*srt) & 0x1 ) { - evacuate(stgCast(StgClosure**,(stgCast(unsigned long, *srt) & ~0x1))); + evacuate( (StgClosure**) ((unsigned long) (*srt) & ~0x1)); } else { evacuate(p); }