Return to strncmp.s CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / lib / libc / tahoe / gen

Annotation of cci/usr/src/lib/libc/tahoe/gen/strncmp.s, revision 1.1.1.1

1.1       root        1: 
                      2: /*
                      3:  * strncmp.s   4.1 (Tahoe) June 1983 
                      4:  * 
                      5:  * Compare strings (at most n bytes):  s1>s2: >0  s1==s2: 0  s1<s2: <0
                      6:  * 
                      7:  * strncmp(s1, s2, n)
                      8:  * register char *s1, *s2;
                      9:  * register n;
                     10: */
                     11: 
                     12:        .text
                     13:        .align  1
                     14:        .globl  _strncmp
                     15: 
                     16: _strncmp:
                     17:        .word   4               /* saves r2 */
                     18:        movl    12(fp),r2
                     19:        tstl    r2              /* number of bytes to compare */
                     20:        jgtr    n_ok
                     21:        clrl    r0
                     22:        ret                     /* for n <= 0 , s1 == s2 */
                     23: n_ok:
                     24:        movl    4(fp),r0
                     25:        movl    8(fp),r1
                     26:        cmps3
                     27:        jgtr    greater
                     28:        jlss    less
                     29: equal: clrl    r0
                     30:        ret
                     31: less:  movl    $-1,r0
                     32:        ret
                     33: greater: movl  $1,r0
                     34:        ret

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.