Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/118a09efe9e1badaddc4fe4e50af8b5671481c3e >--------------------------------------------------------------- commit 118a09efe9e1badaddc4fe4e50af8b5671481c3e Author: Ian Lynagh <[email protected]> Date: Fri Sep 21 19:39:36 2012 +0100 Remove a redundant cast >--------------------------------------------------------------- includes/rts/storage/ClosureMacros.h | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/includes/rts/storage/ClosureMacros.h b/includes/rts/storage/ClosureMacros.h index 849a6ef..6fdd557 100644 --- a/includes/rts/storage/ClosureMacros.h +++ b/includes/rts/storage/ClosureMacros.h @@ -505,7 +505,7 @@ EXTERN_INLINE void overwritingClosure (StgClosure *p) // For LDV profiling, we need to record the closure as dead #if defined(PROFILING) - LDV_recordDead((StgClosure *)(p), size); + LDV_recordDead(p, size); #endif for (i = 0; i < size - sizeofW(StgThunkHeader); i++) { _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
