use crate::enums::builtin_impl_type::BuiltinImplType;
use crate::enums::ir_cmd::IrCmd;
use crate::enums::ir_condition::IrCondition;
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;
pub fn translate_builtin_math_is_nan(
build: &mut IrBuilder,
nparams: i32,
ra: i32,
arg: i32,
_args: IrOp,
nresults: i32,
pcpos: i32,
) -> BuiltinImplResult {
if nparams < 1 || nresults > 1 {
return BuiltinImplResult {
r#type: BuiltinImplType::None,
actual_result_count: -1,
};
}
let vm_reg_arg = build.vm_reg(arg as u8);
builtin_check_double(build, vm_reg_arg, pcpos);
let varg = builtin_load_double(build, vm_reg_arg);
let t_number = build.const_tag(0x03); let t_boolean = build.const_tag(0x01);
let cond_op = build.cond(IrCondition::NotEqual);
let result = build.inst_ir_cmd_ir_op_ir_op_ir_op_ir_op_ir_op(
IrCmd::CMP_SPLIT_TVALUE,
t_number,
t_number,
varg,
varg,
cond_op,
);
let vm_reg_ra = build.vm_reg(ra as u8);
build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_INT, vm_reg_ra, result);
build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_TAG, vm_reg_ra, t_boolean);
BuiltinImplResult {
r#type: BuiltinImplType::Full,
actual_result_count: 1,
}
}