home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / cmpnew / cmpvar.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  8.1 KB  |  261 lines
  1.  
  2. static object LI1();
  3. static L23();
  4. static object LI1();
  5. static int VK1defaults[7]={-2,-2,-2,-2,-2,-1,62};
  6. static struct { short n,allow_other_keys;int *defaults;
  7.      int keys[7];} LI1key={7,0,VK1defaults,{63,17,16,64,65,14,1}};
  8. #define VMB1 register object *base=vs_top; object Vcs[14];
  9. #define VMS1  register object *sup=vs_top+8;vs_top=sup;
  10. #define VMV1 vs_reserve(8);
  11. #define VMR1(VMT1) vs_top=base ; return(VMT1);
  12. static object LI2();
  13. #define VMB2 register object *base=vs_top; object  V28 ,V27 ,V26 ,V25 ,V20;
  14. #define VMS2  register object *sup=vs_top+1;vs_top=sup;
  15. #define VMV2 vs_reserve(1);
  16. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  17. static object LI3();
  18. #define VMB3 object  V34 ,V33;
  19. #define VMS3
  20. #define VMV3
  21. #define VMR3(VMT3) return(VMT3);
  22. static object LI4();
  23. #define VMB4 register object *base=vs_top; object  V45 ,V44 ,V43;
  24. #define VMS4 vs_top += 1;
  25. #define VMV4 vs_reserve(1);
  26. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  27. static object LI5();
  28. #define VMB5 register object *base=vs_top; object  V62 ,V60 ,V59 ,V58 ,V55 ,V54;
  29. #define VMS5  register object *sup=vs_top+2;vs_top=sup;
  30. #define VMV5 vs_reserve(2);
  31. #define VMR5(VMT5) vs_top=base ; return(VMT5);
  32. static object LI6();
  33. #define VMB6 register object *base=vs_top; object  V68 ,V67 ,V66;
  34. #define VMS6  register object *sup=vs_top+1;vs_top=sup;
  35. #define VMV6 vs_reserve(1);
  36. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  37. static object LI7();
  38. #define VMB7 object  V82;
  39. #define VMS7
  40. #define VMV7
  41. #define VMR7(VMT7) return(VMT7);
  42. static object LI8();
  43. #define VMB8
  44. #define VMS8
  45. #define VMV8
  46. #define VMR8(VMT8) return(VMT8);
  47. static object LI9();
  48. #define VMB9 register object *base=vs_top; object  V99;
  49. #define VMS9 vs_top += 2;
  50. #define VMV9 vs_reserve(2);
  51. #define VMR9(VMT9) vs_top=base ; return(VMT9);
  52. static object LI10();
  53. #define VMB10 register object *base=vs_top; object  V114 ,V113 ,V112 ,V111 ,V110;
  54. #define VMS10 vs_top += 1;
  55. #define VMV10 vs_reserve(1);
  56. #define VMR10(VMT10) vs_top=base ; return(VMT10);
  57. static object LI11();
  58. #define VMB11 register object *base=vs_top;
  59. #define VMS11  register object *sup=vs_top+1;vs_top=sup;
  60. #define VMV11 vs_reserve(1);
  61. #define VMR11(VMT11) vs_top=base ; return(VMT11);
  62. static object LI12();
  63. #define VMB12 object  V147 ,V146 ,V143 ,V141 ,V139 ,V137 ,V135 ,V133 ,V132 ,V131 ,V130 ,V128 ,V126 ,V125;
  64. #define VMS12
  65. #define VMV12
  66. #define VMR12(VMT12) return(VMT12);
  67. static object LI13();
  68. #define VMB13 register object *base=vs_top; object  V181 ,V179 ,V176 ,V175 ,V174 ,V173 ,V167 ,V165 ,V163 ,V161 ,V159 ,V158 ,V157 ,V156;
  69. #define VMS13  register object *sup=vs_top+4;vs_top=sup;
  70. #define VMV13 vs_reserve(4);
  71. #define VMR13(VMT13) vs_top=base ; return(VMT13);
  72. static object LI14();
  73. #define VMB14 register object *base=vs_top; object  V189;
  74. #define VMS14 vs_top += 1;
  75. #define VMV14 vs_reserve(1);
  76. #define VMR14(VMT14) vs_top=base ; return(VMT14);
  77. static object LI15();
  78. #define VMB15 register object *base=vs_top; object  V199 ,V197 ,V196;
  79. #define VMS15 vs_top += 1;
  80. #define VMV15 vs_reserve(1);
  81. #define VMR15(VMT15) vs_top=base ; return(VMT15);
  82. static object LI16();
  83. #define VMB16 object  V210 ,V208 ,V207;
  84. #define VMS16
  85. #define VMV16
  86. #define VMR16(VMT16) return(VMT16);
  87. static object LI17();
  88. #define VMB17 register object *base=vs_top; object  V225 ,V224 ,V223 ,V222 ,V221;
  89. #define VMS17  register object *sup=vs_top+2;vs_top=sup;
  90. #define VMV17 vs_reserve(2);
  91. #define VMR17(VMT17) vs_top=base ; return(VMT17);
  92. static object LI18();
  93. #define VMB18 register object *base=vs_top; object  V235 ,V232;
  94. #define VMS18 vs_top += 1;
  95. #define VMV18 vs_reserve(1);
  96. #define VMR18(VMT18) vs_top=base ; return(VMT18);
  97. static object LI19();
  98. #define VMB19 register object *base=vs_top; object  V242;
  99. #define VMS19 vs_top += 1;
  100. #define VMV19 vs_reserve(1);
  101. #define VMR19(VMT19) vs_top=base ; return(VMT19);
  102. static object LI20();
  103. #define VMB20 register object *base=vs_top;
  104. #define VMS20  register object *sup=vs_top+4;vs_top=sup;
  105. #define VMV20 vs_reserve(4);
  106. #define VMR20(VMT20) vs_top=base ; return(VMT20);
  107. static object LI21();
  108. #define VMB21 register object *base=vs_top; object  V269 ,V268 ,V267 ,V263 ,V262 ,V261;
  109. #define VMS21  register object *sup=vs_top+5;vs_top=sup;
  110. #define VMV21 vs_reserve(5);
  111. #define VMR21(VMT21) vs_top=base ; return(VMT21);
  112. static object LI22();
  113. #define VMB22 register object *base=vs_top; object  V291 ,V290 ,V289 ,V288 ,V287 ,V286 ,V282 ,V280;
  114. #define VMS22 vs_top += 6;
  115. #define VMV22 vs_reserve(6);
  116. #define VMR22(VMT22) vs_top=base ; return(VMT22);
  117. #define VC23 object  V304 ,V303 ,V302 ,V301 ,V300;
  118. #define VM23 3
  119. #define VM22 6
  120. #define VM21 5
  121. #define VM20 4
  122. #define VM19 1
  123. #define VM18 1
  124. #define VM17 2
  125. #define VM16 0
  126. #define VM15 1
  127. #define VM14 1
  128. #define VM13 4
  129. #define VM12 0
  130. #define VM11 1
  131. #define VM10 1
  132. #define VM9 2
  133. #define VM8 0
  134. #define VM7 0
  135. #define VM6 1
  136. #define VM5 2
  137. #define VM4 1
  138. #define VM3 0
  139. #define VM2 1
  140. #define VM1 8
  141. static char * VVi[116]={
  142. #define Cdata VV[115]
  143. (char *)(LI1),
  144. (char *)(&LI1key),
  145. (char *)(LI2),
  146. (char *)(LI3),
  147. (char *)(LI4),
  148. (char *)(LI5),
  149. (char *)(LI6),
  150. (char *)(LI7),
  151. (char *)(LI8),
  152. (char *)(LI9),
  153. (char *)(LI10),
  154. (char *)(LI11),
  155. (char *)(LI12),
  156. (char *)(LI13),
  157. (char *)(LI14),
  158. (char *)(LI15),
  159. (char *)(LI16),
  160. (char *)(LI17),
  161. (char *)(LI18),
  162. (char *)(LI19),
  163. (char *)(LI20),
  164. (char *)(LI21),
  165. (char *)(LI22),
  166. (char *)(L23)
  167. };
  168. #define VV ((object *)VVi)
  169. static object  LnkTLI69() ;
  170. static object  (*LnkLI69)() = LnkTLI69;
  171. static  LnkT114() ;
  172. static  (*Lnk114)() = LnkT114;
  173. static object  LnkTLI42() ;
  174. static object  (*LnkLI42)() = LnkTLI42;
  175. static object  LnkTLI113() ;
  176. static object  (*LnkLI113)() = LnkTLI113;
  177. static object  LnkTLI112() ;
  178. static object  (*LnkLI112)() = LnkTLI112;
  179. static object  LnkTLI111() ;
  180. static object  (*LnkLI111)() = LnkTLI111;
  181. static  LnkT110() ;
  182. static  (*Lnk110)() = LnkT110;
  183. static object  LnkTLI109() ;
  184. static object  (*LnkLI109)() = LnkTLI109;
  185. static object  LnkTLI108() ;
  186. static object  (*LnkLI108)() = LnkTLI108;
  187. static object  LnkTLI107() ;
  188. static object  (*LnkLI107)() = LnkTLI107;
  189. static object  LnkTLI106() ;
  190. static object  (*LnkLI106)() = LnkTLI106;
  191. static object  LnkTLI104() ;
  192. static object  (*LnkLI104)() = LnkTLI104;
  193. static  LnkT103() ;
  194. static  (*Lnk103)() = LnkT103;
  195. static object  LnkTLI102() ;
  196. static object  (*LnkLI102)() = LnkTLI102;
  197. static object  LnkTLI101() ;
  198. static object  (*LnkLI101)() = LnkTLI101;
  199. static object  LnkTLI100() ;
  200. static object  (*LnkLI100)() = LnkTLI100;
  201. static object  LnkTLI99() ;
  202. static object  (*LnkLI99)() = LnkTLI99;
  203. static object  LnkTLI98() ;
  204. static object  (*LnkLI98)() = LnkTLI98;
  205. static object  LnkTLI97() ;
  206. static object  (*LnkLI97)() = LnkTLI97;
  207. static  LnkT96() ;
  208. static  (*Lnk96)() = LnkT96;
  209. static  LnkT95() ;
  210. static  (*Lnk95)() = LnkT95;
  211. static  LnkT94() ;
  212. static  (*Lnk94)() = LnkT94;
  213. static  LnkT93() ;
  214. static  (*Lnk93)() = LnkT93;
  215. static  LnkT92() ;
  216. static  (*Lnk92)() = LnkT92;
  217. static object  LnkTLI91() ;
  218. static object  (*LnkLI91)() = LnkTLI91;
  219. static  LnkT90() ;
  220. static  (*Lnk90)() = LnkT90;
  221. static  LnkT89() ;
  222. static  (*Lnk89)() = LnkT89;
  223. static  LnkT87() ;
  224. static  (*Lnk87)() = LnkT87;
  225. static object  LnkTLI85() ;
  226. static object  (*LnkLI85)() = LnkTLI85;
  227. static object  LnkTLI84() ;
  228. static object  (*LnkLI84)() = LnkTLI84;
  229. static object  LnkTLI82() ;
  230. static object  (*LnkLI82)() = LnkTLI82;
  231. static object  LnkTLI81() ;
  232. static object  (*LnkLI81)() = LnkTLI81;
  233. static object  LnkTLI80() ;
  234. static object  (*LnkLI80)() = LnkTLI80;
  235. static object  LnkTLI79() ;
  236. static object  (*LnkLI79)() = LnkTLI79;
  237. static  LnkT78() ;
  238. static  (*Lnk78)() = LnkT78;
  239. static object  LnkTLI77() ;
  240. static object  (*LnkLI77)() = LnkTLI77;
  241. static object  LnkTLI76() ;
  242. static object  (*LnkLI76)() = LnkTLI76;
  243. static object  LnkTLI75() ;
  244. static object  (*LnkLI75)() = LnkTLI75;
  245. static object  LnkTLI74() ;
  246. static object  (*LnkLI74)() = LnkTLI74;
  247. static object  LnkTLI73() ;
  248. static object  (*LnkLI73)() = LnkTLI73;
  249. static object  LnkTLI72() ;
  250. static object  (*LnkLI72)() = LnkTLI72;
  251. static object  LnkTLI71() ;
  252. static object  (*LnkLI71)() = LnkTLI71;
  253. static object  LnkTLI70() ;
  254. static object  (*LnkLI70)() = LnkTLI70;
  255. static object  LnkTLI68() ;
  256. static object  (*LnkLI68)() = LnkTLI68;
  257. static object  LnkTLI67() ;
  258. static object  (*LnkLI67)() = LnkTLI67;
  259. static object  LnkTLI66() ;
  260. static object  (*LnkLI66)() = LnkTLI66;
  261.