##
## vbcc-PowerPC libvc.a
##
## char *strcpy(char *s1,const char *s2)
## r3           r3       r4
## v0.1 21.11.97 phx
##

	.text
	.global	strcpy
strcpy:
	subi	r5,r3,1
	subi	r4,r4,1
.1:	lbzu	r0,1(r4)
	stbu	r0,1(r5)
	cmpwi	r0,0
	bne	.1
	blr

	.type	strcpy,@function
	.size	strcpy,$-strcpy