home *** CD-ROM | disk | FTP | other *** search
/ Il CD di internet / CD.iso / SOURCE / CONTRIB / GNU-COMM / GCL-1.0 / GCL-1 / gcl-1.0 / cmpnew / cmpwt.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  3.4 KB  |  128 lines
  1.  
  2. static object LI1();
  3. static object LI7();
  4. static L8();
  5. static L9();
  6. static L13();
  7. static L14();
  8. static L15();
  9. static L16();
  10. static object LI1();
  11. #define VMB1 register object *base=vs_top; object Vcs[2];
  12. #define VMS1  register object *sup=vs_top+2;vs_top=sup;
  13. #define VMV1 vs_reserve(2);
  14. #define VMR1(VMT1) vs_top=base ; return(VMT1);
  15. static object LI2();
  16. #define VMB2 register object *base=vs_top;
  17. #define VMS2  register object *sup=vs_top+3;vs_top=sup;
  18. #define VMV2 vs_reserve(3);
  19. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  20. static object LI3();
  21. #define VMB3 register object *base=vs_top;
  22. #define VMS3  register object *sup=vs_top+2;vs_top=sup;
  23. #define VMV3 vs_reserve(2);
  24. #define VMR3(VMT3) vs_top=base ; return(VMT3);
  25. static object LI4();
  26. #define VMB4 register object *base=vs_top; object  V20 ,V19;
  27. #define VMS4  register object *sup=vs_top+2;vs_top=sup;
  28. #define VMV4 vs_reserve(2);
  29. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  30. static object LI5();
  31. #define VMB5 register object *base=vs_top;
  32. #define VMS5 vs_top += 12;
  33. #define VMV5 vs_reserve(12);
  34. #define VMR5(VMT5) vs_top=base ; return(VMT5);
  35. static object LI6();
  36. #define VMB6 register object *base=vs_top;
  37. #define VMS6  register object *sup=vs_top+3;vs_top=sup;
  38. #define VMV6 vs_reserve(3);
  39. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  40. static object LI7();
  41. #define VMB7 register object *base=vs_top; object  V40 ,V39 ,V36; object Vcs[2];
  42. #define VMS7  register object *sup=vs_top+2;vs_top=sup;
  43. #define VMV7 vs_reserve(2);
  44. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  45. #define VC8 object  V47 ,V46; GEN  V45= 0,V45alloc; object  V44 ,V43;
  46. #define VC9
  47. static object LI10();
  48. #define VMB10
  49. #define VMS10
  50. #define VMV10
  51. #define VMR10(VMT10) return(VMT10);
  52. static object LI11();
  53. #define VMB11
  54. #define VMS11
  55. #define VMV11
  56. #define VMR11(VMT11) return(VMT11);
  57. static object LI12();
  58. #define VMB12 register object *base=vs_top;
  59. #define VMS12 vs_top += 1;
  60. #define VMV12 vs_reserve(1);
  61. #define VMR12(VMT12) vs_top=base ; return(VMT12);
  62. #define VC13 object  V69 ,V68 ,V67 ,V66;
  63. #define VC14 object  V82 ,V81 ,V80 ,V77 ,V76 ,V75 ,V74 ,V73;
  64. #define VC15 object  V95 ,V94 ,V93 ,V90 ,V89 ,V88 ,V87 ,V86;
  65. #define VC16 object  V108 ,V107 ,V106 ,V103 ,V102 ,V101 ,V100 ,V99;
  66. #define VM16 7
  67. #define VM15 7
  68. #define VM14 7
  69. #define VM13 6
  70. #define VM12 1
  71. #define VM11 0
  72. #define VM10 0
  73. #define VM9 4
  74. #define VM8 5
  75. #define VM7 2
  76. #define VM6 3
  77. #define VM5 12
  78. #define VM4 2
  79. #define VM3 2
  80. #define VM2 3
  81. #define VM1 2
  82. static char * VVi[57]={
  83. #define Cdata VV[56]
  84. (char *)(LI1),
  85. (char *)(LI2),
  86. (char *)(LI3),
  87. (char *)(LI4),
  88. (char *)(LI5),
  89. (char *)(LI6),
  90. (char *)(LI7),
  91. (char *)(L8),
  92. (char *)(L9),
  93. (char *)(LI10),
  94. (char *)(LI11),
  95. (char *)(LI12),
  96. (char *)(L13),
  97. (char *)(L14),
  98. (char *)(L15),
  99. (char *)(L16)
  100. };
  101. #define VV ((object *)VVi)
  102. static object  LnkTLI55() ;
  103. static object  (*LnkLI55)() = LnkTLI55;
  104. static  LnkT54() ;
  105. static  (*Lnk54)() = LnkT54;
  106. static  LnkT53() ;
  107. static  (*Lnk53)() = LnkT53;
  108. static  LnkT52() ;
  109. static  (*Lnk52)() = LnkT52;
  110. static object  LnkTLI51() ;
  111. static object  (*LnkLI51)() = LnkTLI51;
  112. static  LnkT50() ;
  113. static  (*Lnk50)() = LnkT50;
  114. static object  LnkTLI49() ;
  115. static object  (*LnkLI49)() = LnkTLI49;
  116. static object  LnkTLI48() ;
  117. static object  (*LnkLI48)() = LnkTLI48;
  118. static object  LnkTLI47() ;
  119. static object  (*LnkLI47)() = LnkTLI47;
  120. static  LnkT46() ;
  121. static  (*Lnk46)() = LnkT46;
  122. static object  LnkTLI45() ;
  123. static object  (*LnkLI45)() = LnkTLI45;
  124. static  LnkT44() ;
  125. static  (*Lnk44)() = LnkT44;
  126. static  LnkT43() ;
  127. static  (*Lnk43)() = LnkT43;
  128.