xref: /original-bsd/lib/libc/tahoe/string/bcmp.s (revision 2d18f455)
1#ifdef LIBC_SCCS
2	.asciz	"@(#)bcmp.s	1.1 (Berkeley/CCI) 08/01/86"
3#endif LIBC_SCCS
4
5/* bcmp(s1, s2, n) */
6/* compare exactly 'n' */
7#include "DEFS.h"
8
9ENTRY(bcmp, 0)
10	movl	4(fp),r0
11	movl	8(fp),r1
12	mnegl	12(fp),r2
13	jeql	3f
141:
15	cmpb	(r0),(r1)
16	jneq	2f
17	incl	r0
18	incl	r1
19	aoblss	$0,r2,1b
203:
21	clrl	r0
22	ret
232:
24	movl	$1,r0
25	ret
26