Function fxCleanupFinalizationRegistries

xs/sources/xsMapSet.c:2091–2104

}

void fxCleanupFinalizationRegistries(txMachine* the)
{
	txSlot** address = &(mxFinalizationRegistries.value.reference->next);
	txSlot* closure;
	while ((closure = *address)) {
		txSlot* registry = closure->value.closure;
		if (registry->value.finalizationRegistry.flags & XS_FINALIZATION_REGISTRY_CHANGED) {
			fx_FinalizationRegistryCleanup(the, registry, C_NULL);
			address = &(mxFinalizationRegistries.value.reference->next);
		}
		else
			address = &(closure->next);
	}
}