static void send_local_object(pony_ctx_t* ctx, void* p, pony_type_t* t,
int mutability)
{
gc_t* gc = ponyint_actor_gc(ctx->current);
object_t* obj = ponyint_objectmap_getorput(&gc->local, p, gc->mark);
if(obj->mark == gc->mark)
return;
// Implicitly send the owner.
send_local_actor(gc);
// Inc, mark, and recurse if not immutable.
obj->rc++;
obj->mark = gc->mark;
if(mutability == PONY_TRACE_OPAQUE)
return;
if(mutability == PONY_TRACE_IMMUTABLE)
obj->immutable = true;
if(!obj->immutable)
recurse(ctx, p, t->trace);
}
void ponyint_gc_sendactor(pony_ctx_t* ctx, pony_actor_t* actor)
{
gc_t* gc = ponyint_actor_gc(ctx->current);
if(actor == ctx->current)
{
send_local_actor(gc);
} else {
actorref_t* aref = ponyint_actormap_getorput(&gc->foreign, actor, gc->mark);
send_remote_actor(ctx, gc, aref);
}
}
static void send_local_object(pony_ctx_t* ctx, void* p, pony_trace_fn f,
bool immutable)
{
gc_t* gc = ponyint_actor_gc(ctx->current);
object_t* obj = ponyint_objectmap_getorput(&gc->local, p, gc->mark);
if(obj->mark == gc->mark)
return;
// Implicitly send the owner.
send_local_actor(gc);
// Inc, mark, and recurse if not immutable.
obj->rc++;
obj->mark = gc->mark;
if(immutable)
obj->immutable = true;
if(!obj->immutable)
recurse(ctx, p, f);
}
