progs/timer: angepasst
[calu.git] / progs / fibmmem.s
index 6ec5aa13fa423c07807818712a60bbe620f222f2..827c8da43aa3586dd6bd86d0021db9ec7207f064 100644 (file)
@@ -19,12 +19,24 @@ main:
        call+ u_recv_byte
        call u_send_newline
 
+       call t_init
+       ldis r1, 0
+       call t_valset
+       call t_start
+
        ldi r1, 9;
        ldi r10, list@lo ; global pointer
        ldih r10, list@hi
        call+ fibcall;
 
        push r0
+       call t_init
+       call t_stop
+       call t_valget
+       pop r3
+       push r0
+       push r3
+
        call u_init ; weil r10 ueberschrieben wird
        ldis r1, str@lo
        ldih r1, str@hi
@@ -34,6 +46,9 @@ main:
        pop r1
        call+ u_send_uint
        call u_send_newline
+       pop r1
+       call+ u_send_uint
+       call u_send_newline
 
 hang:
        br hang