diplodocus.org Git - nmh/blob - docs/historical/mh-jun-1982/Extras/libh/equal.c

   1 #ifdef COMMENT
   2         Proprietary Rand Corporation, 1981.
   3         Further distribution of this software
   4         subject to the terms of the Rand
   5         license agreement.
   6 #endif
   7
   8 equal(s1,s2)
   9 char *s1, *s2;
  10 {
  11         register char *r1, *r2;
  12         r1 = s1; r2 = s2;
  13         while (*r1++ == *r2)
  14                 if (*r2++ == 0) return (1);
  15         return(0);
  16 }