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 / cmpbind.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  1.8 KB  |  66 lines
  1.  
  2. static object LI1();
  3. #define VMB1 object  V26 ,V25 ,V23 ,V21 ,V20 ,V19 ,V16 ,V15 ,V14 ,V12 ,V11 ,V8 ,V7 ,V6 ,V5 ,V4;
  4. #define VMS1
  5. #define VMV1
  6. #define VMR1(VMT1) return(VMT1);
  7. static object LI2();
  8. #define VMB2 register object *base=vs_top; object  V48 ,V46 ,V44 ,V42 ,V40 ,V38 ,V36 ,V35 ,V34 ,V33;
  9. #define VMS2  register object *sup=vs_top+4;vs_top=sup;
  10. #define VMV2 vs_reserve(4);
  11. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  12. static object LI3();
  13. #define VMB3 register object *base=vs_top; object  V62 ,V59 ,V58 ,V57 ,V55;
  14. #define VMS3 vs_top += 1;
  15. #define VMV3 vs_reserve(1);
  16. #define VMR3(VMT3) vs_top=base ; return(VMT3);
  17. static object LI4();
  18. #define VMB4
  19. #define VMS4
  20. #define VMV4
  21. #define VMR4(VMT4) return(VMT4);
  22. #define VM4 0
  23. #define VM3 1
  24. #define VM2 4
  25. #define VM1 0
  26. static char * VVi[36]={
  27. #define Cdata VV[35]
  28. (char *)(LI1),
  29. (char *)(LI2),
  30. (char *)(LI3),
  31. (char *)(LI4)
  32. };
  33. #define VV ((object *)VVi)
  34. static object  LnkTLI34() ;
  35. static object  (*LnkLI34)() = LnkTLI34;
  36. static  LnkT33() ;
  37. static  (*Lnk33)() = LnkT33;
  38. static  LnkT32() ;
  39. static  (*Lnk32)() = LnkT32;
  40. static  LnkT31() ;
  41. static  (*Lnk31)() = LnkT31;
  42. static  LnkT30() ;
  43. static  (*Lnk30)() = LnkT30;
  44. static  LnkT29() ;
  45. static  (*Lnk29)() = LnkT29;
  46. static object  LnkTLI28() ;
  47. static object  (*LnkLI28)() = LnkTLI28;
  48. static  LnkT27() ;
  49. static  (*Lnk27)() = LnkT27;
  50. static  LnkT26() ;
  51. static  (*Lnk26)() = LnkT26;
  52. static object  LnkTLI25() ;
  53. static object  (*LnkLI25)() = LnkTLI25;
  54. static object  LnkTLI18() ;
  55. static object  (*LnkLI18)() = LnkTLI18;
  56. static object  LnkTLI17() ;
  57. static object  (*LnkLI17)() = LnkTLI17;
  58. static object  LnkTLI15() ;
  59. static object  (*LnkLI15)() = LnkTLI15;
  60. static object  LnkTLI14() ;
  61. static object  (*LnkLI14)() = LnkTLI14;
  62. static object  LnkTLI13() ;
  63. static object  (*LnkLI13)() = LnkTLI13;
  64. static object  LnkTLI12() ;
  65. static object  (*LnkLI12)() = LnkTLI12;
  66.