1 files changed, 97 insertions, 0 deletions
diff --git a/examples/jit.c b/examples/jit.c
new file mode 100644
index 0000000..52cd1be
--- /dev/null
+++ b/examples/jit.c
@@ -0,0 +1,97 @@
+
+#include "config.h"
+
+#include <glib.h>
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+
+#include <orc/orcprogram.h>
+
+#define N 19
+
+int16_t src1[N];
+int16_t src2[N];
+int16_t dest[N];
+
+void test(OrcExecutor *ex);
+
+int
+main (int argc, char *argv[])
+{
+  OrcProgram *p;
+  OrcExecutor *ex;
+  int s1, s2, d1, offset, shift;
+  int t1;
+
+  orc_init ();
+
+  p = orc_program_new ();
+
+  d1 = orc_program_add_destination (p, "s16", "d1");
+  s1 = orc_program_add_source (p, "s16", "s1");
+  s2 = orc_program_add_source (p, "s16", "s2");
+  t1 = orc_program_add_temporary (p, "s16", "t1");
+  offset = orc_program_add_constant (p, "s16", 1, "offset");
+  shift = orc_program_add_constant (p, "s16", 1, "shift");
+
+  orc_program_append (p, "add_s16", t1, s1, s2);
+  orc_program_append (p, "add_s16", t1, t1, offset);
+  orc_program_append (p, "rshift_s16", d1, t1, shift);
+
+#if 0
+  orc_program_append (p, "lshift_s16", d1, s1, shift);
+  //orc_program_append (p, "sub_s16", t1, t1, shift);
+  //orc_program_append (p, "mul_s16", d1, s1, s2);
+  //orc_program_append (p, "_loadi_s16", t1, t1, shift);
+#endif
+
+  orc_program_compile (p);
+
+  if (1) {
+    int i;
+
+    for(i=0;i<N;i++){
+      src1[i] = rand()&0xf;
+      src2[i] = rand()&0xf;
+    }
+
+    ex = orc_executor_new (p);
+
+    orc_executor_set_n (ex, N-4);
+    orc_executor_set_array (ex, s1, src1);
+    orc_executor_set_array (ex, s2, src2);
+    orc_executor_set_array (ex, d1, dest);
+
+    printf("#code exec %p\n", ex->program->code_exec);
+
+    orc_executor_run (ex);
+    //orc_executor_emulate (ex);
+
+    for(i=0;i<N;i++){
+      printf("#  %4d %4d %4d %4d\n", src1[i], src2[i], dest[i],
+          (src1[i] + src2[i] + 1) >> 1);
+    }
+
+    orc_executor_free (ex);
+  }
+
+  orc_program_free (p);
+
+  return 0;
+}
+
+
+
+void
+test1 (int16_t *dest, int16_t *src1, int16_t *src2, int n)
+{
+  int i;
+  int16_t t1, t2;
+  for(i=0;i<n;i++){
+    t1 = src1[i] + src2[i];
+    t2 = t1 + 1;
+    dest[i] = t2>>1;
+  }
+}
+