2.11BSD#431 - /usr/ingres/source/gutil/bequal.c

   1: /*
   2: **  BLOCK EQUALITY TEST
   3: **
   4: **	blocks `a' and `b', both of length `l', are tested
   5: **		for absolute equality.
   6: **	Returns one for equal, zero otherwise.
   7: */
   8: 
   9: bequal(a, b, l)
  10: char    *a, *b;
  11: int l;
  12: {
  13:     register char       *p, *q;
  14:     register int        m;
  15: 
  16:     p = a;
  17:     q = b;
  18:     for (m = l; m > 0; m -= 1)
  19:         if (*p++ != *q++)
  20:             return(0);
  21:     return(1);
  22: }

Defined functions