russell: C:/Users/Dennis/src/lang/russell.orig/src/pass1/scanner/cctab.c Source File

00001 #
00002 /*
00003  * Russell
00004  *
00005  * character class table for scanner
00006  */
00007 
00008 #include "scan.h"
00009 
00010 int cctab[128] = {
00011     BADCC,      /*  NUL     */
00012     BADCC,      /*  SOH     */
00013     SEPCC,      /*  STX     */     /* used as user program marker in prologue */
00014     BADCC,      /*  ETX     */
00015     BADCC,      /*  EOT     */
00016     BADCC,      /*  ENQ     */
00017     BADCC,      /*  ACK     */
00018     BADCC,      /*  BEL     */
00019     OPRCC,      /*  BS      */
00020     WHTCC,      /*  HT      */
00021     WHTCC,      /*  LF      */
00022     BADCC,      /*  VT      */
00023     WHTCC,      /*  FF      */
00024     WHTCC,      /*  CR      */
00025     BADCC,      /*  SO      */
00026     BADCC,      /*  SI      */
00027     BADCC,      /*  DLE     */
00028     BADCC,      /*  DC1     */
00029     BADCC,      /*  DC2     */
00030     BADCC,      /*  DC3     */
00031     BADCC,      /*  DC4     */
00032     BADCC,      /*  NAK     */
00033     BADCC,      /*  SYN     */
00034     BADCC,      /*  ETB     */
00035     BADCC,      /*  CAN     */
00036     BADCC,      /*  EM      */
00037     BADCC,      /*  SUB     */
00038     BADCC,      /*  ESC     */
00039     BADCC,      /*  FS      */
00040     BADCC,      /*  GS      */
00041     BADCC,      /*  RS      */
00042     BADCC,      /*  US      */
00043 
00044     WHTCC,      /*  SP      */
00045     OPRCC,      /*  !       */
00046     DQUCC,      /*  "       */
00047     SEPCC,      /*  #       */
00048     SEPCC,      /*  $       */
00049     OPRCC,      /*  %       */
00050     OPRCC,      /*  &       */
00051     SQUCC,      /*  '       */
00052     SEPCC,      /*  (       */
00053     SEPCC,      /*  )       */
00054     OPRCC,      /*  *       */
00055     OPRCC,      /*  +       */
00056     SEPCC,      /*  ,       */
00057     OPRCC,      /*  -       */
00058     OPRCC,      /*  .       */
00059     OPRCC,      /*  /       */
00060     DIGCC,      /*  0       */
00061     DIGCC,      /*  1       */
00062     DIGCC,      /*  2       */
00063     DIGCC,      /*  3       */
00064     DIGCC,      /*  4       */
00065     DIGCC,      /*  5       */
00066     DIGCC,      /*  6       */
00067     DIGCC,      /*  7       */
00068     DIGCC,      /*  8       */
00069     DIGCC,      /*  9       */
00070     OPRCC,      /*  :       */
00071     SEPCC,      /*  ;       */
00072     OPRCC,      /*  <       */
00073     OPRCC,      /*  =       */
00074     OPRCC,      /*  >       */
00075     OPRCC,      /*  ?       */
00076 
00077     OPRCC,      /*  @       */
00078     LETCC,      /*  A       */
00079     LETCC,      /*  B       */
00080     LETCC,      /*  C       */
00081     LETCC,      /*  D       */
00082     LETCC,      /*  E       */
00083     LETCC,      /*  F       */
00084     LETCC,      /*  G       */
00085     LETCC,      /*  H       */
00086     LETCC,      /*  I       */
00087     LETCC,      /*  J       */
00088     LETCC,      /*  K       */
00089     LETCC,      /*  L       */
00090     LETCC,      /*  M       */
00091     LETCC,      /*  N       */
00092     LETCC,      /*  O       */
00093     LETCC,      /*  P       */
00094     LETCC,      /*  Q       */
00095     LETCC,      /*  R       */
00096     LETCC,      /*  S       */
00097     LETCC,      /*  T       */
00098     LETCC,      /*  U       */
00099     LETCC,      /*  V       */
00100     LETCC,      /*  W       */
00101     LETCC,      /*  X       */
00102     LETCC,      /*  Y       */
00103     LETCC,      /*  Z       */
00104     SEPCC,      /*  [       */
00105     OPRCC,      /*  \       */
00106     SEPCC,      /*  ]       */
00107     OPRCC,      /*  ^       */
00108     LETCC,      /*  _       */
00109 
00110     OPRCC,      /*  `       */
00111     LETCC,      /*  a       */
00112     LETCC,      /*  b       */
00113     LETCC,      /*  c       */
00114     LETCC,      /*  d       */
00115     LETCC,      /*  e       */
00116     LETCC,      /*  f       */
00117     LETCC,      /*  g       */
00118     LETCC,      /*  h       */
00119     LETCC,      /*  i       */
00120     LETCC,      /*  j       */
00121     LETCC,      /*  k       */
00122     LETCC,      /*  l       */
00123     LETCC,      /*  m       */
00124     LETCC,      /*  n       */
00125     LETCC,      /*  o       */
00126     LETCC,      /*  p       */
00127     LETCC,      /*  q       */
00128     LETCC,      /*  r       */
00129     LETCC,      /*  s       */
00130     LETCC,      /*  t       */
00131     LETCC,      /*  u       */
00132     LETCC,      /*  v       */
00133     LETCC,      /*  w       */
00134     LETCC,      /*  x       */
00135     LETCC,      /*  y       */
00136     LETCC,      /*  z       */
00137     SEPCC,      /*  {       */
00138     OPRCC,      /*  |       */
00139     SEPCC,      /*  }       */
00140     OPRCC,      /*  ~       */
00141     BADCC       /*  DEL     */
00142 };