lang/cem/cemcom/class.h

   1 /*
   2  * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
   3  * See the copyright notice in the ACK home directory, in the file "Copyright".
   4  */
   5 /* $Id: class.h,v 3.2 1994/06/24 12:02:35 ceriel Exp $ */
   6 /*              U S E   O F   C H A R A C T E R   C L A S S E S         */
   7
   8 /*      As a starter, chars are divided into classes, according to which
   9         token they can be the start of.
  10         At present such a class number is supposed to fit in 4 bits.
  11 */
  12
  13 #define class(ch)       (tkclass[ch])
  14
  15 /*      Being the start of a token is, fortunately, a mutual exclusive
  16         property, so, although there are less than 16 classes they can be
  17         packed in 4 bits.
  18 */
  19
  20 #define STSKIP  0       /* spaces and so on: skipped characters         */
  21 #define STNL    1       /* newline character(s): update linenumber etc. */
  22 #define STGARB  2       /* garbage ascii character: not allowed in C    */
  23 #define STSIMP  3       /* this character can occur as token in C       */
  24 #define STCOMP  4       /* this one can start a compound token in C     */
  25 #define STIDF   5       /* being the initial character of an identifier */
  26 #define STCHAR  6       /* the starter of a character constant          */
  27 #define STSTR   7       /* the starter of a string                      */
  28 #define STNUM   8       /* the starter of a numeric constant            */
  29 #define STEOI   9       /* End-Of-Information mark                      */
  30
  31 /*      But occurring inside a token is not, so we need 1 bit for each
  32         class.  This is implemented as a collection of tables to speed up
  33         the decision whether a character has a special meaning.
  34 */
  35 #define in_idf(ch)      (inidf[ch])
  36 #define is_oct(ch)      (isoct[ch])
  37 #define is_dig(ch)      (isdig[ch])
  38 #define is_hex(ch)      (ishex[ch])
  39
  40 extern char tkclass[];
  41 extern char inidf[], isoct[], isdig[], ishex[];