Function extract_decorators

internal/cbm/extract_defs.c:1800–1864

}

static const char **extract_decorators(CBMArena *a, TSNode node, const char *source,
                                       CBMLanguage lang, const CBMLangSpec *spec) {
    if (!spec->decorator_node_types || !spec->decorator_node_types[0]) {
        return NULL;
    }

    int count = 0;
    TSNode prev = ts_node_prev_sibling(node);
    while (!ts_node_is_null(prev)) {
        if (cbm_kind_in_set(prev, spec->decorator_node_types)) {
            count++;
        } else if (ts_node_is_named(prev)) {
            /* A real preceding construct ends the decorator run. Anonymous
             * tokens (e.g. TS `export` between `@Decorator` and the
             * `class_declaration`) are skipped so the decorator is still seen. */
            break;
        }
        prev = ts_node_prev_sibling(prev);
    }

    TSNode modifiers = {0};
    int mod_count = 0;
    int child_count = 0;
    if (count == 0) {
        modifiers = find_jvm_modifiers(node, lang);
        if (!ts_node_is_null(modifiers)) {
            mod_count = count_modifier_annotations(modifiers, spec);
        }
        /* Languages like Scala attach the annotation directly as a child of the
         * definition node (no wrapper, no prev-sibling). */
        if (mod_count == 0) {
            child_count = count_child_decorators(node, spec);
        }
    }

    int total = count + mod_count + child_count;
    if (total == 0) {
        return NULL;
    }

    const char **result =
        (const char **)cbm_arena_alloc(a, sizeof(const char *) * (total + NULL_TERM));
    if (!result) {
        return NULL;
    }

    int idx = 0;
    prev = ts_node_prev_sibling(node);
    while (!ts_node_is_null(prev) && idx < count) {
        if (cbm_kind_in_set(prev, spec->decorator_node_types)) {
            result[idx++] = cbm_node_text(a, prev, source);
        } else if (ts_node_is_named(prev)) {
            break;
        }
        prev = ts_node_prev_sibling(prev);
    }
    if (!ts_node_is_null(modifiers)) {
        idx = collect_modifier_decorators(a, modifiers, source, spec, result, idx, total);