fix: 块级函数声明支臂不再块入口物化，声明点按入口物化状态区分写回

crates/oxide_emit/src/emit.rs

@@ -223,6 +223,13 @@ pub struct CompileCtx {
     /// 块级函数名 web-compat 外层绑定抑制集（形参 ∪ 函数作用域树内词法声明名）：
     /// 抑制集内名字退化为纯块作用域。预声明期定稿，实例化与声明点写回两侧同查。
     pub(crate) block_fn_suppressed: HashSet<String>,
+    /// 块入口已物化声明登记表（按块层级压/弹）：块直接子与标签直接子体
+    /// 的函数声明在块入口物化闭包后，按 名 → 声明节点 arena 指针 登记。
+    /// 声明点据此三分：同节点命中（本声明已入口物化）→ 复用块槽保闭包
+    /// 同一；仅同名命中（支臂声明与直接子同名共享块槽）→ 闭包落 fresh
+    /// 寄存器只写回外层 var、块槽不动；均未命中 → 执行期自物化入块槽。
+    /// 节点指针解析产物 arena 地址，同一编译单元内稳定。
+    pub(crate) block_fn_entry_mats: Vec<HashMap<String, *const ()>>,
     /// 本函数被嵌套函数捕获的绑定名 → cell_idx（名字排序分配，稳定跨 run）。
     /// 捕获判断（MAKE_CELL / CELL_GET / CELL_SET）与子函数 upvalue cell_idx 统一查此映射，
     /// 消除符号表时序依赖与 cell 索引错位。
@@ -371,6 +378,7 @@ impl CompileCtx {
             own_bindings: HashSet::new(),
             param_names: HashSet::new(),
             block_fn_suppressed: HashSet::new(),
+            block_fn_entry_mats: Vec::new(),
             captured_bindings: BTreeMap::new(),
             global_tier_names: HashSet::new(),
             upvalue_const_flags: HashSet::new(),

crates/oxide_emit/src/stmt/block.rs

@@ -1,5 +1,7 @@
 //! 块语句 emit：`emit_block_statement` 压/弹作用域并顺序编译子语句（含域分发）。
 
+use std::collections::HashMap;
+
 use crate::{CompileCtx, Emitter};
 use oxide_parser::Statement;
 
@@ -14,8 +16,10 @@ impl Emitter {
         self.predeclare_block_function_declarations(&block.body, ctx);
         // 块 lexical 声明是局部绑定：不做受限全局名检查（重复声明错在 emit 期报）。
         let _ = self.predeclare_lexical_declarations(&block.body, ctx, false);
-        // 块级函数声明的块入口初始化：闭包物化入预声明块槽，声明语句前读命中
-        // 函数对象（sloppy 与 strict 同形）；声明点退化为其守语义。
+        // 块级函数声明的块入口初始化：直接子（含标签直接子体）闭包物化入预
+        // 声明块槽，声明语句前读命中函数对象（sloppy 与 strict 同形）；声明
+        // 点不再重编闭包，只处理外层 var 写回（见 emit_function_declaration）。
+        ctx.block_fn_entry_mats.push(HashMap::new());
         for s in &block.body {
             self.emit_block_fn_entry_init_stmt(s, ctx)?;
         }
@@ -25,18 +29,25 @@ impl Emitter {
                 r = Some(rr);
             }
         }
+        ctx.block_fn_entry_mats.pop();
         ctx.pop_scope();
         Ok(r)
     }
 
-    /// 块入口初始化的单语句走法：函数声明就地物化（同名重复声明共享块绑定，
-    /// 源序物化使末次声明天然成为入口值）；if/labeled/while/do-while/with 体
-    /// 不推作用域、随本块绑定递归；嵌套块/循环/try 各自压作用域、由其自身块
-    /// 入口处理，不进入。
+    /// 块入口初始化的单语句走法：函数声明就地物化并登记（同名重复声明共享
+    /// 块绑定，源序物化使末次声明天然成为入口值）；标签不改变执行流（V8 对
+    /// 标签直接子的函数声明同样块入口可见），随标签体递归一层；if/while/
+    /// do-while/with 体不进入——支臂声明的执行期才生效（仅被求值支物化，
+    /// while/do-while/with 体直挂声明双侧均为语法错误不可达）；嵌套块/循环/
+    /// try 各自压作用域、由其自身块入口处理，不进入。
     ///
     /// # 前提
     /// - 预声明已为各声明名建立块 Let 绑定；`materialize_function_declaration`
     ///   经 `lookup` 解析槽位。
+    ///
+    /// # 副作用
+    /// - 当前指令流在块入口发 CREATE_CLOSURE（及 MAKE_CELL / STORE_VAR）；
+    ///   物化登记写入 `block_fn_entry_mats` 栈顶帧。
     fn emit_block_fn_entry_init_stmt(&self, stmt: &Statement, ctx: &mut CompileCtx) -> Result<(), String> {
         match stmt {
             Statement::FunctionDeclaration(fd) => {
@@ -45,19 +56,15 @@ impl Emitter {
                 };
                 let name = id.name.to_string();
                 self.materialize_function_declaration(fd, &name, ctx)?;
+                // 登记声明节点 arena 地址（Box 解引到 arena 本体）：声明点
+                // 以同一节点地址判同一，区分本声明入口物化与同名支臂。
+                ctx.block_fn_entry_mats
+                    .last_mut()
+                    .unwrap()
+                    .insert(name, &**fd as *const _ as *const ());
                 Ok(())
             }
-            Statement::IfStatement(is) => {
-                self.emit_block_fn_entry_init_stmt(&is.consequent, ctx)?;
-                if let Some(alt) = &is.alternate {
-                    self.emit_block_fn_entry_init_stmt(alt, ctx)?;
-                }
-                Ok(())
-            }
-            Statement::WhileStatement(wh) => self.emit_block_fn_entry_init_stmt(&wh.body, ctx),
-            Statement::DoWhileStatement(dw) => self.emit_block_fn_entry_init_stmt(&dw.body, ctx),
             Statement::LabeledStatement(ls) => self.emit_block_fn_entry_init_stmt(&ls.body, ctx),
-            Statement::WithStatement(ws) => self.emit_block_fn_entry_init_stmt(&ws.body, ctx),
             _ => Ok(()),
         }
     }

crates/oxide_emit/src/stmt/declaration/function_decl.rs

@@ -26,16 +26,26 @@ impl Emitter {
         } else {
             return Err("FunctionDeclaration without name".into());
         };
-        // 块级函数声明：闭包已在块入口物化写入预声明块槽（块绑定块入口即持有
-        // 函数对象，声明语句前读命中它），声明点不重编闭包，只处理下方外层
-        // var 写回。
+        // 块级函数声明按入口物化状态三分（块槽预声明 Let 绑定）：
+        // - 本声明已入口物化（块直接子/标签直接子体）：块槽持有本声明闭包，
+        //   复用槽位保闭包同一，不重编；
+        // - 同名直接子已入口物化（支臂与直接子共享块槽）：支臂声明只更新外层
+        //   var 绑定、块绑定不动（V8 双绑定面，引擎以块槽 + 外层 var 两槽模拟），
+        //   闭包落 fresh 寄存器写回外层 var；
+        // - 其余（支臂首次求值）：执行期自物化闭包写入块槽。
+        // 非块路径（顶层/函数作用域声明点）恒自物化。
         let binding_scope_kind = ctx
             .scopes
             .symbols
             .lookup_any_binding(&name)
             .map(|(_, scope_idx)| ctx.scopes.symbols.scopes[scope_idx].kind);
+        let node = fd as *const _ as *const ();
         let var_reg = if binding_scope_kind == Some(ScopeKind::BlockScope) {
-            ctx.lookup(&name)?
+            match ctx.block_fn_entry_mats.last().and_then(|m| m.get(&name)) {
+                Some(&m) if m == node => ctx.lookup(&name)?,
+                Some(_) => self.materialize_function_declaration_var_only(fd, &name, ctx)?,
+                None => self.materialize_function_declaration(fd, &name, ctx)?,
+            }
         } else {
             self.materialize_function_declaration(fd, &name, ctx)?
         };
@@ -94,6 +104,26 @@ impl Emitter {
     pub(crate) fn materialize_function_declaration(
         &self, fd: &oxide_parser::Function, name: &str, ctx: &mut CompileCtx,
     ) -> Result<u32, String> {
+        let var_reg = ctx.lookup(name)?;
+        ctx.reserve_reg(var_reg);
+        self.materialize_function_closure(fd, name, var_reg, ctx, true)?;
+        Ok(var_reg)
+    }
+
+    /// G 形支臂物化变体：闭包落 fresh 寄存器，不写块槽、不建 cell（同名
+    /// 直接子占用块槽，嵌套捕获读槽 cell 与 V8 块绑定一致）。调用点经返回
+    /// 寄存器把闭包写回外层 var 绑定。
+    pub(crate) fn materialize_function_declaration_var_only(
+        &self, fd: &oxide_parser::Function, name: &str, ctx: &mut CompileCtx,
+    ) -> Result<u32, String> {
+        let reg = ctx.alloc_reg();
+        self.materialize_function_closure(fd, name, reg, ctx, false)?;
+        Ok(reg)
+    }
+
+    fn materialize_function_closure(
+        &self, fd: &oxide_parser::Function, name: &str, reg: u32, ctx: &mut CompileCtx, write_slot: bool,
+    ) -> Result<(), String> {
         let mut param_names = Vec::new();
         for (idx, param) in fd.params.items.iter().enumerate() {
             match &param.pattern {
@@ -124,19 +154,19 @@ impl Emitter {
         };
         sub_module.function_name = Some(name.to_string());
         ctx.nested.push(sub_module);
-        let var_reg = ctx.lookup(name)?;
-        ctx.reserve_reg(var_reg);
-        ctx.inst(Inst::create_closure(Operand::Reg(var_reg), ctx.nested.len() as u16));
-        if let Some(&cell_idx) = ctx.captured_bindings.get(name) {
-            ctx.inst(Inst::new(
-                OpCode::MAKE_CELL,
-                Operand::Reg(var_reg),
-                Operand::Imm(cell_idx as u16),
-                Operand::None,
-            ));
-        } else {
-            ctx.inst(Inst::new(OpCode::STORE_VAR, Operand::Reg(var_reg), Operand::Reg(var_reg), Operand::None));
+        ctx.inst(Inst::create_closure(Operand::Reg(reg), ctx.nested.len() as u16));
+        if write_slot {
+            if let Some(&cell_idx) = ctx.captured_bindings.get(name) {
+                ctx.inst(Inst::new(
+                    OpCode::MAKE_CELL,
+                    Operand::Reg(reg),
+                    Operand::Imm(cell_idx as u16),
+                    Operand::None,
+                ));
+            } else {
+                ctx.inst(Inst::new(OpCode::STORE_VAR, Operand::Reg(reg), Operand::Reg(reg), Operand::None));
+            }
         }
-        Ok(var_reg)
+        Ok(())
     }
 }