- 325 - UNIX

/* */ static int swapped(uchar *word, uchar *s) { register int i,j,k; register len = strlen(word);

for(i=0;i < len-1;i++){ k=0; for(j=0 ; j < i ; j++) version[k++]=word[j]; version[k++]=word[i+1]; version[k++]=word[i]; for(j=i+2 ; j < len ; j++) version[k++]=word[j]; version[k]='\0'; if( eqi( version, s)) return 1; /* OK */ } return 0; /* FAIL */ }

uchar *words[] = { (uchar *) "bag", (uchar *) "bags", (uchar *) "cook", (uchar *) "cool", (uchar *) "bug", (uchar *) "buy", (uchar *) "cock", NULL };

#define Bcase(x, operators) case x: { operators; } break;

char *cname[5] = { " ", " ", " ", " ", " " };