X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=progs%2Fdeepjit.s;h=45a5856515eac5727ef4903b9dc0da8427a9096a;hb=16e4a5d83c4442b0e642066ea58b238b257e9c37;hp=6f1cb91eaf728f195ab969c5d68cec3cb8b68e4f;hpb=c9b5494d6e0bb103cdc070f8517dfb829de33463;p=calu.git

diff --git a/progs/deepjit.s b/progs/deepjit.s
index 6f1cb91..45a5856 100644
--- 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