Added additional entry points that clear the high word of the right operand.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4023 b7a2c559-68d2-44c3-8de9-860c34a00d81
2009-08-15 20:58:35 +00:00
parent d0f9a0d6a7
commit b1f772e9be
6 changed files with 42 additions and 11 deletions
--- a/libsrc/runtime/lumod.s
+++ b/libsrc/runtime/lumod.s
@@ -4,10 +4,15 @@
 ; CC65 runtime: modulo operation for long unsigned ints
 ;

-       	.export		tosumodeax
+       	.export		tosumod0ax, tosumodeax
       	.import		getlop, udiv32
       	.importzp	sreg, tmp3, tmp4, ptr2

+tosumod0ax:                          
+        ldy     #$00
+        sty     sreg
+        sty     sreg+1
+
 tosumodeax:
 	jsr	getlop		; Get the paramameters
 	jsr	udiv32		; Do the division