summaryrefslogtreecommitdiff
path: root/includes
diff options
context:
space:
mode:
authorEdward Z. Yang <ezyang@mit.edu>2013-03-07 14:28:54 -0800
committerEdward Z. Yang <ezyang@mit.edu>2013-03-07 14:31:49 -0800
commit1ce57ec9d544beaee79aed50c4e12de144e4482f (patch)
tree19fe391cafbcadba66f213d4951762a0d472f547 /includes
parentd6a6974f3b88417fcc0d780d164251331bcf9309 (diff)
downloadhaskell-1ce57ec9d544beaee79aed50c4e12de144e4482f.tar.gz
Closures must be zeroed even without LDV-profiling. Partially fixes #7747
Signed-off-by: Edward Z. Yang <ezyang@mit.edu>
Diffstat (limited to 'includes')
-rw-r--r--includes/rts/storage/ClosureMacros.h4
1 files changed, 0 insertions, 4 deletions
diff --git a/includes/rts/storage/ClosureMacros.h b/includes/rts/storage/ClosureMacros.h
index 73725e121c..4d93994e4d 100644
--- a/includes/rts/storage/ClosureMacros.h
+++ b/includes/rts/storage/ClosureMacros.h
@@ -489,10 +489,6 @@ EXTERN_INLINE void overwritingClosure (StgClosure *p)
{
nat size, i;
-#if defined(PROFILING)
- if (era <= 0) return;
-#endif
-
size = closure_sizeW(p);
// For LDV profiling, we need to record the closure as dead