Function object_to_trace_string

Core/SoarKernel/src/trace.cpp:1620–1679

}

growable_string object_to_trace_string(agent* thisAgent, Symbol* object)
{
    growable_string gs;
    int type_of_object;
    trace_format* tf;
    Symbol* name;
    struct tracing_parameters saved_tparams;
    
    /* --- If it's not an identifier, just print it as an atom.  Also, if it's
       already being printed, print it as an atom to avoid getting into an
       infinite loop. --- */
    if ((object->symbol_type != IDENTIFIER_SYMBOL_TYPE) ||
            (object->tc_num == thisAgent->tf_printing_tc))
    {
        gs = make_blank_growable_string(thisAgent);
        add_to_growable_string(thisAgent, &gs, symbol_to_string(thisAgent, object, true, NIL, 0));
        return gs;
    }
    
    /* --- mark it as being printed --- */
    object->tc_num = thisAgent->tf_printing_tc;
    
    /* --- determine the type and name of the object --- */
    if (object->id->isa_goal)
    {
        type_of_object = FOR_STATES_TF;
    }
    else if (object->id->isa_operator)
    {
        type_of_object = FOR_OPERATORS_TF;
    }
    else
    {
        type_of_object = FOR_ANYTHING_TF;
    }
    
    name = find_name_of_object(thisAgent, object);
    
    /* --- find the trace format to use --- */
    tf = find_appropriate_trace_format(thisAgent, false, type_of_object, name);
    
    /* --- now call trace_format_list_to_string() --- */
    if (tf)
    {
        saved_tparams = tparams;
        tparams.current_s = tparams.current_o = NIL;
        tparams.allow_cycle_counts = false;
        gs = trace_format_list_to_string(thisAgent, tf, object);
        tparams = saved_tparams;
    }
    else
    {
        /* --- no applicable trace format, so just print the object itself --- */
        gs = make_blank_growable_string(thisAgent);
        add_to_growable_string(thisAgent, &gs, symbol_to_string(thisAgent, object, true, NIL, 0));
    }
    
    object->tc_num = 0;  /* unmark it now that we're done */