URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libc/] [machine/] [rx/] [strlen.S] - Rev 262
Go to most recent revision | Compare with Previous | Blame | View Log
.file "strlen.S"
.section .text
.global _strlen
.type _strlen,@function
_strlen:
add #0, r1, r4 ; Save a copy of the string start address and set the condition flags.
beq null_string ; Test for a NULL pointer.
mov #-1, r3 ; Set a limit on the number of bytes examined.
mov #0, r2 ; Stop searching when we find a NUL byte.
suntil.b ; Search until *r1 == r2
sub #1, r1 ; suntil.b leaves r1 pointing to the byte beyond the match.
null_string:
sub r4, r1 ; Compute the length.
rts
Go to most recent revision | Compare with Previous | Blame | View Log