Function extract_class_fields

internal/cbm/extract_defs.c:6289–6601

}

static void extract_class_fields(CBMExtractCtx *ctx, TSNode class_node, const char *class_qn,
                                 const CBMLangSpec *spec) {
    if (!spec->field_node_types || !spec->field_node_types[0]) {
        return;
    }

    TSNode body = find_class_member_body(class_node, ctx->language);
    if (ts_node_is_null(body)) {
        return;
    }

    CBMArena *a = ctx->arena;
    uint32_t count = ts_node_named_child_count(body);
    for (uint32_t i = 0; i < count; i++) {
        TSNode child = ts_node_named_child(body, i);

        // ObjectScript UDL wraps each member in a class_statement node.
        if (ctx->language == CBM_LANG_OBJECTSCRIPT_UDL &&
            strcmp(ts_node_type(child), "class_statement") == 0 &&
            ts_node_named_child_count(child) > 0) {
            child = ts_node_named_child(child, 0);
        }

        if (!cbm_kind_in_set(child, spec->field_node_types)) {
            continue;
        }

        if (is_func_ptr_field(child)) {
            continue;
        }

        /* Schema/grammar languages (GraphQL/Prisma/Smali) carry the field name on
         * a plain child rather than a C-style declarator/type field; handle them
         * up front so the generic "type"-field path below doesn't skip them. */
        if (extract_schema_field(ctx, child, class_qn)) {
            continue;
        }

        // ObjectScript UDL member extraction. property/parameter -> Variable;
        // index/trigger/xdata/storage/foreignkey -> labelled members with
        // storage-XML and trigger-body sidecars.
        if (ctx->language == CBM_LANG_OBJECTSCRIPT_UDL) {
            if (strcmp(ts_node_type(child), "property") == 0 ||
                strcmp(ts_node_type(child), "parameter") == 0) {
                TSNode pname = cbm_find_child_by_kind(child, "property_name");
                if (ts_node_is_null(pname)) {
                    pname = cbm_find_child_by_kind(child, "parameter_name");
                }
                if (!ts_node_is_null(pname) && ts_node_named_child_count(pname) > 0) {
                    TSNode ident = ts_node_named_child(pname, 0);
                    char *pn = cbm_node_text(a, ident, ctx->source);
                    if (pn && pn[0]) {
                        CBMDefinition pdef;
                        memset(&pdef, 0, sizeof(pdef));
                        pdef.name = pn;
                        pdef.qualified_name = cbm_arena_sprintf(a, "%s.%s", class_qn, pn);
                        pdef.label = "Variable";
                        pdef.file_path = ctx->rel_path;