diplodocus.org Git - nmh/blob - docs/historical/mh-6.8.5/sbr/ssequal.c

   1 /* ssequal.c - initially equal? */
   2
   3
   4 ssequal (substr, str)
   5 register char  *substr,
   6                *str;
   7 {
   8     if (!substr)
   9         substr = "";
  10     if (!str)
  11         str = "";
  12
  13     while (*substr)
  14         if (*substr++ != *str++)
  15             return 0;
  16     return 1;
  17 }