2 * uprf.c -- "unsigned" lexical prefix
4 * This code is Copyright (c) 2002, by the authors of nmh. See the
5 * COPYRIGHT file in the root directory of the nmh distribution for
6 * complete copyright information.
16 uprf (char *c1, char *c2)
27 c = (isalpha(c) && isupper(c)) ? tolower(c) : c;
28 mask = (isalpha(mask) && isupper(mask)) ? tolower(mask) : mask;
31 mask = (isalpha(c) && isalpha(*c1)) ? TO_LOWER : NO_MASK;
32 if ((c | mask) != (*c1 | mask))