pineforge-codegen 0.6.5__py3-none-any.whl

pineforge_codegen/codegen/visit_call.py

@@ -0,0 +1,1305 @@
+"""Function-call dispatch visitors for the codegen.
+
+``CallVisitor`` mixin holds the function-call dispatcher and the
+per-namespace dispatch helpers (``strategy.*``, ``color.*``, ``str.*``,
+``math.*``, ``fixnan``).
+
+``_visit_func_call`` is the central entry point for any
+:class:`FuncCall` AST node. It first handles UDT-method calls and
+``obj.method(args)`` style receivers, then resolves the callee to a
+``(func_name, namespace)`` pair and dispatches by namespace:
+
+* ``strategy.*``  -> ``_visit_strategy_call`` (entry / exit / close /
+  cancel / order / closedtrades.* / opentrades.* / convert_to_*).
+* ``ta.*``        -> ``ta.tr`` is inlined; other sites resolve to the
+  ``member.compute(...)`` / ``member.recompute(...)`` form via the
+  ``TaSiteHelper``; ``ta.pivot_point_levels`` is a free function.
+* ``input`` / ``input.*`` -> runtime ``get_input_*()`` getters via
+  ``InputHelper``.
+* ``str.*``       -> ``_visit_str_call`` (tostring / substring / format
+  / format_time / replace + the ``STR_FUNC_MAP`` shortcuts).
+* ``math.*``      -> ``_visit_math_call`` (round-to-mintick, todegrees /
+  toradians, random, n-ary avg / max / min, ``MATH_FUNC_MAP``).
+* ``color.*``     -> ``_visit_color_call`` (new / r / g / b / t / rgb /
+  from_gradient).
+* ``array.*`` / ``map.*`` / ``matrix.*`` -> functional and method-syntax
+  forms, delegating to ``TypeInferer``'s ``_array_method_expr`` /
+  ``_map_method_expr`` and the ``MATRIX_METHODS`` table.
+* ``request.security``, ``ticker.*``, ``runtime.*``, ``log.*``,
+  ``timeframe.*``, ``time`` / ``time_close`` / ``timestamp``, type
+  casts ``int`` / ``float`` / ``bool`` / ``string``.
+* UDT constructors (``TypeName.new(...)``) and copies.
+
+Anything left over is treated as a generic user-defined or unknown
+function call: the visitor merges kwargs by parameter name (using
+``FuncInfo`` for user functions or the ``signatures`` registry for
+intrinsics), passes ``Series<T>`` references for series-typed params,
+and emits ``namespace::func(args)`` (or the per-call-site variant
+``func_csN`` for functions cloned by the analyzer's call-site
+splitter).
+
+``_visit_fixnan`` allocates a fresh persistent state member each time
+it is called (``_prev_fixnan_<n>``).
+
+``_resolve_func_args`` is a small helper that merges positional args
+and kwargs into a ``{param_name: arg_node}`` dict using the parameter
+ordering from the ``signatures`` registry; used by
+``_visit_strategy_call`` to resolve ``strategy.entry`` /
+``strategy.exit`` / ... by keyword.
+
+These visitors were extracted from ``base.py``'s ``CodeGen`` class as
+step 10 of the codegen package refactor; behaviour is preserved
+verbatim. The mixin owns no state of its own — it reads/writes only
+attributes already established on the host class (``CodeGen``).
+
+Mixin contract — host class must provide the following attributes
+(all set by ``CodeGen.__init__`` or other mixins):
+
+- ``self.ctx`` (``AnalyzerContext``): symbol table source. The
+  visitors read ``ctx.symbols.resolve`` (``_visit_str_call`` enum
+  branch), ``ctx.series_vars`` (series-arg lowering),
+  ``ctx.func_series_vars`` (per-function series-param indices),
+  ``ctx.func_call_cs_map`` and ``ctx.func_call_site_counts``
+  (per-call-site variant naming).
+- ``self._var_names`` (``set[str]``): names declared at module scope;
+  consulted by the ``obj.method`` receiver-detection branch.
+- ``self._global_member_vars`` (``set[str]``): non-``var`` global
+  declarations emitted as class members (same branch).
+- ``self._current_func_param_types`` (``dict[str, ...]``): parameters
+  of the function currently being emitted (treated as locals for the
+  receiver guard).
+- ``self._current_loop_vars`` (``set[str]``): for-in iterator names
+  (also receivers of ``.method()`` calls).
+- ``self._current_input_var_name`` (``str | None``): contextual var
+  name used as the title-fallback for ``input(...)`` calls.
+- ``self._array_vars`` / ``self._map_vars`` (``set[str]``) and
+  ``self._matrix_specs`` (``dict[str, TypeSpec]``): collection-typed
+  variables; gate the receiver-method branches in ``_visit_func_call``.
+- ``self._udt_defs`` (``dict[str, list]``), ``self._udt_var_types``
+  (``dict[str, str]``), ``self._udt_param_udt`` (``dict[str, str]``),
+  ``self._udt_field_type_specs`` (``dict[str, dict[str, TypeSpec]]``):
+  UDT type info for ``TypeName.new(...)`` constructors,
+  ``TypeName.copy(...)``, and the ``obj.method()`` UDT-method dispatch.
+- ``self._enum_member_strings`` (``dict[str, list[str]]``): enum -->
+  display-string table; used by ``_visit_str_call`` to render
+  ``str.tostring(enumVar)`` as the field title rather than the int
+  index.
+- ``self._func_info_map`` (``dict[str, FuncInfo]``): user-defined
+  function lookup; drives kwarg merging, UDT method dispatch, and the
+  series-arg classification.
+- ``self._func_names`` (``set[str]``): user-defined function names;
+  controls when ``_func_safe_name`` is applied and when the
+  per-call-site variant naming kicks in.
+- ``self._security_calls`` (``list[dict]``): normalized
+  ``request.security`` records; matched by ``expr_node`` identity to
+  bind ``_req_sec_<id>`` result names.
+- ``self._active_call_site_idx`` (``int | None``): set during
+  per-call-site function emission; controls ``_csN`` variant naming
+  for sub-function calls.
+- ``self._active_var_remap`` (``dict[str, str]``): per-call-site
+  rename map for cloned function-local var/series names; consulted by
+  the series-arg lowering helper.
+- ``self._fixnan_counter`` (``int``): monotonically incremented by
+  ``_visit_fixnan`` to mint fresh ``_prev_fixnan_<n>`` member names.
+- ``self._random_call_counter`` (``int``): monotonically incremented
+  by ``_visit_math_call`` for ``math.random`` so each call gets a
+  unique site id (used to seed the runtime PRNG).
+
+Sibling-mixin methods consumed via ``self``:
+
+- ``NamingHelper`` (``codegen/helpers.py``): ``_safe_name``,
+  ``_resolve_callee``, ``_func_safe_name``.
+- ``TypeInferer`` (``codegen/types.py``): ``_type_spec_to_cpp``,
+  ``_type_spec_from_expr``, ``_type_spec_from_hint_name``,
+  ``_default_for_spec``, ``_array_method_expr``,
+  ``_map_method_expr``, ``_array_spec_for_name``,
+  ``_map_spec_for_name``.
+- ``TaSiteHelper`` (``codegen/ta.py``): ``_get_ta_site``,
+  ``_ta_member_name``, ``_ta_compute_args_for_site``.
+- ``InputHelper`` (``codegen/input.py``): ``_is_input_call_by_name``,
+  ``_get_input_default``, ``_get_input_title``,
+  ``_input_type_to_getter``,
+  ``_enforce_enum_declared_before_input_enum``.
+- ``TopLevelEmitter`` (``codegen/emit_top.py``):
+  ``_emit_udt_method_cpp_name``.
+- ``ExprVisitor`` (``codegen/visit_expr.py``): ``_visit_expr``.
+- ``CodeGen.base``: ``_codegen_error``.
+
+The mixin avoids importing from ``base.py`` to stay free of cycles;
+all tables it needs come from ``codegen/tables.py``, AST classes from
+``..ast_nodes``, and PineScript signatures from ``.. import signatures``.
+"""
+
+from __future__ import annotations
+
+from ..ast_nodes import (
+    FuncCall,
+    Identifier,
+    MemberAccess,
+    TupleLiteral,
+    StringLiteral,
+)
+from ..symbols import TypeSpec
+from .. import signatures as sigs
+from .tables import (
+    ARRAY_METHODS,
+    BAR_FIELDS,
+    BAR_SERIES_PUSH,
+    MAP_METHODS,
+    MATH_FUNC_MAP,
+    MATRIX_METHODS,
+    MATRIX_METHOD_KWARGS,
+    MATRIX_NUMERIC_ONLY,
+    MATRIX_SORT_ALLOWED_GENERIC_ELEMS,
+    SKIP_FUNC_NAMES,
+    SKIP_NAMESPACES,
+    SKIP_VAR_TYPES,
+    STR_FUNC_MAP,
+    _merge_kwargs,
+    _merge_kwargs_with_defaults,
+)
+
+
+class CallVisitor:
+    """Function-call dispatch visitor methods shared across the codegen.
+
+    Mixed into ``CodeGen``; not intended to be instantiated standalone.
+    See the module docstring for the full host-class state contract."""
+
+    # ------------------------------------------------------------------
+    # Function-call dispatch
+    # ------------------------------------------------------------------
+
+    def _visit_func_call(self, node: FuncCall) -> str:
+        callee = node.callee
+        if isinstance(callee, MemberAccess):
+            recv_spec = self._type_spec_from_expr(callee.object)
+            if recv_spec is not None and recv_spec.kind == "udt" and recv_spec.name:
+                mk = f"{recv_spec.name}.{callee.member}"
+                fi_u = self._func_info_map.get(mk)
+                if fi_u is not None and getattr(fi_u, "is_udt_method", False):
+                    fn_cpp = self._emit_udt_method_cpp_name(fi_u)
+                    recv_e = self._visit_expr(callee.object)
+                    param_names = list(fi_u.node.params[1:]) if fi_u.node else []
+                    # Drop the leading ``self`` slot from param_defaults so the
+                    # parallel array lines up with ``param_names`` (rest of
+                    # the signature). Probe: udt-method-probe-04-default-param.
+                    param_defaults = list(getattr(fi_u, "param_defaults", []) or [])[1:]
+                    rest_nodes = _merge_kwargs_with_defaults(
+                        node.args, node.kwargs, param_names,
+                        param_defaults, lambda x: x,
+                    )
+                    rest = [self._visit_expr(a) for a in rest_nodes]
+                    return f"{fn_cpp}({', '.join([recv_e] + rest)})"
+        # obj.field.method(args) — must not lower to namespace::method (loses receiver chain).
+        if isinstance(callee, MemberAccess):
+            obj = callee.object
+            if isinstance(obj, MemberAccess):
+                root = obj.object
+                if not (isinstance(root, Identifier) and root.name in (
+                    "strategy", "ta", "math", "input", "str", "timeframe", "syminfo",
+                    "barstate", "color", "request", "runtime", "array", "matrix", "map",
+                )):
+                    recv_spec = self._type_spec_from_expr(obj)
+                    recv = self._visit_expr(obj)
+                    meth = callee.member
+                    raw_args = [self._visit_expr(a) for a in node.args]
+                    if recv_spec is not None and recv_spec.kind == "array" and meth in ARRAY_METHODS:
+                        return self._array_method_expr(recv, meth, raw_args, recv_spec)
+                    if recv_spec is not None and recv_spec.kind == "map" and meth in MAP_METHODS:
+                        return self._map_method_expr(recv, meth, raw_args, recv_spec)
+                    args = ", ".join(raw_args)
+                    if meth == "delete":
+                        meth = "_delete_"
+                    return f"{recv}.{meth}({args})"
+            # obj.method() where obj is a user var/param — not namespace::method
+            if isinstance(obj, Identifier):
+                oname = obj.name
+                if (
+                    oname in self._var_names
+                    or oname in self._current_func_param_types
+                    or oname in self._current_loop_vars
+                    or oname in self._global_member_vars
+                ):
+                    meth_raw = callee.member
+                    # map.put / map.get / … must lower to unordered_map ops, not `.put` on C++
+                    if oname in self._map_vars and meth_raw in MAP_METHODS:
+                        m = self._safe_name(oname)
+                        margs = [self._visit_expr(a) for a in node.args]
+                        return self._map_method_expr(m, meth_raw, margs, self._map_spec_for_name(oname))
+                    if oname in self._array_vars and meth_raw in ARRAY_METHODS:
+                        arr = self._safe_name(oname)
+                        margs = [self._visit_expr(a) for a in node.args]
+                        return self._array_method_expr(arr, meth_raw, margs, self._array_spec_for_name(oname))
+                    if oname in self._matrix_specs and meth_raw in MATRIX_METHODS:
+                        arr = self._safe_name(oname)
+                        self._check_matrix_method_allowed(meth_raw, self._matrix_specs[oname], node)
+                        param_names = MATRIX_METHOD_KWARGS.get(meth_raw)
+                        if param_names and node.kwargs:
+                            margs = _merge_kwargs(
+                                node.args, node.kwargs, param_names, self._visit_expr
+                            )
+                        else:
+                            margs = [self._visit_expr(a) for a in node.args]
+                        fn = MATRIX_METHODS[meth_raw]
+                        try:
+                            return fn(arr, margs)
+                        except IndexError:
+                            self._codegen_error(
+                                node,
+                                f"matrix.{meth_raw}: wrong number of arguments",
+                                hint="Check Pine v6 matrix method signature (positional vs keyword).",
+                            )
+                    safe_o = self._safe_name(oname)
+                    udt_t = self._udt_var_types.get(oname) or self._udt_var_types.get(safe_o)
+                    if udt_t is None:
+                        udt_t = self._udt_param_udt.get(oname) or self._udt_param_udt.get(safe_o)
+                    if udt_t is not None:
+                        mk = f"{udt_t}.{meth_raw}"
+                        fi_u = self._func_info_map.get(mk)
+                        if fi_u is not None and getattr(fi_u, "is_udt_method", False):
+                            fn_cpp = self._emit_udt_method_cpp_name(fi_u)
+                            recv_e = self._visit_expr(obj)
+                            param_names = list(fi_u.node.params[1:]) if fi_u.node else []
+                            # Drop the leading ``self`` slot so param_defaults
+                            # lines up with ``param_names``. Probe:
+                            # udt-method-probe-04-default-param.
+                            param_defaults = list(getattr(fi_u, "param_defaults", []) or [])[1:]
+                            rest_nodes = _merge_kwargs_with_defaults(
+                                node.args, node.kwargs, param_names,
+                                param_defaults, lambda x: x,
+                            )
+                            rest = [self._visit_expr(a) for a in rest_nodes]
+                            return f"{fn_cpp}({', '.join([recv_e] + rest)})"
+                    args = ", ".join(self._visit_expr(a) for a in node.args)
+                    recv = self._visit_expr(obj)
+                    meth = meth_raw
+                    if meth == "delete":
+                        meth = "_delete_"
+                    return f"{recv}.{meth}({args})"
+
+        func_name, namespace = self._resolve_callee(callee)
+
+        # na(x) -> is_na(x)
+        if func_name == "na" and namespace is None:
+            args = ", ".join(self._visit_expr(a) for a in node.args)
+            return f"is_na({args})"
+
+        # nz(x) / nz(x, y)
+        if func_name == "nz" and namespace is None:
+            x = self._visit_expr(node.args[0])
+            y = self._visit_expr(node.args[1]) if len(node.args) > 1 else "0.0"
+            return f"(is_na({x}) ? {y} : {x})"
+
+        # fixnan(x) -> persistent state
+        if func_name == "fixnan" and namespace is None:
+            return self._visit_fixnan(node)
+
+        # strategy.* calls
+        if namespace == "strategy":
+            return self._visit_strategy_call(func_name, node)
+
+        # ta.tr(handle_na) is dispatched through the standard TA-class path
+        # below: the analyzer assigns it a ``ta::TR`` call site (with
+        # ``handle_na`` threaded into the constructor); the property form
+        # ``ta.tr`` (no parens) stays inline in ``visit_expr`` so its
+        # legacy ``handle_na = true`` semantics remain bit-identical.
+
+        # ta.* calls -> member.compute(...)
+        site = self._get_ta_site(node)
+        if site is not None:
+            compute_args = self._ta_compute_args_for_site(site)
+            ta_mem = self._ta_member_name(site)
+            if getattr(self, "_precalc_loop_active", False) and getattr(site, "is_static", False):
+                return f"_precalc_{ta_mem}[i]"
+            if getattr(site, "is_static", False):
+                return f"(_use_precalc ? _precalc_{ta_mem}[bar_index_] : (is_first_tick_ ? {ta_mem}.compute({compute_args}) : {ta_mem}.recompute({compute_args})))"
+            return f"(is_first_tick_ ? {ta_mem}.compute({compute_args}) : {ta_mem}.recompute({compute_args}))"
+
+        # math.* calls
+        if namespace == "math":
+            return self._visit_math_call(func_name, node)
+
+        # input() / input.* calls -> runtime get_input_*()
+        if self._is_input_call_by_name(func_name, namespace):
+            if namespace == "input" and func_name == "enum":
+                self._enforce_enum_declared_before_input_enum(node)
+            title = self._get_input_title(node, var_name=self._current_input_var_name)
+            return self._render_input_value(node, func_name, namespace, title)
+
+        # strategy() declaration
+        if func_name == "strategy" and namespace is None:
+            return "/* strategy declaration */"
+
+        # str.* calls
+        if namespace == "str":
+            return self._visit_str_call(func_name, node)
+
+        # Map method syntax: m.put(key, val) where namespace is the map variable name
+        if namespace is not None and namespace in self._map_vars and func_name in MAP_METHODS:
+            m = self._safe_name(namespace)
+            args = [self._visit_expr(a) for a in node.args]
+            return self._map_method_expr(m, func_name, args, self._map_spec_for_name(namespace))
+
+        # map.method(m, args...) — functional form
+        if namespace == "map":
+            if func_name == "new":
+                spec = self._type_spec_from_expr(node) or TypeSpec.map(TypeSpec.primitive("string"), TypeSpec.primitive("float"))
+                return f"{self._type_spec_to_cpp(spec)}()"
+            if func_name in MAP_METHODS and node.args:
+                m = self._visit_expr(node.args[0])
+                rest = [self._visit_expr(a) for a in node.args[1:]]
+                spec = self._type_spec_from_expr(node.args[0]) if node.args else None
+                return self._map_method_expr(m, func_name, rest, spec)
+            return "0"
+
+        if namespace is not None and namespace in self._matrix_specs and func_name in MATRIX_METHODS:
+            arr = self._safe_name(namespace)
+            self._check_matrix_method_allowed(func_name, self._matrix_specs[namespace], node)
+            param_names = MATRIX_METHOD_KWARGS.get(func_name)
+            if param_names and node.kwargs:
+                args = _merge_kwargs(node.args, node.kwargs, param_names, self._visit_expr)
+            else:
+                args = [self._visit_expr(a) for a in node.args]
+            fn = MATRIX_METHODS[func_name]
+            try:
+                return fn(arr, args)
+            except IndexError:
+                self._codegen_error(
+                    node,
+                    f"matrix.{func_name}: wrong number of arguments",
+                    hint="Check Pine v6 matrix method signature (positional vs keyword).",
+                )
+
+        # Array method syntax: arr.push(val) where namespace is the array variable name
+        if namespace is not None and namespace in self._array_vars and func_name in ARRAY_METHODS:
+            arr = self._safe_name(namespace)
+            args = [self._visit_expr(a) for a in node.args]
+            return self._array_method_expr(arr, func_name, args, self._array_spec_for_name(namespace))
+
+        # Array operations — emit proper C++ vector operations
+        if namespace == "array":
+            if func_name in ("new", "new_float", "new_int", "new_bool", "new_string"):
+                spec = self._type_spec_from_expr(node) or TypeSpec.array(TypeSpec.primitive("float"))
+                cpp_type = self._type_spec_to_cpp(spec)
+                init_default = self._default_for_spec(spec.element if spec.element is not None else TypeSpec.primitive("float"))
+                if node.args:
+                    size_arg = self._visit_expr(node.args[0])
+                    init_val = self._visit_expr(node.args[1]) if len(node.args) > 1 else init_default
+                    return f"{cpp_type}((size_t)({size_arg}), {init_val})"
+                return f"{cpp_type}()"
+            if func_name == "from":
+                spec = self._type_spec_from_expr(node) or TypeSpec.array(TypeSpec.primitive("float"))
+                elems = ", ".join(self._visit_expr(a) for a in node.args)
+                return f"{self._type_spec_to_cpp(spec)}{{{elems}}}"
+            # Method calls: array.method(arr, args...)
+            if func_name in ARRAY_METHODS and node.args:
+                arr = self._visit_expr(node.args[0])
+                rest = [self._visit_expr(a) for a in node.args[1:]]
+                spec = self._type_spec_from_expr(node.args[0])
+                return self._array_method_expr(arr, func_name, rest, spec)
+            return "0"
+
+        # color.* calls
+        if namespace == "color":
+            return self._visit_color_call(func_name, node)
+
+        # Skip visual/unsupported namespace calls
+        if namespace in SKIP_NAMESPACES or namespace in SKIP_VAR_TYPES:
+            return "0"
+        if func_name in SKIP_FUNC_NAMES and namespace is None:
+            return "0"
+
+        # request.* calls
+        if namespace == "request":
+            if func_name == "security":
+                param_names = ["symbol", "timeframe", "expression", "gaps", "lookahead", "ignore_invalid_symbol", "currency"]
+                all_args = list(node.args)
+                for i, pname in enumerate(param_names):
+                    if pname in node.kwargs:
+                        while len(all_args) <= i:
+                            all_args.append(None)
+                        all_args[i] = node.kwargs[pname]
+                
+                # Find matching security call ID
+                sec_id = None
+                tf_node = None
+                expr_node = None
+                for item in self._security_calls:
+                    sid, tfn, exprn = item["sec_id"], item["tf_node"], item["expr_node"]
+                    if item.get("is_lower_tf_array"):
+                        continue
+                    if exprn is all_args[2] if len(all_args) > 2 else False:
+                        sec_id = sid
+                        tf_node = tfn
+                        expr_node = exprn
+                        break
+
+                if sec_id is not None and expr_node is not None:
+                    if isinstance(expr_node, TupleLiteral):
+                        parts = []
+                        for i, el in enumerate(expr_node.elements):
+                            parts.append(f"_req_sec_{sec_id}_{i}")
+                        return f"std::make_tuple({', '.join(parts)})"
+                    return f"_req_sec_{sec_id}"
+
+                # Fallback
+                return "na<double>()"
+            if func_name == "security_lower_tf":
+                # ``request.security_lower_tf`` is matched against the
+                # registered SecurityCallInfo by AST identity of the
+                # ``expression`` argument (3rd positional or kwarg). The
+                # codegen lowers the call to the per-sec_id accumulator
+                # vector — its element type and clear/push semantics are
+                # set up by the security mixin.
+                ltf_param_names = [
+                    "symbol", "timeframe", "expression",
+                    "ignore_invalid_symbol", "currency",
+                    "ignore_invalid_timeframe", "calc_bars_count",
+                ]
+                ltf_all_args = list(node.args)
+                for i, pname in enumerate(ltf_param_names):
+                    if pname in node.kwargs:
+                        while len(ltf_all_args) <= i:
+                            ltf_all_args.append(None)
+                        ltf_all_args[i] = node.kwargs[pname]
+                ltf_expr_node = ltf_all_args[2] if len(ltf_all_args) > 2 else None
+                for item in self._security_calls:
+                    if not item.get("is_lower_tf_array"):
+                        continue
+                    if item["expr_node"] is ltf_expr_node:
+                        return f"_req_sec_lower_tf_{item['sec_id']}"
+                return "std::vector<double>{}"
+            # All other request.* functions
+            return "na<double>()"
+
+        # ticker.* calls
+        if namespace == "ticker":
+            # ticker.inherit(symbol, ...) and ticker.standard(symbol) — passthrough:
+            # emit the symbol argument unchanged (same-symbol passthrough).
+            if func_name in ("inherit", "standard"):
+                if node.args:
+                    return self._visit_expr(node.args[0])
+                if "symbol" in node.kwargs:
+                    return self._visit_expr(node.kwargs["symbol"])
+            # All other ticker.* calls are hard-rejected by support_checker;
+            # emit empty string as safe fallback if they somehow reach codegen.
+            return 'std::string("")'
+
+        # runtime.error() and other runtime.* calls
+        if namespace == "runtime":
+            if func_name == "error":
+                rt_args = [self._visit_expr(a) for a in node.args]
+                msg_arg = rt_args[0] if rt_args else '""'
+                return f'pine_runtime_error({msg_arg})'
+            return '"" /* unsupported runtime */'
+
+        # year(time) / month(time) / dayofmonth(time) / dayofweek(time) /
+        # hour(time[, tz]) / minute(time[, tz]) / second(time[, tz]) /
+        # weekofyear(time[, tz]).
+        #
+        # Pine v6 exposes these names as BOTH variables (current bar) AND
+        # functions (arbitrary timestamp). The variable form is wired by
+        # ``BAR_BUILTINS`` in codegen/tables.py to ``_bar_year()`` etc. The
+        # function form has no public runtime helper, so we inline the
+        # gmtime_r-based calculation that mirrors ``BacktestEngine::
+        # _decompose_bar_time()`` (see include/pineforge/engine.hpp) so the
+        # numbers agree across both forms.
+        #
+        # Timezone handling (per Pine v6 reference docs):
+        # - Bare form ``hour(time)`` defaults its tz argument to
+        #   ``syminfo.timezone`` — the SYMBOL/EXCHANGE timezone, NOT the
+        #   chart's display timezone. For the corpus' ETH-USDT crypto data
+        #   this is ``"UTC"`` (the ``SymInfo`` constructor default), which
+        #   keeps the lambda on the cheap ``gmtime_r`` fast path. The
+        #   variable form ``hour`` is wired directly to ``_bar_hour()`` /
+        #   ``_decompose_bar_time()`` (engine.hpp), which is hardcoded to
+        #   ``gmtime_r`` and therefore matches the function-form default
+        #   for the same exchange TZ.
+        #
+        #   Pre-fix the harness's ``strategy_set_chart_timezone`` clobbered
+        #   ``syminfo_.timezone`` with the chart display TZ, which silently
+        #   shifted ``hour(time)``-bucketed accumulators by the
+        #   chart-vs-exchange offset (Asia/Taipei vs UTC = +8h). That fix
+        #   now lives entirely in ``BacktestEngine::set_chart_timezone``
+        #   (engine.hpp), which writes to a dedicated ``chart_timezone_``
+        #   slot and leaves ``syminfo_.timezone`` at its constructor
+        #   default. This codegen still reads ``syminfo_.timezone``,
+        #   matching TV semantics, with no emit-time changes.
+        # - Two-arg form ``hour(time, tz)`` always overrides syminfo with
+        #   the explicit tz argument. Same setenv+localtime_r block as the
+        #   1-arg fallback.
+        _BAR_TIME_FUNC_EXPR = {
+            "year":       "tm_buf.tm_year + 1900",
+            "month":      "tm_buf.tm_mon + 1",
+            "dayofmonth": "tm_buf.tm_mday",
+            "dayofweek":  "tm_buf.tm_wday + 1",
+            "hour":       "tm_buf.tm_hour",
+            "minute":     "tm_buf.tm_min",
+            "second":     "tm_buf.tm_sec",
+            "weekofyear": "(tm_buf.tm_yday + 7 - ((tm_buf.tm_wday + 6) % 7)) / 7",
+        }
+        if (
+            namespace is None
+            and func_name in _BAR_TIME_FUNC_EXPR
+            and (node.args or node.kwargs)
+        ):
+            params = sigs.get_param_names(None, func_name)
+            args = _merge_kwargs(node.args, node.kwargs, params, self._visit_expr)
+            ts_arg = args[0] if args else "current_bar_.timestamp"
+            tz_arg = args[1] if len(args) > 1 else None
+            field_expr = _BAR_TIME_FUNC_EXPR[func_name]
+            if tz_arg is None:
+                # 1-arg form — fall back to ``syminfo.timezone`` per TV
+                # docs (the EXCHANGE TZ, default "UTC" for the corpus'
+                # crypto data; NOT the chart display TZ — that lives in
+                # ``chart_timezone_`` on the engine and is intentionally
+                # ignored here). UTC / "" / "Etc/UTC" stay on the cheap
+                # gmtime_r path; anything else takes the same
+                # mutex-guarded setenv+localtime_r block as the 2-arg
+                # form.
+                tz_arg = "syminfo_.timezone"
+            # 2-arg form — honor the tz argument. Uses an inline setenv+
+            # localtime_r guarded by a function-local static mutex, mirroring
+            # ``pine_tz::ScopedTimezone`` (src/timezone.cpp) which is not
+            # exposed via any public ``<pineforge/...>`` header today.
+            return (
+                "[&]() -> int { "
+                f"std::string _tz = ({tz_arg}); "
+                f"time_t _secs = (time_t)(({ts_arg}) / 1000); "
+                "struct tm tm_buf; "
+                "if (_tz.empty() || _tz == \"UTC\" || _tz == \"Etc/UTC\") { "
+                "gmtime_r(&_secs, &tm_buf); "
+                "} else { "
+                "static std::mutex _pf_tz_mu; "
+                "std::lock_guard<std::mutex> _pf_tz_lock(_pf_tz_mu); "
+                "const char* _old = std::getenv(\"TZ\"); "
+                "std::string _old_tz = _old ? _old : \"\"; bool _had_old = (_old != nullptr); "
+                "::setenv(\"TZ\", _tz.c_str(), 1); ::tzset(); "
+                "localtime_r(&_secs, &tm_buf); "
+                "if (_had_old) { ::setenv(\"TZ\", _old_tz.c_str(), 1); } "
+                "else { ::unsetenv(\"TZ\"); } ::tzset(); "
+                "} "
+                f"return {field_expr}; "
+                "}()"
+            )
+
+        # time(timeframe) or time(timeframe, session[, tz])
+        if func_name == "time" and namespace is None and (node.args or node.kwargs):
+            args = _merge_kwargs(node.args, node.kwargs, sigs.get_param_names(None, "time"), self._visit_expr)
+            tf_e = args[0] if len(args) > 0 else 'script_tf_'
+            sess = args[1] if len(args) > 1 else 'std::string("")'
+            tz_e = args[2] if len(args) > 2 else 'std::string("")'
+            return (
+                f"pine_time(current_bar_.timestamp, {tf_e}, {sess}, {tz_e}, script_tf_)"
+            )
+        # time_close(timeframe) or time_close(tf, session, tz)
+        if func_name == "time_close" and namespace is None and (node.args or node.kwargs):
+            args = _merge_kwargs(node.args, node.kwargs, sigs.get_param_names(None, "time_close"), self._visit_expr)
+            tf_e = args[0] if len(args) > 0 else 'script_tf_'
+            sess = args[1] if len(args) > 1 else 'std::string("")'
+            tz_e = args[2] if len(args) > 2 else 'std::string("")'
+            return (
+                f"pine_time_close(current_bar_.timestamp, {tf_e}, {sess}, {tz_e}, script_tf_)"
+            )
+
+        # timestamp(year, month, day, hour, minute) → Unix ms
+        if func_name == "timestamp" and namespace is None:
+            is_tz_first = False
+            if node.args:
+                first_arg_spec = self._type_spec_from_expr(node.args[0])
+                if first_arg_spec is not None and first_arg_spec.kind == "primitive" and first_arg_spec.name == "string":
+                    is_tz_first = True
+                elif isinstance(node.args[0], StringLiteral):
+                    is_tz_first = True
+
+            if is_tz_first:
+                args = [self._visit_expr(a) for a in node.args]
+                tz = args[0]
+                yr = args[1] if len(args) > 1 else "1970"
+                mo = args[2] if len(args) > 2 else "1"
+                dy = args[3] if len(args) > 3 else "1"
+                hr = args[4] if len(args) > 4 else "0"
+                mn = args[5] if len(args) > 5 else "0"
+                sc = args[6] if len(args) > 6 else "0"
+                return (
+                    f"[&]() -> int64_t {{ "
+                    f"std::string _tz = ({tz}); "
+                    f"int _yr = ({yr}); int _mo = ({mo}); int _dy = ({dy}); "
+                    f"int _hr = ({hr}); int _min = ({mn}); int _sc = ({sc}); "
+                    f"static thread_local std::string _last_tz; "
+                    f"static thread_local int _last_yr = -1, _last_mo = -1, _last_dy = -1, _last_hr = -1, _last_min = -1, _last_sc = -1; "
+                    f"static thread_local int64_t _last_res = -1; "
+                    f"if (_last_res != -1 && _last_tz == _tz && _last_yr == _yr && _last_mo == _mo && _last_dy == _dy && _last_hr == _hr && _last_min == _min && _last_sc == _sc) {{ "
+                    f"return _last_res; "
+                    f"}} "
+                    f"struct tm t = {{}}; "
+                    f"t.tm_year = _yr - 1900; t.tm_mon = _mo - 1; "
+                    f"t.tm_mday = _dy; t.tm_hour = _hr; t.tm_min = _min; t.tm_sec = _sc; "
+                    f"int64_t _res; "
+                    f"if (_tz.empty() || _tz == \"UTC\" || _tz == \"Etc/UTC\") {{ "
+                    f"_res = (int64_t)timegm(&t) * 1000; "
+                    f"}} else {{ "
+                    f"static std::mutex _pf_ts_mu; "
+                    f"std::lock_guard<std::mutex> _pf_ts_mu_lock(_pf_ts_mu); "
+                    f"const char* _old = std::getenv(\"TZ\"); "
+                    f"std::string _old_tz = _old ? _old : \"\"; bool _had_old = (_old != nullptr); "
+                    f"::setenv(\"TZ\", _tz.c_str(), 1); ::tzset(); "
+                    f"_res = (int64_t)mktime(&t) * 1000; "
+                    f"if (_had_old) {{ ::setenv(\"TZ\", _old_tz.c_str(), 1); }} "
+                    f"else {{ ::unsetenv(\"TZ\"); }} ::tzset(); "
+                    f"}} "
+                    f"_last_tz = _tz; _last_yr = _yr; _last_mo = _mo; _last_dy = _dy; _last_hr = _hr; _last_min = _min; _last_sc = _sc; "
+                    f"_last_res = _res; "
+                    f"return _res; "
+                    f"}}()"
+                )
+            else:
+                args = [self._visit_expr(a) for a in node.args]
+                if len(args) >= 1:
+                    if len(args) == 1:
+                        return "0"
+                    yr = args[0]
+                    mo = args[1] if len(args) > 1 else "1"
+                    dy = args[2] if len(args) > 2 else "1"
+                    hr = args[3] if len(args) > 3 else "0"
+                    mn = args[4] if len(args) > 4 else "0"
+                    sc = args[5] if len(args) > 5 else "0"
+                    return (
+                        f"[&]() -> int64_t {{ "
+                        f"int _yr = ({yr}); int _mo = ({mo}); int _dy = ({dy}); "
+                        f"int _hr = ({hr}); int _min = ({mn}); int _sc = ({sc}); "
+                        f"static thread_local int _last_yr = -1, _last_mo = -1, _last_dy = -1, _last_hr = -1, _last_min = -1, _last_sc = -1; "
+                        f"static thread_local int64_t _last_res = -1; "
+                        f"if (_last_res != -1 && _last_yr == _yr && _last_mo == _mo && _last_dy == _dy && _last_hr == _hr && _last_min == _min && _last_sc == _sc) {{ "
+                        f"return _last_res; "
+                        f"}} "
+                        f"struct tm t = {{}}; "
+                        f"t.tm_year = _yr - 1900; t.tm_mon = _mo - 1; "
+                        f"t.tm_mday = _dy; t.tm_hour = _hr; t.tm_min = _min; t.tm_sec = _sc; "
+                        f"int64_t _res = (int64_t)timegm(&t) * 1000; "
+                        f"_last_yr = _yr; _last_mo = _mo; _last_dy = _dy; _last_hr = _hr; _last_min = _min; _last_sc = _sc; "
+                        f"_last_res = _res; "
+                        f"return _res; "
+                        f"}}()"
+                    )
+                return "0"
+
+        # barssince() — unsupported. Defensive: support_checker rejects bare
+        # barssince(...) with a hint to use ta.barssince(...). Reaching here
+        # means the checker was bypassed.
+        if func_name == "barssince" and namespace is None:
+            raise ValueError(
+                "codegen: bare barssince(...) is not supported — analyzer should "
+                "have rejected. Use ta.barssince(...)."
+            )
+
+        # Type cast functions: int(x), float(x), bool(x), string(x)
+        if func_name == "int" and namespace is None and node.args:
+            return f"(int)({self._visit_expr(node.args[0])})"
+        if func_name == "float" and namespace is None and node.args:
+            return f"(double)({self._visit_expr(node.args[0])})"
+        if func_name == "bool" and namespace is None and node.args:
+            return f"(bool)({self._visit_expr(node.args[0])})"
+        if func_name == "string" and namespace is None and node.args:
+            return f"std::to_string({self._visit_expr(node.args[0])})"
+
+        # ta.pivot_point_levels — free function, not a stateful indicator
+        if namespace == "ta" and func_name == "pivot_point_levels":
+            if node.kwargs:
+                args = _merge_kwargs(
+                    node.args,
+                    node.kwargs,
+                    sigs.get_param_names("ta", "pivot_point_levels"),
+                    self._visit_expr,
+                )
+            else:
+                args = [self._visit_expr(a) for a in node.args]
+            if len(args) >= 4:
+                return f'ta::pivot_point_levels({", ".join(args[:4])})'
+            if 1 <= len(args) <= 3:
+                # Pine overload (type, anchor, developing). Per Pine v6
+                # semantics, `developing=false` (the default) means the pivot
+                # is computed from the LAST CLOSED period's HLC. With
+                # `anchor=true` constant, the "period" is one bar, so we
+                # consume the PREVIOUS bar's HLC via `_s_high[1]`, etc. The
+                # analyzer registers high/low/close in `series_bar_fields` so
+                # those `Series<double>` members are guaranteed to exist.
+                # Previously we passed `current_bar_.high/low/close` which
+                # produced TV-shifted-by-one-bar values for every level.
+                return (
+                    f"ta::pivot_point_levels({args[0]}, _s_high[1], "
+                    f"_s_low[1], _s_close[1])"
+                )
+            return f'ta::pivot_point_levels({", ".join(args)})'
+
+        # Unknown ta.* calls — safe fallback
+        if namespace == "ta":
+            return f"na<double>() /* unsupported: ta.{func_name} */"
+
+        if namespace == "syminfo":
+            if func_name == "prefix":
+                return "_pf_derive_prefix(syminfo_.tickerid)"
+            if func_name == "ticker":
+                return "syminfo_.ticker"
+            return f"na<double>() /* unsupported: syminfo.{func_name} */"
+
+        # str.* fallback now handled by _visit_str_call above
+
+        # matrix.* calls
+        if namespace == "matrix":
+            if func_name == "new":
+                targs = self._template_args_from_call(node)
+                elem_spec = self._type_spec_from_hint_name(targs[0]) if targs else TypeSpec.primitive("float")
+                args_e = [self._visit_expr(a) for a in node.args]
+                rows = args_e[0] if args_e else "0"
+                cols = args_e[1] if len(args_e) > 1 else "0"
+                if elem_spec.kind == "primitive" and elem_spec.name == "float":
+                    init = args_e[2] if len(args_e) > 2 else "0.0"
+                    return f"PineMatrix::new_({rows}, {cols}, {init})"
+                cpp_t = self._type_spec_to_cpp(elem_spec)
+                init = args_e[2] if len(args_e) > 2 else self._default_for_spec(elem_spec)
+                return f"PineGenericMatrix<{cpp_t}>::new_({rows}, {cols}, {init})"
+            if func_name in MATRIX_METHODS and node.args:
+                from ..ast_nodes import Identifier as _Ident
+                if func_name in MATRIX_NUMERIC_ONLY:
+                    if not isinstance(node.args[0], _Ident):
+                        self._codegen_error(node, f"matrix.{func_name} receiver must be a variable reference")
+                    recv_name = node.args[0].name
+                    if recv_name not in self._matrix_specs:
+                        self._codegen_error(node, f"matrix.{func_name}: receiver '{recv_name}' is not a known matrix variable")
+                    self._check_matrix_method_allowed(func_name, self._matrix_specs[recv_name], node)
+                if func_name == "sort":
+                    if isinstance(node.args[0], _Ident):
+                        recv_name = node.args[0].name
+                        if recv_name in self._matrix_specs:
+                            self._check_matrix_method_allowed(func_name, self._matrix_specs[recv_name], node)
+                obj = self._visit_expr(node.args[0])
+                param_names = MATRIX_METHOD_KWARGS.get(func_name)
+                if param_names:
+                    rest = _merge_kwargs(node.args[1:], node.kwargs, param_names, self._visit_expr)
+                else:
+                    rest = [self._visit_expr(a) for a in node.args[1:]]
+                fn = MATRIX_METHODS[func_name]
+                try:
+                    return fn(obj, rest)
+                except IndexError:
+                    self._codegen_error(
+                        node,
+                        f"matrix.{func_name}: wrong number of arguments",
+                        hint="Check Pine v6 matrix method signature (positional vs keyword).",
+                    )
+            return "0.0"
+
+        # log.* calls (log.error, log.warning, log.info)
+        if namespace == "log":
+            log_funcs = {"info": "pine_log_info", "warning": "pine_log_warning", "error": "pine_log_error"}
+            if func_name in log_funcs:
+                log_args = [self._visit_expr(a) for a in node.args]
+                msg_arg = log_args[0] if log_args else '""'
+                return f'{log_funcs[func_name]}({msg_arg})'
+            return '"" /* unsupported log */'
+
+        # timeframe.* calls (e.g., timeframe.change) — not supported in single-TF backtest
+        if namespace == "timeframe":
+            if func_name == "change":
+                tf_arg = self._visit_expr(node.args[0]) if node.args else 'script_tf_'
+                return f'tf_change(prev_bar_timestamp_, current_bar_.timestamp, {tf_arg})'
+            if func_name == "in_seconds":
+                tf_arg = self._visit_expr(node.args[0]) if node.args else 'script_tf_'
+                return f'tf_to_seconds({tf_arg})'
+            # Defensive: support_checker.NOT_YET_FUNC should already have rejected
+            # any unhandled timeframe.* call. Reaching here implies the checker was
+            # bypassed.
+            raise ValueError(
+                f"codegen: unhandled timeframe.{func_name} — analyzer should have "
+                f"rejected this. Either add a handler above or extend NOT_YET_FUNC."
+            )
+
+        # UDT constructor: TypeName.new(field=val, ...)
+        if namespace in self._udt_defs and func_name == "new":
+            fields = self._udt_defs[namespace]
+            field_names = [f.name for f in fields]
+            init_vals = {}
+            for i, a in enumerate(node.args):
+                if i < len(field_names):
+                    init_vals[field_names[i]] = self._visit_expr(a)
+            for k, v in node.kwargs.items():
+                init_vals[k] = self._visit_expr(v)
+            field_inits = []
+            field_specs = self._udt_field_type_specs.get(namespace, {})
+            for f in fields:
+                val = None
+                if f.name in init_vals:
+                    val = init_vals[f.name]
+                elif f.default:
+                    val = self._visit_expr(f.default)
+                if val is not None:
+                    # Fix narrowing: cast na<double>() to correct type for int fields
+                    f_cpp_type = self._type_spec_to_cpp(field_specs.get(f.name) or self._type_spec_from_hint_name(f.type_name))
+                    if f_cpp_type == "int" and "na<double>" in val:
+                        val = val.replace("na<double>()", "0")
+                    field_inits.append(f".{f.name} = {val}")
+            return f"{namespace}{{{', '.join(field_inits)}}}"
+
+        # UDT copy: TypeName.copy(obj)
+        if namespace in self._udt_defs and func_name == "copy":
+            if node.args:
+                return self._visit_expr(node.args[0])
+            return f"{namespace}{{}}"
+
+        # Safety net before the generic emitter. Every builtin namespace and
+        # bare builtin that codegen knows how to emit has been dispatched (and
+        # returned) above; SKIP_NAMESPACES / SKIP_FUNC_NAMES returned "0";
+        # user-defined functions live in ``self._func_names`` and UDT
+        # constructors/copies were handled via ``self._udt_defs``. Anything
+        # still here would be written out verbatim — ``made_up(...)`` or
+        # ``qux::frobnicate(...)`` — i.e. an *undeclared C++ symbol*. That is a
+        # silent miscompile: the support checker did not reject it, so the user
+        # would otherwise only see a cryptic g++ error pointing at generated
+        # C++ instead of their Pine line. Reject loudly with the offending
+        # node's location. (Note: any script that reached this branch already
+        # failed to compile, so the all-green corpus never exercises it — this
+        # only converts garbage output into a clean diagnostic.)
+        # ``func_name is None`` means the callee is a complex expression the
+        # resolver does not reduce to a simple ``name`` / ``ns.name`` — e.g. a
+        # chained method call ``m.transpose().copy()`` whose receiver is itself
+        # a FuncCall. Those are handled by the existing generic/chained logic
+        # below; do not treat them as unknown builtins.
+        if namespace is None and func_name is not None:
+            if func_name not in self._func_names:
+                self._codegen_error(
+                    node,
+                    f"Unknown function '{func_name}(...)' — not a PineForge "
+                    f"builtin or a user-defined function.",
+                    hint="Check the spelling; the function may not be supported "
+                         "by PineForge, or needs its namespace (e.g. math./str.).",
+                )
+        elif namespace is not None and namespace not in self._udt_defs:
+            self._codegen_error(
+                node,
+                f"Unknown call '{namespace}.{func_name}(...)' — '{namespace}' is "
+                f"not a PineForge-supported namespace or a user-defined type.",
+                hint="Check the spelling; this namespace may not be supported "
+                     "by PineForge.",
+            )
+
+        # Generic function call (user-defined or unknown)
+        # Determine which params are series (need Series<double> arg, not scalar)
+        _func_series_param_indices: set[int] = set()
+        fi_lookup = self._func_info_map.get(func_name)
+        if fi_lookup and fi_lookup.node:
+            func_sv = self.ctx.func_series_vars.get(fi_lookup.name, set())
+            for p_idx, p_name in enumerate(fi_lookup.node.params):
+                if p_name in func_sv:
+                    _func_series_param_indices.add(p_idx)
+
+        def _visit_arg_for_series(arg_node, arg_idx):
+            """Visit a function argument, returning Series ref for series params."""
+            if arg_idx in _func_series_param_indices and isinstance(arg_node, Identifier):
+                aname = arg_node.name
+                # Bar field: pass _s_close instead of current_bar_.close
+                if aname in BAR_FIELDS or aname in BAR_SERIES_PUSH:
+                    return f"_s_{aname}"
+                # Series var: pass the Series object directly
+                if aname in self.ctx.series_vars:
+                    safe = self._safe_name(aname)
+                    if self._active_var_remap and safe in self._active_var_remap:
+                        safe = self._active_var_remap[safe]
+                    return safe
+            return self._visit_expr(arg_node)
+
+        if node.kwargs:
+            # Try to resolve kwargs using FuncInfo params for user-defined functions
+            fi = self._func_info_map.get(func_name)
+            if fi and fi.node and fi.node.params:
+                param_names = list(fi.node.params)  # params is list[str]
+                # Merge kwargs then visit with series awareness
+                merged = _merge_kwargs(node.args, node.kwargs, param_names, lambda a: a)
+                all_args = [_visit_arg_for_series(a, i) for i, a in enumerate(merged)]
+            elif sigs.is_intrinsic_function(namespace, func_name):
+                # Known intrinsic — use signature registry for kwargs resolution
+                param_names = sigs.get_param_names(namespace, func_name)
+                all_args = _merge_kwargs(node.args, node.kwargs, param_names, self._visit_expr)
+            else:
+                # Unknown function: positional args + kwargs values as fallback
+                all_args = [_visit_arg_for_series(a, i) for i, a in enumerate(node.args)]
+                all_args.extend(self._visit_expr(v) for v in node.kwargs.values())
+        else:
+            all_args = [_visit_arg_for_series(a, i) for i, a in enumerate(node.args)]
+        # Default args (parser does not store defaults): isInSession(sess, res = timeframe.period)
+        if namespace is None and func_name in self._func_names:
+            fi = self._func_info_map.get(func_name)
+            if fi and fi.node and fi.name == "isInSession" and len(fi.node.params) >= 2 and len(all_args) == 1:
+                # Mirror Pine default `timeframe.period` instead of hard-coding 15m.
+                all_args.append("script_tf_")
+        prefix = f"{namespace}::" if namespace else ""
+        # Use safe name for user-defined functions to avoid member name collision
+        emit_name = self._func_safe_name(func_name) if func_name in self._func_names else func_name
+        # Per-call-site variant: if this function has TA/series calls, call the correct variant
+        cs_info = self.ctx.func_call_cs_map.get(id(node))
+        if self._active_call_site_idx is not None and cs_info is not None:
+            # Inside a per-call-site variant: override the cs_map index with
+            # the parent's active call-site index. This ensures sub-functions
+            # called from ma_cs6() use their _cs6 variant, not _cs0.
+            fname, _ = cs_info
+            emit_name = f"{self._func_safe_name(fname)}_cs{self._active_call_site_idx}"
+        elif cs_info is not None:
+            fname, cs_idx = cs_info
+            emit_name = f"{self._func_safe_name(fname)}_cs{cs_idx}"
+        elif (self._active_call_site_idx is not None
+              and func_name in self._func_names
+              and self.ctx.func_call_site_counts.get(func_name, 0) > 1):
+            # Inside a per-call-site variant: propagate call-site index to
+            # sub-functions that also have variants (for state isolation)
+            emit_name = f"{self._func_safe_name(func_name)}_cs{self._active_call_site_idx}"
+        return f"{prefix}{emit_name}({', '.join(all_args)})"
+
+    def _visit_fixnan(self, node: FuncCall) -> str:
+        """Emit fixnan with persistent state member."""
+        self._fixnan_counter += 1
+        member = f"_prev_fixnan_{self._fixnan_counter}"
+        x = self._visit_expr(node.args[0])
+        return f"(is_na({x}) ? {member} : ({member} = {x}))"
+
+    def _visit_strategy_call(self, func_name: str, node: FuncCall) -> str:
+        if func_name in ("convert_to_account", "convert_to_symbol"):
+            p = self._resolve_func_args(node, f"strategy.{func_name}")
+            v = self._visit_expr(p.get("value")) if p.get("value") is not None else "0.0"
+            return f"({v})"
+        if func_name == "default_entry_qty":
+            p = self._resolve_func_args(node, "strategy.default_entry_qty")
+            fp = self._visit_expr(p.get("fill_price")) if p.get("fill_price") is not None else "0.0"
+            return f"calc_qty({fp})"
+
+        if func_name == "entry":
+            p = self._resolve_func_args(node, "strategy.entry")
+            entry_id = self._visit_expr(p.get("id")) if "id" in p else '""'
+            direction = self._visit_expr(p.get("direction")) if "direction" in p else "true"
+            stop = p.get("stop")
+            limit = p.get("limit")
+            qty = p.get("qty")
+            comment = p.get("comment")
+            oca_name = p.get("oca_name")
+            oca_type = p.get("oca_type")
+            qty_type = p.get("qty_type")
+            comment_val = self._visit_expr(comment) if comment else '""'
+            oca_name_val = self._visit_expr(oca_name) if oca_name else '""'
+            oca_type_val = self._visit_expr(oca_type) if oca_type else "0"
+            qty_type_val = self._visit_expr(qty_type) if qty_type else "-1"
+            qty_val = self._visit_expr(qty) if qty else "na<double>()"
+            if stop is not None or limit is not None or qty is not None or oca_name is not None or oca_type is not None or qty_type is not None:
+                limit_val = self._visit_expr(limit) if limit else "na<double>()"
+                stop_val = self._visit_expr(stop) if stop else "na<double>()"
+                # pineforge-engine v0.2 dropped the vestigial `market_price`
+                # third positional from `BacktestEngine::strategy_entry`
+                # (the runtime never read it; fill price always came from
+                # current_bar_.close inside the function body). Codegen now
+                # matches the new signature: (id, direction, limit, stop,
+                # qty, comment, oca_name, oca_type, qty_type).
+                return f"strategy_entry({entry_id}, {direction}, {limit_val}, {stop_val}, {qty_val}, {comment_val}, {oca_name_val}, {oca_type_val}, {qty_type_val})"
+            return f"strategy_entry({entry_id}, {direction}, na<double>(), na<double>(), na<double>(), {comment_val})"
+
+        if func_name == "close":
+            p = self._resolve_func_args(node, "strategy.close")
+            close_id = self._visit_expr(p.get("id")) if "id" in p else '""'
+            comment = self._visit_expr(p.get("comment")) if p.get("comment") is not None else '""'
+            qty = self._visit_expr(p.get("qty")) if p.get("qty") is not None else "na<double>()"
+            qty_pct = self._visit_expr(p.get("qty_percent")) if p.get("qty_percent") is not None else "na<double>()"
+            immediately = self._visit_expr(p.get("immediately")) if p.get("immediately") is not None else "false"
+            return f"strategy_close({close_id}, {comment}, {qty}, {qty_pct}, {immediately})"
+
+        if func_name == "close_all":
+            return "strategy_close_all()"
+
+        if func_name == "exit":
+            p = self._resolve_func_args(node, "strategy.exit")
+            exit_id = self._visit_expr(p.get("id")) if "id" in p else '""'
+            from_id = self._visit_expr(p.get("from_entry")) if "from_entry" in p else '""'
+
+            limit_n = p.get("limit")
+            stop_n = p.get("stop")
+            profit_n = p.get("profit")
+            loss_n = p.get("loss")
+            trail_pts_n = p.get("trail_points")
+            trail_off_n = p.get("trail_offset")
+            trail_pr_n = p.get("trail_price")
+            qty_pct_n = p.get("qty_percent")
+            qty_n = p.get("qty")
+            comment_n = p.get("comment")
+            oca_name_n = p.get("oca_name")
+
+            has_price_exit = any(x is not None for x in
+                                [limit_n, stop_n, profit_n, loss_n,
+                                 trail_pts_n, trail_off_n, trail_pr_n])
+            if has_price_exit:
+                limit_val = self._visit_expr(limit_n) if limit_n else "na<double>()"
+                stop_val = self._visit_expr(stop_n) if stop_n else "na<double>()"
+                trail_pts = self._visit_expr(trail_pts_n) if trail_pts_n else "na<double>()"
+                trail_off = self._visit_expr(trail_off_n) if trail_off_n else "na<double>()"
+                trail_pr = self._visit_expr(trail_pr_n) if trail_pr_n else "na<double>()"
+                qty_pct = self._visit_expr(qty_pct_n) if qty_pct_n else "100.0"
+                qty_val = self._visit_expr(qty_n) if qty_n else "na<double>()"
+                comment = self._visit_expr(comment_n) if comment_n is not None else '""'
+                oca_val = self._visit_expr(oca_name_n) if oca_name_n is not None else '""'
+
+                if profit_n and not limit_n:
+                    ticks = self._visit_expr(profit_n)
+                    limit_val = f"(position_entry_price_ + (signed_position_size() > 0 ? 1.0 : -1.0) * ({ticks}) * syminfo_mintick_)"
+                if loss_n and not stop_n:
+                    ticks = self._visit_expr(loss_n)
+                    stop_val = f"(position_entry_price_ - (signed_position_size() > 0 ? 1.0 : -1.0) * ({ticks}) * syminfo_mintick_)"
+
+                return (f"strategy_exit({exit_id}, {from_id}, {limit_val}, {stop_val}, "
+                        f"{trail_pts}, {trail_off}, {trail_pr}, {qty_pct}, {comment}, "
+                        f"{qty_val}, {oca_val})")
+            close_comment = self._visit_expr(comment_n) if comment_n is not None else '""'
+            return f"strategy_close({exit_id}, {close_comment})"
+
+        if func_name == "cancel":
+            p = self._resolve_func_args(node, "strategy.close")  # same shape: id first
+            cancel_id = self._visit_expr(p.get("id")) if "id" in p else '""'
+            return f"strategy_cancel({cancel_id})"
+
+        if func_name == "cancel_all":
+            return "strategy_cancel_all()"
+
+        if func_name == "order":
+            p = self._resolve_func_args(node, "strategy.order")
+            order_id = self._visit_expr(p.get("id")) if "id" in p else '""'
+            direction = self._visit_expr(p.get("direction")) if "direction" in p else "true"
+            qty = self._visit_expr(p.get("qty")) if "qty" in p else "0"
+            limit_arg = self._visit_expr(p.get("limit")) if "limit" in p else "na<double>()"
+            stop_arg = self._visit_expr(p.get("stop")) if "stop" in p else "na<double>()"
+            oca_name = self._visit_expr(p.get("oca_name")) if "oca_name" in p else '""'
+            oca_type = self._visit_expr(p.get("oca_type")) if "oca_type" in p else "0"
+            return f"strategy_order({order_id}, {direction}, {qty}, {limit_arg}, {stop_arg}, {oca_name}, {oca_type})"
+
+        if func_name == "risk":
+            return "/* skip */"
+
+        # strategy.closedtrades.*(idx) / strategy.opentrades.*(idx)
+        # These come through as func_name="profit" etc. with nested callee
+        if isinstance(node.callee, MemberAccess):
+            inner = node.callee.object
+            if isinstance(inner, MemberAccess) and inner.member in ("closedtrades", "opentrades"):
+                idx = self._visit_expr(node.args[0]) if node.args else "0"
+                is_open = inner.member == "opentrades"
+                # Open trades have no exit metadata in Pine
+                if is_open and func_name in (
+                    "exit_price", "exit_time", "exit_comment", "exit_id", "exit_bar_index",
+                ):
+                    if func_name == "exit_bar_index":
+                        return "na<int>()"
+                    if func_name == "exit_time":
+                        return "0"
+                    if func_name == "exit_price":
+                        return "na<double>()"
+                    if func_name in ("exit_comment", "exit_id"):
+                        return "std::string()"
+
+                prefix = "open_trade_" if is_open else "closed_trade_"
+                suffix_map = {
+                    "profit": "profit",
+                    "profit_percent": "profit_percent",
+                    "commission": "commission",
+                    "direction": "direction",
+                    "entry_bar_index": "entry_bar_index",
+                    "exit_bar_index": "exit_bar_index",
+                    "entry_comment": "entry_comment",
+                    "exit_comment": "exit_comment",
+                    "entry_id": "entry_id",
+                    "exit_id": "exit_id",
+                    "entry_price": "entry_price",
+                    "exit_price": "exit_price",
+                    "entry_time": "entry_time",
+                    "exit_time": "exit_time",
+                    "size": "size",
+                    "max_runup": "max_runup",
+                    "max_runup_percent": "max_runup_percent",
+                    "max_drawdown": "max_drawdown",
+                    "max_drawdown_percent": "max_drawdown_percent",
+                }
+                fn = suffix_map.get(func_name, "profit")
+                return f"{prefix}{fn}({idx})"
+
+        # Defensive: support_checker rejects unknown strategy.* calls (name not
+        # in sigs.STRATEGY_FUNCTIONS) and unknown strategy.closedtrades.* /
+        # strategy.opentrades.* accessors (not in the side-specific accessor
+        # whitelists). Reaching here means the checker was bypassed or drifted.
+        raise ValueError(
+            f"codegen: unhandled strategy.{func_name}(...) — analyzer should "
+            f"have rejected. Add a handler above or extend STRATEGY_FUNCTIONS."
+        )
+
+    def _visit_color_call(self, func_name: str, node) -> str:
+        """Emit color.* calls as integer representations."""
+        args = [self._visit_expr(a) for a in node.args]
+        if func_name == "new":
+            if len(args) >= 2:
+                return f'pine_color::new_color({args[0]}, (int)({args[1]}))'
+            return "0"
+        if func_name in ("r", "g", "b", "t"):
+            if args:
+                return f'pine_color::{func_name}({args[0]})'
+            return "0"
+        if func_name == "rgb":
+            if len(args) >= 4:
+                return f"pine_color::new_color(((int64_t)({args[0]}) << 16 | (int64_t)({args[1]}) << 8 | (int64_t)({args[2]})), (int)({args[3]}))"
+            elif len(args) >= 3:
+                return f"pine_color::new_color(((int64_t)({args[0]}) << 16 | (int64_t)({args[1]}) << 8 | (int64_t)({args[2]})), 0)"
+            return "0"
+        if func_name == "from_gradient":
+            return "0"
+        return "0"
+
+    def _visit_str_call(self, func_name: str, node) -> str:
+        args = _merge_kwargs(node.args, node.kwargs,
+                             sigs.get_param_names("str", func_name), self._visit_expr)
+
+        if func_name == "tostring":
+            # Pine: str.tostring(enumVar) → field title / IANA string, not the int index
+            val_arg = node.args[0] if node.args else node.kwargs.get("value")
+            if isinstance(val_arg, Identifier):
+                sym = self.ctx.symbols.resolve(val_arg.name)
+                if sym is not None and sym.enum_type_name:
+                    et = sym.enum_type_name
+                    tbl = self._enum_member_strings.get(et)
+                    if tbl:
+                        var = self._safe_name(val_arg.name)
+                        n = len(tbl)
+                        return (
+                            f"pine_enum_str_at({et}_str_values, {n}, {var})"
+                        )
+            if len(args) >= 2:
+                return f"pine_str_tostring({args[0]}, {args[1]}, syminfo_mintick_)"
+            if len(args) >= 1:
+                return f"std::to_string({args[0]})"
+            return 'std::string("")'
+
+        if func_name == "substring":
+            if len(args) == 3:
+                return f"{args[0]}.substr({args[1]}, {args[2]} - {args[1]})"
+            elif len(args) == 2:
+                return f"{args[0]}.substr({args[1]})"
+            return 'std::string("")'
+
+        if func_name == "format":
+            # str.format is variadic: signature has only ``formatStr``; the
+            # remaining args are placeholder substitutions. The runtime
+            # ``pine_str_format(fmt, vector<string>)`` requires every arg
+            # already converted to ``std::string``. We previously gated the
+            # ``std::to_string`` wrap on a source-text-prefix heuristic
+            # (``"`` / ``std::string`` / ``pine_str``), which mis-classified
+            # any string-typed bare identifier or string-returning helper
+            # call (e.g. ``str.tostring(x)`` bound to a variable). The type
+            # check below uses the analyzer's inferred PineType instead so
+            # ``std::string`` args pass through unchanged.
+            if node.args:
+                fmt_arg = self._visit_expr(node.args[0])
+                rest = []
+                for orig in node.args[1:]:
+                    visited = self._visit_expr(orig)
+                    inferred = self._infer_type(orig)
+                    if inferred == "std::string":
+                        rest.append(visited)
+                        continue
+                    # Booleans render as 0/1 via std::to_string; force the
+                    # TV-style "true"/"false" output so backtest logs and
+                    # alert messages line up with the TradingView side.
+                    if inferred == "bool":
+                        rest.append(
+                            f'({visited} ? std::string("true") : std::string("false"))'
+                        )
+                        continue
+                    rest.append(f'std::to_string({visited})')
+                if rest:
+                    vec = "{" + ", ".join(rest) + "}"
+                    return f'pine_str_format({fmt_arg}, {vec})'
+                return fmt_arg
+            return 'std::string("")'
+
+        if func_name == "format_time":
+            ts = args[0] if args else "0"
+            fmt = args[1] if len(args) > 1 else '"yyyy-MM-dd"'
+            tz = args[2] if len(args) > 2 else '"UTC"'
+            return f'pine_str_format_time({ts}, {fmt}, {tz})'
+
+        if func_name == "replace":
+            if len(args) >= 3:
+                return f'[&](){{ std::string s={args[0]}; auto p=s.find({args[1]}); if(p!=std::string::npos) s.replace(p,{args[1]}.length(),{args[2]}); return s; }}()'
+            return 'std::string("")'
+
+        if func_name in STR_FUNC_MAP and STR_FUNC_MAP[func_name] is not None:
+            return STR_FUNC_MAP[func_name](args)
+
+        return f'std::string("") /* unsupported: str.{func_name} */'
+
+    def _visit_math_call(self, func_name: str, node: FuncCall) -> str:
+        args = _merge_kwargs(node.args, node.kwargs, sigs.get_param_names("math", func_name), self._visit_expr)
+        # Handle special cases first
+        if func_name == "round" and len(args) == 2:
+            return f"(std::round({args[0]} * std::pow(10.0, {args[1]})) / std::pow(10.0, {args[1]}))"
+        if func_name == "round_to_mintick":
+            x = args[0] if args else "0.0"
+            return f"(std::round({x} / syminfo_mintick_) * syminfo_mintick_)"
+        if func_name == "todegrees":
+            x = args[0] if args else "0.0"
+            return f"({x} * 180.0 / M_PI)"
+        if func_name == "toradians":
+            x = args[0] if args else "0.0"
+            return f"({x} * M_PI / 180.0)"
+        if func_name == "random":
+            lo = args[0] if len(args) > 0 else "0.0"
+            hi = args[1] if len(args) > 1 else "1.0"
+            seed = args[2] if len(args) > 2 else "0"
+            call_site = self._random_call_counter
+            self._random_call_counter += 1
+            return f"pine_random({lo}, {call_site}u, {hi}, (uint32_t)({seed}), bar_index_)"
+        if func_name == "avg" and len(args) > 2:
+            sum_expr = " + ".join(f"(double)({a})" for a in args)
+            return f"(({sum_expr}) / {len(args)}.0)"
+        if func_name == "max" and len(args) > 2:
+            result = f"std::max((double)({args[0]}), (double)({args[1]}))"
+            for a in args[2:]:
+                result = f"std::max({result}, (double)({a}))"
+            return result
+        if func_name == "min" and len(args) > 2:
+            result = f"std::min((double)({args[0]}), (double)({args[1]}))"
+            for a in args[2:]:
+                result = f"std::min({result}, (double)({a}))"
+            return result
+        if func_name in MATH_FUNC_MAP:
+            mapped = MATH_FUNC_MAP[func_name]
+            if "{0}" in mapped:
+                return mapped.format(*args)
+            # std::min/std::max require same types — cast to double
+            if func_name in ("min", "max") and len(args) == 2:
+                return f"{mapped}((double)({args[0]}), (double)({args[1]}))"
+            return f"{mapped}({', '.join(args)})"
+        # Unknown math.* — safe fallback
+        return f"0.0 /* unsupported: math.{func_name} */"
+
+    # ------------------------------------------------------------------
+    # Arg/kwarg resolution (PineScript parameter signatures)
+    # ------------------------------------------------------------------
+
+    def _resolve_func_args(self, node: FuncCall, sig_key: str) -> dict:
+        """Merge positional args and kwargs into a dict keyed by parameter name.
+
+        Uses the PineScript parameter ordering from signatures registry.
+        """
+        # sig_key is like "strategy.entry" -> namespace="strategy", func_name="entry"
+        parts = sig_key.split(".", 1)
+        if len(parts) == 2:
+            param_names = sigs.get_param_names(parts[0], parts[1]) or []
+        else:
+            param_names = sigs.get_param_names(None, sig_key) or []
+        result: dict = {}
+        # Map positional args by parameter name
+        for i, arg in enumerate(node.args):
+            if i < len(param_names):
+                result[param_names[i]] = arg
+        # kwargs override positional
+        result.update(node.kwargs)
+        return result