Commit | Line | Data |
---|---|---|
eb5ad1d2 F |
1 | |
2 | /* variable types | |
3 | * numeric assumptions: | |
4 | * int < reals < complexes | |
5 | * TYDREAL-TYREAL = TYDCOMPLEX-TYCOMPLEX | |
6 | */ | |
7 | ||
8 | #define TYUNKNOWN 0 | |
9 | #define TYADDR 1 | |
10 | #define TYSHORT 2 | |
11 | #define TYLONG 3 | |
12 | #define TYREAL 4 | |
13 | #define TYDREAL 5 | |
14 | #define TYCOMPLEX 6 | |
15 | #define TYDCOMPLEX 7 | |
16 | #define TYLOGICAL 8 | |
17 | #define TYCHAR 9 | |
18 | #define TYSUBR 10 | |
19 | #define TYERROR 11 | |
20 | ||
21 | #define NTYPES (TYERROR+1) |