use crate::enums::builtin_impl_type::BuiltinImplType;
use crate::enums::ir_cmd::IrCmd;
use crate::functions::builtin_check_double::builtin_check_double;
use crate::functions::builtin_load_double::builtin_load_double;
use crate::records::builtin_impl_result::BuiltinImplResult;
use crate::records::ir_builder::IrBuilder;
use crate::records::ir_op::IrOp;
use luaur_common::enums::luau_builtin_function::LuauBuiltinFunction;
use luaur_vm::enums::lua_type::lua_Type;
pub fn translate_builtin_2_number_to_number_libm(
build: &mut IrBuilder,
bfid: LuauBuiltinFunction,
nparams: i32,
ra: i32,
arg: i32,
args: IrOp,
nresults: i32,
pcpos: i32,
) -> BuiltinImplResult {
if nparams < 2 || nresults > 1 {
return BuiltinImplResult {
r#type: BuiltinImplType::None,
actual_result_count: -1,
};
}
let arg_reg = build.vm_reg(arg as u8);
builtin_check_double(build, arg_reg, pcpos);
builtin_check_double(build, args, pcpos);
let va = builtin_load_double(build, arg_reg);
let vb = builtin_load_double(build, args);
let vb = if bfid == LuauBuiltinFunction::LBF_MATH_LDEXP {
build.inst_ir_cmd_ir_op(IrCmd::NUM_TO_INT, vb)
} else {
vb
};
let bfid_op = build.const_uint(bfid as u32);
let res = build.inst_ir_cmd_ir_op_ir_op_ir_op(IrCmd::INVOKE_LIBM, bfid_op, va, vb);
let ra_reg = build.vm_reg(ra as u8);
build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_DOUBLE, ra_reg, res);
if ra != arg {
let tag = build.const_tag(lua_Type::LUA_TNUMBER as u8);
build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_TAG, ra_reg, tag);
}
BuiltinImplResult {
r#type: BuiltinImplType::Full,
actual_result_count: 1,
}
}