12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788 |
- /*
- * (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();
|