git: 9front

ref: 18c748051fa499cf98df6176b88c0f3d1f71bf2f
dir: /sys/src/ape/lib/ap/68020/strcat.s/

View raw version 
	TEXT	strcat(SB), $0
	MOVL	s1+0(FP), A2
	MOVL	s2+4(FP), A1

l1:	TSTB	(A2)+
	BNE	l1

	MOVB	(A1)+, -1(A2)
	BEQ	done

l2:	MOVB	(A1)+, (A2)+
	BNE	l2

done:	MOVL	s1+0(FP), R0
	RTS