From: Bernhard Urban <lewurm@gmail.com>
Date: Fri, 14 Jan 2011 15:22:51 +0000 (+0100)
Subject: progs: added timer for fibmmem
X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=calu.git;a=commitdiff_plain;h=c9b5494d6e0bb103cdc070f8517dfb829de33463

progs: added timer for fibmmem
---

diff --git a/progs/fibmmem.s b/progs/fibmmem.s
index 827c8da..e7bcc86 100644
--- a/progs/fibmmem.s
+++ b/progs/fibmmem.s
@@ -20,19 +20,23 @@ main:
 	call u_send_newline
 
 	call t_init
+	call t_stop
 	ldis r1, 0
 	call t_valset
 	call t_start
 
+	; fib start
 	ldi r1, 9;
 	ldi r10, list@lo ; global pointer
 	ldih r10, list@hi
 	call+ fibcall;
+	; fib ende
 
 	push r0
-	call t_init
-	call t_stop
-	call t_valget
+	call+ t_init
+	call+ t_stop
+	call+ t_valget
+	subi r0, r0, 0xd ; offset abziehen
 	pop r3
 	push r0
 	push r3