added __*equzero as a 'potentially' faster/smaller version of __*cmpzero that only outputs the Zero flag

Author: ZERICO2005

src/crt/dtof.src

@@ -173,7 +173,7 @@ __dtof:
 	; BC:UDE:UHL = 1 << shift
 	; (SP) = X
 	call	__lland
-	call	__llcmpzero
+	call	__llequzero
 	pop	hl
 	; DE and BC are swapped here
 	pop	bc
@@ -215,6 +215,6 @@ __dtof:
 	jr	.L.ret_copysign
 
 	.extern	__lland
-	.extern	__llcmpzero
+	.extern	__llequzero
 	.extern	__llshru
 	.extern	__lshru

src/crt/i48cmpzero.src

@@ -6,10 +6,18 @@
 	.assume	adl=1
 
 	.section	.text
+
+	.global	__i48equzero
+	.type	__i48equzero, @function
+
 	.global	__i48cmpzero
 	.type	__i48cmpzero, @function
 
+__i48equzero:
+	; Zero flag = (UDE:UHL == 0)
 __i48cmpzero:
+	; Zero flag = (UDE:UHL == 0)
+	; Sign flag = (UDE:UHL < 0)
 ; CC: 13 bytes
 ; Minimum:  8F + 3R + 2
 ; Maximum: 14F + 3R + 3

src/crt/lcmpzero.src

@@ -1,10 +1,18 @@
 	.assume	adl=1
 
 	.section	.text
+
+	.global	__lequzero
+	.type	__lequzero, @function
+
 	.global	__lcmpzero
 	.type	__lcmpzero, @function
 
+__lequzero:
+	; Zero flag = (E:UHL == 0)
 __lcmpzero:
+	; Zero flag = (E:UHL == 0)
+	; Sign flag = (E:UHL < 0)
 	inc	e
 	dec	e
 	ret	nz

src/crt/llcmpzero.src

@@ -1,10 +1,18 @@
 	.assume	adl=1
 
 	.section	.text
+
+	.global	__llequzero
+	.type	__llequzero, @function
+
 	.global	__llcmpzero
 	.type	__llcmpzero, @function
 
+__llequzero:
+	; Zero flag = (BC:UDE:UHL == 0)
 __llcmpzero:
+	; Zero flag = (BC:UDE:UHL == 0)
+	; Sign flag = (BC:UDE:UHL < 0)
 	inc	b
 	dec	b
 	ret	nz

src/libc/strtoll.src

@@ -26,7 +26,7 @@ _strtoll.maybe_out_of_range:
 	; negative
 	; check that the result is not an exact INT_MIN
 	ld	b, a		; B = (B << 1)
-	call	__llcmpzero
+	call	__llequzero
 	set	7, b
 	ret	z		; exact INT_MIN
 _strtoll.underflow:
@@ -344,4 +344,4 @@ __strtoll_common.set_overflow_bit:
 
 	.extern	_errno
 	.extern	__llneg
-	.extern	__llcmpzero
+	.extern	__llequzero

src/softfloat/s_shiftRightJam64.src

@@ -43,7 +43,7 @@ _softfloat_shiftRightJam64:
 	ld	hl, (iy + 4)
 	call	__llshl
 	xor	a, a
-	call	__llcmpzero
+	call	__llequzero
 	jr	z, .L.no_round
 	inc	a	; ld a, 1
 .L.no_round:
@@ -60,7 +60,7 @@ _softfloat_shiftRightJam64:
 .L.overflow_shift:
 	; A is zero here
 	ld	hl, (iy + 4)
-	call	__llcmpzero
+	call	__llequzero
 	ret	z
 	xor	a, a
 	sbc	hl, hl
@@ -71,6 +71,6 @@ _softfloat_shiftRightJam64:
 	inc	hl
 	ret
 
-	.extern	__llcmpzero
+	.extern	__llequzero
 	.extern	__llshl
 	.extern	__llshru