lang/m2/m2mm/LLlex.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  * Author: Ceriel J.H. Jacobs
   6  */
   7
   8 /* T O K E N   D E S C R I P T O R   D E F I N I T I O N */
   9
  10 /* stripped down version of the one in the Modula-2 compiler */
  11
  12 /* $Id: LLlex.h,v 1.2 1994/06/24 12:44:34 ceriel Exp $ */
  13
  14 /* Token structure. Keep it small, as it is part of a parse-tree node
  15 */
  16 struct token    {
  17         short tk_symb;                  /* token itself */
  18         unsigned short tk_lineno;       /* linenumber on which it occurred */
  19         struct idf *tk_idf;             /* IDENT        */
  20 };
  21
  22 #define TOK_IDF tk_idf
  23
  24 extern struct token     dot, aside;
  25 extern int              ForeignFlag;
  26
  27 #define DOT     dot.tk_symb
  28 #define ASIDE   aside.tk_symb