![[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.