Function lexical_binding_key

internal/cbm/extract_usages.c:1601–1627

}

static const char *lexical_binding_key(CBMExtractCtx *ctx, WalkState *state, const char *name) {
    if (!ctx || !name) {
        return name;
    }
    /* Preserve language namespaces: Perl sigils and Vim prefixes distinguish
     * different variables. Tcl's grammar is asymmetric (`name` versus
     * `$name`), so unwrap only that language-defined reference sigil. */
    if (ctx->language == CBM_LANG_TCL && name[0] == '$') {
        name++;
    }
    if (!lexical_identifier_case_insensitive(ctx->language)) {
        return name;
    }
    size_t n = strlen(name);
    char *folded = (char *)cbm_arena_alloc(ctx->arena, n + 1U);
    if (!folded) {
        if (state) {
            state->lexical_binding_tracking_failed = true;
        }
        return NULL;
    }
    for (size_t i = 0; i < n; i++) {
        folded[i] = (char)tolower((unsigned char)name[i]);
    }
    folded[n] = '\0';
    return folded;
}

static void stamp_usage_site(CBMExtractCtx *ctx, CBMUsage *usage, TSNode node, const char *name,
                             WalkState *state) {