deps/lightning/doc/incr.c


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

#include <stdio.h>
#include <lightning.h>

static jit_state_t *_jit;

typedef int (*pifi)(int);    /* Pointer to Int Function of Int */

int main(int argc, char *argv[])
{
  jit_node_t  *in;
  pifi         incr;

  init_jit(argv[0]);
  _jit = jit_new_state();

  jit_prolog();                    /* @t{     prolog             } */
  in = jit_arg();                  /* @t{     in = arg           } */
  jit_getarg(JIT_R0, in);          /* @t{     getarg R0          } */
  jit_addi(JIT_R0, JIT_R0, 1);     /* @t{     addi   R0\, R0\, 1 } */
  jit_retr(JIT_R0);                /* @t{     retr   R0          } */

  incr = jit_emit();
  jit_clear_state();

  /* call the generated code\, passing 5 as an argument */
  printf("%d + 1 = %d\n", 5, incr(5));

  jit_destroy_state();
  finish_jit();
  return 0;
}