summaryrefslogtreecommitdiff
path: root/rts/SMPClosureOps.h
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-11-07 22:50:34 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-12-16 16:12:44 -0500
commit821b5472918f1f1686c44b300eac6f6718369379 (patch)
tree057c88b75fd5fa5ff250fe2eabaf2c3ee606dc91 /rts/SMPClosureOps.h
parentfbc842441fbd6ca2065b4e28af98197765350a73 (diff)
downloadhaskell-821b5472918f1f1686c44b300eac6f6718369379.tar.gz
rts: Use fences instead of explicit barriers
Diffstat (limited to 'rts/SMPClosureOps.h')
-rw-r--r--rts/SMPClosureOps.h3
1 files changed, 1 insertions, 2 deletions
diff --git a/rts/SMPClosureOps.h b/rts/SMPClosureOps.h
index 2df88db06c..f5242a9cf1 100644
--- a/rts/SMPClosureOps.h
+++ b/rts/SMPClosureOps.h
@@ -26,8 +26,7 @@
#endif
#define unlockClosure(ptr,info) \
- prim_write_barrier; \
- StgHeader_info(ptr) = info;
+ %release StgHeader_info(ptr) = info;
#else