shithub: riscv

ref: 73e115aab038880a68c9f73b5c49d8fa12d0e5e2
dir: /sys/src/ape/lib/ap/68020/strlen.s/

View raw version 
	TEXT	strlen(SB), $0
	MOVL	s+0(FP), A1

	TSTB	(A1)+
	BEQ	null
	MOVL	A1, A2

l1:
	TSTB	(A1)+
	BNE	l1

	SUBL	A2, A1
	MOVL	A1, R0
	RTS

null:
	MOVL	$0, R0
	RTS