From: Martin Perner <martin@perner.cc>
Date: Fri, 14 Jan 2011 14:16:48 +0000 (+0100)
Subject: deepjit: bugfixed deepjit wit dt_inc
X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=calu.git;a=commitdiff_plain;h=c5fe3ea48e248612b385b6fb42314839c1299993

deepjit: bugfixed deepjit wit dt_inc
---

diff --git a/progs/deepjit.s b/progs/deepjit.s
index 871879a..6f1cb91 100644
--- a/progs/deepjit.s
+++ b/progs/deepjit.s
@@ -116,9 +116,6 @@ main:
 	call+ u_init
 	call+ u_recv_byte
 
-	ldis r1, 0x48
-	call+ u_send_byte
-
 	;set address of input
 	ldis r1, inputdata@lo
 	ldih r1, inputdata@hi
@@ -156,10 +153,10 @@ main:
 	;call jit'ed prog
 	call+ prog_start
 
+	;send result
 	call+ u_init
-
 	mov r1, r0
-	call+ u_send_byte
+	call u_send_byte
 
 	br+ main
 
@@ -620,7 +617,6 @@ vm_not:
 
 	br+ vm_loop
 
-prog_start:
 
 .data
 jumptable:
diff --git a/progs/dt_inc.s b/progs/dt_inc.s
index 50165b9..101ee51 100644
--- a/progs/dt_inc.s
+++ b/progs/dt_inc.s
@@ -49,15 +49,12 @@ u_send_byte:
 u_send_uint:
 	addi r8, r1, 0
 	;usb_sendbuffersafe ("0x", 2);
-	xor r1, r1, r1
 	ldi r1, 0x30
 	call u_send_byte
-	xor r1, r1, r1
 	ldi r1, 0x78
 	call u_send_byte
 	;j = 0
 	xor r7, r7, r7
-	xor r6, r6, r6
 	ldi r6, int2hex@lo
 	ldih r6, int2hex@hi
 u_send_uint_loop:
@@ -89,7 +86,6 @@ u_send_string_int:
 	br u_send_string_int
 
 u_send_newline:
-	xor r1, r1, r1
 	ldi r1, 0x0a
 	call u_send_byte
 	ldi r1, 0x0d
@@ -97,7 +93,6 @@ u_send_newline:
 	ret
 
 u_init:
-	xor r10, r10, r10
 	ldi r10, UART_BASE@lo
 	ldih r10, UART_BASE@hi
 	ret
@@ -106,3 +101,6 @@ sseg_displ:
 	ldi r2, SSEG_BASE
 	stw r1, 0(r2)
 	ret
+
+;for deepjit
+prog_start: