![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to cppp.out CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSD / contrib / icon / libtest / distr|
Return to cppp.out CVS log | Up to [CSRG BSD Unix] / 43BSD / contrib / icon / libtest / distr |
1.1 root 1: /*
2: * Definitions used in assembly-language progams
3: */
4:
5: #include "../h/config.h"
6:
7: #define r(i) (1<<(i))
8: #define F_NQUAL 0x80000000
9: #define F_VAR 0x40000000
10: #define F_TVAR 0x20000000
11: #define F_PTR 0x10000000
12: #define TYPEMASK 63
13: #define MAXSTRING 257
14: #define T_INTEGER 1
15: #define T_LONGINT 1
16: #define T_REAL 3
17: #define T_CSET 4
18: #define T_FILE 5
19: #define T_PROC 6
20: #define T_LIST 7
21: #define T_TABLE 8
22: #define T_RECORD 9
23: #define T_TELEM 10
24: #define T_LISTB 11
25: #define T_TVSUBS 12
26: #define T_TVTBL 14
27: #define T_TVPOS 15
28: #define T_TVRAND 16
29: #define T_TVTRACE 17
30: #define T_ESTACK 18
31: #define T_EBLOCK 19
32: #ifdef SETS
33: #define T_SET 20
34: #define T_SELEM 21
35: #endif SETS
36:
37: #define Global(x) .globl x
38: #define DummyFcn(x) .globl x; x: halt
39: #define DummyData(x) .globl x; x: .long 0
40: #define DummyRef(x) .long x
41: #define gfp r10
42: #define efp r11
43: #define ipc r9
44:
45: #ifdef PORT
46: #define F_NQUAL
47: #define F_VAR
48: #define F_TVAR
49: #define F_PTR
50:
51: #define TYPEMASK
52: #define MAXSTRING
53:
54: #define T_INTEGER
55: #define T_LONGINT
56: #define T_REAL
57: #define T_CSET
58: #define T_FILE
59: #define T_PROC
60: #define T_LIST
61: #define T_TABLE
62: #define T_RECORD
63: #define T_TELEM
64: #define T_LISTB
65: #define T_TVSUBS
66: #define T_TVTBL
67: #define T_TVPOS
68: #define T_TVRAND
69: #define T_TVTRACE
70: #define T_ESTACK
71: #define T_EBLOCK
72: #ifdef SETS
73: #define T_SET
74: #define T_SELEM
75: #endif SETS
76:
77: #define gfp
78: #define efp
79: #define ipc
80: #define Global(x)
81: #define DummyFcn(x)
82: #define DummyData(x)
83: #define DummyRef(x)
84:
85: #endif PORT
86:
87:
88: #define OFFSETMASK (~(F_NQUAL|F_VAR|F_TVAR))
89:
90: #define D_VAR F_VAR|F_NQUAL
91: #define D_TVAR F_VAR|F_TVAR|F_NQUAL
92: #define D_NULL 0
93: #define D_INTEGER T_INTEGER|F_NQUAL
94: #define D_LONGINT T_LONGINT|F_PTR|F_NQUAL
95: #define D_REAL T_REAL|F_PTR|F_NQUAL
96: #define D_CSET T_CSET|F_PTR|F_NQUAL
97: #define D_FILE T_FILE|F_PTR|F_NQUAL
98: #define D_PROC T_PROC|F_PTR|F_NQUAL
99: #define D_LIST T_LIST|F_PTR|F_NQUAL
100: #define D_TABLE T_TABLE|F_PTR|F_NQUAL
101: #define D_RECORD T_RECORD|F_PTR|F_NQUAL
102: #define D_TELEM T_TELEM|F_PTR|F_NQUAL
103: #define D_LISTB T_LISTB|F_PTR|F_NQUAL
104: #define D_TVSUBS T_TVSUBS|D_TVAR
105: #define D_TVTBL T_TVTBL|D_TVAR
106: #define D_TVPOS T_TVPOS|D_TVAR
107: #define D_TVRAND T_TVRAND|D_TVAR
108: #define D_TVTRACE T_TVTRACE|D_TVAR
109: #define D_ESTACK T_ESTACK|F_PTR|F_NQUAL
110: #define D_EBLOCK T_EBLOCK|F_PTR|F_NQUAL
111: #ifdef SETS
112: #define D_SET T_SET|F_PTR|F_NQUAL
113: #define D_SELEM T_SELEM|F_PTR|F_NQUAL
114: #endif SETS
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.