Searched refs:old_car (Results 1 – 2 of 2) sorted by relevance
883 SCHEME_OBJECT old_car = (READ_TOSPACE (new_addr)); in gc_transport_weak_pair() local884 SCHEME_OBJECT * caddr = (weak_referent_address (old_car)); in gc_transport_weak_pair()888 WRITE_TOSPACE (new_addr, (OBJECT_NEW_TYPE (TC_NULL, old_car))); in gc_transport_weak_pair()891 ? (MAKE_OBJECT ((OBJECT_TYPE (old_car)), 0)) in gc_transport_weak_pair()892 : (MAKE_POINTER_OBJECT ((OBJECT_TYPE (old_car)), weak_chain))); in gc_transport_weak_pair()1058 SCHEME_OBJECT old_car in update_weak_pairs() local1062 WRITE_TOSPACE (new_addr, (weak_referent_forward (old_car))); in update_weak_pairs()
62 LObject *old_car = x->car; in CollectList() local69 p->car = CollectObject(old_car); in CollectList()