Small speed improvement

git-svn-id: svn://svn.cc65.org/cc65/trunk@2979 b7a2c559-68d2-44c3-8de9-860c34a00d81
2004-04-19 11:38:51 +00:00
parent 5e79761321
commit 2b57b0e4f4
4 changed files with 396 additions and 11 deletions
--- a/libsrc/c128/c128-640-200-2.s
+++ b/libsrc/c128/c128-640-200-2.s
@@ -1201,13 +1201,11 @@ CALC:

 abs:
 	; a/y := abs(a/y)
-	dey
-	iny
+	cpy     #$00
 	bpl	absend
 	; negay
-neg:	clc
-	eor	#$ff
-	adc	#1
+neg:	eor	#$ff
+	add	#1
 	pha
 	tya
 	eor	#$ff