void operator()(void *frame_top, cell frame_size, code_block *owner, void *addr) { cell return_address = owner->offset(addr); gc_info *info = owner->block_gc_info(); FACTOR_ASSERT(return_address < owner->size()); cell index = info->return_address_index(return_address); if(index != (cell)-1) ctx->scrub_stacks(info,index); }