xref: /csrg-svn/lib/libc/tahoe/string/strcmp.s (revision 29699)
1*29699Ssam#ifdef LIBC_SCCS
2*29699Ssam	.asciz	"@(#)strcmp.s	1.1 (Berkeley/CCI) 08/01/86"
3*29699Ssam#endif LIBC_SCCS
4*29699Ssam
5*29699Ssam#include "DEFS.h"
6*29699Ssam
7*29699Ssam/*
8*29699Ssam * Compare strings:  s1>s2: >0  s1==s2: 0  s1<s2: <0
9*29699Ssam *
10*29699Ssam * strcmp(s1, s2)
11*29699Ssam * register char *s1, *s2;
12*29699Ssam*/
13*29699Ssam
14*29699SsamENTRY(strcmp, 0)
15*29699Ssam	movl	4(fp),r0
16*29699Ssam	movl	8(fp),r1
17*29699Ssam	cmps2
18*29699Ssam	jgtr	greater
19*29699Ssam	jlss	less
20*29699Ssamequal:	clrl	r0
21*29699Ssam	ret
22*29699Ssamless:	movl	$-1,r0
23*29699Ssam	ret
24*29699Ssamgreater: movl	$1,r0
25*29699Ssam	ret
26