Subversion Repositories or1k

/*

 *      ctype.h         Character classification and conversion

 */

#ifndef __CTYPE_H

#define __CTYPE_H

extern  unsigned char   __ctype[];

#define __CT_d  0x01            /* numeric digit */

#define __CT_u  0x02            /* upper case */

#define __CT_l  0x04            /* lower case */

#define __CT_c  0x08            /* control character */

#define __CT_s  0x10            /* whitespace */

#define __CT_p  0x20            /* punctuation */

#define __CT_x  0x40            /* hexadecimal */

#define toupper(c)      (islower(c) ? (c)^0x20 : (c))

#define tolower(c)      (isupper(c) ? (c)^0x20 : (c))

#define _toupper(c)     ((c)^0x20)

#define _tolower(c)     ((c)^0x20)

#define toascii(c)      ((c)&0x7F)

/* Note the '!!' is a cast to 'bool' and even BCC deletes it in an if()  */

#define isalnum(c)      (!!(__ctype[(int) c]&(__CT_u|__CT_l|__CT_d)))

#define isalpha(c)      (!!(__ctype[(int) c]&(__CT_u|__CT_l)))

#define isascii(c)      (!((c)&~0x7F))

#define iscntrl(c)      (!!(__ctype[(int) c]&__CT_c))

#define isdigit(c)      (!!(__ctype[(int) c]&__CT_d))

#define isgraph(c)      (!(__ctype[(int) c]&(__CT_c|__CT_s)))

#define islower(c)      (!!(__ctype[(int) c]&__CT_l))

#define isprint(c)      (!(__ctype[(int) c]&__CT_c))

#define ispunct(c)      (!!(__ctype[(int) c]&__CT_p))

#define isspace(c)      (!!(__ctype[(int) c]&__CT_s))

#define isupper(c)      (!!(__ctype[(int) c]&__CT_u))

#define isxdigit(c)     (!!(__ctype[(int) c]&__CT_x))

#endif /* __CTYPE_H */