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 / cmputil.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  4.0 KB  |  146 lines
  1.  
  2. static L1();
  3. static object LI2();
  4. static L3();
  5. static object LI6();
  6. static object LI7();
  7. static L11();
  8. static L12();
  9. static L13();
  10. static L14();
  11. static L15();
  12. static L19();
  13. #define VC1
  14. static object LI2();
  15. #define VMB2 register object *base=vs_top; object  V5; object Vcs[2];
  16. #define VMS2  register object *sup=vs_top+3;vs_top=sup;
  17. #define VMV2 vs_reserve(3);
  18. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  19. #define VC3
  20. static object LI4();
  21. #define VMB4 register object *base=vs_top;
  22. #define VMS4  register object *sup=vs_top+6;vs_top=sup;
  23. #define VMV4 vs_reserve(6);
  24. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  25. static object LI5();
  26. #define VMB5 register object *base=vs_top;
  27. #define VMS5  register object *sup=vs_top+6;vs_top=sup;
  28. #define VMV5 vs_reserve(6);
  29. #define VMR5(VMT5) vs_top=base ; return(VMT5);
  30. static object LI6();
  31. #define VMB6 register object *base=vs_top; object  V23; object Vcs[2];
  32. #define VMS6  register object *sup=vs_top+3;vs_top=sup;
  33. #define VMV6 vs_reserve(3);
  34. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  35. static object LI7();
  36. #define VMB7 register object *base=vs_top; object  V29; object Vcs[2];
  37. #define VMS7  register object *sup=vs_top+3;vs_top=sup;
  38. #define VMV7 vs_reserve(3);
  39. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  40. static object LI8();
  41. #define VMB8 register object *base=vs_top;
  42. #define VMS8  register object *sup=vs_top+5;vs_top=sup;
  43. #define VMV8 vs_reserve(5);
  44. #define VMR8(VMT8) vs_top=base ; return(VMT8);
  45. static object LI9();
  46. #define VMB9 register object *base=vs_top;
  47. #define VMS9  register object *sup=vs_top+4;vs_top=sup;
  48. #define VMV9 vs_reserve(4);
  49. #define VMR9(VMT9) vs_top=base ; return(VMT9);
  50. static object LI10();
  51. #define VMB10 register object *base=vs_top;
  52. #define VMS10  register object *sup=vs_top+3;vs_top=sup;
  53. #define VMV10 vs_reserve(3);
  54. #define VMR10(VMT10) vs_top=base ; return(VMT10);
  55. #define VC11 object  V43 ,V42 ,V41 ,V40;
  56. #define VC12 object  V50 ,V49 ,V48 ,V47;
  57. #define VC13 object  V56 ,V55 ,V54;
  58. #define VC14 object  V62 ,V61 ,V60;
  59. #define VC15
  60. static object LI16();
  61. #define VMB16 register object *base=vs_top; object  V73 ,V71 ,V70;
  62. #define VMS16  register object *sup=vs_top+4;vs_top=sup;
  63. #define VMV16 vs_reserve(4);
  64. #define VMR16(VMT16) vs_top=base ; return(VMT16);
  65. static object LI17();
  66. #define VMB17 register object *base=vs_top; object  V83 ,V81;
  67. #define VMS17  register object *sup=vs_top+4;vs_top=sup;
  68. #define VMV17 vs_reserve(4);
  69. #define VMR17(VMT17) vs_top=base ; return(VMT17);
  70. static object LI18();
  71. #define VMB18 register object *base=vs_top; object  V99 ,V98 ,V96 ,V95;
  72. #define VMS18  register object *sup=vs_top+4;vs_top=sup;
  73. #define VMV18 vs_reserve(4);
  74. #define VMR18(VMT18) vs_top=base ; return(VMT18);
  75. #define VC19 object  V104 ,V103;
  76. static object LI20();
  77. #define VMB20
  78. #define VMS20
  79. #define VMV20
  80. #define VMR20(VMT20) return(VMT20);
  81. static object LI21();
  82. #define VMB21 register object *base=vs_top;
  83. #define VMS21  register object *sup=vs_top+1;vs_top=sup;
  84. #define VMV21 vs_reserve(1);
  85. #define VMR21(VMT21) vs_top=base ; return(VMT21);
  86. #define VM21 1
  87. #define VM20 0
  88. #define VM19 6
  89. #define VM18 4
  90. #define VM17 4
  91. #define VM16 4
  92. #define VM15 5
  93. #define VM14 7
  94. #define VM13 7
  95. #define VM12 7
  96. #define VM11 7
  97. #define VM10 3
  98. #define VM9 4
  99. #define VM8 5
  100. #define VM7 3
  101. #define VM6 3
  102. #define VM5 6
  103. #define VM4 6
  104. #define VM3 6
  105. #define VM2 3
  106. #define VM1 4
  107. static char * VVi[66]={
  108. #define Cdata VV[65]
  109. (char *)(L1),
  110. (char *)(LI2),
  111. (char *)(L3),
  112. (char *)(LI4),
  113. (char *)(LI5),
  114. (char *)(LI6),
  115. (char *)(LI7),
  116. (char *)(LI8),
  117. (char *)(LI9),
  118. (char *)(LI10),
  119. (char *)(L11),
  120. (char *)(L12),
  121. (char *)(L13),
  122. (char *)(L14),
  123. (char *)(L15),
  124. (char *)(LI16),
  125. (char *)(LI17),
  126. (char *)(LI18),
  127. (char *)(L19),
  128. (char *)(LI20),
  129. (char *)(LI21)
  130. };
  131. #define VV ((object *)VVi)
  132. static object  LnkTLI64() ;
  133. static object  (*LnkLI64)() = LnkTLI64;
  134. static  LnkT63() ;
  135. static  (*Lnk63)() = LnkT63;
  136. static  LnkT62() ;
  137. static  (*Lnk62)() = LnkT62;
  138. static object  LnkTLI61() ;
  139. static object  (*LnkLI61)() = LnkTLI61;
  140. static  LnkT60() ;
  141. static  (*Lnk60)() = LnkT60;
  142. static object  LnkTLI59() ;
  143. static object  (*LnkLI59)() = LnkTLI59;
  144. static object  LnkTLI58() ;
  145. static object  (*LnkLI58)() = LnkTLI58;
  146.