xref: /csrg-svn/lib/libc/tahoe/string/strlen.s (revision 61190)
134438Sbostic/*
2*61190Sbostic * Copyright (c) 1988, 1993
3*61190Sbostic *	The Regents of the University of California.  All rights reserved.
434438Sbostic *
542644Sbostic * %sccs.include.redist.c%
634824Sbostic *
734438Sbostic * This code is derived from software contributed to Berkeley by
834438Sbostic * Computer Consoles Inc.
934438Sbostic */
1029700Ssam
1134438Sbostic#if defined(LIBC_SCCS) && !defined(lint)
12*61190Sbostic	.asciz "@(#)strlen.s	8.1 (Berkeley) 06/04/93"
1334438Sbostic#endif /* LIBC_SCCS and not lint */
1434438Sbostic
1529700Ssam/*
1629700Ssam * Returns the number of
1729700Ssam * non-NULL bytes in string argument.
1829700Ssam */
1929700Ssam
2029700Ssam#include "DEFS.h"
2129700Ssam
2229700SsamENTRY(strlen, 0)
2329700Ssam	movl	4(fp),r0
2429700Ssam	movl	r0,r1
2529700Ssam	cmps2
2629700Ssam	subl2	4(fp),r0
2729700Ssam	ret
28