Runtime function improvements by Piotr Fusik

git-svn-id: svn://svn.cc65.org/cc65/trunk@2577 b7a2c559-68d2-44c3-8de9-860c34a00d81
2003-10-28 08:47:47 +00:00
parent 4319fd9cc7
commit 6d8cdae722
7 changed files with 86 additions and 90 deletions
--- a/libsrc/runtime/asrax3.s
+++ b/libsrc/runtime/asrax3.s
@@ -1,5 +1,6 @@
 ;
-; Ullrich von Bassewitz, 06.08.1998
+; Piotr Fusik, 24.10.2003
+; originally by Ullrich von Bassewitz
 ;
 ; CC65 runtime: Scale the primary register by 8
 ;
@@ -8,17 +9,15 @@
 	.importzp	tmp1

 asrax3:	stx	tmp1
-      	cpx	#$80  		; Put bit 7 into carry
-      	ror	tmp1
-      	ror	a
+	cpx	#$80		; Put bit 7 into carry
+	ror	tmp1
+	ror	a
+	cpx	#$80
+	ror	tmp1
+	ror	a
+	cpx	#$80
+	ror	tmp1
+	ror	a
 	ldx	tmp1
-      	cpx	#$80
-      	ror	tmp1
-      	ror	a
-	ldx	tmp1
-      	cpx	#$80
-      	ror	tmp1
-      	ror	a
-      	ldx	tmp1
-      	rts
+	rts