shithub: riscv

ref: 17ebe55031ae6945ad1f671b69267a672328e4b1
dir: /sys/src/libc/68000/strchr.s/

View raw version
	TEXT	strchr(SB), $0

	MOVL	s+0(FP), A0
	MOVB	c+7(FP), R2
	BEQ	null

l:
	MOVB	(A0)+, R1
	BEQ	out
	CMPB	R1, R2
	BNE	l

	MOVL	A0, R0
	ADDL	$-1, R0
	RTS

out:
	CLRL	R0
	RTS

null:
	TSTB	(A0)+
	BNE	null

	MOVL	A0, R0
	ADDL	$-1, R0
	RTS