luaur-code-gen 0.1.0

Native (A64/X64) code generation for Luau (Rust).
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

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;

pub fn translate_builtin_math_log(
    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 mut libm_id = 12; // LBF_MATH_LOG
    let mut denom: Option<f64> = None;

    if nparams != 1 {
        let y = build.function.as_double_op(args);

        if y.is_none() {
            return BuiltinImplResult {
                r#type: BuiltinImplType::None,
                actual_result_count: -1,
            };
        }

        let y_val = y.unwrap();
        if y_val == 2.0 {
            libm_id = 256; // LBF_IR_MATH_LOG2
        } else if y_val == 10.0 {
            libm_id = 13; // LBF_MATH_LOG10
        } else {
            denom = Some(y_val.ln());
        }
    }

    let arg_op = build.vm_reg(arg as u8);
    builtin_check_double(build, arg_op, pcpos);

    let va = builtin_load_double(build, arg_op);

    let const_libm_id = build.const_uint(libm_id as u32);
    let mut res = build.inst_ir_cmd_ir_op_ir_op(IrCmd::INVOKE_LIBM, const_libm_id, va);

    if let Some(d) = denom {
        let const_d = build.const_double(d);
        res = build.inst_ir_cmd_ir_op_ir_op(IrCmd::DIV_NUM, res, const_d);
    }

    let ra_op = build.vm_reg(ra as u8);
    build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_DOUBLE, ra_op, res);

    if ra != arg {
        let const_tag = build.const_tag(0); // LUA_TNUMBER
        build.inst_ir_cmd_ir_op_ir_op(IrCmd::STORE_TAG, ra_op, const_tag);
    }

    BuiltinImplResult {
        r#type: BuiltinImplType::Full,
        actual_result_count: 1,
    }
}