progs: bench tools bei deepjit.s geadded
[calu.git] / progs / deepjit.s
index 6f1cb91eaf728f195ab969c5d68cec3cb8b68e4f..45a5856515eac5727ef4903b9dc0da8427a9096a 100644 (file)
@@ -116,6 +116,14 @@ main:
        call+ u_init
        call+ u_recv_byte
 
+       ; benchprolog
+       call t_init
+       call t_stop
+       ldis r1, 0
+       call t_valset
+       call t_start
+       ; /benchprolog
+
        ;set address of input
        ldis r1, inputdata@lo
        ldih r1, inputdata@hi
@@ -153,10 +161,25 @@ main:
        ;call jit'ed prog
        call+ prog_start
 
+       ; benchepilog
+       push r0
+       call+ t_init
+       call+ t_stop
+       call+ t_valget
+       subi r0, r0, 0xd ; offset abziehen
+       pop r3
+       push r0
+       push r3
+       ; /benchepilog
+
        ;send result
        call+ u_init
-       mov r1, r0
+       pop r1
        call u_send_byte
+       call u_send_newline
+       pop r1
+       call u_send_uint
+       call u_send_newline
 
        br+ main