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 / lsp / predlib.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  3.5 KB  |  163 lines
  1.  
  2. static L1();
  3. static L2();
  4. static L3();
  5. static L4();
  6. static L5();
  7. static L6();
  8. static L7();
  9. static L8();
  10. static L9();
  11. static L10();
  12. static L11();
  13. static L12();
  14. static L13();
  15. static L14();
  16. static L15();
  17. static L16();
  18. static L18();
  19. static L21();
  20. static L26();
  21. #define VC1 object  V14 ,V13 ,V12 ,V11 ,V10 ,V9 ,V8 ,V6;
  22. #define VC2
  23. #define VC3
  24. #define VC4
  25. #define VC5 object  V21 ,V20 ,V19 ,V18 ,V17;
  26. #define VC6 object  V23;
  27. #define VC7
  28. #define VC8
  29. #define VC9
  30. #define VC10
  31. #define VC11
  32. #define VC12
  33. #define VC13
  34. #define VC14
  35. #define VC15
  36. #define VC16
  37. static object LI17();
  38. #define VMB17 register object *base=vs_top; object  V38 ,V36 ,V34;
  39. #define VMS17  register object *sup=vs_top+1;vs_top=sup;
  40. #define VMV17 vs_reserve(1);
  41. #define VMR17(VMT17) vs_top=base ; return(VMT17);
  42. #define VC18 object  V66 ,V65 ,V64 ,V63 ,V62 ,V61 ,V60 ,V59 ,V58 ,V57 ,V56 ,V55 ,V54 ,V53 ,V52 ,V51 ,V48;
  43. static object LI19();
  44. #define VMB19 register object *base=vs_top;
  45. #define VMS19  register object *sup=vs_top+1;vs_top=sup;
  46. #define VMV19 vs_reserve(1);
  47. #define VMR19(VMT19) vs_top=base ; return(VMT19);
  48. static object LI20();
  49. #define VMB20
  50. #define VMS20
  51. #define VMV20
  52. #define VMR20(VMT20) return(VMT20);
  53. #define VC21
  54. static object LI22();
  55. #define VMB22
  56. #define VMS22
  57. #define VMV22
  58. #define VMR22(VMT22) return(VMT22);
  59. static object LI23();
  60. #define VMB23
  61. #define VMS23
  62. #define VMV23
  63. #define VMR23(VMT23) return(VMT23);
  64. static object LI24();
  65. #define VMB24
  66. #define VMS24
  67. #define VMV24
  68. #define VMR24(VMT24) return(VMT24);
  69. static object LI25();
  70. #define VMB25 register object *base=vs_top; object  V190 ,V189 ,V183 ,V181 ,V177 ,V175;
  71. #define VMS25  register object *sup=vs_top+3;vs_top=sup;
  72. #define VMV25 vs_reserve(3);
  73. #define VMR25(VMT25) vs_top=base ; return(VMT25);
  74. #define VC26
  75. #define VM26 4
  76. #define VM25 3
  77. #define VM24 0
  78. #define VM23 0
  79. #define VM22 0
  80. #define VM21 5
  81. #define VM20 0
  82. #define VM19 1
  83. #define VM18 4
  84. #define VM17 1
  85. #define VM16 2
  86. #define VM15 2
  87. #define VM14 2
  88. #define VM13 2
  89. #define VM12 2
  90. #define VM11 3
  91. #define VM10 1
  92. #define VM9 1
  93. #define VM8 1
  94. #define VM7 1
  95. #define VM6 2
  96. #define VM5 2
  97. #define VM4 2
  98. #define VM3 1
  99. #define VM2 1
  100. #define VM1 7
  101. static char * VVi[98]={
  102. #define Cdata VV[97]
  103. (char *)(L1),
  104. (char *)(L2),
  105. (char *)(L3),
  106. (char *)(L4),
  107. (char *)(L5),
  108. (char *)(L6),
  109. (char *)(L7),
  110. (char *)(L8),
  111. (char *)(L9),
  112. (char *)(L10),
  113. (char *)(L11),
  114. (char *)(L12),
  115. (char *)(L13),
  116. (char *)(L14),
  117. (char *)(L15),
  118. (char *)(L16),
  119. (char *)(LI17),
  120. (char *)(L18),
  121. (char *)(LI19),
  122. (char *)(LI20),
  123. (char *)(L21),
  124. (char *)(LI22),
  125. (char *)(LI23),
  126. (char *)(LI24),
  127. (char *)(LI25),
  128. (char *)(L26)
  129. };
  130. #define VV ((object *)VVi)
  131. static object  LnkTLI96() ;
  132. static object  (*LnkLI96)() = LnkTLI96;
  133. static object  LnkTLI94() ;
  134. static object  (*LnkLI94)() = LnkTLI94;
  135. static object  LnkTLI93() ;
  136. static object  (*LnkLI93)() = LnkTLI93;
  137. static object  LnkTLI92() ;
  138. static object  (*LnkLI92)() = LnkTLI92;
  139. static  LnkT91() ;
  140. static  (*Lnk91)() = LnkT91;
  141. static object  LnkTLI90() ;
  142. static object  (*LnkLI90)() = LnkTLI90;
  143. static  LnkT89() ;
  144. static  (*Lnk89)() = LnkT89;
  145. static object  LnkTLI88() ;
  146. static object  (*LnkLI88)() = LnkTLI88;
  147. static object  LnkTLI87() ;
  148. static object  (*LnkLI87)() = LnkTLI87;
  149. static object  LnkTLI82() ;
  150. static object  (*LnkLI82)() = LnkTLI82;
  151. static object  LnkTLI81() ;
  152. static object  (*LnkLI81)() = LnkTLI81;
  153. static  LnkT77() ;
  154. static  (*Lnk77)() = LnkT77;
  155. static object  LnkTLI76() ;
  156. static object  (*LnkLI76)() = LnkTLI76;
  157. static  LnkT73() ;
  158. static  (*Lnk73)() = LnkT73;
  159. static  LnkT72() ;
  160. static  (*Lnk72)() = LnkT72;
  161. static object  LnkTLI71() ;
  162. static object  (*LnkLI71)() = LnkTLI71;
  163.