ISUPPER
set_range('A', 'Z', ISUPPER)
#define is_upper(c) (sh_ctype(c) & ISUPPER)
#define is_alpha(c) (sh_ctype(c) & (ISUPPER|ISLOWER))
#define is_name(c) (sh_ctype(c) & (ISUPPER|ISLOWER|ISUNDER))
#define is_in_name(c) (sh_ctype(c) & (ISUPPER|ISLOWER|ISUNDER|ISDIGIT))
M(ISUPPER, isupper) \