Function split_generic_args

internal/cbm/lsp/java_lsp.c:3014–3057

Parse a comma-separated list at the outermost generic level of `text`. * `text` is the substring INSIDE the angle brackets, e.g. for * "Map >" the caller would pass "String, List ". * * Returns a NULL-terminated array of arena-allocated substrings; sets * *out_count to the number of args. */

 * Returns a NULL-terminated array of arena-allocated substrings; sets
 * *out_count to the number of args. */
static const char **split_generic_args(CBMArena *a, const char *inside, int *out_count) {
    *out_count = 0;
    if (!inside || !inside[0])
        return NULL;
    const char *args[16];
    int count = 0;
    int depth = 0;
    const char *seg_start = inside;
    for (const char *p = inside; *p; p++) {
        if (*p == '<')
            depth++;
        else if (*p == '>')
            depth--;
        else if (*p == ',' && depth == 0) {
            /* trim leading whitespace from seg_start */
            while (seg_start < p && (*seg_start == ' ' || *seg_start == '\t'))
                seg_start++;
            const char *seg_end = p;
            while (seg_end > seg_start && (seg_end[-1] == ' ' || seg_end[-1] == '\t'))
                seg_end--;
            if (count < 16 && seg_end > seg_start) {
                args[count++] = cbm_arena_strndup(a, seg_start, (size_t)(seg_end - seg_start));
            }
            seg_start = p + 1;
        }
    }
    /* last segment */
    while (*seg_start == ' ' || *seg_start == '\t')
        seg_start++;
    const char *seg_end = inside + strlen(inside);
    while (seg_end > seg_start && (seg_end[-1] == ' ' || seg_end[-1] == '\t'))
        seg_end--;
    if (count < 16 && seg_end > seg_start) {
        args[count++] = cbm_arena_strndup(a, seg_start, (size_t)(seg_end - seg_start));
    }
    if (count == 0)
        return NULL;
    const char **result = (const char **)cbm_arena_alloc(a, (size_t)(count + 1) * sizeof(*result));
    for (int i = 0; i < count; i++)
        result[i] = args[i];
    result[count] = NULL;
    *out_count = count;
    return result;
}

/* Parse a type-text into a CBMType, with full inner-class qualification.
 * `parent_class` is the QN of the enclosing class (NULL at file scope), used