diff options
author | Edward Z. Yang <ezyang@mit.edu> | 2013-03-07 14:28:54 -0800 |
---|---|---|
committer | Edward Z. Yang <ezyang@mit.edu> | 2013-03-07 14:31:49 -0800 |
commit | 1ce57ec9d544beaee79aed50c4e12de144e4482f (patch) | |
tree | 19fe391cafbcadba66f213d4951762a0d472f547 /includes | |
parent | d6a6974f3b88417fcc0d780d164251331bcf9309 (diff) | |
download | haskell-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.h | 4 |
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 |