mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-07-08 15:12:26 +02:00
Add an assert to nofl's marking procedure
This commit is contained in:
parent
f58424ec52
commit
ba880a03da
1 changed files with 2 additions and 0 deletions
|
@ -1630,6 +1630,8 @@ nofl_space_set_nonempty_mark(struct nofl_space *space, uint8_t *metadata,
|
|||
uint8_t byte, struct gc_ref ref) {
|
||||
// FIXME: Check that relaxed atomics are actually worth it.
|
||||
if (nofl_space_set_mark(space, metadata, byte)) {
|
||||
GC_ASSERT(nofl_metadata_byte_is_young_or_has_mark(byte,
|
||||
space->survivor_mark));
|
||||
nofl_block_set_mark(gc_ref_value(ref));
|
||||
return 1;
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue