Function parse_pattern_in_brackets

Core/SoarKernel/src/trace.cpp:277–340

}

trace_format* parse_pattern_in_brackets(agent* thisAgent, bool read_opening_bracket)
{
    trace_format* first, *prev, *New;
    
    /* --- look for opening bracket --- */
    if (read_opening_bracket)
    {
        if (*format != '[')
        {
            format_string_error_message = "Expected '[' followed by attribute path";
            return NIL;
        }
        format++;
    }
    
    /* --- read pattern --- */
    prev = NIL;
    first = NIL; /* unnecessary, but gcc -Wall warns without it */
    while ((*format != 0) && (*format != ']'))
    {
        New = parse_item_from_format_string(thisAgent);
        if (!New)
        {
            if (prev)
            {
                prev->next = NIL;
            }
            else
            {
                first = NIL;
            }
            deallocate_trace_format_list(thisAgent, first);
            return NIL;
        }
        if (prev)
        {
            prev->next = New;
        }
        else
        {
            first = New;
        }
        prev = New;
    }
    if (prev)
    {
        prev->next = NIL;
    }
    else
    {
        first = NIL;
    }
    
    /* --- look for closing bracket --- */
    if (*format != ']')
    {
        format_string_error_message = "'[' without closing ']'";
        deallocate_trace_format_list(thisAgent, first);