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 / cmpmap.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  2.9 KB  |  111 lines
  1.  
  2. static object LI1();
  3. #define VMB1
  4. #define VMS1
  5. #define VMV1
  6. #define VMR1(VMT1) return(VMT1);
  7. static object LI2();
  8. #define VMB2
  9. #define VMS2
  10. #define VMV2
  11. #define VMR2(VMT2) return(VMT2);
  12. static object LI3();
  13. #define VMB3
  14. #define VMS3
  15. #define VMV3
  16. #define VMR3(VMT3) return(VMT3);
  17. static object LI4();
  18. #define VMB4
  19. #define VMS4
  20. #define VMV4
  21. #define VMR4(VMT4) return(VMT4);
  22. static object LI5();
  23. #define VMB5
  24. #define VMS5
  25. #define VMV5
  26. #define VMR5(VMT5) return(VMT5);
  27. static object LI6();
  28. #define VMB6
  29. #define VMS6
  30. #define VMV6
  31. #define VMR6(VMT6) return(VMT6);
  32. static object LI7();
  33. #define VMB7 register object *base=vs_top; object  V27;
  34. #define VMS7  register object *sup=vs_top+1;vs_top=sup;
  35. #define VMV7 vs_reserve(1);
  36. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  37. static object LI8();
  38. #define VMB8 register object *base=vs_top; object  V52 ,V44 ,V43;
  39. #define VMS8  register object *sup=vs_top+6;vs_top=sup;
  40. #define VMV8 vs_reserve(6);
  41. #define VMR8(VMT8) vs_top=base ; return(VMT8);
  42. static object LI9();
  43. #define VMB9 register object *base=vs_top; object  V87 ,V79 ,V78;
  44. #define VMS9  register object *sup=vs_top+6;vs_top=sup;
  45. #define VMV9 vs_reserve(6);
  46. #define VMR9(VMT9) vs_top=base ; return(VMT9);
  47. static object LI10();
  48. #define VMB10 register object *base=vs_top; object  V123 ,V115 ,V114;
  49. #define VMS10  register object *sup=vs_top+6;vs_top=sup;
  50. #define VMV10 vs_reserve(6);
  51. #define VMR10(VMT10) vs_top=base ; return(VMT10);
  52. static object LI11();
  53. #define VMB11 register object *base=vs_top;
  54. #define VMS11 vs_top += 2;
  55. #define VMV11 vs_reserve(2);
  56. #define VMR11(VMT11) vs_top=base ; return(VMT11);
  57. #define VM11 2
  58. #define VM10 6
  59. #define VM9 6
  60. #define VM8 6
  61. #define VM7 1
  62. #define VM6 0
  63. #define VM5 0
  64. #define VM4 0
  65. #define VM3 0
  66. #define VM2 0
  67. #define VM1 0
  68. static char * VVi[38]={
  69. #define Cdata VV[37]
  70. (char *)(LI1),
  71. (char *)(LI2),
  72. (char *)(LI3),
  73. (char *)(LI4),
  74. (char *)(LI5),
  75. (char *)(LI6),
  76. (char *)(LI7),
  77. (char *)(LI8),
  78. (char *)(LI9),
  79. (char *)(LI10),
  80. (char *)(LI11)
  81. };
  82. #define VV ((object *)VVi)
  83. static object  LnkTLI36() ;
  84. static object  (*LnkLI36)() = LnkTLI36;
  85. static object  LnkTLI35() ;
  86. static object  (*LnkLI35)() = LnkTLI35;
  87. static object  LnkTLI34() ;
  88. static object  (*LnkLI34)() = LnkTLI34;
  89. static object  LnkTLI33() ;
  90. static object  (*LnkLI33)() = LnkTLI33;
  91. static object  LnkTLI32() ;
  92. static object  (*LnkLI32)() = LnkTLI32;
  93. static object  LnkTLI31() ;
  94. static object  (*LnkLI31)() = LnkTLI31;
  95. static object  LnkTLI30() ;
  96. static object  (*LnkLI30)() = LnkTLI30;
  97. static object  LnkTLI29() ;
  98. static object  (*LnkLI29)() = LnkTLI29;
  99. static object  LnkTLI28() ;
  100. static object  (*LnkLI28)() = LnkTLI28;
  101. static object  LnkTLI27() ;
  102. static object  (*LnkLI27)() = LnkTLI27;
  103. static  LnkT26() ;
  104. static  (*Lnk26)() = LnkT26;
  105. static object  LnkTLI25() ;
  106. static object  (*LnkLI25)() = LnkTLI25;
  107. static object  LnkTLI24() ;
  108. static object  (*LnkLI24)() = LnkTLI24;
  109. static object  LnkTLI23() ;
  110. static object  (*LnkLI23)() = LnkTLI23;
  111.