diff options
-rw-r--r-- | rts/StgMiscClosures.cmm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/rts/StgMiscClosures.cmm b/rts/StgMiscClosures.cmm index b01fd256e8..f654056934 100644 --- a/rts/StgMiscClosures.cmm +++ b/rts/StgMiscClosures.cmm @@ -570,15 +570,11 @@ INFO_TABLE(stg_BLACKHOLE,1,0,BLACKHOLE,"BLACKHOLE","BLACKHOLE") TICK_ENT_DYN_IND(); /* tick */ retry: - // Synchronizes with the SET_INFO_RELEASE in - // updateWithIndirection - ACQUIRE_FENCE_ON(node + OFFSET_StgHeader_info); - // Synchronizes with the release-store in // updateWithIndirection. // See Note [Heap memory barriers] in SMP.h. ACQUIRE_FENCE_ON(node + OFFSET_StgHeader_info); - p = %relaxed StgInd_indirectee(node); + p = %acquire StgInd_indirectee(node); if (GETTAG(p) != 0) { return (p); } |