Return to sequal.c CVS log

Up to [CSRG BSD Unix] / 42BSD / ingres / source / gutil

Annotation of 42BSD/ingres/source/gutil/sequal.c, revision 1.1.1.1

1.1       root        1: # include      <useful.h>
                      2: # include      <sccs.h>
                      3: 
                      4: SCCSID(@(#)sequal.c    7.1     2/5/81)
                      5: 
                      6: /*
                      7: **  SEQUAL -- string equality test
                      8: **
                      9: **     null-terminated strings `a' and `b' are tested for
                     10: **             absolute equality.
                     11: **     returns one if equal, zero otherwise.
                     12: */
                     13: 
                     14: bool
                     15: sequal(a, b)
                     16: register char  *a, *b;
                     17: {
                     18:        while (*a || *b)
                     19:                if (*a++ != *b++)
                     20:                        return(FALSE);
                     21:        return(TRUE);
                     22: }

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