mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-08 10:50:21 +02:00
Code Activity

Remove "ABORTED" atomic forwarding state

Browse source 
It was not distinguishable from "NOT_FORWARDED".
This commit is contained in:
Andy Wingo 2025-01-13 16:44:12 +01:00
parent b23b77218c
commit 5fdb14cc5e
4 changed files with 8 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

9
benchmarks/simple-gc-embedder.h
View file

@ -122,9 +122,10 @@ gc_atomic_forward_retry_busy(struct gc_atomic_forward *fwd) {
memory_order_acquire);
if (tag == gcobj_busy)
return 0;
if (tag & gcobj_not_forwarded_bit)
fwd->state = GC_FORWARDING_STATE_ABORTED;
else {
if (tag & gcobj_not_forwarded_bit) {
fwd->state = GC_FORWARDING_STATE_NOT_FORWARDED;
fwd->data = tag;
} else {
fwd->state = GC_FORWARDING_STATE_FORWARDED;
fwd->data = tag;
}
@ -149,7 +150,7 @@ static inline void
gc_atomic_forward_abort(struct gc_atomic_forward *fwd) {
GC_ASSERT(fwd->state == GC_FORWARDING_STATE_ACQUIRED);
atomic_store_explicit(tag_word(fwd->ref), fwd->data, memory_order_release);
fwd->state = GC_FORWARDING_STATE_ABORTED;
fwd->state = GC_FORWARDING_STATE_NOT_FORWARDED;
}
static inline size_t