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