Function clear_CDPS

Core/SoarKernel/src/tempmem.cpp:187–205

MMA 8-2012: Clear out and deallocate the CDPS. */

/* MMA 8-2012: Clear out and deallocate the CDPS. */
void clear_CDPS(agent* thisAgent, slot* s)
{

    list* cond_current, *cond_old;
    preference* pref;
    
    /* The CDPS should never exist on a top-level slot, so we do
     * not need to worry about checking for DO_TOP_LEVEL_REF_CTS. */
    
    cond_old = cond_current = s->CDPS;
    s->CDPS = NIL;
    for (; cond_current != NIL; cond_current = cond_current->rest)
    {
        pref = static_cast<preference*>(cond_current->first);
        preference_remove_ref(thisAgent, pref);
    }
    free_list(thisAgent, cond_old);
    
}
/* MMA 8-2012 end */

void remove_garbage_slots(agent* thisAgent)