1*99e10043Salnsn #include "sljitLir.h"
2*99e10043Salnsn
3*99e10043Salnsn #include <stdio.h>
4*99e10043Salnsn #include <stdlib.h>
5*99e10043Salnsn
6*99e10043Salnsn typedef long (*func2_t)(long a, long b);
7*99e10043Salnsn
8*99e10043Salnsn /*
9*99e10043Salnsn This example, we generate a function like this:
10*99e10043Salnsn
11*99e10043Salnsn long func(long a, long b)
12*99e10043Salnsn {
13*99e10043Salnsn long i;
14*99e10043Salnsn long ret = 0;
15*99e10043Salnsn for (i = 0; i < a; ++i) {
16*99e10043Salnsn ret += b;
17*99e10043Salnsn }
18*99e10043Salnsn return ret;
19*99e10043Salnsn }
20*99e10043Salnsn */
21*99e10043Salnsn
loop(long a,long b)22*99e10043Salnsn static int loop(long a, long b)
23*99e10043Salnsn {
24*99e10043Salnsn void *code;
25*99e10043Salnsn unsigned long len;
26*99e10043Salnsn func2_t func;
27*99e10043Salnsn
28*99e10043Salnsn struct sljit_label *loopstart;
29*99e10043Salnsn struct sljit_jump *out;
30*99e10043Salnsn
31*99e10043Salnsn /* Create a SLJIT compiler */
32*99e10043Salnsn struct sljit_compiler *C = sljit_create_compiler();
33*99e10043Salnsn
34*99e10043Salnsn /* 2 arg, 2 temp reg, 2 saved reg */
35*99e10043Salnsn sljit_emit_enter(C, 0, 2, 2, 2, 0, 0, 0);
36*99e10043Salnsn
37*99e10043Salnsn /* R0 = 0 */
38*99e10043Salnsn sljit_emit_op2(C, SLJIT_XOR, SLJIT_R1, 0, SLJIT_R1, 0, SLJIT_R1, 0);
39*99e10043Salnsn /* RET = 0 */
40*99e10043Salnsn sljit_emit_op1(C, SLJIT_MOV, SLJIT_RETURN_REG, 0, SLJIT_IMM, 0);
41*99e10043Salnsn /* loopstart: */
42*99e10043Salnsn loopstart = sljit_emit_label(C);
43*99e10043Salnsn /* R1 >= a --> jump out */
44*99e10043Salnsn out = sljit_emit_cmp(C, SLJIT_GREATER_EQUAL, SLJIT_R1, 0, SLJIT_S0, 0);
45*99e10043Salnsn /* RET += b */
46*99e10043Salnsn sljit_emit_op2(C, SLJIT_ADD, SLJIT_RETURN_REG, 0, SLJIT_RETURN_REG, 0, SLJIT_S1, 0);
47*99e10043Salnsn /* R1 += 1 */
48*99e10043Salnsn sljit_emit_op2(C, SLJIT_ADD, SLJIT_R1, 0, SLJIT_R1, 0, SLJIT_IMM, 1);
49*99e10043Salnsn /* jump loopstart */
50*99e10043Salnsn sljit_set_label(sljit_emit_jump(C, SLJIT_JUMP), loopstart);
51*99e10043Salnsn /* out: */
52*99e10043Salnsn sljit_set_label(out, sljit_emit_label(C));
53*99e10043Salnsn
54*99e10043Salnsn /* return RET */
55*99e10043Salnsn sljit_emit_return(C, SLJIT_MOV, SLJIT_RETURN_REG, 0);
56*99e10043Salnsn
57*99e10043Salnsn /* Generate machine code */
58*99e10043Salnsn code = sljit_generate_code(C);
59*99e10043Salnsn len = sljit_get_generated_code_size(C);
60*99e10043Salnsn
61*99e10043Salnsn /* Execute code */
62*99e10043Salnsn func = (func2_t)code;
63*99e10043Salnsn printf("func return %ld\n", func(a, b));
64*99e10043Salnsn
65*99e10043Salnsn /* dump_code(code, len); */
66*99e10043Salnsn
67*99e10043Salnsn /* Clean up */
68*99e10043Salnsn sljit_free_compiler(C);
69*99e10043Salnsn sljit_free_code(code);
70*99e10043Salnsn return 0;
71*99e10043Salnsn }
72*99e10043Salnsn
main()73*99e10043Salnsn int main()
74*99e10043Salnsn {
75*99e10043Salnsn return loop(4, 5);
76*99e10043Salnsn }
77