X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=3_test%2Fuartint.s;h=8f4975eebbe06db9bc908fdba30de49b61b67729;hb=c30e3b9f2e5bb47e55390fbe91e4adc7b0674736;hp=f1033f167a4f4c61758d1c9721f517059a8ab52e;hpb=83817c5f4816b2dd3f5b033b6addded7d1473ff5;p=calu.git

diff --git a/3_test/uartint.s b/3_test/uartint.s
index f1033f1..8f4975e 100644
--- a/3_test/uartint.s
+++ b/3_test/uartint.s
@@ -13,6 +13,10 @@ main:
 	br+ start
 	; stwnv r5, 0(r4)
 uartrdy:
+	ldw r7, 0(r2)
+	xor r10, r10, r10
+	ldi r10, 0x41
+	stw r10, 0(r1) ;TODO: remove plz, kkthx
 	; load instructions into ram
 	ldi r8, 0x2034 ; paddr
 	ldi r9, 0x2038 ; pdata
@@ -26,7 +30,6 @@ uartrdy:
 	;	call+ main
 	;	ret
 	;main:
-	;	ldw r7, 0(r2)
 	;	stw r7, 0(r1)
 	;halt:
 	;	br+ halt
@@ -51,13 +54,6 @@ uartrdy:
 	ldi r11, 0x8
 	ldih r11, 0xeb00
 	stw r11, 0(r9)
-	;e7390000;ldw r7, 0(r2);;
-	xor r10, r10, r10
-	ldi r10, 3
-	stw r10, 0(r8)
-	ldi r11, 0x0
-	ldih r11, 0xeb00
-	stw r11, 0(r9)
 	;e7b88000;stw r7, 0(r1);;
 	xor r10, r10, r10
 	ldi r10, 4