version 1.5, 2003/06/25 03:37:32 |
version 1.6, 2003/06/25 03:38:34 |
|
|
int *J; /* will be overlaid on class */ |
int *J; /* will be overlaid on class */ |
long *ixold; /* will be overlaid on klist */ |
long *ixold; /* will be overlaid on klist */ |
long *ixnew; /* will be overlaid on file[1] */ |
long *ixnew; /* will be overlaid on file[1] */ |
char *chrtran; /* translation table for case-folding */ |
u_char *chrtran; /* translation table for case-folding */ |
|
|
static void fetch(long *, int, int, FILE *, char *, int); |
static void fetch(long *, int, int, FILE *, char *, int); |
static void output(void); |
static void output(void); |
|
|
* chrtran points to one of 2 translation tables: cup2low if folding upper to |
* chrtran points to one of 2 translation tables: cup2low if folding upper to |
* lower case clow2low if not folding case |
* lower case clow2low if not folding case |
*/ |
*/ |
char clow2low[256] = { |
u_char clow2low[256] = { |
0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, |
0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, |
0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, |
0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, |
0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, |
0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, |
|
|
0xfd, 0xfe, 0xff |
0xfd, 0xfe, 0xff |
}; |
}; |
|
|
char cup2low[256] = { |
u_char cup2low[256] = { |
0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, |
0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, |
0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, |
0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, |
0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, |
0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, |