/**
 * @r0=@r0-@r1
 * r7=len
 */
static void long_sub() __naked
{
	__asm
	.globl long_sub
	.globl long_subb
long_sub:
	clr	c
long_subb:
	mov	a,@r0
	subb	a,@r1
	mov	@r0,a
	inc	r0
	inc	r1
	djnz	r7,long_xsubb
	ret

	__endasm;
}