luaur_code_gen/functions/
translate_builtin_vector_normalize.rs

1use crate::enums::builtin_impl_type::BuiltinImplType;
2use crate::enums::ir_cmd::IrCmd;
3use crate::enums::ir_op_kind::IrOpKind;
4use crate::records::builtin_impl_result::BuiltinImplResult;
5use crate::records::ir_builder::IrBuilder;
6use crate::records::ir_op::IrOp;
7use luaur_vm::enums::lua_type::lua_Type;
8
9pub fn translate_builtin_vector_normalize(
10    build: &mut IrBuilder,
11    nparams: i32,
12    ra: i32,
13    arg: i32,
14    _args: IrOp,
15    _arg3: IrOp,
16    nresults: i32,
17    pcpos: i32,
18) -> BuiltinImplResult {
19    let arg1 = build.vm_reg(arg as u8);
20
21    if nparams != 1 || nresults > 1 || arg1.kind() == IrOpKind::Constant {
22        return BuiltinImplResult {
23            r#type: BuiltinImplType::None,
24            actual_result_count: -1,
25        };
26    }
27
28    let fallback = build.vm_exit(pcpos as u32);
29    let tag_vector = lua_Type::LUA_TVECTOR as u8;
30    build.load_and_check_tag(arg1, tag_vector, fallback);
31
32    let zero = build.const_int(0);
33    let a = build.inst_ir_cmd_ir_op_ir_op(IrCmd::LOAD_TVALUE, arg1, zero);
34    let sum = build.inst_ir_cmd_ir_op_ir_op(IrCmd::DOT_VEC, a, a);
35
36    let mag = build.inst_ir_cmd_ir_op(IrCmd::SQRT_FLOAT, sum);
37    let one = build.const_double(1.0);
38    let inv = build.inst_ir_cmd_ir_op_ir_op(IrCmd::DIV_FLOAT, one, mag);
39    let invvec = build.inst_ir_cmd_ir_op(IrCmd::FLOAT_TO_VEC, inv);
40
41    let result = build.inst_ir_cmd_ir_op_ir_op(IrCmd::MUL_VEC, a, invvec);
42    let result_tagged = build.inst_ir_cmd_ir_op(IrCmd::TAG_VECTOR, result);
43
44    let ra_reg = build.vm_reg(ra as u8);
45    build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_TVALUE, ra_reg, result_tagged);
46
47    BuiltinImplResult {
48        r#type: BuiltinImplType::Full,
49        actual_result_count: 1,
50    }
51}
luaur_code_gen/functions/translate_builtin_vector_normalize.rs

luaur_code_gen/functions/
translate_builtin_vector_normalize.rs
