main shrub/shrubtools / shared / case_startb.c
 1#include "case.h"
 2
 3int case_startb(s,len,t)
 4register char *s;
 5unsigned int len;
 6register 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}