diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-09-21 19:39:36 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-09-21 19:39:36 +0100 |
| commit | 118a09efe9e1badaddc4fe4e50af8b5671481c3e (patch) | |
| tree | 9c83f3cd67956c823bf37a0aee800466eb9695b7 /includes/rts/storage | |
| parent | ed6a7e4e37ce601004fa55edc68eb6f54997db5e (diff) | |
| download | haskell-118a09efe9e1badaddc4fe4e50af8b5671481c3e.tar.gz | |
Remove a redundant cast
Diffstat (limited to 'includes/rts/storage')
| -rw-r--r-- | 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 849a6efbe4..6fdd55727a 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++) { |