	AREA	|C$$CODE|, CODE, READONLY

	EXPORT	pcmadd
	EXPORT	pcmcpy

pcmadd
	; r0 = dst
	; r1 = src
	; r2 = n
	STMFD	r13!,{r4-r8,r14}
pcmadd_lp
	LDMIA	r0,{r3,r4,r5,r6}
	LDMIA	r1!,{r7,r8,r12,r14}
	ADD	r3,r3,r7
	ADD	r4,r4,r8
	ADD	r5,r5,r12
	ADD	r6,r6,r14
	STMIA	r0!,{r3,r4,r5,r6}
	SUBS	r2,r2,#4
	BGT	pcmadd_lp

	LDMFD	r13!,{r4-r8,PC}

pcmcpy
	; r0 = dst
	; r1 = src
	; r2 = n
	STMFD	r13!,{r4-r8,r14}
pcmcpy_lp
	LDMIA	r1!,{r3,r4,r5,r6,r7,r8,r12,r14}
	STMIA	r0!,{r3,r4,r5,r6,r7,r8,r12,r14}
	SUBS	r2,r2,#8
	BGT	pcmcpy_lp

	LDMFD	r13!,{r4-r8,PC}

	END
