Bell 32V development
[unix-history] / usr / src / libF77 / s_cmp.c
CommitLineData
0c9e74ab
TL
1int s_cmp(a, b, la, lb) /* compare two strings */
2char *a, *b;
3long int la, lb;
4{
5char *aend, *bend;
6aend = a + la;
7
8if(la <= lb)
9 {
10 while(a < aend)
11 if(*a != *b)
12 return( *a - *b );
13 else
14 { ++a; ++b; }
15
16 }
17
18else
19 {
20 bend = b + lb;
21 while(b < bend)
22 if(*a == *b)
23 { ++a; ++b; }
24 else
25 return( *a - *b );
26 while(a < aend)
27 if(*a != ' ')
28 return(*a - ' ');
29 else ++a;
30 }
31return(0);
32}