chiark - git - mdw - ezmlm/blob - case_startb.c

   1 #include "case.h"
   2
   3 int case_startb(s,len,t)
   4 register char *s;
   5 unsigned int len;
   6 register char *t;
   7 {
   8   register unsigned char x;
   9   register unsigned char y;
  10
  11   for (;;) {
  12     y = *t++ - 'A';
  13     if (y <= 'Z' - 'A') y += 'a'; else y += 'A';
  14     if (!y) return 1;
  15     if (!len) return 0;
  16     --len;
  17     x = *s++ - 'A';
  18     if (x <= 'Z' - 'A') x += 'a'; else x += 'A';
  19     if (x != y) return 0;
  20   }
  21 }