shithub: riscv

ref: 5ebb1a29d8250027e8b7f2287f3bfa3a6f3d13ac
dir: /sys/src/ape/lib/ap/68020/strcmp.s/

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

l1:	MOVB	(A1)+, R0
	BEQ	end
	CMPB	R0, (A2)+
	BEQ	l1

	BCS	gtr
	MOVL	$-1, R0
	RTS

gtr:	MOVL	$1, R0
	RTS

end:	TSTB	(A2)
	BNE	gtr
	CLRL	R0
	RTS