projects
/
calu.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
0a3f69d
)
deepjit: 'geht nicht' sagt martin
author
Markus Hofstätter
<markus.hofstaetter@gmx.net>
Wed, 12 Jan 2011 18:12:32 +0000
(19:12 +0100)
committer
Markus Hofstätter
<markus.hofstaetter@gmx.net>
Wed, 12 Jan 2011 18:12:32 +0000
(19:12 +0100)
progs/deepjit.s
patch
|
blob
|
history
diff --git
a/progs/deepjit.s
b/progs/deepjit.s
index b73b2386d1bc1140c8ea5068a58be2778d7c8fe3..2524ae10e125bb8926228171da4b6c460dddc15f 100644
(file)
--- a/
progs/deepjit.s
+++ b/
progs/deepjit.s
@@
-128,6
+128,12
@@
u_recv_byte:
xor r0, r0, r0
ldw r0, UART_RECV(r10)
;recv byte
xor r0, r0, r0
ldw r0, UART_RECV(r10)
;recv byte
+ ldi r0, 0x48
+u_test:
+ ldw r9, UART_STATUS(r10)
+ andx r9, UART_TRANS_EMPTY
+ brnz+ u_test ; branch if not zero
+ stb r0, UART_TRANS(r10)
;set address of input
ldil r1, inputdata@lo
;set address of input
ldil r1, inputdata@lo
@@
-151,10
+157,20
@@
u_recv_byte:
;set programmer address
stw r2, PADDR(r13)
;set programmer address
stw r2, PADDR(r13)
-
;call jit compiler
call+ jit
;call jit compiler
call+ jit
+ ldi r10, UART_BASE@lo
+ ldih r10, UART_BASE@hi
+ ldi r0, 0x46
+u_panic:
+ ldw r9, UART_STATUS(r10)
+ andx r9, UART_TRANS_EMPTY
+ brnz+ u_panic ; branch if not zero
+ stb r0, UART_TRANS(r10)
+
+
+
;set address to stack
;ldil r3, stack@lo
;ldih r3, stack@hi
;set address to stack
;ldil r3, stack@lo
;ldih r3, stack@hi
@@
-175,6
+191,7
@@
u_send_byte:
andx r9, UART_TRANS_EMPTY
brnz+ u_send_byte ; branch if not zero
stb r0, UART_TRANS(r10)
andx r9, UART_TRANS_EMPTY
brnz+ u_send_byte ; branch if not zero
stb r0, UART_TRANS(r10)
+
;send result
br+ main
;send result
br+ main