Skip to main content

synth_backend/
arm_backend.rs

1//! ARM Backend — wraps the instruction selector + optimizer + encoder as a Backend
2//!
3//! This is Synth's custom ARM compiler targeting Cortex-M (Thumb-2).
4//! It's the only backend that supports per-rule formal verification (ASIL D path).
5
6use crate::ArmEncoder;
7use synth_core::backend::{
8    Backend, BackendCapabilities, BackendError, CodeRelocation, CompilationResult, CompileConfig,
9    CompiledFunction, LineMap, SafetyBounds,
10};
11use synth_core::target::{IsaVariant, TargetSpec};
12use synth_core::wasm_decoder::DecodedModule;
13use synth_core::wasm_op::WasmOp;
14use synth_synthesis::{
15    ArmInstruction, ArmOp, BoundsCheckConfig, InstructionSelector, OptimizationConfig,
16    OptimizerBridge, RuleDatabase, validate_instructions,
17};
18
19/// ARM Cortex-M backend using Synth's custom compiler pipeline
20pub struct ArmBackend;
21
22impl ArmBackend {
23    pub fn new() -> Self {
24        Self
25    }
26}
27
28impl Default for ArmBackend {
29    fn default() -> Self {
30        Self::new()
31    }
32}
33
34impl Backend for ArmBackend {
35    fn name(&self) -> &str {
36        "arm"
37    }
38
39    fn capabilities(&self) -> BackendCapabilities {
40        BackendCapabilities {
41            produces_elf: false,
42            supports_rule_verification: true,
43            supports_binary_verification: true,
44            is_external: false,
45        }
46    }
47
48    fn supported_targets(&self) -> Vec<TargetSpec> {
49        vec![
50            TargetSpec::cortex_m3(),
51            TargetSpec::cortex_m4(),
52            TargetSpec::cortex_m4f(),
53            TargetSpec::cortex_m7(),
54            TargetSpec::cortex_m7dp(),
55        ]
56    }
57
58    fn compile_module(
59        &self,
60        module: &DecodedModule,
61        config: &CompileConfig,
62    ) -> Result<CompilationResult, BackendError> {
63        let exports: Vec<_> = module
64            .functions
65            .iter()
66            .filter(|f| f.export_name.is_some())
67            .collect();
68
69        if exports.is_empty() {
70            return Err(BackendError::CompilationFailed(
71                "no exported functions found".into(),
72            ));
73        }
74
75        let mut functions = Vec::new();
76        for func in &exports {
77            let name = func.export_name.clone().unwrap();
78            // #359: copy THIS function's declared param widths into the config so
79            // `compile_function` (which carries no function index) can refuse a
80            // 64-bit param on the AAPCS stack-argument path. Cheap clone only when
81            // a signature table is present and this function has a width entry —
82            // otherwise reuse the shared config (every existing module unchanged).
83            // #509: same per-function pattern for the blocktype-arity side-table
84            // (value-carrying-branch lowering).
85            let params = config
86                .func_params_i64
87                .get(func.index as usize)
88                .filter(|p| !p.is_empty());
89            // #457: THIS function's DECLARED param count (imports-first full
90            // index), so the backend can cap the access-pattern inference that
91            // mistook a read-before-write local for a param. `None` when the
92            // driver supplied no arg-count table (hand-built modules).
93            let declared_params = config.func_arg_counts.get(func.index as usize).copied();
94            let func_config =
95                if params.is_some() || !func.block_arity.is_empty() || declared_params.is_some() {
96                    Some(CompileConfig {
97                        current_func_params_i64: params.cloned().unwrap_or_default(),
98                        current_func_block_arity: func.block_arity.clone(),
99                        current_func_param_count: declared_params,
100                        ..config.clone()
101                    })
102                } else {
103                    None
104                };
105            let cfg = func_config.as_ref().unwrap_or(config);
106            let compiled = self.compile_function(&name, &func.ops, cfg)?;
107            functions.push(compiled);
108        }
109
110        Ok(CompilationResult {
111            functions,
112            elf: None,
113            backend_name: self.name().to_string(),
114        })
115    }
116
117    fn compile_function(
118        &self,
119        name: &str,
120        ops: &[WasmOp],
121        config: &CompileConfig,
122    ) -> Result<CompiledFunction, BackendError> {
123        let (code, relocations, line_map) =
124            compile_wasm_to_arm(ops, config).map_err(BackendError::CompilationFailed)?;
125
126        Ok(CompiledFunction {
127            name: name.to_string(),
128            code,
129            wasm_ops: ops.to_vec(),
130            relocations,
131            line_map,
132        })
133    }
134
135    fn is_available(&self) -> bool {
136        true // Always available — it's a library backend
137    }
138}
139
140/// Count the number of function parameters by analyzing LocalGet patterns
141fn count_params(wasm_ops: &[WasmOp]) -> u32 {
142    let mut first_access: std::collections::HashMap<u32, bool> = std::collections::HashMap::new();
143    for op in wasm_ops {
144        match op {
145            WasmOp::LocalGet(idx) => {
146                first_access.entry(*idx).or_insert(true);
147            }
148            WasmOp::LocalSet(idx) | WasmOp::LocalTee(idx) => {
149                first_access.entry(*idx).or_insert(false);
150            }
151            _ => {}
152        }
153    }
154
155    first_access
156        .iter()
157        .filter_map(
158            |(&idx, &is_read_first)| {
159                if is_read_first { Some(idx + 1) } else { None }
160            },
161        )
162        .max()
163        .unwrap_or(0)
164}
165
166/// #539: fold the `i32.const 0; memory.grow m` idiom to `memory.size m`.
167/// `memory.grow(0)` always succeeds and returns the current page count (WASM
168/// Core §4.4.7), which is exactly `memory.size`; the fixed-memory backend
169/// otherwise emits a constant `-1` for every `memory.grow`, so the legal
170/// `memory.grow(0)` "read/validate current size" idiom wrongly reported failure.
171/// Only the ADJACENT const-0 delta is folded (a non-zero delta keeps the sound
172/// `-1` — fixed memory genuinely cannot grow; a runtime-computed 0 is a
173/// documented follow-up). Backend- and path-agnostic: `memory.size` reads the
174/// runtime memory-size register on every selector, so this fixes the optimized
175/// and direct paths at once.
176fn rewrite_memory_grow_zero(wasm_ops: &[WasmOp]) -> Vec<WasmOp> {
177    let mut out = Vec::with_capacity(wasm_ops.len());
178    let mut i = 0;
179    while i < wasm_ops.len() {
180        if matches!(wasm_ops[i], WasmOp::I32Const(0))
181            && let Some(WasmOp::MemoryGrow(m)) = wasm_ops.get(i + 1)
182        {
183            out.push(WasmOp::MemorySize(*m));
184            i += 2;
185        } else {
186            out.push(wasm_ops[i].clone());
187            i += 1;
188        }
189    }
190    out
191}
192
193/// #509: does the op stream contain a `br`/`br_if`/`br_table` that CARRIES a
194/// value — i.e. one targeting a result-typed block/if (forward edge with
195/// results > 0) or a parameterized loop header (backward edge with loop
196/// params > 0)?
197///
198/// The optimized path's wasm→IR lowering drops the carried value on such
199/// edges (the taken arm returns the fall-through result — same class as the
200/// #507 `br_table` drop, observed on `pick_br`/`pick_br_fall`), so — like
201/// #507 — the shape is detected on the raw op stream and routed to the direct
202/// selector, whose #509 designated-result-register lowering lands the value
203/// correctly. `block_arity` is the decoder's ordinal blocktype-arity
204/// side-table; when it is empty (hand-built op streams) every block reads as
205/// void and this never fires, keeping the optimized path byte-identical for
206/// every existing caller. Frozen-safe for the same reason as #507: the frozen
207/// fixtures compile `--relocatable` (already direct), and no optimized-path
208/// fixture branches to a result-typed block.
209fn has_value_carrying_branch(wasm_ops: &[WasmOp], block_arity: &[(u8, u8)]) -> bool {
210    // Open control constructs: (is_loop, params, results), innermost last.
211    let mut open: Vec<(bool, u8, u8)> = Vec::new();
212    let mut ctrl_ord = 0usize;
213    // A branch edge carries a value when its target is a result-typed forward
214    // join (block/if) or a parameterized loop header.
215    let carries = |open: &[(bool, u8, u8)], depth: u32| -> bool {
216        let Some(&(is_loop, params, results)) = open
217            .len()
218            .checked_sub(1 + depth as usize)
219            .and_then(|i| open.get(i))
220        else {
221            return false; // function-level target — handled by Return lowering
222        };
223        if is_loop { params > 0 } else { results > 0 }
224    };
225    for op in wasm_ops {
226        match op {
227            WasmOp::Block | WasmOp::If => {
228                let (p, r) = block_arity.get(ctrl_ord).copied().unwrap_or((0, 0));
229                ctrl_ord += 1;
230                open.push((false, p, r));
231            }
232            WasmOp::Loop => {
233                let (p, r) = block_arity.get(ctrl_ord).copied().unwrap_or((0, 0));
234                ctrl_ord += 1;
235                open.push((true, p, r));
236            }
237            WasmOp::End => {
238                open.pop(); // None only at the function-level end — harmless
239            }
240            WasmOp::Br(d) | WasmOp::BrIf(d) if carries(&open, *d) => return true,
241            WasmOp::BrTable { targets, default }
242                if targets
243                    .iter()
244                    .chain(std::iter::once(default))
245                    .any(|d| carries(&open, *d)) =>
246            {
247                return true;
248            }
249            _ => {}
250        }
251    }
252    false
253}
254
255/// Core compilation: WASM ops → ARM machine code bytes + relocations
256///
257/// Returns (code_bytes, relocations) where relocations record BL instructions
258/// that target external symbols (e.g., `__meld_dispatch_import` for import calls).
259fn compile_wasm_to_arm(
260    wasm_ops: &[WasmOp],
261    config: &CompileConfig,
262) -> Result<(Vec<u8>, Vec<CodeRelocation>, LineMap), String> {
263    // #539: `memory.grow(0)` must return the CURRENT page count, not the
264    // fixed-memory `-1` sentinel — growing by zero pages can never fail (WASM
265    // Core §4.4.7), so a guest doing `if (memory.grow(0) < 0) trap;` wrongly
266    // faulted. Every lowering path emitted a delta-agnostic `-1`. `memory.grow(0)`
267    // is semantically identical to `memory.size`, which the backend already
268    // computes from the runtime memory-size register (R10 >> 16 = pages), so fold
269    // the `i32.const 0; memory.grow` idiom to `memory.size` up front — backend-
270    // and path-agnostic. A non-zero delta keeps `-1` (fixed memory genuinely
271    // cannot grow); a runtime delta that happens to be 0 is the documented
272    // follow-up.
273    let rewritten = rewrite_memory_grow_zero(wasm_ops);
274    // #494 phase 2b: the fact-spec guard-elision marks are keyed by op index
275    // into the stream the DRIVER handed us. The memory.grow(0) fold above can
276    // only shift indices AT OR AFTER a `memory.grow` — an op the fact-spec
277    // walk never crosses (it stops at the first untracked op, so no mark can
278    // follow one). Defense in depth: if the fold fired at all, drop the marks
279    // loudly rather than risk keying a guard elision to the wrong op.
280    let (fact_div_zero_elide, fact_div_ovf_elide): (&[usize], &[usize]) = if rewritten.len()
281        == wasm_ops.len()
282    {
283        (&config.fact_div_zero_elide, &config.fact_div_ovf_elide)
284    } else {
285        if !config.fact_div_zero_elide.is_empty() || !config.fact_div_ovf_elide.is_empty() {
286            eprintln!(
287                "fact-spec: DECLINE div-guard elision marks dropped — the                      memory.grow(0) fold shifted op indices (#494 defensive gate);                      general lowering emitted"
288            );
289        }
290        (&[], &[])
291    };
292    let wasm_ops: &[WasmOp] = &rewritten;
293
294    // #457: `count_params` INFERS the param count from access patterns (a local
295    // whose first access is a read is assumed to be a param), so a
296    // read-before-write NON-PARAM local — which WASM zero-initializes — was
297    // indistinguishable from a param: it got homed in a parameter register and
298    // read caller garbage instead of 0. When the driver supplied the DECLARED
299    // count (`current_func_param_count`, from the module's type section), cap
300    // the inference with it. `min` (not a plain override) keeps every function
301    // whose inference is <= declared byte-identical: the inferred count can only
302    // EXCEED the declared one via a read-first local index >= the declared count
303    // — i.e. exactly the read-before-write locals this issue is about.
304    let inferred_params = count_params(wasm_ops);
305    let num_params = match config.current_func_param_count {
306        Some(declared) => inferred_params.min(declared),
307        None => inferred_params,
308    };
309    // A read-before-write non-param local exists iff the capped count dropped.
310    // Such locals need the wasm-mandated zero-init, which only the direct
311    // selector emits — the optimized path's `ir_to_arm` maps a non-param
312    // local's vreg onto an r4+ temp with no initialization (caller garbage).
313    let has_rbw_local = num_params < inferred_params;
314
315    let bounds_config = match config.effective_safety_bounds() {
316        SafetyBounds::None => BoundsCheckConfig::None,
317        SafetyBounds::Mpu => BoundsCheckConfig::Mpu,
318        SafetyBounds::Software => BoundsCheckConfig::Software,
319        SafetyBounds::Mask => BoundsCheckConfig::Masking,
320    };
321
322    // The non-optimized (direct) instruction-selection path. Handles f32 via
323    // VFP/FPU. Used directly when `--no-optimize` is set, and as the fallback
324    // when the optimized path declines a module (see issue #120 below).
325    //
326    // VCR-RA-001 step 3b-lite (#242): a FRESH selector per attempt, with
327    // `spill_on_exhaustion` set only on the retry — the first pass is the
328    // unmodified default, so every function that compiles today is selected by
329    // exactly the code that compiled it yesterday (bit-identity is structural,
330    // not behavioural).
331    let select_direct_attempt = |spill_on_exhaustion: bool,
332                                 param_backing_on_exhaustion: bool,
333                                 local_promote: bool,
334                                 i64_spill_slots: Option<usize>|
335     -> Result<Vec<ArmInstruction>, synth_core::Error> {
336        let db = RuleDatabase::with_standard_rules();
337        let mut selector =
338            InstructionSelector::with_bounds_check(db.rules().to_vec(), bounds_config);
339        selector.set_target(config.target.fpu, &config.target.triple);
340        if config.num_imports > 0 {
341            selector.set_num_imports(config.num_imports);
342        }
343        // #195: plumb the callee argument-count tables so the direct selector can
344        // marshal call arguments into R0–R3 per AAPCS.
345        selector.set_func_arg_counts(
346            config.func_arg_counts.clone(),
347            config.type_arg_counts.clone(),
348        );
349        // #197: in relocatable host-link mode, emit direct `func_N` BLs for
350        // imports (rewritten to the wasm field name by build_relocatable_elf)
351        // instead of `__meld_dispatch_import`.
352        selector.set_relocatable(config.relocatable);
353        // #642: call_indirect guard inputs (compile-time table size for the
354        // bounds guard + closed-world type verdicts). Without them, every
355        // call_indirect lowering declines loudly.
356        selector.set_call_indirect_guards(config.call_indirect_guards.clone());
357        // #237: native-pointer ABI — wasm statics become __synth_wasm_data-relative.
358        selector.set_native_pointer_abi(config.native_pointer_abi, config.linear_memory_bytes);
359        // #311: i64 call results are register PAIRS — tag them.
360        selector.set_result_types(config.func_ret_i64.clone(), config.type_ret_i64.clone());
361        // #359: declared param widths of THIS function, so the AAPCS stack-arg
362        // path can refuse 64-bit params (Ok-or-Err). Empty ⇒ assume i32.
363        selector.set_params_i64(config.current_func_params_i64.clone());
364        // #509: blocktype-arity side-table of THIS function, so value-carrying
365        // br/br_if/br_table land the carried value in the target block's
366        // designated result register instead of dropping it. Empty ⇒ legacy
367        // void-block lowering.
368        selector.set_block_arity(config.current_func_block_arity.clone());
369        // Stack-pointer promotion is meaningful only under the native-pointer ABI;
370        // gating here keeps every non-native compile (all frozen fixtures) on the
371        // legacy R9 globals-table path, bit-identical.
372        if config.native_pointer_abi
373            && let Some((sp_idx, sp_init)) = config.stack_pointer_global
374        {
375            selector.set_native_pointer_stack(sp_idx, sp_init);
376        }
377        // #643: per-global slot widths — i64/f64 globals occupy 8-byte slots
378        // (register-pair store/load) and shift every later global's offset.
379        // Empty for i32-only modules ⇒ the legacy `idx * 4` layout, unchanged.
380        selector.set_global_widths(config.global_widths.clone());
381        selector.set_spill_on_exhaustion(spill_on_exhaustion);
382        selector.set_param_backing_on_exhaustion(param_backing_on_exhaustion);
383        // #587 pool-grow rung: a larger i64 spill-slot pool, set ONLY on the
384        // retry after an attempt failed with the slot-pool-exhausted Err —
385        // functions that compile with the default pool keep their frame
386        // byte-identical by construction.
387        if let Some(slots) = i64_spill_slots {
388            selector.set_i64_spill_slots(slots);
389        }
390        // VCR-RA local promotion (#390, #242): keep eligible non-param i32 locals
391        // in callee-saved registers instead of frame slots — the structural lever
392        // toward native parity. DEFAULT-ON as of v0.14.0: gale's G474RE DWT gate
393        // cleared it as a net win (gust_mix dissolved 58→50 cyc/call −14%, all 5
394        // stack spill/reloads eliminated, correctness bit-identical over [0,2047],
395        // 2.00×→1.72× vs LLVM). Escape hatch: `SYNTH_NO_LOCAL_PROMOTE=1` restores
396        // the frame-slot path. Leaf-only / i32-only / ARM-only (see
397        // compute_local_promotion); the leaf-only lift + i64 locals are follow-ons.
398        // #474: `local_promote` is now a per-attempt parameter so the retry ladder
399        // can drop promotion as an exhaustion-recovery rung (promotion pins r4-r8,
400        // which on a dense function leaves the spill allocator with nothing to
401        // free → the frame-slot path is the escape that restores compilability).
402        selector.set_local_promote(local_promote);
403        // #494 phase 2b: certificate-discharged div/rem trap-guard elision
404        // marks (empty in every compile without SYNTH_FACT_SPEC + facts).
405        selector
406            .set_fact_div_guard_elisions(fact_div_zero_elide.to_vec(), fact_div_ovf_elide.to_vec());
407        selector.select_with_stack(wasm_ops, num_params)
408    };
409    let select_direct = || -> Result<Vec<ArmInstruction>, String> {
410        const SINGLE_EXHAUSTION: &str = "all allocatable registers are live on the stack";
411        const PAIR_EXHAUSTION: &str = "no consecutive pair of free registers for i64";
412        const SLOT_EXHAUSTION: &str = "i64 spill-slot pool exhausted";
413        // The full exhaustion-recovery ladder, parameterized on whether local
414        // promotion is enabled. Each rung is reached only when the previous one
415        // returned a recoverable register-exhaustion Err, so a function that
416        // compiles on the first attempt is untouched by the later rungs. Returns
417        // the result AND which rung produced it (for the #242 measurement below).
418        let recovery_ladder =
419            |promote: bool,
420             i64_spill_slots: Option<usize>|
421             -> (Result<Vec<ArmInstruction>, synth_core::Error>, &'static str) {
422                let mut attempt = select_direct_attempt(false, false, promote, i64_spill_slots);
423                let mut rung = "base";
424                // VCR-RA-001 step 3b-lite (#242): the i32 register-exhaustion
425                // hard-fail is recoverable — retry with spill-on-exhaustion, which
426                // reserves the spill area and spills the deepest stack value when
427                // the pool is full.
428                if let Err(e) = &attempt
429                    && e.to_string().contains(SINGLE_EXHAUSTION)
430                {
431                    attempt = select_direct_attempt(true, false, promote, i64_spill_slots);
432                    rung = "spill";
433                }
434                // VCR-RA-001 acceptance increment (#242): the i64 consecutive-PAIR
435                // exhaustion is recoverable too — not by stack spilling (the pair
436                // allocator already spills stack values, #171) but by frame-backing
437                // the params (#204) so they stop pinning R0-R3, with spill kept on.
438                if let Err(e) = &attempt
439                    && e.to_string().contains(PAIR_EXHAUSTION)
440                {
441                    attempt = select_direct_attempt(true, true, promote, i64_spill_slots);
442                    rung = "param-backing";
443                }
444                (attempt, rung)
445            };
446        // #474: local promotion (default-on since v0.14.0) is an OPTIMIZATION — it
447        // must never be the reason a function fails to compile. Run the full ladder
448        // with promotion first (so every function that compiles today is
449        // bit-identical), and if it still ends in register exhaustion, fall back to
450        // the promotion-off ladder (the v0.12.0 frame-slot lowering — exactly what
451        // the `SYNTH_NO_LOCAL_PROMOTE=1` workaround does, now automatic). Promotion
452        // pins r4-r8 for the locals; on a dense function that leaves the allocator
453        // with nothing to free, so dropping it restores compilability. The fallback
454        // is reached ONLY by functions that exhaust WITH promotion, so promotion-on
455        // output is untouched by construction (frozen byte gate stays green).
456        let promote = std::env::var("SYNTH_NO_LOCAL_PROMOTE").is_err();
457        // The full pre-#587 recovery sequence (promotion-on ladder, then the
458        // #474 promotion-off fallback), parameterized on the pool size so the
459        // pool-grow retry below reruns it verbatim.
460        let full_sequence = |slots: Option<usize>| -> (
461            Result<Vec<ArmInstruction>, synth_core::Error>,
462            &'static str,
463            bool,
464        ) {
465            let (mut attempt, mut rung) = recovery_ladder(promote, slots);
466            let mut promotion_dropped = false;
467            if promote
468                && attempt
469                    .as_ref()
470                    .err()
471                    .is_some_and(|e| e.to_string().contains("register exhaustion"))
472            {
473                let (rescued, off_rung) = recovery_ladder(false, slots);
474                if rescued.is_ok() {
475                    attempt = rescued;
476                    rung = off_rung;
477                    promotion_dropped = true;
478                }
479            }
480            (attempt, rung, promotion_dropped)
481        };
482        let (mut attempt, mut rung, mut promotion_dropped) = full_sequence(None);
483        // #587 pool-grow retry (the falcon func_60/func_73 remainder): the fixed
484        // 8-slot i64 spill pool can exhaust while spilling is otherwise working —
485        // an i64-dense function simply has more values simultaneously live than
486        // the pool holds. Rerun the ENTIRE sequence (every rung, both promotion
487        // modes) with the pool sized from a conservative operand-stack-depth
488        // bound: the number of simultaneously spilled values can never exceed
489        // the operand-stack depth, plus a few transient slots (the arg-move
490        // cycle resolver and call-result parking each borrow one). The selector
491        // clamps the request to its 12-bit-friendly cap; a function that still
492        // exhausts stays an honest loud skip. Deliberately LAST — after the #474
493        // promotion-off fallback — so any function that compiled yesterday
494        // (through any rung or fallback) is produced by exactly yesterday's
495        // path, byte-identical; the grown pool only ever fires for functions
496        // whose every existing escape ended in the slot-pool Err.
497        if attempt
498            .as_ref()
499            .err()
500            .is_some_and(|e| e.to_string().contains(SLOT_EXHAUSTION))
501        {
502            let depth = synth_core::wasm_stack_check::max_depth_bound(wasm_ops) as usize;
503            let (grown, _, grown_dropped) = full_sequence(Some(depth.saturating_add(4)));
504            if grown.is_ok() {
505                attempt = grown;
506                rung = "pool-grow";
507                promotion_dropped = grown_dropped;
508            }
509        }
510        // VCR-RA measurement (#242): log which recovery rung produced the result,
511        // so the per-rung distribution across a corpus can be measured — the size
512        // of the failure surface a verified allocator must subsume (see
513        // scripts/repro/register_exhaustion_recovery_ladder.md). Logging only:
514        // emitted bytes are unchanged, so the frozen byte gate is unaffected.
515        if std::env::var("SYNTH_RECOVERY_STATS").is_ok() {
516            eprintln!(
517                "[recovery-stats] rung={rung}{} result={}",
518                if promotion_dropped {
519                    " promotion-off"
520                } else {
521                    ""
522                },
523                if attempt.is_ok() { "ok" } else { "exhausted" },
524            );
525        }
526        attempt.map_err(|e| format!("instruction selection failed: {}", e))
527    };
528
529    // Instruction selection: optimized or direct.
530    //
531    // #197: `--relocatable` (host-link ET_REL) forces the direct selector. The
532    // optimized path materializes an absolute linmem base (0x20000100) and does
533    // not preserve caller-saved registers across calls — both wrong for a
534    // host-linked object, where the linmem base arrives via `fp` at runtime and
535    // callees follow AAPCS. `select_with_stack` (now i64-spill capable after
536    // #171) handles fp-relative memory + caller-saved preservation correctly.
537    //
538    // #507: `br_table` is DROPPED during the optimized path's wasm→IR lowering
539    // (`optimize_full`), so `ir_to_arm` never sees the dispatch — it emits the
540    // arm bodies in fall-through sequence with no `cmp`/branch on the selector, a
541    // SILENT miscompile (every input hits the last arm). The selector value isn't
542    // even loaded. Because the drop happens before `ir_to_arm`, there's no `Err`
543    // to fall back on; detect it on the raw wasm op stream here and force the
544    // direct selector (`select_with_stack` lowers `br_table` correctly as a
545    // cmp-chain — confirmed on the `--relocatable` path). Same honest-degradation
546    // contract as the issue-#120 f32 decline: the function still compiles
547    // correctly, just without IR-level optimization. Frozen-safe: the frozen
548    // fixtures compile `--relocatable` (already direct), and no optimized-path
549    // fixture (control_step, flight_algo) contains `br_table`.
550    let has_br_table = wasm_ops
551        .iter()
552        .any(|op| matches!(op, WasmOp::BrTable { .. }));
553    // #509: the optimized path also drops the value carried by a `br`/`br_if`
554    // to a result-typed block (the taken edge returns the wrong arm's value —
555    // same silent-miscompile class as the #507 br_table drop). Route the shape
556    // to the direct selector, whose designated-result-register lowering (#509)
557    // lands the carried value at the join. Never fires for void-block control
558    // flow (all frozen/optimized fixtures), so those stay byte-identical.
559    let has_value_carry = has_value_carrying_branch(wasm_ops, &config.current_func_block_arity);
560    // #503-i64/#518: route any signature with a 64-bit (i64/f64) param to the
561    // direct selector. The optimized path's param homing is width-naive — its
562    // #518 decline covers only functions that READ an i64 param (an `I64Load`
563    // from a param index), so a function that reads an i32 param whose AAPCS
564    // home a preceding wide param SHIFTED (e.g. p1 of `(i64 i32)` lives in R2,
565    // not R1; p3 of `(i64 i32 i32 i32)` lives on the stack, not in R3) was
566    // silently miscompiled rather than falling back. The direct selector's
567    // `aapcs_param_layout` homing handles every such shape (i64-param READS
568    // already fell back to it via the ir_to_arm Err, so those functions emit
569    // the same bytes as before). `num_params` counts read-first locals, so a
570    // function that never touches any param keeps the optimized path.
571    let has_wide_param = config
572        .current_func_params_i64
573        .iter()
574        .take(num_params as usize)
575        .any(|&w| w);
576    // #494 phase 2b: div/rem guard-elision marks are consumed by the DIRECT
577    // selector only — the optimized path's IR passes (const-fold/CSE/DCE)
578    // renumber instructions, so an op-index-keyed mark cannot soundly survive
579    // them. Route marked functions direct (the #507/#509 honest-degradation
580    // pattern). Never fires without SYNTH_FACT_SPEC + facts + a discharged
581    // obligation, so every existing compile keeps its path byte-identical.
582    let has_fact_div_elide = !fact_div_zero_elide.is_empty() || !fact_div_ovf_elide.is_empty();
583    // #643: the optimized path's global lowering is width-naive — `GlobalGet`/
584    // `GlobalSet` are single-word `[R9, idx*4]` accesses, which (a) silently
585    // dropped the high word of every i64 global and (b) mis-address every
586    // global whose offset an earlier wide (i64/f64) slot shifted. When the
587    // module has any wide global, route every global-touching function to the
588    // direct selector, whose type-aware summed layout pairs the access (or
589    // declines loudly). Modules with only 4-byte globals — every existing
590    // fixture — keep the optimized path byte-identical.
591    let has_wide_global_module = config.global_widths.iter().any(|&w| w > 4);
592    let has_global_access = has_wide_global_module
593        && wasm_ops
594            .iter()
595            .any(|op| matches!(op, WasmOp::GlobalGet(_) | WasmOp::GlobalSet(_)));
596    let arm_instrs = if config.no_optimize
597        || config.relocatable
598        || has_br_table
599        || has_value_carry
600        || has_wide_param
601        || has_global_access
602        || has_fact_div_elide
603        // #457: route read-before-write non-param locals to the direct
604        // selector, whose prologue zero-init lands the wasm-mandated 0.
605        || has_rbw_local
606    {
607        if std::env::var("SYNTH_PATH_DEBUG").is_ok() {
608            eprintln!("[path-debug] direct (pre-gate)");
609        }
610        select_direct()?
611    } else {
612        let opt_config = if config.loom_compat {
613            OptimizationConfig::loom_compat()
614        } else {
615            OptimizationConfig::all()
616        };
617
618        let mut bridge = OptimizerBridge::with_config(opt_config);
619        // #188: tell the bridge how many imports there are so it declines only
620        // LOCAL calls (and leaves import calls on the optimized path, keeping
621        // the #173 field-name relocation rewrite intact).
622        bridge.set_num_imports(config.num_imports);
623        // #543 Phase 2: thread the integrator-marked volatile DMA-window ranges
624        // (`--volatile-segment <base>:<len>`) to the bridge's address-caching
625        // levers — base-CSE (#468) excludes any access inside a marked range
626        // from its fold set, and the bridge-level const-CSE declines wholesale
627        // while any range is marked. Empty (the default) ⇒ byte-identical.
628        bridge.set_volatile_segments(config.volatile_segments.clone());
629        // #377: thread `--safety-bounds` to the bridge. Pre-fix the optimized
630        // path ignored it — `software`/`mask` were SILENT NO-OPS on the path
631        // that lowers the bulk of a flight loop's i32 loads/stores (byte-
632        // identical to `none`, while the safety manifest claimed otherwise).
633        // `Software` now emits the inline guard per access; `Masking` declines
634        // memory-accessing functions to the direct selector; `None`/`Mpu` are
635        // byte-identical to before.
636        bridge.set_bounds_check(bounds_config);
637        // `ir_to_arm` now returns `Result` — an `Err` means the optimized path
638        // hit an unmapped vreg (issue-#93-class). Treat it identically to an
639        // `optimize_full` failure: fall back to the direct selector rather
640        // than propagating, so the function still compiles correctly.
641        match bridge
642            .optimize_full(wasm_ops)
643            .and_then(|(opt_ir, _cfg, _stats)| bridge.ir_to_arm(&opt_ir, num_params as usize))
644        {
645            Ok(arm_ops) => {
646                if std::env::var("SYNTH_PATH_DEBUG").is_ok() {
647                    eprintln!("[path-debug] optimized (ir_to_arm ok)");
648                }
649                arm_ops
650                    .into_iter()
651                    .map(|op| ArmInstruction {
652                        op,
653                        source_line: None,
654                    })
655                    .collect()
656            }
657            // Issue #120: the optimized path declines modules it cannot lower
658            // (notably scalar f32/f64 ops — the IR has no float opcodes). Fall
659            // back to the direct instruction selector, which handles f32 via
660            // VFP/FPU. This is honest degradation: the function still compiles
661            // correctly, just without IR-level optimization.
662            Err(e) => {
663                if std::env::var("SYNTH_PATH_DEBUG").is_ok() {
664                    eprintln!("[path-debug] direct (fallback: {e})");
665                }
666                select_direct()?
667            }
668        }
669    };
670
671    // #257/#277: `mul`+`add`→`mla` fusion is intentionally NOT wired here.
672    // The transform is correct and ready (`synth_synthesis::liveness::fuse_mul_add`,
673    // fully tested), but it is **register-allocation-coupled**: over the current
674    // greedy single-pass selector, folding `mul rM,..; add rD,rM,rX` → `mla`
675    // extends the live ranges of the mul inputs to the mla point, and the added
676    // pressure (extra moves/spills) costs more than the single-cycle MLA saves —
677    // gale measured a +2 cyc on-target REGRESSION (flat_flight 255→257, G474RE)
678    // even though it removes 2 instructions and the seam stays 0x07FDF307. So the
679    // fusion stays unwired until the spill-aware allocator (VCR-RA-001) chooses
680    // registers, at which point it becomes net-positive (per #272's plan and the
681    // wiring design note). Lesson (#277): a register-pressure-affecting transform
682    // needs an on-target/allocator-aware gate, not a byte-count gate, before it
683    // can default on.
684
685    // VCR-RA-001 const-CSE / rematerialization-avoidance (#209): moved to run
686    // LAST, after the immediate-folds — see the apply_const_cse call below
687    // (#242). Earlier it ran here (before range-realloc and the folds), which is
688    // what let it grow gale's --relocatable `gust_mix` 90→92 B (#242 burndown,
689    // 2026-06-26): retargeting a read defeated a *downstream* immediate-fold that
690    // would otherwise have absorbed the constant. Running CSE-last makes those
691    // foldable consts already-folded-and-gone, so CSE only ever touches genuinely
692    // redundant materializations.
693
694    // VCR-RA-001 RANGE RE-ALLOCATION (#209/#242, wiring step 3a) — the first
695    // CONSEQUENTIAL allocator pass: re-colour each maximal straight-line
696    // segment over the R0-R8 pool with value ranges as the allocation unit
697    // (segment inputs + per-register live-outs pinned to their original
698    // registers, reserved R9-R12/SP identity-assigned — each segment is
699    // independently sound, no cross-segment liveness assumed). Renames
700    // registers only: never adds, removes, or reorders instructions, so
701    // labels/branch offsets are unaffected.
702    //
703    // DEFAULT-ON since v0.11.36: gale cleared the gate on-target (G474RE,
704    // #209 2026-06-10) — flag-on output byte-identical to flag-off on
705    // flat_flight/controller/control_step, fires on the filter family with
706    // zero cycle delta and a small size win, all selfchecks green on silicon.
707    // Opt out with `SYNTH_RANGE_REALLOC=0`; per-function stats with
708    // `SYNTH_REALLOC_STATS=1`.
709    //
710    // The companion dead callee-saved-save elimination (gale's "next
711    // consequential lever", same issue comment) then shrinks the prologue
712    // `push {r4-r8,lr}` / epilogue `pop {r4-r8,pc}` to the callee-saved
713    // registers the re-allocated body still touches (leaf-only,
714    // SP-untouched, even-count-padded — see shrink_callee_saved_saves):
715    // ~12 cycles of pure save/restore overhead removed on small leaves.
716    let realloc_on = std::env::var("SYNTH_RANGE_REALLOC").map_or(true, |v| v != "0");
717    let arm_instrs = if realloc_on {
718        use synth_synthesis::rules::Reg;
719        const POOL: [Reg; 9] = [
720            Reg::R0,
721            Reg::R1,
722            Reg::R2,
723            Reg::R3,
724            Reg::R4,
725            Reg::R5,
726            Reg::R6,
727            Reg::R7,
728            Reg::R8,
729        ];
730        let (out, stats) = synth_synthesis::liveness::reallocate_function(&arm_instrs, &POOL);
731        if std::env::var("SYNTH_REALLOC_STATS").is_ok() {
732            eprintln!(
733                "[range-realloc] {} segments: {} reallocated, {} declined ({} validator-rejected), {} need spill (step 4)",
734                stats.segments,
735                stats.reallocated,
736                stats.declined,
737                stats.validator_rejects,
738                stats.needs_spill
739            );
740        }
741        // VCR-RA-002 (#390, epic #242): eliminate a provably-dead stack frame
742        // (`sub sp,#N`/`add sp,#N` reserved by `compute_local_layout` for locals
743        // that promotion homed in registers, never accessed). Removing it saves
744        // the two instructions AND restores the SP-untouched precondition that
745        // `shrink_callee_saved_saves` requires — so it must run FIRST.
746        // DEFAULT-ON (#242 flag audit flip-wave, #592 audit item): evidence
747        // basis was the 2-path × repro-corpus sweep — 0 functions grow, 58
748        // shrink (flight_seam controller_step 250→242 −8 / filter_step 180→168
749        // −12, native_pointer frame_roundtrip 46→34 −12), locked by the
750        // `dead_frame_elim_no_grow_corpus_242` cargo gate; execution
751        // differentials re-run green on the new default bytes BEFORE the
752        // frozen ARM anchors were re-pinned (leaf_dead_frame, flight_seam,
753        // frame_slot_dce — see the flip PR). Escape hatch:
754        // `SYNTH_DEAD_FRAME_ELIM=0` opts out and restores the pre-flip bytes
755        // (CI-gated in `frozen_codegen_bytes.rs`).
756        let out = if !std::env::var("SYNTH_DEAD_FRAME_ELIM").is_ok_and(|v| v == "0") {
757            synth_synthesis::liveness::elide_dead_frame(&out).unwrap_or(out)
758        } else {
759            out
760        };
761        // #490 (epic #242): the optimized selector uses r4-r8 as scratch /
762        // promoted locals but emits no prologue, silently clobbering a caller's
763        // callee-saved registers. Add the missing `push {r4-r8,lr}` /
764        // `pop {r4-r8,pc}` HERE — on the post-realloc body, where realloc has
765        // lowered low-pressure r4-r8 scratch back to r0-r3, so a save is added
766        // only for registers genuinely clobbered. `shrink_callee_saved_saves`
767        // (next) then trims it to the used set. No-op on the direct path (it
768        // already has its own prologue) and on callee-saved-free leaves.
769        let out = synth_synthesis::liveness::ensure_callee_saved_prologue(&out);
770        synth_synthesis::liveness::shrink_callee_saved_saves(&out).unwrap_or(out)
771    } else {
772        // Range-realloc off (`SYNTH_RANGE_REALLOC=0`): the optimized path still
773        // must preserve the callee-saved registers it clobbers (#490). No shrink
774        // (it is coupled to the realloc lever), so the conservative full save
775        // stays — correct, just not minimised in this debug configuration.
776        synth_synthesis::liveness::ensure_callee_saved_prologue(&arm_instrs)
777    };
778
779    // VCR-RA-001 SHADOW ALLOCATION (#209/#242): run the register allocator on
780    // the selected stream and LOG what it finds — without changing a single
781    // emitted byte. This is the measure-only bridge between the built analysis
782    // layer and the eventual virtual-register wiring: it shows, per real
783    // function, whether the allocator can colour it within the R0–R8 pool and
784    // how much const-CSE / rematerialization headroom exists (#209). Enable with
785    // `SYNTH_SHADOW_ALLOC=1`; off by default and side-effect-free either way.
786    if std::env::var("SYNTH_SHADOW_ALLOC").is_ok() {
787        use synth_synthesis::liveness::{
788            AllocationOutcome, allocate_function, function_peak_pressure,
789        };
790        // R9 globals / R10 mem-size / R11 mem-base / R12 IP-scratch are reserved;
791        // pin them above the 0..9 allocatable pool so the colourer keeps R0–R8.
792        let precolored = std::collections::BTreeMap::from([
793            (synth_synthesis::rules::Reg::R9, 9usize),
794            (synth_synthesis::rules::Reg::R10, 10),
795            (synth_synthesis::rules::Reg::R11, 11),
796            (synth_synthesis::rules::Reg::R12, 12),
797        ]);
798        // True VALUE pressure (one node per value, not per reused physical reg):
799        // a NeedsSpill with peak ≤ 9 is a SPURIOUS physical-register spill — the
800        // function fits once virtually allocated.
801        let peak = function_peak_pressure(&arm_instrs);
802        match allocate_function(&arm_instrs, 9, &precolored) {
803            AllocationOutcome::Allocated {
804                remat_opportunities,
805                coloring,
806            } => eprintln!(
807                "[shadow-alloc] OK: {} pregs coloured within R0-R8 pool, peak value-pressure {}, {} const-CSE/remat opportunities",
808                coloring.len(),
809                peak,
810                remat_opportunities
811            ),
812            AllocationOutcome::NeedsSpill(s) => eprintln!(
813                "[shadow-alloc] physical-graph would spill {:?}, but peak value-pressure is {} (≤9 ⇒ spurious; fits once virtually allocated)",
814                s, peak
815            ),
816            AllocationOutcome::Declined => {
817                eprintln!(
818                    "[shadow-alloc] declined (unmodeled construct — calls/i64/fp/offset-branch)"
819                )
820            }
821        }
822    }
823
824    // VCR-SEL-004 cmp→select → IT-block predication fusion (#242). The selector
825    // lowers a `select` whose condition is a comparison to a *materialize then
826    // re-test* sequence (`cmp a,b; SetCond D,c; cmp D,#0; movne dst,v1; moveq
827    // dst,v2`); this collapses it onto the comparison's own flags — deleting the
828    // `SetCond` and the `cmp D,#0` and retargeting the predicated moves to `c` /
829    // `invert(c)` — yielding the textbook predicated clamp (`cmp a,b; movc dst,v1;
830    // mov{!c} dst,v2`). −2 instructions per fused select. gale #428 measured this
831    // as the #1 hot-path size/cycle lever on the gust_mix clamp chain.
832    //
833    // Run LATE: after range re-allocation (so the dead-D proof sees final register
834    // identities) and before encode. Removal-only + rename-only ⇒ no spill
835    // regression and labels/branch offsets are unaffected. Each fusion is proven
836    // sound (flags reused only when nothing clobbers them in the window; the
837    // boolean deleted only when provably dead) — see `fuse_cmp_select`.
838    //
839    // DEFAULT-ON as of v0.13.0 (#428): cmp→select fusion ships by default. The
840    // byte-changing flip is validated by (a) the unicorn execution oracle that runs
841    // the two-move `mov{invert(c)}` arm (cmp_select_two_move_differential.py), (b)
842    // gale's gale_decider_diff 10,596-case sweep across all 8 verified primitives
843    // (native ≡ flag-off ≡ flag-on = 0x88e73178d232bcf5), and (c) the named-anchor
844    // differentials re-run with fusion ON — control_step still 0x00210A55, flat+
845    // inlined flight_algo still 0x07FDF307 (results preserved; bytes deliberately
846    // changed, re-frozen on this commit). Escape hatch: `SYNTH_NO_CMP_SELECT_FUSE=1`
847    // reverts to the pre-fusion lowering. The on-silicon G474RE DWT no-regression
848    // check is a tracked post-ship follow-up (gale owns it).
849    let arm_instrs = if std::env::var("SYNTH_NO_CMP_SELECT_FUSE").is_err() {
850        // The rewritten stream is identical to `fuse_cmp_select`'s 2-tuple form;
851        // the extra `two_move` count is diagnostic only (the fusion census /
852        // blast-radius datum — #7 made that arm reachable).
853        let (out, fused, two_move) =
854            synth_synthesis::liveness::fuse_cmp_select_with_stats(&arm_instrs);
855        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
856            let in_place = fused - two_move;
857            eprintln!(
858                "[cmp-select-fuse] {fused} select(s) fused to predicated moves \
859                 ({two_move} two-move, {in_place} in-place)"
860            );
861        }
862        out
863    } else {
864        arm_instrs
865    };
866
867    // Perf lever 1 toward native parity (#390): redundant stack-reload elimination.
868    // synth lowers every wasm local to a frame slot, so `local.set; local.get` emits
869    // `str rX,[sp,#N]; … ; ldr rY,[sp,#N]`; when rX still holds the value the reload
870    // (a ~2-cycle M4 load) becomes `mov rY,rX`. Removal-of-a-load + rename only ⇒ no
871    // new instruction form and no label/offset change. DEFAULT-ON (#242 feature
872    // loop): validated bit-identical RESULTS on every frozen anchor (control_step
873    // 0x00210A55 13/13, flat+inlined flight_algo 0x07FDF307) with .text reduced on
874    // the shipped --relocatable path, plus 8 unit tests + the frame_slot_dce
875    // execution differential — the same gated path cmp→select took to default-on in
876    // v0.13.0 (G474RE silicon confirms perf post-ship). Escape hatch:
877    // `SYNTH_NO_STACK_FWD=1` restores the frame-resident bytes (frozen-old goldens).
878    let stack_fwd = std::env::var("SYNTH_NO_STACK_FWD").is_err();
879    let arm_instrs = if stack_fwd {
880        let (out, fwd) = synth_synthesis::liveness::forward_stack_reloads(&arm_instrs);
881        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
882            eprintln!("[stack-fwd] {fwd} stack reload(s) forwarded to register moves");
883        }
884        out
885    } else {
886        arm_instrs
887    };
888
889    // VCR-RA frame-slot DCE (#242): once `forward_stack_reloads` has turned the
890    // reloads of a spill slot into register moves, the `str rX,[sp,#N]` that fed
891    // them is a dead store — its slot is never loaded again. Remove it. Pairs
892    // with (and only pays after) stack-reload forwarding, so it shares the flag.
893    let arm_instrs = if stack_fwd {
894        let (out, n) = synth_synthesis::liveness::eliminate_dead_frame_stores(&arm_instrs);
895        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
896            eprintln!("[frame-slot-dce] {n} dead frame store(s) removed");
897        }
898        out
899    } else {
900        arm_instrs
901    };
902
903    // VCR-RA-001 spill re-choice (#242), two stages behind one flag.
904    // Stage 1 (the #569 spike): slot-value forwarding BETWEEN reloads.
905    // `forward_stack_reloads` (above) forwards only from a spill store's
906    // SOURCE register, so when register pressure clobbers that source its
907    // reloads survive; this stage tracks which registers provably still hold
908    // a frame slot's value (through earlier reloads and reg-reg moves) and
909    // turns reload #2..#n into a 1-cycle `mov` (or deletes it when the target
910    // already holds the value). Stage 2 (the Belady re-choice): where NO
911    // register still holds the value — the genuine-spill case, flat_flight's
912    // peak-11 hot segment — the value was usually evicted while a dead
913    // register existed; the clobbering def(s) are renamed onto a provably-dead
914    // register (`spill_rechoice_segment`) so the value stays resident and the
915    // reload dissolves outright. A dissolved reload can leave the feeding
916    // store dead, so the frame-slot DCE sweep runs once more behind the same
917    // flag. Per-segment commit gates: executable same-value-flow trace
918    // equality, strict shrink, pool-pressure fit, sub-word/unknown-slot
919    // conservatism (see `apply_spill_realloc` / `spill_rechoice_segment`).
920    // Stage 3 (whole-function slot liveness): the segment-local DCE keeps a
921    // store whose slot reaches function end ("reach-end ≠ dead" — it cannot
922    // see other segments); `eliminate_unread_frame_stores` walks the whole
923    // function (labels/branches/loops, SP-displacement tracked) and drops a
924    // store whose slot NO reachable instruction can read — flat_flight's two
925    // surviving stores (#576), completing Belady's 0-load side with a 0-store
926    // side. Same flag: the three stages are one lever, flipped together.
927    // DEFAULT-ON (#242 feature loop, the v0.14.0 local-promotion pattern):
928    // Belady spilling ships by default. Evidence basis for the flip: three
929    // landed flag-off increments (#569 forwarding, #576 Belady re-choice,
930    // #579 whole-fn slot liveness), 40+ functions shrink / 0 grow across the
931    // 68-fixture × 2-path sweep, per-segment executable value-trace equality
932    // guards, and the unicorn-vs-wasmtime execution differentials re-run
933    // green on the new default bytes (flat+inlined flight_algo 0x07FDF307,
934    // const_cse, frame_slot_dce, spill_rung_581, r12_spill_496 — which covers
935    // control_step_decide vs wasmtime; control_step's .text is byte-identical
936    // under the flip) BEFORE the frozen goldens were re-pinned. Escape hatch:
937    // `SYNTH_SPILL_REALLOC=0` is the OPT-OUT — it disables all three stages
938    // and restores the pre-flip bytes (CI-gated by
939    // `frozen_fixtures_spill_realloc_escape_hatch_restores_old_bytes`). Any
940    // other value (or unset) runs the pass.
941    let arm_instrs = if !std::env::var("SYNTH_SPILL_REALLOC").is_ok_and(|v| v == "0") {
942        let (out, n) = synth_synthesis::liveness::apply_spill_realloc(&arm_instrs);
943        let (out, d) = synth_synthesis::liveness::eliminate_dead_frame_stores(&out);
944        let (out, u) = synth_synthesis::liveness::eliminate_unread_frame_stores(&out);
945        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
946            eprintln!(
947                "[spill-realloc] {n} reload(s) forwarded/eliminated, {d} newly-dead frame store(s) removed, {u} unread-slot store(s) removed"
948            );
949        }
950        out
951    } else {
952        arm_instrs
953    };
954
955    // VCR-RA immediate-shift folding (#390, #242): a constant shift amount the
956    // stack selector materialized into a scratch register (`movw rM,#C; lsl rD,rN,rM`)
957    // folds to the immediate form (`lsl rD,rN,#C`), removing the dead `movw` — −1
958    // instruction, −1 live register. Removal-only (offset-neutral before branch
959    // resolution, like the dead-store pass). DEFAULT-ON as of v0.15.0: validated
960    // bit-identical results + a net cycle win on the dissolved hot path (−2
961    // cyc/call, .text 100→90 B on gust_mix). Escape hatch: `SYNTH_NO_IMM_SHIFT_FOLD=1`.
962    let arm_instrs = if std::env::var("SYNTH_NO_IMM_SHIFT_FOLD").is_err() {
963        let (out, folds) = synth_synthesis::liveness::fold_immediate_shifts(&arm_instrs);
964        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
965            eprintln!(
966                "[imm-shift-fold] {folds} register shift(s) folded to immediate, movw dropped"
967            );
968        }
969        out
970    } else {
971        arm_instrs
972    };
973
974    // VCR-RA uxth/uxtb fold (#428, #242): `movw rM,#0xffff; and rD,rN,rM` →
975    // `uxth rD,rN` (and the 0xff/uxtb form), removing the dead `movw` — −1
976    // instruction, −1 live register per 16/8-bit mask. 0xffff/0xff are not Thumb-2
977    // modified immediates so the selector materializes them into a register; the
978    // dedicated zero-extend expresses the same masking inline. Removal-only +
979    // rewrite-in-place (offset-neutral). DEFAULT-ON (#242 flag audit flip-wave,
980    // #592 audit item): evidence basis was the 2-path × repro-corpus sweep —
981    // 0 functions grow, 13 shrink (control_step 300→294 −6, gust_mix 38→32 −6,
982    // uxth_fold pack 36→24 −12), locked by the `uxth_fold_no_grow_corpus_242`
983    // cargo gate; execution differentials re-run green on the new default
984    // bytes BEFORE the frozen ARM anchors were re-pinned (uxth_fold,
985    // control_step — see the flip PR). Escape hatch: `SYNTH_UXTH_FOLD=0` opts
986    // out and restores the pre-flip bytes (CI-gated in
987    // `frozen_codegen_bytes.rs`).
988    let arm_instrs = if !std::env::var("SYNTH_UXTH_FOLD").is_ok_and(|v| v == "0") {
989        let (out, folds) = synth_synthesis::liveness::fold_uxth(&arm_instrs);
990        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
991            eprintln!("[uxth-fold] {folds} mask-and folded to uxth/uxtb, movw dropped");
992        }
993        out
994    } else {
995        arm_instrs
996    };
997
998    // VCR-RA-001 const-CSE / rematerialization-avoidance (#209, #242). Drops a
999    // `movw`/`mov #imm` that re-materializes a constant already resident in
1000    // another register and retargets the reads — every rewrite proven by the
1001    // liveness analysis. Runs LAST, after every immediate-fold (shift, uxth) and
1002    // range-realloc, but BEFORE branch resolution/encoding (it removes
1003    // instructions, shifting byte offsets). CSE-last is the #242 no-regression
1004    // fix: the folds have already absorbed every foldable constant, so CSE can no
1005    // longer defeat one (the gust_mix 90→92 mechanism). The pass additionally
1006    // size-guards each segment via the byte-estimator — it commits a segment's
1007    // rewrites only if they do not grow its estimated size — so a retarget that
1008    // would flip a 16-bit encoding to 32-bit (higher base register) is declined.
1009    // DEFAULT-ON (#242 flip-wave, the SYNTH_SPILL_REALLOC/SYNTH_BASE_CSE
1010    // template): const-CSE ships by default. The flip prerequisites recorded in
1011    // `const_cse_reduction_242.rs` were retired first — the bridge-level INLINE
1012    // aliasing (the alias-eviction spill-bijection hazard) was DELETED from
1013    // `optimizer_bridge::ir_to_arm`, so this post-hoc, liveness-proven pass is
1014    // the flag's ONLY effect. Evidence basis: 152 fixture×path corpus sweep — 0
1015    // functions grow (size-guarded per segment), 40 shrink (const_cse::spill12
1016    // 236→148 B), total −536 B — and the execution differentials re-run green
1017    // on the new default bytes BEFORE the frozen goldens were re-pinned
1018    // (const_cse, frame_slot_dce, flight_seam 0x07FDF307, spill_rung_581,
1019    // volatile_segment_543, control_step 0x00210A55). Escape hatch:
1020    // `SYNTH_CONST_CSE=0` is the OPT-OUT — it restores the pre-flip bytes
1021    // (CI-gated by `const_cse_escape_hatch_restores_old_bytes_242` and the
1022    // frozen-anchor escape-hatch gate). Any other value (or unset) runs the pass.
1023    //
1024    // #543 Phase 2: const-CSE declines WHOLESALE while any volatile DMA range
1025    // (`--volatile-segment`) is marked. At the ArmOp level a cached constant
1026    // cannot be classified as address-vs-data (a retargeted read may be a
1027    // memory-access base carrying a per-use immediate offset), so the
1028    // conservative stance for statically-unknown addressing is to decline every
1029    // aliasing rewrite — each constant is re-materialized at each occurrence,
1030    // the documented volatile contract (`CompileConfig::volatile_segments`).
1031    let arm_instrs = if !std::env::var("SYNTH_CONST_CSE").is_ok_and(|v| v == "0")
1032        && config.volatile_segments.is_empty()
1033    {
1034        let (out, removed) = synth_synthesis::liveness::apply_const_cse(&arm_instrs);
1035        if std::env::var("SYNTH_FUSE_STATS").is_ok() {
1036            eprintln!("[const-cse] {removed} redundant constant materialization(s) removed");
1037        }
1038        out
1039    } else {
1040        arm_instrs
1041    };
1042
1043    // VCR-RA-001 spill-choice REPORT (#242): measure-only, like SYNTH_SHADOW_ALLOC.
1044    // Per straight-line segment, the frame-slot traffic actually emitted vs the
1045    // reload/store count a farthest-next-use (Belady) allocation over the R0-R8
1046    // pool would need — the measured headroom for the full spill-choice rewrite.
1047    // Printed on the FINAL stream (post all rewrite passes), so a flag-off run
1048    // reports the greedy baseline and a flag-on run reports what remains.
1049    if std::env::var("SYNTH_SPILL_REPORT").is_ok() {
1050        for seg in synth_synthesis::liveness::spill_choice_report(&arm_instrs, 9) {
1051            if seg.actual_reloads + seg.actual_spill_stores > 0 || seg.peak_pressure > 9 {
1052                eprintln!(
1053                    "[spill-report] seg@{} len={} peak={} actual={}ld+{}st belady(k=9)={}ld+{}st",
1054                    seg.start,
1055                    seg.len,
1056                    seg.peak_pressure,
1057                    seg.actual_reloads,
1058                    seg.actual_spill_stores,
1059                    seg.belady_reloads,
1060                    seg.belady_spill_stores
1061                );
1062            }
1063        }
1064    }
1065
1066    // ISA feature gate: validate that all generated instructions are supported
1067    // by the target. This catches FPU instructions on no-FPU targets, double-precision
1068    // instructions on single-precision targets, etc.
1069    validate_instructions(&arm_instrs, config.target.fpu, &config.target.triple)
1070        .map_err(|e| format!("ISA validation failed: {}", e))?;
1071
1072    // Encode to binary — use Thumb-2 for Cortex-M targets
1073    let use_thumb2 = matches!(config.target.isa, IsaVariant::Thumb2 | IsaVariant::Thumb);
1074
1075    let encoder = if use_thumb2 {
1076        ArmEncoder::new_thumb2_with_fpu(config.target.fpu)
1077    } else {
1078        ArmEncoder::new_arm32()
1079    };
1080
1081    // #202: resolve local label branches (Bcc/B/Bhs/Blo) to byte-accurate
1082    // offsets before encoding. `select_with_stack` emits them as label
1083    // placeholders and never resolves them — without this they encode as
1084    // `bne.n #0` and land mid-instruction whenever a 32-bit Thumb-2 instruction
1085    // sits between the branch and its target (UsageFault on real hardware).
1086    // Only meaningful for Thumb-2 (the offset units are halfword/PC+4).
1087    let arm_instrs = if use_thumb2 {
1088        resolve_label_branches(arm_instrs, &encoder)?
1089    } else {
1090        arm_instrs
1091    };
1092
1093    let mut code = Vec::new();
1094    let mut relocations = Vec::new();
1095
1096    // #345: literal-pool address loads. Each `LdrSym` was encoded as a placeholder
1097    // `LDR.W rd,[pc,#0]`; record where its instruction sits and what it loads so
1098    // we can append a pooled word (carrying the symbol address via R_ARM_ABS32)
1099    // and patch the PC-relative offset once the pool position is known.
1100    struct PendingLiteral {
1101        ldr_offset: u32,
1102        symbol: String,
1103        addend: i32,
1104    }
1105    let mut pending_literals: Vec<PendingLiteral> = Vec::new();
1106
1107    // VCR-DBG-001: per-instruction source map for DWARF `.debug_line`. Captured
1108    // here because `code.len()` immediately before `encode()` is the final
1109    // machine offset of the instruction within this function's `.text` — nothing
1110    // after the loop shifts earlier instructions (the literal pool is appended at
1111    // the end; the LDR patch below is in-place/length-preserving). Purely
1112    // additive: it does not touch `code`, so `.text` is byte-identical.
1113    let mut line_map: LineMap = Vec::new();
1114
1115    for instr in &arm_instrs {
1116        // Record a relocation for every BL: the encoder emits `bl #0` and
1117        // relies on a relocation to patch the target. This covers BOTH import
1118        // dispatch stubs (`__meld_*`, undefined externals) AND internal calls
1119        // (`func_N`, defined in this object). Previously only `__meld_*` was
1120        // recorded, so internal `BL func_N` calls were left as unpatched
1121        // `bl #0` placeholders branching to a garbage address (#167).
1122        if let ArmOp::Bl { label } = &instr.op {
1123            relocations.push(CodeRelocation {
1124                offset: code.len() as u32,
1125                symbol: label.clone(),
1126                kind: synth_core::backend::RelocKind::ThmCall,
1127            });
1128        }
1129        // #237: symbol-relative MOVW/MOVT (the `--native-pointer-abi` static-data
1130        // addressing). The encoder writes the addend in place; record the matching
1131        // R_ARM_MOVW_ABS_NC / R_ARM_MOVT_ABS so the linker adds the symbol address.
1132        if let ArmOp::MovwSym { symbol, .. } = &instr.op {
1133            relocations.push(CodeRelocation {
1134                offset: code.len() as u32,
1135                symbol: symbol.clone(),
1136                kind: synth_core::backend::RelocKind::MovwAbs,
1137            });
1138        }
1139        if let ArmOp::MovtSym { symbol, .. } = &instr.op {
1140            relocations.push(CodeRelocation {
1141                offset: code.len() as u32,
1142                symbol: symbol.clone(),
1143                kind: synth_core::backend::RelocKind::MovtAbs,
1144            });
1145        }
1146        // #345: defer the literal-pool word + reloc + offset patch to the
1147        // post-loop pass (the pool address is not yet known).
1148        if let ArmOp::LdrSym { symbol, addend, .. } = &instr.op {
1149            pending_literals.push(PendingLiteral {
1150                ldr_offset: code.len() as u32,
1151                symbol: symbol.clone(),
1152                addend: *addend,
1153            });
1154        }
1155
1156        // The machine offset of this instruction is the current code length,
1157        // captured before the bytes are appended.
1158        line_map.push((code.len() as u32, instr.source_line));
1159
1160        let encoded = encoder
1161            .encode(&instr.op)
1162            .map_err(|e| format!("ARM encoding failed: {}", e))?;
1163        code.extend_from_slice(&encoded);
1164    }
1165
1166    // #345: place the literal pool at the end of this function's `.text`. Gated on
1167    // there being at least one `LdrSym` — functions without one are byte-identical
1168    // to before (no trailing padding, so downstream `func_offsets` are unchanged
1169    // and the frozen differential fixtures stay bit-for-bit equal).
1170    if !pending_literals.is_empty() {
1171        if !use_thumb2 {
1172            return Err("LdrSym literal-pool addressing requires Thumb-2".to_string());
1173        }
1174        // 4-byte align the pool start (Thumb-2 word loads require it, and
1175        // `Align(PC,4)` in the LDR-literal semantics assumes a word-aligned pool).
1176        while code.len() % 4 != 0 {
1177            code.push(0x00);
1178        }
1179        // One distinct pooled word per LdrSym (no dedup: different sites carry
1180        // different addends, and the REL addend lives in the word).
1181        for lit in &pending_literals {
1182            let word_offset = code.len() as u32;
1183
1184            // REL semantics: the linker computes `S + A`, where A is the in-place
1185            // value of the relocated word. Initialize the word to the addend so
1186            // the final loaded address is `symbol + addend`.
1187            code.extend_from_slice(&(lit.addend as u32).to_le_bytes());
1188            relocations.push(CodeRelocation {
1189                offset: word_offset,
1190                symbol: lit.symbol.clone(),
1191                kind: synth_core::backend::RelocKind::Abs32,
1192            });
1193
1194            // Patch the placeholder `LDR.W rd,[pc,#imm12]`. Thumb-2 LDR (literal):
1195            // address = Align(PC,4) + imm12, with PC = ldr_offset + 4. The pool is
1196            // always after the LDR, so U=1 (already set in hw1 = 0xF8DF).
1197            let pc = lit.ldr_offset + 4;
1198            let aligned_pc = pc & !3u32;
1199            let imm12 = word_offset - aligned_pc;
1200            if imm12 > 0xFFF {
1201                // Wide LDR-literal range is ±4 KB; these function bodies are far
1202                // smaller, but fail cleanly rather than miscompile if exceeded.
1203                return Err(format!(
1204                    "LdrSym literal pool out of range (#345): imm12={} > 4095 \
1205                     for symbol {}",
1206                    imm12, lit.symbol
1207                ));
1208            }
1209            let hw2_off = (lit.ldr_offset + 2) as usize;
1210            let mut hw2 = u16::from_le_bytes([code[hw2_off], code[hw2_off + 1]]);
1211            hw2 = (hw2 & 0xF000) | (imm12 as u16); // keep Rt, set imm12
1212            let hw2_bytes = hw2.to_le_bytes();
1213            code[hw2_off] = hw2_bytes[0];
1214            code[hw2_off + 1] = hw2_bytes[1];
1215        }
1216    }
1217
1218    Ok((code, relocations, line_map))
1219}
1220
1221/// Resolve local label branches to byte-accurate offsets (#202).
1222///
1223/// `select_with_stack` emits conditional/unconditional branches as label
1224/// placeholders (`Bcc`/`B`/`Bhs`/`Blo` + `Label`) and never resolves them; the
1225/// encoder then emits a `0xD000`/`0xE000` placeholder with offset 0. Before #197
1226/// this path only ran for `--no-optimize`/declined functions, so the latent bug
1227/// stayed hidden — routing relocatable code through it surfaced branches that
1228/// land mid-instruction (a Cortex-M UsageFault) whenever a 32-bit Thumb-2
1229/// instruction sits between the branch and its target.
1230///
1231/// This pass encodes each instruction to learn its real byte length (so 16- vs
1232/// 32-bit forms and multi-instruction expansions are exact), maps each `Label`
1233/// to its byte position, and rewrites every label branch to the displacement
1234/// the encoder consumes: `(target - branch - 4) / 2` halfwords. A bounded
1235/// fixed-point handles an offset growing a branch from 16- to 32-bit (which
1236/// shifts later positions). `BCondOffset`/`BOffset` already produced inline by
1237/// the optimized path carry no label and are left untouched.
1238fn resolve_label_branches(
1239    arm_instrs: Vec<ArmInstruction>,
1240    encoder: &ArmEncoder,
1241) -> Result<Vec<ArmInstruction>, String> {
1242    use std::collections::HashMap;
1243    use synth_synthesis::Condition;
1244
1245    enum BKind {
1246        Cond(Condition),
1247        Uncond,
1248    }
1249    // Record each label branch ONCE — indices are stable across iterations.
1250    let mut branches: Vec<(usize, BKind, String)> = Vec::new();
1251    for (i, instr) in arm_instrs.iter().enumerate() {
1252        match &instr.op {
1253            ArmOp::Bcc { cond, label } => branches.push((i, BKind::Cond(*cond), label.clone())),
1254            ArmOp::Bhs { label } => branches.push((i, BKind::Cond(Condition::HS), label.clone())),
1255            ArmOp::Blo { label } => branches.push((i, BKind::Cond(Condition::LO), label.clone())),
1256            ArmOp::B { label } => branches.push((i, BKind::Uncond, label.clone())),
1257            _ => {}
1258        }
1259    }
1260    if branches.is_empty() {
1261        return Ok(arm_instrs);
1262    }
1263
1264    let mut resolved = arm_instrs;
1265    // Sizes only grow (16→32-bit), so this converges quickly; cap for safety.
1266    for _ in 0..16 {
1267        // 1. Byte position of each instruction (Label encodes to 0 bytes).
1268        let mut positions = Vec::with_capacity(resolved.len());
1269        let mut pos: i64 = 0;
1270        for instr in &resolved {
1271            positions.push(pos);
1272            pos += encoder
1273                .encode(&instr.op)
1274                .map_err(|e| format!("branch-resolve size probe failed: {}", e))?
1275                .len() as i64;
1276        }
1277        // 2. Label name -> byte position (owned keys so the borrow ends here).
1278        let mut labels: HashMap<String, i64> = HashMap::new();
1279        for (i, instr) in resolved.iter().enumerate() {
1280            if let ArmOp::Label { name } = &instr.op {
1281                labels.insert(name.clone(), positions[i]);
1282            }
1283        }
1284        // 3. Rewrite each branch to its byte-accurate offset.
1285        let mut changed = false;
1286        for (idx, kind, label) in &branches {
1287            // A label not defined locally is an EXTERNAL target (e.g.
1288            // `Trap_Handler` resolved by a relocation / the vector table). Leave
1289            // such branches as their placeholder for the existing relocation
1290            // path — only local control-flow labels are byte-resolved here.
1291            let Some(&target) = labels.get(label) else {
1292                continue;
1293            };
1294            // Encoder consumes the field as (target - branch - 4) / 2 halfwords.
1295            // Positions are always even, so this division is exact.
1296            let halfword_offset = ((target - positions[*idx] - 4) / 2) as i32;
1297            let new_op = match kind {
1298                BKind::Cond(c) => ArmOp::BCondOffset {
1299                    cond: *c,
1300                    offset: halfword_offset,
1301                },
1302                BKind::Uncond => ArmOp::BOffset {
1303                    offset: halfword_offset,
1304                },
1305            };
1306            if resolved[*idx].op != new_op {
1307                resolved[*idx].op = new_op;
1308                changed = true;
1309            }
1310        }
1311        if !changed {
1312            break;
1313        }
1314    }
1315    Ok(resolved)
1316}
1317
1318#[cfg(test)]
1319mod tests {
1320    use super::*;
1321
1322    /// #539: `i32.const 0; memory.grow m` folds to `memory.size m`; other deltas
1323    /// (const non-zero, runtime) are left as `memory.grow` (→ the sound fixed-
1324    /// memory -1). Non-grow ops are untouched, so functions without the idiom are
1325    /// byte-identical.
1326    #[test]
1327    fn test_rewrite_memory_grow_zero_539() {
1328        // the idiom -> memory.size
1329        assert_eq!(
1330            rewrite_memory_grow_zero(&[WasmOp::I32Const(0), WasmOp::MemoryGrow(0)]),
1331            vec![WasmOp::MemorySize(0)]
1332        );
1333        // const non-zero delta: NOT folded
1334        assert_eq!(
1335            rewrite_memory_grow_zero(&[WasmOp::I32Const(2), WasmOp::MemoryGrow(0)]),
1336            vec![WasmOp::I32Const(2), WasmOp::MemoryGrow(0)]
1337        );
1338        // runtime delta (no preceding const): NOT folded
1339        assert_eq!(
1340            rewrite_memory_grow_zero(&[WasmOp::LocalGet(0), WasmOp::MemoryGrow(0)]),
1341            vec![WasmOp::LocalGet(0), WasmOp::MemoryGrow(0)]
1342        );
1343        // a bare const-0 not feeding a grow is untouched
1344        assert_eq!(
1345            rewrite_memory_grow_zero(&[WasmOp::I32Const(0), WasmOp::I32Add]),
1346            vec![WasmOp::I32Const(0), WasmOp::I32Add]
1347        );
1348        // fold is local: surrounding ops preserved, indices past the fold intact
1349        assert_eq!(
1350            rewrite_memory_grow_zero(&[
1351                WasmOp::LocalGet(0),
1352                WasmOp::I32Const(0),
1353                WasmOp::MemoryGrow(0),
1354                WasmOp::I32Add,
1355            ]),
1356            vec![WasmOp::LocalGet(0), WasmOp::MemorySize(0), WasmOp::I32Add]
1357        );
1358    }
1359
1360    #[test]
1361    fn test_arm_backend_name() {
1362        let backend = ArmBackend::new();
1363        assert_eq!(backend.name(), "arm");
1364        assert!(backend.is_available());
1365    }
1366
1367    #[test]
1368    fn test_arm_backend_capabilities() {
1369        let backend = ArmBackend::new();
1370        let caps = backend.capabilities();
1371        assert!(!caps.produces_elf);
1372        assert!(caps.supports_rule_verification);
1373        assert!(!caps.is_external);
1374    }
1375
1376    #[test]
1377    fn test_compile_add_function() {
1378        let backend = ArmBackend::new();
1379        let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
1380        let config = CompileConfig::default();
1381
1382        let result = backend.compile_function("add", &ops, &config);
1383        assert!(result.is_ok());
1384
1385        let func = result.unwrap();
1386        assert_eq!(func.name, "add");
1387        assert!(!func.code.is_empty());
1388        assert_eq!(func.wasm_ops, ops);
1389    }
1390
1391    /// VCR-DBG-001: the per-instruction source map must cover the function with
1392    /// monotonic, in-bounds machine offsets, and must not perturb the emitted
1393    /// code (it is captured at encode time, never serialized here).
1394    #[test]
1395    fn test_line_map_is_wellformed_dbg001() {
1396        let backend = ArmBackend::new();
1397        let ops = vec![
1398            WasmOp::LocalGet(0),
1399            WasmOp::LocalGet(1),
1400            WasmOp::I32Add,
1401            WasmOp::End,
1402        ];
1403        let config = CompileConfig::default();
1404        let func = backend.compile_function("add", &ops, &config).unwrap();
1405
1406        // Non-empty, and the first instruction starts at machine offset 0.
1407        assert!(
1408            !func.line_map.is_empty(),
1409            "a non-trivial function captures a source map"
1410        );
1411        assert_eq!(func.line_map[0].0, 0, "first instruction at offset 0");
1412
1413        // Offsets strictly increase by at least one ARM/Thumb instruction (>= 2
1414        // bytes) and every mapped offset lies inside the emitted `.text`.
1415        for w in func.line_map.windows(2) {
1416            assert!(w[1].0 > w[0].0, "instruction offsets strictly increase");
1417            assert!(
1418                w[1].0 - w[0].0 >= 2,
1419                "each ARM/Thumb instruction is >= 2 bytes"
1420            );
1421        }
1422        let last = func.line_map.last().unwrap().0 as usize;
1423        assert!(
1424            last < func.code.len(),
1425            "every mapped offset lies inside .text"
1426        );
1427
1428        // The side-table is additive: recompiling is deterministic and the map is
1429        // consistent with that exact code (capturing it does not alter output).
1430        let again = backend.compile_function("add", &ops, &config).unwrap();
1431        assert_eq!(
1432            again.code, func.code,
1433            "compilation deterministic; map is additive"
1434        );
1435        assert_eq!(again.line_map, func.line_map);
1436    }
1437
1438    #[test]
1439    fn test_count_params() {
1440        let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
1441        assert_eq!(count_params(&ops), 2);
1442
1443        let no_params = vec![WasmOp::I32Const(5), WasmOp::I32Const(3), WasmOp::I32Add];
1444        assert_eq!(count_params(&no_params), 0);
1445    }
1446
1447    /// #457: the declared param count caps the access-pattern inference. The
1448    /// repro shape `(param i32)(local i32) → p0 + local1` reads local 1 before
1449    /// any write, so `count_params` infers 2 — with the declared count (1) the
1450    /// local is reclassified onto the zero-inited frame path instead of being
1451    /// read from R1 (caller garbage).
1452    #[test]
1453    fn declared_param_count_caps_inference_457() {
1454        let ops = vec![
1455            WasmOp::LocalGet(0),
1456            WasmOp::LocalGet(1),
1457            WasmOp::I32Add,
1458            WasmOp::End,
1459        ];
1460        // The inference alone still says 2 (the misclassification this caps).
1461        assert_eq!(count_params(&ops), 2);
1462
1463        let backend = ArmBackend::new();
1464        let inferred = backend
1465            .compile_function("rbw", &ops, &CompileConfig::default())
1466            .unwrap();
1467        let declared = backend
1468            .compile_function(
1469                "rbw",
1470                &ops,
1471                &CompileConfig {
1472                    current_func_param_count: Some(1),
1473                    ..CompileConfig::default()
1474                },
1475            )
1476            .unwrap();
1477        // The cap is consumed: the declared-count compile reclassifies local 1
1478        // and must emit different code than the param-misclassified one.
1479        assert_ne!(
1480            inferred.code, declared.code,
1481            "declared param count must reach the selector"
1482        );
1483        // The zero-init is present: a 16-bit Thumb `movs rN, #0`
1484        // (0x2000 | rd<<8 → LE bytes [0x00, 0x20+rd]) somewhere in the body.
1485        let has_movs_zero = declared
1486            .code
1487            .chunks_exact(2)
1488            .any(|h| h[0] == 0x00 && (0x20..=0x27).contains(&h[1]));
1489        assert!(
1490            has_movs_zero,
1491            "declared-count compile must zero-init the read-before-write local; code: {:02x?}",
1492            declared.code
1493        );
1494        // A declared count that matches (or exceeds) the inference changes
1495        // nothing — byte-identity for every function without rbw locals.
1496        let matching = backend
1497            .compile_function(
1498                "rbw",
1499                &ops,
1500                &CompileConfig {
1501                    current_func_param_count: Some(2),
1502                    ..CompileConfig::default()
1503                },
1504            )
1505            .unwrap();
1506        assert_eq!(
1507            matching.code, inferred.code,
1508            "declared >= inferred must stay byte-identical"
1509        );
1510    }
1511
1512    #[test]
1513    fn test_arm_backend_register() {
1514        let mut registry = synth_core::BackendRegistry::new();
1515        registry.register(Box::new(ArmBackend::new()));
1516        assert!(registry.get("arm").is_some());
1517        assert_eq!(registry.available().len(), 1);
1518    }
1519
1520    #[test]
1521    fn test_compile_import_call_produces_relocations() {
1522        let backend = ArmBackend::new();
1523        // Simulate a WASM module where func index 0 is an import.
1524        // Call(0) should generate MOV R0, #0; BL __meld_dispatch_import
1525        let ops = vec![WasmOp::Call(0)];
1526        let config = CompileConfig {
1527            num_imports: 1,
1528            no_optimize: true, // Direct instruction selection to preserve Call semantics
1529            ..CompileConfig::default()
1530        };
1531
1532        let result = backend.compile_function("caller", &ops, &config);
1533        assert!(result.is_ok());
1534
1535        let func = result.unwrap();
1536        assert!(!func.code.is_empty());
1537        assert_eq!(func.relocations.len(), 1);
1538        assert_eq!(func.relocations[0].symbol, "__meld_dispatch_import");
1539        // The BL is the second instruction (after MOV R0, #0), so offset should be > 0
1540        assert!(func.relocations[0].offset > 0);
1541    }
1542
1543    /// Regression test for #197: in `relocatable` mode, an import call must
1544    /// relocate against the direct `func_N` symbol (rewritten to the wasm field
1545    /// name by `build_relocatable_elf`), NOT `__meld_dispatch_import`. This is
1546    /// the ABI half of the #197 fix — without it, a host linker cannot resolve
1547    /// the call to the real kernel symbol (e.g. `k_spin_lock`).
1548    #[test]
1549    fn test_compile_relocatable_import_uses_direct_func_symbol_197() {
1550        let backend = ArmBackend::new();
1551        let ops = vec![WasmOp::Call(0)]; // func 0 is an import
1552        let config = CompileConfig {
1553            num_imports: 1,
1554            relocatable: true,
1555            ..CompileConfig::default()
1556        };
1557
1558        let func = backend
1559            .compile_function("caller", &ops, &config)
1560            .expect("relocatable import call compiles");
1561
1562        assert_eq!(func.relocations.len(), 1);
1563        assert_eq!(
1564            func.relocations[0].symbol, "func_0",
1565            "#197: relocatable import must relocate against func_0 (→ field name), not Meld dispatch"
1566        );
1567    }
1568
1569    #[test]
1570    fn test_compile_no_imports_no_relocations() {
1571        let backend = ArmBackend::new();
1572        let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
1573        let config = CompileConfig::default();
1574
1575        let func = backend.compile_function("add", &ops, &config).unwrap();
1576        assert!(func.relocations.is_empty());
1577    }
1578
1579    /// Regression test for #167: a call to an INTERNAL function
1580    /// (index `>= num_imports`) must record a relocation against `func_{index}`.
1581    /// Before the fix, only `__meld_*` (import) BLs were relocated, so
1582    /// internal `BL func_N` was emitted as an unpatched `bl #0` branching
1583    /// to a garbage address — making the object non-linkable. This test
1584    /// would have caught that regression.
1585    #[test]
1586    fn test_compile_internal_call_produces_relocation_167() {
1587        let backend = ArmBackend::new();
1588        // num_imports = 1, so Call(2) is an INTERNAL call → `BL func_2`.
1589        let ops = vec![WasmOp::Call(2)];
1590        let config = CompileConfig {
1591            num_imports: 1,
1592            no_optimize: true,
1593            ..CompileConfig::default()
1594        };
1595
1596        let func = backend
1597            .compile_function("caller", &ops, &config)
1598            .expect("internal call compiles");
1599
1600        assert_eq!(
1601            func.relocations.len(),
1602            1,
1603            "an internal call must emit exactly one relocation (#167)"
1604        );
1605        assert_eq!(
1606            func.relocations[0].symbol, "func_2",
1607            "internal call must relocate against the callee's func_{{index}} symbol (#167)"
1608        );
1609    }
1610
1611    // ─── Phase 1 safety-bounds plumbing for ARM ──────────────────────────
1612
1613    #[test]
1614    fn arm_safety_bounds_mpu_emits_same_code_as_none() {
1615        // Mpu mode must not introduce any inline check on ARM — the MPU
1616        // handles faults via hardware. The encoded bytes for an i32.load
1617        // should be identical between None and Mpu.
1618        let backend = ArmBackend::new();
1619        let ops = vec![
1620            WasmOp::LocalGet(0),
1621            WasmOp::I32Load {
1622                offset: 0,
1623                align: 2,
1624            },
1625        ];
1626        let cfg_none = CompileConfig {
1627            no_optimize: true,
1628            ..Default::default()
1629        };
1630        let cfg_mpu = CompileConfig {
1631            no_optimize: true,
1632            safety_bounds: SafetyBounds::Mpu,
1633            ..Default::default()
1634        };
1635        let n = backend.compile_function("ld", &ops, &cfg_none).unwrap();
1636        let m = backend.compile_function("ld", &ops, &cfg_mpu).unwrap();
1637        assert_eq!(
1638            n.code, m.code,
1639            "Mpu and None should produce identical ARM bytes (Mpu relies on hardware)"
1640        );
1641    }
1642
1643    #[test]
1644    fn arm_legacy_bounds_check_still_emits_software_check() {
1645        // Legacy CLI users with `--bounds-check` should keep getting the
1646        // software path even though the new SafetyBounds field defaults to None.
1647        let backend = ArmBackend::new();
1648        let ops = vec![
1649            WasmOp::LocalGet(0),
1650            WasmOp::I32Load {
1651                offset: 0,
1652                align: 2,
1653            },
1654        ];
1655        let cfg_legacy = CompileConfig {
1656            no_optimize: true,
1657            bounds_check: true,
1658            ..Default::default()
1659        };
1660        let cfg_software = CompileConfig {
1661            no_optimize: true,
1662            safety_bounds: SafetyBounds::Software,
1663            ..Default::default()
1664        };
1665        let l = backend.compile_function("ld", &ops, &cfg_legacy).unwrap();
1666        let s = backend.compile_function("ld", &ops, &cfg_software).unwrap();
1667        assert_eq!(
1668            l.code, s.code,
1669            "--bounds-check should produce the same bytes as --safety-bounds=software"
1670        );
1671    }
1672
1673    /// #377: `--safety-bounds software` must be enforced on the OPTIMIZED path
1674    /// too. Pre-fix, `software` was byte-identical to `none` there (a silent
1675    /// no-op while the safety manifest claimed enforcement). The compiled
1676    /// bytes must now (a) differ from `none` and (b) contain the inline
1677    /// `CMP ip, sl` + `UDF` guard.
1678    #[test]
1679    fn arm_safety_bounds_software_enforced_on_optimized_path_377() {
1680        let backend = ArmBackend::new();
1681        // Dynamic-address store+load: the optimized path accepts this shape
1682        // (no calls, no i64 params, ≤4 params).
1683        let ops = vec![
1684            WasmOp::LocalGet(0),
1685            WasmOp::LocalGet(1),
1686            WasmOp::I32Store {
1687                offset: 4,
1688                align: 2,
1689            },
1690            WasmOp::LocalGet(0),
1691            WasmOp::I32Load {
1692                offset: 0,
1693                align: 2,
1694            },
1695        ];
1696        // no_optimize NOT set — this exercises the optimized path.
1697        let cfg_none = CompileConfig::default();
1698        let cfg_sw = CompileConfig {
1699            safety_bounds: SafetyBounds::Software,
1700            ..Default::default()
1701        };
1702        let n = backend.compile_function("st", &ops, &cfg_none).unwrap();
1703        let s = backend.compile_function("st", &ops, &cfg_sw).unwrap();
1704        assert_ne!(
1705            n.code, s.code,
1706            "#377: software bounds must CHANGE optimized-path codegen (was a silent no-op)"
1707        );
1708        // Thumb-2 `UDF #0` is 0xDE00 (LE bytes: 00 DE); `CMP ip, sl` (T2
1709        // high-reg) is 0x45D4 (LE: D4 45). Both must appear — one guard per
1710        // access, trap inline.
1711        let has_udf = s.code.windows(2).any(|w| w == [0x00, 0xDE]);
1712        let has_cmp_ip_sl = s.code.windows(2).any(|w| w == [0xD4, 0x45]);
1713        assert!(has_udf, "#377: inline UDF trap missing from optimized path");
1714        assert!(
1715            has_cmp_ip_sl,
1716            "#377: CMP ip, sl bounds compare missing from optimized path"
1717        );
1718        // And `none` must contain NO UDF (the function has no other trap).
1719        assert!(
1720            !n.code.windows(2).any(|w| w == [0x00, 0xDE]),
1721            "none must not contain a UDF for this function"
1722        );
1723    }
1724
1725    /// #377: `mpu` on the optimized path is codegen-passthrough — identical
1726    /// bytes to `none` on BOTH paths (hardware enforcement is target-level;
1727    /// synth does not emit MPU region programming — tracked separately in
1728    /// #377's fix-direction discussion). This pins path-parity for `mpu`.
1729    #[test]
1730    fn arm_safety_bounds_mpu_optimized_path_parity_377() {
1731        let backend = ArmBackend::new();
1732        let ops = vec![
1733            WasmOp::LocalGet(0),
1734            WasmOp::I32Load {
1735                offset: 0,
1736                align: 2,
1737            },
1738        ];
1739        let cfg_none = CompileConfig::default();
1740        let cfg_mpu = CompileConfig {
1741            safety_bounds: SafetyBounds::Mpu,
1742            ..Default::default()
1743        };
1744        let n = backend.compile_function("ld", &ops, &cfg_none).unwrap();
1745        let m = backend.compile_function("ld", &ops, &cfg_mpu).unwrap();
1746        assert_eq!(
1747            n.code, m.code,
1748            "Mpu and None must produce identical bytes on the optimized path too"
1749        );
1750    }
1751
1752    /// #377: `mask` on the optimized path declines to the direct selector
1753    /// (honest degradation) — the compiled function must equal the
1754    /// `--no-optimize` masking bytes, i.e. the flag is honored, never dropped.
1755    #[test]
1756    fn arm_safety_bounds_mask_optimized_path_declines_to_direct_377() {
1757        let backend = ArmBackend::new();
1758        let ops = vec![
1759            WasmOp::LocalGet(0),
1760            WasmOp::LocalGet(1),
1761            WasmOp::I32Store {
1762                offset: 0,
1763                align: 2,
1764            },
1765        ];
1766        let cfg_mask_opt = CompileConfig {
1767            safety_bounds: SafetyBounds::Mask,
1768            ..Default::default()
1769        };
1770        let cfg_mask_direct = CompileConfig {
1771            no_optimize: true,
1772            safety_bounds: SafetyBounds::Mask,
1773            ..Default::default()
1774        };
1775        let o = backend.compile_function("st", &ops, &cfg_mask_opt).unwrap();
1776        let d = backend
1777            .compile_function("st", &ops, &cfg_mask_direct)
1778            .unwrap();
1779        assert_eq!(
1780            o.code, d.code,
1781            "#377: mask on the optimized path must fall back to the direct selector's masking"
1782        );
1783    }
1784
1785    // ========================================================================
1786    // ISA feature gate tests — ensure the compiler never emits unsupported
1787    // instructions for a given target
1788    // ========================================================================
1789
1790    #[test]
1791    fn test_f32_rejected_on_cortex_m3_no_fpu() {
1792        let backend = ArmBackend::new();
1793        let ops = vec![WasmOp::F32Const(1.0), WasmOp::F32Const(2.0), WasmOp::F32Add];
1794        let config = CompileConfig {
1795            target: TargetSpec::cortex_m3(),
1796            no_optimize: true,
1797            ..CompileConfig::default()
1798        };
1799
1800        let result = backend.compile_function("fadd", &ops, &config);
1801        assert!(
1802            result.is_err(),
1803            "f32 operations should fail on Cortex-M3 (no FPU)"
1804        );
1805    }
1806
1807    #[test]
1808    fn test_f32_accepted_on_cortex_m4f() {
1809        let backend = ArmBackend::new();
1810        let ops = vec![WasmOp::F32Const(1.0), WasmOp::F32Const(2.0), WasmOp::F32Add];
1811        let config = CompileConfig {
1812            target: TargetSpec::cortex_m4f(),
1813            no_optimize: true,
1814            ..CompileConfig::default()
1815        };
1816
1817        let result = backend.compile_function("fadd", &ops, &config);
1818        assert!(
1819            result.is_ok(),
1820            "f32 operations should succeed on Cortex-M4F, got: {:?}",
1821            result.unwrap_err()
1822        );
1823    }
1824
1825    #[test]
1826    fn test_i32_works_on_all_targets() {
1827        let backend = ArmBackend::new();
1828        let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::I32Add];
1829
1830        // Cortex-M3 (no FPU)
1831        let config_m3 = CompileConfig {
1832            target: TargetSpec::cortex_m3(),
1833            no_optimize: true,
1834            ..CompileConfig::default()
1835        };
1836        assert!(
1837            backend.compile_function("add", &ops, &config_m3).is_ok(),
1838            "i32 ops should work on Cortex-M3"
1839        );
1840
1841        // Cortex-M4F (single FPU)
1842        let config_m4f = CompileConfig {
1843            target: TargetSpec::cortex_m4f(),
1844            no_optimize: true,
1845            ..CompileConfig::default()
1846        };
1847        assert!(
1848            backend.compile_function("add", &ops, &config_m4f).is_ok(),
1849            "i32 ops should work on Cortex-M4F"
1850        );
1851
1852        // Cortex-M7DP (double FPU)
1853        let config_m7dp = CompileConfig {
1854            target: TargetSpec::cortex_m7dp(),
1855            no_optimize: true,
1856            ..CompileConfig::default()
1857        };
1858        assert!(
1859            backend.compile_function("add", &ops, &config_m7dp).is_ok(),
1860            "i32 ops should work on Cortex-M7DP"
1861        );
1862    }
1863
1864    #[test]
1865    fn test_f32_rejected_on_cortex_m4_no_fpu() {
1866        // Cortex-M4 (without F suffix) has no FPU
1867        let backend = ArmBackend::new();
1868        let ops = vec![WasmOp::F32Const(1.5), WasmOp::F32Const(2.5), WasmOp::F32Mul];
1869        let config = CompileConfig {
1870            target: TargetSpec::cortex_m4(),
1871            no_optimize: true,
1872            ..CompileConfig::default()
1873        };
1874
1875        let result = backend.compile_function("fmul", &ops, &config);
1876        assert!(
1877            result.is_err(),
1878            "f32 operations should fail on Cortex-M4 (no FPU)"
1879        );
1880    }
1881
1882    // ========================================================================
1883    // Issue #120 — f32 ops in the optimized lowering path
1884    //
1885    // `OptimizerBridge::wasm_to_ir` has no handlers for f32/f64 ops, so a
1886    // value-producing float op fell through to `Opcode::Nop`, leaving a
1887    // downstream consumer with an unmapped vreg and tripping the PR #101
1888    // defensive panic in `ir_to_arm`. Customer reproducer: `compiler_builtins
1889    // float::div` and `gale_compute_ipi_mask` in the `falcon-rate-component`
1890    // module.
1891    //
1892    // Fix: `optimize_full` declines float modules with a typed `Err`;
1893    // `compile_wasm_to_arm` falls back to the non-optimized `select_with_stack`
1894    // path, which handles f32 via VFP/FPU. These tests use the *default*
1895    // (optimized) config — `no_optimize` is NOT set — which is the exact
1896    // configuration that panicked pre-fix.
1897    // ========================================================================
1898
1899    /// Pre-fix: this panicked with "vreg vN has no assigned ARM register and
1900    /// no spill slot" inside `ir_to_arm`. Post-fix: the optimized path declines
1901    /// the module and the backend falls back to direct selection, producing a
1902    /// non-empty f32.div lowering on a Cortex-M4F.
1903    #[test]
1904    fn test_issue120_f32_div_compiles_via_optimized_default() {
1905        let backend = ArmBackend::new();
1906        let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Div];
1907        let config = CompileConfig {
1908            target: TargetSpec::cortex_m4f(),
1909            // no_optimize NOT set — this exercises the optimized path that
1910            // panicked in issue #120, then the fallback to direct selection.
1911            ..CompileConfig::default()
1912        };
1913
1914        let result = backend.compile_function("fdiv", &ops, &config);
1915        assert!(
1916            result.is_ok(),
1917            "f32.div must compile on Cortex-M4F via the optimized->direct \
1918             fallback (issue #120), got: {:?}",
1919            result.as_ref().err()
1920        );
1921        assert!(
1922            !result.unwrap().code.is_empty(),
1923            "f32.div must produce non-empty machine code"
1924        );
1925    }
1926
1927    /// A spread of f32 ops, all through the optimized (default) config, must
1928    /// compile via the fallback on an FPU target without panicking.
1929    #[test]
1930    fn test_issue120_assorted_f32_ops_compile_via_optimized_default() {
1931        let backend = ArmBackend::new();
1932        let config = CompileConfig {
1933            target: TargetSpec::cortex_m4f(),
1934            ..CompileConfig::default()
1935        };
1936
1937        let cases: Vec<(&str, Vec<WasmOp>)> = vec![
1938            (
1939                "fadd",
1940                vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Add],
1941            ),
1942            (
1943                "fmul",
1944                vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Mul],
1945            ),
1946            (
1947                "fsub",
1948                vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Sub],
1949            ),
1950        ];
1951
1952        for (name, ops) in cases {
1953            let result = backend.compile_function(name, &ops, &config);
1954            assert!(
1955                result.is_ok(),
1956                "{name} must compile via the optimized->direct fallback \
1957                 (issue #120), got: {:?}",
1958                result.as_ref().err()
1959            );
1960            assert!(
1961                !result.unwrap().code.is_empty(),
1962                "{name} must produce non-empty machine code"
1963            );
1964        }
1965    }
1966
1967    /// The fallback must still honor the ISA feature gate: f32 on a no-FPU
1968    /// target must fail cleanly (not panic) even on the optimized path.
1969    #[test]
1970    fn test_issue120_f32_div_rejected_on_no_fpu_via_optimized() {
1971        let backend = ArmBackend::new();
1972        let ops = vec![WasmOp::LocalGet(0), WasmOp::LocalGet(1), WasmOp::F32Div];
1973        let config = CompileConfig {
1974            target: TargetSpec::cortex_m3(),
1975            ..CompileConfig::default()
1976        };
1977
1978        let result = backend.compile_function("fdiv", &ops, &config);
1979        assert!(
1980            result.is_err(),
1981            "f32.div must be rejected on Cortex-M3 (no FPU), not panic"
1982        );
1983    }
1984
1985    /// #507: a `br_table` function compiled via the DEFAULT (optimized) config
1986    /// must produce the SAME bytes as the direct (`no_optimize`) selector —
1987    /// i.e. the optimized path declined it to direct, lowering the dispatch as a
1988    /// real cmp-chain instead of silently dropping it (which left all arms in
1989    /// fall-through). Pre-fix the two outputs differed (the optimized one had no
1990    /// selector compare). Execution correctness is gated by
1991    /// `scripts/repro/br_table_507_differential.py`.
1992    #[test]
1993    fn test_507_br_table_declines_to_direct() {
1994        let backend = ArmBackend::new();
1995        // dispatch(sel): br_table over 3 blocks, each storing a marker to mem[0].
1996        let ops = vec![
1997            WasmOp::Block,
1998            WasmOp::Block,
1999            WasmOp::Block,
2000            WasmOp::LocalGet(0),
2001            WasmOp::BrTable {
2002                targets: vec![0, 1, 2],
2003                default: 2,
2004            },
2005            WasmOp::End,
2006            WasmOp::I32Const(0),
2007            WasmOp::I32Const(10),
2008            WasmOp::I32Store {
2009                offset: 0,
2010                align: 2,
2011            },
2012            WasmOp::Return,
2013            WasmOp::End,
2014            WasmOp::I32Const(0),
2015            WasmOp::I32Const(20),
2016            WasmOp::I32Store {
2017                offset: 0,
2018                align: 2,
2019            },
2020            WasmOp::Return,
2021            WasmOp::End,
2022            WasmOp::I32Const(0),
2023            WasmOp::I32Const(30),
2024            WasmOp::I32Store {
2025                offset: 0,
2026                align: 2,
2027            },
2028        ];
2029        let opt = CompileConfig {
2030            target: TargetSpec::cortex_m4(),
2031            ..CompileConfig::default()
2032        };
2033        let direct = CompileConfig {
2034            target: TargetSpec::cortex_m4(),
2035            no_optimize: true,
2036            ..CompileConfig::default()
2037        };
2038        let a = backend
2039            .compile_function("dispatch", &ops, &opt)
2040            .expect("optimized-default must compile br_table (via decline)");
2041        let b = backend
2042            .compile_function("dispatch", &ops, &direct)
2043            .expect("direct must compile br_table");
2044        assert_eq!(
2045            a.code, b.code,
2046            "#507: optimized-default br_table output must be byte-identical to the \
2047             direct selector (i.e. declined to direct), not a dropped dispatch"
2048        );
2049    }
2050
2051    /// Issue #94: end-to-end byte-size check for the canonical u64-packed
2052    /// FFI-return hi32 extract pattern. Compiles two near-identical
2053    /// functions — one with the optimized shift-by-32, one with a generic
2054    /// shift-by-7 — and asserts the optimized form is meaningfully smaller.
2055    #[test]
2056    fn test_issue94_hi32_extract_is_smaller_than_generic_shift() {
2057        let backend = ArmBackend::new();
2058        let config = CompileConfig {
2059            target: TargetSpec::cortex_m4f(),
2060            ..CompileConfig::default()
2061        };
2062
2063        // #518: the i64 value must NOT come from an i64 PARAM — the optimized
2064        // path now declines i64-param functions to the direct selector (it homed
2065        // an i64 param in R4:R5 instead of R0:R1, a silent miscompile this test's
2066        // byte-size-only assertion masked). The canonical #94 case is a u64 from
2067        // an FFI return, not a param, anyway. Source the i64 from a sign-extended
2068        // i32 param (`extend_i32_s`): a runtime, non-constant-foldable i64 that
2069        // stays on the optimized path, so the shift-by-32 hi-extract peephole is
2070        // still exercised on CORRECT code.
2071        // Optimized path: `(i64.extend_i32_s (local.get 0)) >>> 32; wrap_i64`
2072        let ops_hi32 = vec![
2073            WasmOp::LocalGet(0), // i32 param in R0
2074            WasmOp::I64ExtendI32S,
2075            WasmOp::I64Const(32),
2076            WasmOp::I64ShrU,
2077            WasmOp::I32WrapI64,
2078        ];
2079        let func_hi32 = backend
2080            .compile_function("hi32_extract", &ops_hi32, &config)
2081            .unwrap();
2082
2083        // Generic path: `... >>> 7; wrap_i64` — same shape, but the shift amount
2084        // is not a multiple of 32, so it falls through to the runtime shift.
2085        let ops_generic = vec![
2086            WasmOp::LocalGet(0),
2087            WasmOp::I64ExtendI32S,
2088            WasmOp::I64Const(7),
2089            WasmOp::I64ShrU,
2090            WasmOp::I32WrapI64,
2091        ];
2092        let func_generic = backend
2093            .compile_function("generic_shr", &ops_generic, &config)
2094            .unwrap();
2095
2096        let bytes_hi32 = func_hi32.code.len();
2097        let bytes_generic = func_generic.code.len();
2098        println!(
2099            "\n[issue #94] hi32 extract: {} bytes (vs generic shift: {} bytes; saved {})",
2100            bytes_hi32,
2101            bytes_generic,
2102            bytes_generic.saturating_sub(bytes_hi32)
2103        );
2104        let hex: String = func_hi32
2105            .code
2106            .iter()
2107            .map(|b| format!("{:02x}", b))
2108            .collect::<Vec<_>>()
2109            .join(" ");
2110        println!("[issue #94] hi32 bytes: {}", hex);
2111        // We expect the optimized form to be at least 30 bytes smaller than
2112        // the generic 64-bit shift sequence. (Empirically: 14 vs 50 bytes.)
2113        assert!(
2114            bytes_hi32 + 30 <= bytes_generic,
2115            "issue #94: hi32 extract = {} bytes, generic shift = {} bytes; \
2116             expected optimized form to be at least 30 bytes smaller",
2117            bytes_hi32,
2118            bytes_generic,
2119        );
2120    }
2121}