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 / lsp / setf.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  3.2 KB  |  132 lines
  1.  
  2. static L1();
  3. static L2();
  4. static L3();
  5. static L4();
  6. static L5();
  7. static L6();
  8. static L7();
  9. static L8();
  10. static L9();
  11. static L10();
  12. static L11();
  13. static L16();
  14. static L17();
  15. static L18();
  16. static L19();
  17. static L20();
  18. static L21();
  19. static L22();
  20. static L23();
  21. static L24();
  22. static L25();
  23. #define VC1 object  V16 ,V15 ,V14 ,V13 ,V12 ,V11 ,V10 ,V9 ,V8 ,V7 ,V6 ,V5 ,V4 ,V3 ,V2;
  24. #define VC2 object  V26 ,V25 ,V24 ,V23 ,V22 ,V21 ,V20 ,V19 ,V18;
  25. #define VC3 object  V34;
  26. #define VC4 object  V56 ,V48 ,V47 ,V46;
  27. #define VC5 object  V59;
  28. #define VC6 object  V74 ,V73 ,V72 ,V71;
  29. #define VC7 object  V85 ,V84;
  30. #define VC8 object  V107 ,V106 ,V105 ,V104 ,V103 ,V102 ,V101 ,V100 ,V99 ,V98 ,V97 ,V96 ,V95 ,V94;
  31. #define VC9 object  V119;
  32. #define VC10 object  V131;
  33. #define VC11 object  V143;
  34. static object LI12();
  35. #define VMB12 register object *base=vs_top; object  V169 ,V168 ,V167 ,V163 ,V155 ,V154 ,V153;
  36. #define VMS12  register object *sup=vs_top+2;vs_top=sup;
  37. #define VMV12 vs_reserve(2);
  38. #define VMR12(VMT12) vs_top=base ; return(VMT12);
  39. static object LI13();
  40. #define VMB13
  41. #define VMS13
  42. #define VMV13
  43. #define VMR13(VMT13) return(VMT13);
  44. static object LI14();
  45. #define VMB14 register object *base=vs_top; object  V190 ,V189;
  46. #define VMS14  register object *sup=vs_top+2;vs_top=sup;
  47. #define VMV14 vs_reserve(2);
  48. #define VMR14(VMT14) vs_top=base ; return(VMT14);
  49. static object LI15();
  50. #define VMB15 register object *base=vs_top; object  V199;
  51. #define VMS15  register object *sup=vs_top+2;vs_top=sup;
  52. #define VMV15 vs_reserve(2);
  53. #define VMR15(VMT15) vs_top=base ; return(VMT15);
  54. #define VC16 object  V218 ,V217 ,V216 ,V212 ,V206 ,V202;
  55. #define VC17 object  V239 ,V233 ,V232 ,V231 ,V227 ,V226;
  56. #define VC18 object  V260 ,V254 ,V253 ,V249;
  57. #define VC19 object  V275 ,V274 ,V273 ,V272 ,V271 ,V270 ,V269 ,V268;
  58. #define VC20 object  V286 ,V282;
  59. #define VC21 object  V301 ,V300 ,V299 ,V298 ,V294;
  60. #define VC22 object  V316 ,V315 ,V314 ,V313 ,V309;
  61. #define VC23 object  V330 ,V329 ,V328 ,V327 ,V323;
  62. #define VC24 object  V344 ,V343 ,V342 ,V341 ,V337;
  63. #define VC25 object  V361 ,V360 ,V359 ,V358 ,V354 ,V348 ,V347;
  64. #define VM25 5
  65. #define VM24 7
  66. #define VM23 6
  67. #define VM22 6
  68. #define VM21 6
  69. #define VM20 6
  70. #define VM19 7
  71. #define VM18 7
  72. #define VM17 8
  73. #define VM16 5
  74. #define VM15 2
  75. #define VM14 2
  76. #define VM13 0
  77. #define VM12 2
  78. #define VM11 8
  79. #define VM10 8
  80. #define VM9 8
  81. #define VM8 9
  82. #define VM7 8
  83. #define VM6 9
  84. #define VM5 6
  85. #define VM4 12
  86. #define VM3 7
  87. #define VM2 8
  88. #define VM1 5
  89. static char * VVi[102]={
  90. #define Cdata VV[101]
  91. (char *)(L1),
  92. (char *)(L2),
  93. (char *)(L3),
  94. (char *)(L4),
  95. (char *)(L5),
  96. (char *)(L6),
  97. (char *)(L7),
  98. (char *)(L8),
  99. (char *)(L9),
  100. (char *)(L10),
  101. (char *)(L11),
  102. (char *)(LI12),
  103. (char *)(LI13),
  104. (char *)(LI14),
  105. (char *)(LI15),
  106. (char *)(L16),
  107. (char *)(L17),
  108. (char *)(L18),
  109. (char *)(L19),
  110. (char *)(L20),
  111. (char *)(L21),
  112. (char *)(L22),
  113. (char *)(L23),
  114. (char *)(L24),
  115. (char *)(L25)
  116. };
  117. #define VV ((object *)VVi)
  118. static object  LnkTLI100() ;
  119. static object  (*LnkLI100)() = LnkTLI100;
  120. static object  LnkTLI99() ;
  121. static object  (*LnkLI99)() = LnkTLI99;
  122. static  LnkT97() ;
  123. static  (*Lnk97)() = LnkT97;
  124. static object  LnkTLI96() ;
  125. static object  (*LnkLI96)() = LnkTLI96;
  126. static  LnkT95() ;
  127. static  (*Lnk95)() = LnkT95;
  128. static  LnkT94() ;
  129. static  (*Lnk94)() = LnkT94;
  130. static object  LnkTLI93() ;
  131. static object  (*LnkLI93)() = LnkTLI93;
  132.