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 / cmpflet.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  4.0 KB  |  126 lines
  1.  
  2. static object LI1();
  3. static L3();
  4. static L5();
  5. static object LI1();
  6. static struct { short n,allow_other_keys;int *defaults;
  7.      int keys[5];} LI1key={5,0,(int *)Cstd_key_defaults,{40,41,6,5,4}};
  8. #define VMB1 register object *base=vs_top; object Vcs[10];
  9. #define VMS1  register object *sup=vs_top+6;vs_top=sup;
  10. #define VMV1 vs_reserve(6);
  11. #define VMR1(VMT1) vs_top=base ; return(VMT1);
  12. static object LI2();
  13. #define VMB2 register object *base=vs_top; object  V33 ,V32 ,V31 ,V30 ,V29 ,V27 ,V26 ,V25 ,V21;
  14. #define VMS2  register object *sup=vs_top+6;vs_top=sup;
  15. #define VMV2 vs_reserve(6);
  16. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  17. #define VC3 object  V56 ,V55 ,V54 ,V53 ,V52 ,V51 ,V50 ,V48 ,V46 ,V43;
  18. static object LI4();
  19. #define VMB4 register object *base=vs_top; object  V94 ,V93 ,V90 ,V89 ,V88 ,V82 ,V81 ,V80 ,V74;
  20. #define VMS4  register object *sup=vs_top+6;vs_top=sup;
  21. #define VMV4 vs_reserve(6);
  22. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  23. #define VC5 object  V118 ,V117 ,V116 ,V114 ,V111 ,V106 ,V105 ,V104 ,V103;
  24. static object LI6();
  25. #define VMB6 register object *base=vs_top; object  V130 ,V129 ,V128;
  26. #define VMS6  register object *sup=vs_top+4;vs_top=sup;
  27. #define VMV6 vs_reserve(4);
  28. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  29. static object LI7();
  30. #define VMB7 register object *base=vs_top; object  V139;
  31. #define VMS7 vs_top += 1;
  32. #define VMV7 vs_reserve(1);
  33. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  34. static object LI8();
  35. #define VMB8 register object *base=vs_top; object  V146;
  36. #define VMS8 vs_top += 1;
  37. #define VMV8 vs_reserve(1);
  38. #define VMR8(VMT8) vs_top=base ; return(VMT8);
  39. static object LI9();
  40. #define VMB9 register object *base=vs_top; object  V155;
  41. #define VMS9 vs_top += 1;
  42. #define VMV9 vs_reserve(1);
  43. #define VMR9(VMT9) vs_top=base ; return(VMT9);
  44. static object LI10();
  45. #define VMB10 register object *base=vs_top; object  V172 ,V171 ,V170 ,V167 ,V166 ,V162 ,V161;
  46. #define VMS10 vs_top += 5;
  47. #define VMV10 vs_reserve(5);
  48. #define VMR10(VMT10) vs_top=base ; return(VMT10);
  49. #define VM10 5
  50. #define VM9 1
  51. #define VM8 1
  52. #define VM7 1
  53. #define VM6 4
  54. #define VM5 6
  55. #define VM4 6
  56. #define VM3 7
  57. #define VM2 6
  58. #define VM1 6
  59. static char * VVi[69]={
  60. #define Cdata VV[68]
  61. (char *)(LI1),
  62. (char *)(&LI1key),
  63. (char *)(LI2),
  64. (char *)(L3),
  65. (char *)(LI4),
  66. (char *)(L5),
  67. (char *)(LI6),
  68. (char *)(LI7),
  69. (char *)(LI8),
  70. (char *)(LI9),
  71. (char *)(LI10)
  72. };
  73. #define VV ((object *)VVi)
  74. static object  LnkTLI67() ;
  75. static object  (*LnkLI67)() = LnkTLI67;
  76. static object  LnkTLI66() ;
  77. static object  (*LnkLI66)() = LnkTLI66;
  78. static object  LnkTLI65() ;
  79. static object  (*LnkLI65)() = LnkTLI65;
  80. static object  LnkTLI64() ;
  81. static object  (*LnkLI64)() = LnkTLI64;
  82. static object  LnkTLI63() ;
  83. static object  (*LnkLI63)() = LnkTLI63;
  84. static object  LnkTLI62() ;
  85. static object  (*LnkLI62)() = LnkTLI62;
  86. static object  LnkTLI61() ;
  87. static object  (*LnkLI61)() = LnkTLI61;
  88. static object  LnkTLI60() ;
  89. static object  (*LnkLI60)() = LnkTLI60;
  90. static object  LnkTLI59() ;
  91. static object  (*LnkLI59)() = LnkTLI59;
  92. static  LnkT58() ;
  93. static  (*Lnk58)() = LnkT58;
  94. static object  LnkTLI57() ;
  95. static object  (*LnkLI57)() = LnkTLI57;
  96. static object  LnkTLI56() ;
  97. static object  (*LnkLI56)() = LnkTLI56;
  98. static object  LnkTLI55() ;
  99. static object  (*LnkLI55)() = LnkTLI55;
  100. static object  LnkTLI54() ;
  101. static object  (*LnkLI54)() = LnkTLI54;
  102. static object  LnkTLI53() ;
  103. static object  (*LnkLI53)() = LnkTLI53;
  104. static object  LnkTLI52() ;
  105. static object  (*LnkLI52)() = LnkTLI52;
  106. static object  LnkTLI51() ;
  107. static object  (*LnkLI51)() = LnkTLI51;
  108. static object  LnkTLI50() ;
  109. static object  (*LnkLI50)() = LnkTLI50;
  110. static  LnkT49() ;
  111. static  (*Lnk49)() = LnkT49;
  112. static object  LnkTLI48() ;
  113. static object  (*LnkLI48)() = LnkTLI48;
  114. static object  LnkTLI47() ;
  115. static object  (*LnkLI47)() = LnkTLI47;
  116. static object  LnkTLI46() ;
  117. static object  (*LnkLI46)() = LnkTLI46;
  118. static  LnkT45() ;
  119. static  (*Lnk45)() = LnkT45;
  120. static object  LnkTLI44() ;
  121. static object  (*LnkLI44)() = LnkTLI44;
  122. static object  LnkTLI43() ;
  123. static object  (*LnkLI43)() = LnkTLI43;
  124. static object  LnkTLI42() ;
  125. static object  (*LnkLI42)() = LnkTLI42;
  126.