Function print_stack_trace_xml

Core/SoarKernel/src/trace.cpp:1744–1829

}

void print_stack_trace_xml(agent* thisAgent, Symbol* object, Symbol* state, int slot_type, bool/*allow_cycle_counts*/)
{

    Symbol* current_o = 0;
    
    switch (slot_type)
    {
        case FOR_STATES_TF:
            //create XML trace for state object
            xml_begin_tag(thisAgent, kTagState);
            xml_att_val(thisAgent, kState_StackLevel, state->id->level - 1);
            xml_att_val(thisAgent, kState_DecisionCycleCt, thisAgent->d_cycle_count);
            xml_att_val(thisAgent, kState_ID, object);
            
            // find impasse object and add it to XML
            wme* w;
            for (w = object->id->impasse_wmes; w != NIL; w = w->next)
            {
                if (w->attr == thisAgent->attribute_symbol)
                {
                    xml_att_val(thisAgent, kState_ImpasseObject, w->value->sc->name);
                    break;
                }
            }
            
            // find impasse type and add it to XML
            for (w = object->id->impasse_wmes; w != NIL; w = w->next)
            {
                if (w->attr == thisAgent->impasse_symbol)
                {
                    xml_att_val(thisAgent, kState_ImpasseType, w->value->sc->name);
                    break;
                }
            }
            
            xml_end_tag(thisAgent, kTagState);
            break;
            
        case FOR_OPERATORS_TF:
            //create XML trace for operator object
            xml_begin_tag(thisAgent, kTagOperator);
            /* -- Prior to Soar 9.4, the following line printed (object->id.level - 1)
             *    instead of (state->id->level - 1).  This was causing the
             *    unit test to fail.  Changing it to state seems to make sense in this
             *    context, since the level of the state should also be the level of the
             *    operator.  (Could be wrong about this.)
             *    Leaving this comment because it's possible that the real problem is
             *    that the level of the operator isn't being set somewhere else to
             *    the proper value. - MMA 9-2014*/
            xml_att_val(thisAgent, kState_StackLevel, state->id->level - 1);
            xml_att_val(thisAgent, kOperator_DecisionCycleCt, thisAgent->d_cycle_count);
            
            if (state->id->operator_slot->wmes)
            {
                current_o = state->id->operator_slot->wmes->value;
            }
            if (current_o)
            {