More entry points for long ops that clear the high word of the lhs.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4025 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/runtime/land.s

@@ -4,10 +4,16 @@
 ; CC65 runtime: and on longs
 ;
 
-	.export		tosandeax
+	.export		tosand0ax, tosandeax
 	.import		addysp1
 	.importzp	sp, sreg, tmp1
 
+                                   
+tosand0ax:
+        ldy     #$00
+        sty     sreg
+        sty     sreg+1
+
 tosandeax:
        	ldy	#0
        	and	(sp),y	       	; byte 0

libsrc/runtime/lor.s

@@ -4,9 +4,15 @@
 ; CC65 runtime: or on longs
 ;
 
-	.export		tosoreax
+	.export		tosor0ax, tosoreax
 	.import		addysp1
 	.importzp	sp, sreg, tmp1
+                                  
+
+tosor0ax:
+        ldy     #$00
+        sty     sreg
+        sty     sreg+1 
 
 tosoreax:
        	ldy	#0

libsrc/runtime/ludiv.s

@@ -4,11 +4,16 @@
 ; CC65 runtime: division for long unsigned ints
 ;
 
-       	.export		tosudiveax, getlop, udiv32
+       	.export		tosudiv0ax, tosudiveax, getlop, udiv32
 	.import		addysp1
 	.importzp	sp, sreg, tmp3, tmp4, ptr1, ptr2, ptr3, ptr4
 
-tosudiveax:
+tosudiv0ax:
+        ldy     #$00
+        sty     sreg
+        sty     sreg+1
+
+tosudiveax:                         
 	jsr	getlop		; Get the paramameters
  	jsr	udiv32		; Do the division
  	lda	ptr1		; Result is in ptr1:sreg

libsrc/runtime/lxor.s

@@ -4,11 +4,16 @@
 ; CC65 runtime: xor on longs
 ;
 
-	.export		tosxoreax
+	.export		tosxor0ax, tosxoreax
 	.import		addysp1
 	.importzp	sp, sreg, tmp1
 
-tosxoreax:
+tosxor0ax:
+        ldy     #$00
+        sty     sreg
+        sty     sreg+1
+
+tosxoreax:                         
        	ldy    	#0
        	eor    	(sp),y		; byte 0
 	sta    	tmp1