optimized carry in strcspn/strpbrk

Author: ZERICO2005

src/libc/strcspn.src

@@ -31,16 +31,15 @@ __strcspn_strpbrk_common:
 	ld	c, a
 	cpir
 	sbc	hl, hl
-	scf
 	sbc	hl, bc		; Always sets carry
 	ex	(sp), hl
-	pop	iy		; IY = strlen(reject)
+	pop	iy		; IY = strlen(reject) + 1
 	dec	hl		; HL = reject - 1
 	push	de
 .loop:
 	ld	a, (de)		; A = *str++
 	inc	de
-	lea	bc, iy + 1	; BC = strlen(reject) + 1
+	lea	bc, iy		; BC = strlen(reject) + 1
 	add	hl, bc		; HL = reject + strlen(reject)
 	cpdr			; Find A in reject, including null terminator
 	jr	nz, .loop	; Loop if no match