text: /*
   * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
   * See the copyright notice in the ACK home directory, in the file "Copyright".
   */
  
  #ifndef NORCSID
  # define RCS_SYMB	"$Id$"
  #endif
  
  #define NIL	0
  #define TRUE	1
  #define FALSE	0
  
  #define DEFAULTTYPE	500
  #define INTTYPE		501
  #define FLOATTYPE	502
  #define DOUBLETYPE	503
  #define STRINGTYPE	504
  
  #define ABSSYM		520
  #define ASCSYM		521
  #define ATNSYM		522
  #define CDBLSYM		524
  #define CHRSYM		525
  #define CINTSYM		526
  #define COSSYM		527
  #define CSNGSYM		528
  #define CVISYM		529
  #define CVSSYM		530
  #define CVDSYM		531
  #define EOFSYM		532
  #define EXPSYM		533
  #define FIXSYM		534
  #define FRESYM		535
  #define HEXSYM		536
  #define INPSYM		538
  #define INSTRSYM	539
  #define LEFTSYM		540
  #define LENSYM		541
  #define LOCSYM		542
  #define LOGSYM		543
  #define LPOSSYM		544
  #define MKISYM		546
  #define MKSSYM		547
  #define MKDSYM		548
  #define OCTSYM		549
  #define PEEKSYM		550
  #define POSSYM		551
  #define RIGHTSYM	552
  #define RNDSYM		553
  #define SGNSYM		554
  #define SINSYM		555
  #define SPACESYM	556
  #define SPCSYM		557
  #define SQRSYM		558
  #define STRSYM		559
  #define STRINGSYM	560
  #define TABSYM		561
  #define TANSYM		562
  #define VALSYM		564
  #define VARPTRSYM	565
  /* some stuff forgotten */
  #define INTSYM		567
  #define AUTOSYM		568
  #define LISTSYM		569
  #define LOADSYM		570
  #define MERGESYM	571
  #define TRONSYM		572
  #define TROFFSYM	0     /* NIEUW : was 573, werkte als TRON */
  	/* IMPSYM, EQVSYM en XORSYM zijn tokens geworden */
  #define OUTSYM 577
  
  #define MAXDIMENSIONS	10
  
  typedef struct SYMBOL{
  	char 	*symname;
  	int	symalias;
  	int	symtype;
  	int	dimensions;		/* dimension array/function */
  	int	dimlimit[MAXDIMENSIONS]; /* type of parameter */
  	int	dimalias[MAXDIMENSIONS]; 
  	struct	SYMBOL *nextsym;
  	int	isfunction;
  	int	parmsize;
  	int	isparam;
  } Symbol;
  
  extern	Symbol *srchsymbol();
  