67 lines
2.4 KiB
C
67 lines
2.4 KiB
C
/*------------------------------------------------------*/
|
|
/* SH SERIES C Compiler Ver. 1.0 */
|
|
/* Copyright (c) 1992 Hitachi,Ltd. */
|
|
/* Licensed material of Hitachi,Ltd. */
|
|
/*------------------------------------------------------*/
|
|
/*****************************************************************/
|
|
/* SPEC ; */
|
|
/* NAME = ctype : */
|
|
/* FUNC = */
|
|
/* ; */
|
|
/* */
|
|
/* */
|
|
/* */
|
|
/* CLAS = UNIT ; */
|
|
/* END ; */
|
|
/*****************************************************************/
|
|
#ifndef _CTYPE
|
|
#define _CTYPE
|
|
|
|
#ifdef __cplusplus
|
|
extern "C" {
|
|
#endif
|
|
|
|
extern unsigned char _ctype[];
|
|
|
|
extern int isalnum(int);
|
|
extern int isalpha(int);
|
|
extern int iscntrl(int);
|
|
extern int isdigit(int);
|
|
extern int isgraph(int);
|
|
extern int islower(int);
|
|
extern int isprint(int);
|
|
extern int ispunct(int);
|
|
extern int isspace(int);
|
|
extern int isupper(int);
|
|
extern int isxdigit(int);
|
|
extern int tolower(int);
|
|
extern int toupper(int);
|
|
#ifdef __cplusplus
|
|
}
|
|
#endif
|
|
|
|
#define _UPPER 0x01
|
|
#define _LOWER 0x02
|
|
#define _DIGIT 0x04
|
|
#define _SPACE 0x08
|
|
#define _PUNCT 0x10
|
|
#define _CNTRL 0x20
|
|
#define _WHITE 0x40
|
|
#define _HEX 0x80
|
|
|
|
#define isalnum(c) (_ctype[(c) & 0xff] & (_UPPER | _LOWER | _DIGIT))
|
|
#define isalpha(c) (_ctype[(c) & 0xff] & (_UPPER | _LOWER))
|
|
#define iscntrl(c) (_ctype[(c) & 0xff] & _CNTRL)
|
|
#define isdigit(c) (_ctype[(c) & 0xff] & _DIGIT)
|
|
#define isgraph(c) (_ctype[(c) & 0xff] & (_UPPER | _LOWER | _DIGIT | _PUNCT))
|
|
#define islower(c) (_ctype[(c) & 0xff] & _LOWER)
|
|
#define isprint(c) (_ctype[(c) & 0xff] & (_UPPER|_LOWER|_DIGIT|_PUNCT|_SPACE))
|
|
#define ispunct(c) (_ctype[(c) & 0xff] & _PUNCT)
|
|
#define isspace(c) (_ctype[(c) & 0xff] & _WHITE)
|
|
#define isupper(c) (_ctype[(c) & 0xff] & _UPPER)
|
|
#define isxdigit(c) (_ctype[(c) & 0xff] & _HEX)
|
|
#define tolower(c) (isupper(c) ? ((c)-'A'+'a') : (c))
|
|
#define toupper(c) (islower(c) ? ((c)-'a'+'A') : (c))
|
|
|
|
#endif
|