deepjit: to test for hw

diff --git a/progs/deepjit.s b/progs/deepjit.s
index 97008f9da9ec1ebf37fc37e2345ad2e00c83551a..ef127c2c63941aacf36ea0b4f92ec57bd9838eb4 100644 (file)
--- a/progs/deepjit.s
+++ b/progs/deepjit.s
@@ -140,8 +140,8 @@ u_test:
        ldih r1, inputdata@hi
 
        ;set address of program start
-       ldis r2, prog_start@lo
-       ldih r2, prog_start@hi
+       ldis r2, (prog_start/4)@lo
+       ldih r2, (prog_start/4)@hi
 
        ;set address to instruction table
        ldis r3, instrtable@lo
@@ -271,7 +271,7 @@ vm_defer:
 
        ;generate branch
        sub r11, r6, r8
-       lrs r11, r11, 2
+       ;lrs r11, r11, 2
        ;set the upper 16 bit 0
        andx r11, 0xFFFF
        ;shift to the position of imm in br
@@ -318,7 +318,7 @@ vm_mul:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 52
+       addi r2, r2, 13
 
        br+ vm_loop
 
@@ -340,7 +340,7 @@ vm_add:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 16
+       addi r2, r2, 4
 
        br+ vm_loop
 
@@ -362,7 +362,7 @@ vm_sub:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 16
+       addi r2, r2, 4
 
        br+ vm_loop
 
@@ -388,7 +388,7 @@ vm_consts:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 8
+       addi r2, r2, 2
 
        br+ vm_loop
 
@@ -412,7 +412,7 @@ vm_lessthan:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 20
+       addi r2, r2, 5
 
        br+ vm_loop
 
@@ -429,7 +429,7 @@ vm_dup:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 8
+       addi r2, r2, 2
 
        br+ vm_loop
 
@@ -489,7 +489,7 @@ vm_imm:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 12
+       addi r2, r2, 3
 
        ;pc+4
        addi r1, r1, 4
@@ -523,7 +523,7 @@ vm_jmp:
        PROGINSTR
 
        ;we add the offset to this instruction
-       addi r8, r2, 12
+       addi r8, r2, 3
 
 
        ;we know calculate the jump destination
@@ -554,7 +554,7 @@ vm_jmp:
        sub r8, r0, r8
        ;we shift 2 bits out, because rel. br takes instr.
        ;count and not address amount ...
-       lrs r8, r8, 2
+       ;lrs r8, r8, 2
        ;set the upper 16 bit 0
        andx r8, 0xFFFF
        ;shift to the position of imm in br
@@ -565,7 +565,7 @@ vm_jmp:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 16
+       addi r2, r2, 4
 
        br+ vm_loop
 
@@ -591,7 +591,7 @@ vm_possign:
        ;increment defer table address
        addi r9, r9, 8
        ;increment address
-       addi r2, r2, 16
+       addi r2, r2, 4
        br+ vm_loop
 
 ;case P
@@ -606,7 +606,7 @@ vm_pop:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 4
+       addi r2, r2, 1
 
        br+ vm_loop
 
@@ -628,7 +628,7 @@ vm_xch:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 16
+       addi r2, r2, 4
 
        br+ vm_loop
 
@@ -648,7 +648,7 @@ vm_not:
        PROGINSTR
 
        ;increment address
-       addi r2, r2, 12
+       addi r2, r2, 3
 
        br+ vm_loop