|
|
1.1 ! root 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) ! 22: #define TYBLANK TYSUBR
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.