TOUPPER
t[i] = TOUPPER(s[i]);
CCHR(TOUPPER(c)) : CCHR(c);
lputc(linep, loffs, TOUPPER(c));
c = TOUPPER(c);