progs: bench tools bei deepjit.s geadded

diff --git a/progs/deepjit.s b/progs/deepjit.s
index 6f1cb91eaf728f195ab969c5d68cec3cb8b68e4f..45a5856515eac5727ef4903b9dc0da8427a9096a 100644 (file)
--- a/progs/deepjit.s
+++ b/progs/deepjit.s
@@ -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
 

diff --git a/progs/fibmmem.s b/progs/fibmmem.s
index e7bcc862fc31d72d6574ef31ac8a060e28c36355..001dcf396a7c8b974b0e7485af4f77d07b328d84 100644 (file)
--- a/progs/fibmmem.s
+++ b/progs/fibmmem.s
@@ -19,11 +19,13 @@ main:
        call+ u_recv_byte
        call u_send_newline
 
+       ; benchprolog
        call t_init
        call t_stop
        ldis r1, 0
        call t_valset
        call t_start
+       ; /benchprolog
 
        ; fib start
        ldi r1, 9;
@@ -32,6 +34,7 @@ main:
        call+ fibcall;
        ; fib ende
 
+       ; benchepilog
        push r0
        call+ t_init
        call+ t_stop
@@ -40,6 +43,7 @@ main:
        pop r3
        push r0
        push r3
+       ; /benchepilog
 
        call u_init ; weil r10 ueberschrieben wird
        ldis r1, str@lo