Return to ctype.h CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / jove

Annotation of 43BSD/contrib/jove/ctype.h, revision 1.1.1.1

1.1       root        1: /*************************************************************************
                      2:  * This program is copyright (C) 1985, 1986 by Jonathan Payne.  It is    *
                      3:  * provided to you without charge for use only on a licensed Unix        *
                      4:  * system.  You may copy JOVE provided that this notice is included with *
                      5:  * the copy.  You may not sell copies of this program or versions        *
                      6:  * modified for use on microcomputer systems, unless the copies are      *
                      7:  * included with a Unix system distribution and the source is provided.  *
                      8:  *************************************************************************/
                      9: 
                     10: /* The code in this file was snarfed from ctype.h and modified for JOVE. */
                     11: 
                     12: #define        _U      01
                     13: #define        _L      02
                     14: #define        _N      04
                     15: #define _P     010
                     16: #define _C     020
                     17: #define _W     040
                     18: #define _Op    0100
                     19: #define _Cl    0200
                     20: 
                     21: extern int     SyntaxTable;
                     22: #define iswhite(c)     (isspace(c))
                     23: #define isword(c)      ((CharTable[SyntaxTable])[c]&(_W))
                     24: #define        isalpha(c)      ((CharTable[SyntaxTable])[c]&(_U|_L))
                     25: #define        isupper(c)      ((CharTable[SyntaxTable])[c]&_U)
                     26: #define        islower(c)      ((CharTable[SyntaxTable])[c]&_L)
                     27: #define        isdigit(c)      ((CharTable[SyntaxTable])[c]&_N)
                     28: #define        isspace(c)      (c == ' ' || c == '\t')
                     29: #define ispunct(c)     ((CharTable[SyntaxTable])[c]&_P)
                     30: #define toupper(c)     ((c)&~040)
                     31: #define tolower(c)     ((c)|040)
                     32: #define toascii(c)     ((c)&0177)
                     33: #define isctrl(c)      ((CharTable[0][c&0177])&_C)
                     34: #define isopenp(c)     ((CharTable[0][c&0177])&_Op)
                     35: #define isclosep(c)    ((CharTable[0][c&0177])&_Cl)
                     36: #define has_syntax(c,s)        ((CharTable[SyntaxTable][c&0177])&s)
                     37: #define WITH_TABLE(x) \
                     38: { \
                     39:        int     push = SyntaxTable; \
                     40:        SyntaxTable = x;
                     41: 
                     42: #define END_TABLE() \
                     43:        SyntaxTable = push; \
                     44: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.