Function add_trace_for_attribute_path

Core/SoarKernel/src/trace.cpp:1301–1372

---------------------------------------------------------------- */

void add_trace_for_attribute_path(agent* thisAgent,
                                  Symbol* object,
                                  list* path,
                                  growable_string* result,
                                  bool print_attributes,
                                  bool recursive)
{
    growable_string values;
    cons* c;
    char* ch;
    int count;
    slot* s;
    wme* w;
    
    values = make_blank_growable_string(thisAgent);
    
    if (! path)
    {
        if (object->symbol_type != IDENTIFIER_SYMBOL_TYPE)
        {
            return;
        }
        for (s = object->id->slots; s != NIL; s = s->next)
            for (w = s->wmes; w != NIL; w = w->next)
            {
                add_trace_for_wme(thisAgent, &values, w, print_attributes, recursive);
            }
        for (w = object->id->impasse_wmes; w != NIL; w = w->next)
        {
            add_trace_for_wme(thisAgent, &values, w, print_attributes, recursive);
        }
        for (w = object->id->input_wmes; w != NIL; w = w->next)
        {
            add_trace_for_wme(thisAgent, &values, w, print_attributes, recursive);
        }
        if (length_of_growable_string(values) > 0)
        {
            add_to_growable_string(thisAgent, result, text_of_growable_string(values) + 1);
        }
        free_growable_string(thisAgent, values);
        return;
    }
    
    count = 0;
    add_values_of_attribute_path(thisAgent, object, path, &values, recursive, &count);
    if (! count)
    {
        found_undefined = true;
        free_growable_string(thisAgent, values);
        return;
    }
    
    if (print_attributes)
    {
        add_to_growable_string(thisAgent, result, "^");
        for (c = path; c != NIL; c = c->rest)
        {
            ch = symbol_to_string(thisAgent, static_cast<symbol_struct*>(c->first), true, NULL, 0);