stage1 修复错误 提供类型检查

stage1/spl_emit.c

@@ -185,6 +185,9 @@ void emit_patch_call_fixups(spl_emit_t *e, spl_prog_t *prog) {
         if (fe->func_idx >= 0 && fe->func_idx < (int)vec_size(prog->funcs)) {
             spl_val_t addr = vec_at(prog->funcs, fe->func_idx).address;
             vec_at(prog->insns, fe->insn_idx).imm = addr;
+        } else {
+            fprintf(stderr, "WARN: fixup func_idx=%d out of bounds [0,%zu), insn_idx=%zu\n",
+                    fe->func_idx, vec_size(prog->funcs), fe->insn_idx);
         }
     }
 }