lang/cem/lint/lpass2/class.c

   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.c,v 1.5 1994/06/24 12:25:31 ceriel Exp $ */
   6
   7 #include        "l_class.h"
   8 #include        "class.h"
   9
  10 int class[MAX_CLASS_CONST-MIN_CLASS_CONST+1];
  11
  12 init_class()
  13 {
  14         /* mapping of class values onto bit patterns */
  15         class[LFDF-LFDF] = CL_LIB | CL_FUNC | CL_DEF;
  16         class[LVDF-LFDF] = CL_LIB | CL_VAR | CL_DEF;
  17         class[PFDF-LFDF] = CL_EXT | CL_FUNC | CL_DEF;
  18         class[EFDF-LFDF] = CL_EXT | CL_FUNC | CL_DEF;
  19         class[EVDF-LFDF] = CL_EXT | CL_VAR | CL_DEF;
  20         class[EFDC-LFDF] = CL_EXT | CL_FUNC | CL_DECL;
  21         class[EVDC-LFDF] = CL_EXT | CL_VAR | CL_DECL;
  22         class[IFDC-LFDF] = CL_IMPL | CL_FUNC | CL_DECL;
  23         class[SFDF-LFDF] = CL_STAT | CL_FUNC | CL_DEF;
  24         class[SVDF-LFDF] = CL_STAT | CL_VAR | CL_DEF;
  25         class[FC-LFDF] = CL_FUNC | CL_USAGE;
  26         class[VU-LFDF] = CL_VAR | CL_USAGE;
  27         class[XXDF-LFDF] = 0;
  28 }
  29