The version of basic copied from Martin Kerstens directory.

lang/basic/src.old/symbols.h

@@ -0,0 +1,79 @@
+#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	573
+#define XORSYM	574
+#define EQVSYM	575
+#define IMPSYM	576
+#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;