deepjit: 'geht nicht' sagt martin
authorMarkus Hofstätter <markus.hofstaetter@gmx.net>
Wed, 12 Jan 2011 18:12:32 +0000 (19:12 +0100)
committerMarkus Hofstätter <markus.hofstaetter@gmx.net>
Wed, 12 Jan 2011 18:12:32 +0000 (19:12 +0100)
progs/deepjit.s

index b73b2386d1bc1140c8ea5068a58be2778d7c8fe3..2524ae10e125bb8926228171da4b6c460dddc15f 100644 (file)
@@ -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