![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to sigtab.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 42BSD / ucb / lisp / franz / h|
Return to sigtab.h CVS log | Up to [CSRG BSD Unix] / 42BSD / ucb / lisp / franz / h |
1.1 root 1: /* -[Sat May 7 20:46:54 1983 by jkf]-
2: * sigtab.h $Locker: $
3: * table of lispvals needed by C
4: *
5: * $Header: sigtab.h 1.4 83/06/09 01:15:47 sklower Exp $
6: *
7: * (c) copyright 1982, Regents of the University of California
8: */
9:
10: /*
11: * lispvals in use by the program should be in this table.
12: * Otherwise they may get garbage-collected.
13: */
14:
15: #define SIGNIF 139
16:
17: extern lispval lispsys[SIGNIF];
18:
19: #define tatom (lispsys[1])
20: #define lambda (lispsys[2])
21: #define nlambda (lispsys[3])
22: #define perda (lispsys[4])
23: #define lpara (lispsys[5])
24: #define rpara (lispsys[6])
25: #define lbkta (lispsys[7])
26: #define rbkta (lispsys[8])
27: #define Eofa (lispsys[9])
28: #define snqta (lispsys[10])
29: #define exclpa (lispsys[11])
30: #define quota (lispsys[12])
31: #define xatom (lispsys[13])
32: #define cara (lispsys[14])
33: #define cdra (lispsys[15])
34: #define gcafter (lispsys[16])
35: #define noptop (lispsys[17])
36: #define gcthresh (lispsys[18])
37: #define int_name (lispsys[19])
38: #define str_name (lispsys[20])
39: #define atom_name (lispsys[21])
40: #define doub_name (lispsys[22])
41: #define dtpr_name (lispsys[23])
42: #define int_items (lispsys[24])
43: #define int_pages (lispsys[25])
44: #define str_items (lispsys[26])
45: #define str_pages (lispsys[27])
46: #define dtpr_items (lispsys[28])
47: #define dtpr_pages (lispsys[29])
48: #define doub_items (lispsys[30])
49: #define doub_pages (lispsys[31])
50: #define atom_items (lispsys[32])
51: #define atom_pages (lispsys[33])
52: #define gccall1 (lispsys[34])
53: #define gccall2 (lispsys[35])
54: #define sysa (lispsys[36])
55: #define plima (lispsys[37])
56: #define macro (lispsys[38])
57: #define startup (lispsys[39])
58: #define rcomms (lispsys[40])
59: #define commta (lispsys[41])
60: #define plimit (lispsys[44])
61: #define array_items (lispsys[45])
62: #define array_pages (lispsys[46])
63: #define array_name (lispsys[47])
64: #define sdot_items (lispsys[48])
65: #define sdot_pages (lispsys[49])
66: #define sdot_name (lispsys[50])
67: #define val_items (lispsys[51])
68: #define val_pages (lispsys[52])
69: #define val_name (lispsys[53])
70: #define splice (lispsys[54])
71: #define rdrsdot (lispsys[55])
72: #define funct_items (lispsys[56])
73: #define funct_pages (lispsys[57])
74: #define funct_name (lispsys[58])
75: #define nstack (lispsys[59])
76: #define rdrint (lispsys[63])
77: #define nilplist (lispsys[64])
78: #define badst (lispsys[65])
79: #define gccheck (lispsys[66])
80: #define gcport (lispsys[67])
81: #define gcdis (lispsys[68])
82: #define gcload (lispsys[69])
83: #define loading (lispsys[70])
84: #define noautot (lispsys[71])
85: #define lcode (lispsys[72])
86: #define ccode (lispsys[73])
87: #define odform (lispsys[74])
88: #define bcdst (lispsys[75])
89: #define listst (lispsys[76])
90: #define macrost (lispsys[77])
91: #define protst (lispsys[78])
92: #define argst (lispsys[79])
93: #define arrayst (lispsys[80])
94: #define proga (lispsys[81])
95: #define progma (lispsys[82])
96: #define bstack (lispsys[83])
97: #define lexpr_atom (lispsys[84])
98: #define lexpr (lispsys[85])
99: #define ibase (lispsys[86])
100: #define Vpiport (lispsys[87])
101: #define Vpoport (lispsys[88])
102: #define Veval (lispsys[89])
103: #define Vererr (lispsys[90])
104: #define Vertpl (lispsys[91])
105: #define Verall (lispsys[92])
106: #define Vermisc (lispsys[93])
107: #define Vlerall (lispsys[94])
108: #define stlist (lispsys[95])
109: #define Vreadtable (lispsys[96])
110: #define strtab (lispsys[97])
111: #define Verbrk (lispsys[98])
112: #define Vnogbar (lispsys[99])
113: #define rdrsdot2 (lispsys[100])
114: #define Veruwpt (lispsys[101])
115:
116: #define hunkfree (lispsys[102])
117: #define port_name (lispsys[103])
118: #define reseta (lispsys[104])
119: #define rsetatom (lispsys[105])
120: #define bptr_atom (lispsys[106])
121: #define evalhatom (lispsys[107])
122: #define funhatom (lispsys[108])
123: #define Vptport (lispsys[109])
124: #define Vcntlw (lispsys[110])
125: #define Verrset (lispsys[111])
126: #define Verundef (lispsys[112])
127: #define Vsubrou (lispsys[113])
128: #define Vprinlevel (lispsys[114])
129: #define Vprinlength (lispsys[115])
130: #define Vfloatformat (lispsys[116])
131: #define Vldprt (lispsys[117])
132: #define Verdepth (lispsys[118])
133: #define mrtabspace (lispsys[119])
134: #define pnameprot (lispsys[120])
135: #define other_name (lispsys[121])
136: #define Vevalframe (lispsys[122])
137: #define Vpurcopylits (lispsys[123])
138: #define vect_name (lispsys[124])
139: #define vecti_name (lispsys[125])
140: #define vect_items (lispsys[126])
141: #define vecti_items (lispsys[127])
142: #define vect_pages (lispsys[128])
143: #define vecti_pages (lispsys[129])
144: #define Vdisplacemacros (lispsys[130])
145: #define other_pages (lispsys[131])
146: #define other_items (lispsys[132])
147: #define fclosure (lispsys[133])
148: #define Vgcprint (lispsys[134])
149: #define clos_marker (lispsys[135])
150: #define Vpbv (lispsys[136])
151: #define atom_buffer (lispsys[137])
152: #define Vlibdir (lispsys[138])
153:
154: /* various status switches */
155:
156: extern lispval stattab[16] ;
157: #define Schainp (stattab[0])
158: #define Sautor (stattab[1])
159: #define Strans (stattab[2])
160: #define evalhsw (stattab[3])
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.