FreeCalypso > hg > freecalypso-tools

view target-utils/libc/strlen.S @ 829:7e9bad4ae14b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
ringtools/examples/white-keys.pwt created
author Mychaela Falconia <falcon@freecalypso.org>
date Sun, 30 May 2021 21:56:50 +0000
parents 3670e7768ab6
children
line wrap: on
line source

	.text
	.code	32
	.globl	strlen
strlen:
	mov	r1, r0
1:	ldrb	r2, [r0], #1
	cmn	r2, #0
	bne	1b
	sbc	r0, r0, r1
	bx	lr