# ReEStr(estr:r3:PTR TO CHAR)(PTR TO CHAR)

	.text
	.global	_ReEStr

_ReEStr:
	subi	r4,r3,1
.loop:	lbzu	r0,1(r4)
	cmpwi	r0,0
	bne	.loop
	sub	r4,r4,r3

	lhz	r0,-4(r3)
	cmpw	r0,r4
	bge	.end
	sth	r4,-2(r3)
.end:	blr

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