xref: /original-bsd/lib/libc/mips/string/index.s (revision 0669bf0d)
1/*-
2 * Copyright (c) 1991, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Ralph Campbell.
7 *
8 * %sccs.include.redist.c%
9 */
10
11#include <machine/machAsmDefs.h>
12
13#if defined(LIBC_SCCS) && !defined(lint)
14	ASMSTR("@(#)index.s	8.1 (Berkeley) 06/04/93")
15#endif /* LIBC_SCCS and not lint */
16
17LEAF(index)
18	lbu	a2, 0(a0)		# get a byte
19	addu	a0, a0, 1
20	beq	a2, a1, fnd
21	bne	a2, zero, index
22notfnd:
23	move	v0, zero
24	j	ra
25fnd:
26	subu	v0, a0, 1
27	j	ra
28END(index)
29