/[gcl]/gcl/cmpnew/cmptag.c
ViewVC logotype

Diff of /gcl/cmpnew/cmptag.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.9 by camm, Wed Feb 26 22:21:35 2003 UTC revision 1.9.4.1 by camm, Wed Jul 16 02:02:47 2003 UTC
# Line 20  static object LI1(object first,...) Line 20  static object LI1(object first,...)
20          va_start(ap,first);          va_start(ap,first);
21          narg= narg - 0;          narg= narg - 0;
22          {          {
23          parse_key_new_new(narg,Vcs +0,(struct key *)&LI1key,first,ap);          parse_key_new_new(narg,Vcs +0,(struct key *)(void *)&LI1key,first,ap);
24          V1=(Vcs[0]);          V1=(Vcs[0]);
25          V2=(Vcs[1]);          V2=(Vcs[1]);
26          V3=(Vcs[2]);          V3=(Vcs[2]);
# Line 1255  static void L20() Line 1255  static void L20()
1255          vs_top=(vs_base=base+2)+1;          vs_top=(vs_base=base+2)+1;
1256          return;          return;
1257  }  }
1258  static object  LnkTLI84(){return call_proc0(VV[84],(void **)&LnkLI84);} /* CLOSE-INLINE-BLOCKS */  static object  LnkTLI84(){return call_proc0(VV[84],(void **)(void *)&LnkLI84);} /* CLOSE-INLINE-BLOCKS */
1259  static void LnkT83(){ call_or_link(VV[83],(void **)&Lnk83);} /* WT-INLINE-LOC */  static void LnkT83(){ call_or_link(VV[83],(void **)(void *)&Lnk83);} /* WT-INLINE-LOC */
1260  static object  LnkTLI82(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[82],(void **)&LnkLI82,first,ap);va_end(ap);return V1;} /* INLINE-ARGS */  static object  LnkTLI82(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[82],(void **)(void *)&LnkLI82,first,ap);va_end(ap);return V1;} /* INLINE-ARGS */
1261  static object  LnkTLI81(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[81],(void **)&LnkLI81,1,first,ap);va_end(ap);return V1;} /* CMP-MACROEXPAND-1 */  static object  LnkTLI81(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[81],(void **)(void *)&LnkLI81,1,first,ap);va_end(ap);return V1;} /* CMP-MACROEXPAND-1 */
1262  static object  LnkTLI80(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[80],(void **)&LnkLI80,1,first,ap);va_end(ap);return V1;} /* C1TAGBODY */  static object  LnkTLI80(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[80],(void **)(void *)&LnkLI80,1,first,ap);va_end(ap);return V1;} /* C1TAGBODY */
1263  static void LnkT79(){ call_or_link(VV[79],(void **)&Lnk79);} /* SUBTYPEP */  static void LnkT79(){ call_or_link(VV[79],(void **)(void *)&Lnk79);} /* SUBTYPEP */
1264  static object  LnkTLI78(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[78],(void **)&LnkLI78,1,first,ap);va_end(ap);return V1;} /* C1EXPR */  static object  LnkTLI78(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[78],(void **)(void *)&LnkLI78,1,first,ap);va_end(ap);return V1;} /* C1EXPR */
1265  static object  LnkTLI77(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[77],(void **)&LnkLI77,1,first,ap);va_end(ap);return V1;} /* WT-CCB-VS */  static object  LnkTLI77(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[77],(void **)(void *)&LnkLI77,1,first,ap);va_end(ap);return V1;} /* WT-CCB-VS */
1266  static object  LnkTLI76(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[76],(void **)&LnkLI76,1,first,ap);va_end(ap);return V1;} /* UNWIND-NO-EXIT */  static object  LnkTLI76(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[76],(void **)(void *)&LnkLI76,1,first,ap);va_end(ap);return V1;} /* UNWIND-NO-EXIT */
1267  static object  LnkTLI75(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[75],(void **)&LnkLI75,1,first,ap);va_end(ap);return V1;} /* C2GO-LOCAL */  static object  LnkTLI75(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[75],(void **)(void *)&LnkLI75,1,first,ap);va_end(ap);return V1;} /* C2GO-LOCAL */
1268  static object  LnkTLI74(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[74],(void **)&LnkLI74,1,first,ap);va_end(ap);return V1;} /* C2GO-CLB */  static object  LnkTLI74(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[74],(void **)(void *)&LnkLI74,1,first,ap);va_end(ap);return V1;} /* C2GO-CLB */
1269  static object  LnkTLI73(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[73],(void **)&LnkLI73,1,first,ap);va_end(ap);return V1;} /* C2GO-CCB */  static object  LnkTLI73(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[73],(void **)(void *)&LnkLI73,1,first,ap);va_end(ap);return V1;} /* C2GO-CCB */
1270  static object  LnkTLI70(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[70],(void **)&LnkLI70,first,ap);va_end(ap);return V1;} /* CMPERR */  static object  LnkTLI70(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[70],(void **)(void *)&LnkLI70,first,ap);va_end(ap);return V1;} /* CMPERR */
1271  static object  LnkTLI69(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[69],(void **)&LnkLI69,3,first,ap);va_end(ap);return V1;} /* TOO-MANY-ARGS */  static object  LnkTLI69(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[69],(void **)(void *)&LnkLI69,3,first,ap);va_end(ap);return V1;} /* TOO-MANY-ARGS */
1272  static object  LnkTLI68(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[68],(void **)&LnkLI68,3,first,ap);va_end(ap);return V1;} /* TOO-FEW-ARGS */  static object  LnkTLI68(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[68],(void **)(void *)&LnkLI68,3,first,ap);va_end(ap);return V1;} /* TOO-FEW-ARGS */
1273  static object  LnkTLI67(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[67],(void **)&LnkLI67,1,first,ap);va_end(ap);return V1;} /* WT-VS* */  static object  LnkTLI67(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[67],(void **)(void *)&LnkLI67,1,first,ap);va_end(ap);return V1;} /* WT-VS* */
1274  static object  LnkTLI66(){return call_proc0(VV[66],(void **)&LnkLI66);} /* CCB-VS-PUSH */  static object  LnkTLI66(){return call_proc0(VV[66],(void **)(void *)&LnkLI66);} /* CCB-VS-PUSH */
1275  static object  LnkTLI65(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[65],(void **)&LnkLI65,1,first,ap);va_end(ap);return V1;} /* CLINK */  static object  LnkTLI65(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[65],(void **)(void *)&LnkLI65,1,first,ap);va_end(ap);return V1;} /* CLINK */
1276  static object  LnkTLI64(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[64],(void **)&LnkLI64,first,ap);va_end(ap);return V1;} /* WT-CLINK */  static object  LnkTLI64(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[64],(void **)(void *)&LnkLI64,first,ap);va_end(ap);return V1;} /* WT-CLINK */
1277  static object  LnkTLI63(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[63],(void **)&LnkLI63,1,first,ap);va_end(ap);return V1;} /* WT-VS */  static object  LnkTLI63(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[63],(void **)(void *)&LnkLI63,1,first,ap);va_end(ap);return V1;} /* WT-VS */
1278  static object  LnkTLI62(){return call_proc0(VV[62],(void **)&LnkLI62);} /* VS-PUSH */  static object  LnkTLI62(){return call_proc0(VV[62],(void **)(void *)&LnkLI62);} /* VS-PUSH */
1279  static void LnkT61(){ call_or_link(VV[61],(void **)&Lnk61);} /* C2EXPR */  static void LnkT61(){ call_or_link(VV[61],(void **)(void *)&Lnk61);} /* C2EXPR */
1280  static object  LnkTLI60(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[60],(void **)&LnkLI60,1,first,ap);va_end(ap);return V1;} /* WT1 */  static object  LnkTLI60(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[60],(void **)(void *)&LnkLI60,1,first,ap);va_end(ap);return V1;} /* WT1 */
1281  static object  LnkTLI59(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[59],(void **)&LnkLI59,1,first,ap);va_end(ap);return V1;} /* WT-SWITCH-CASE */  static object  LnkTLI59(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[59],(void **)(void *)&LnkLI59,1,first,ap);va_end(ap);return V1;} /* WT-SWITCH-CASE */
1282  static object  LnkTLI58(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[58],(void **)&LnkLI58,first,ap);va_end(ap);return V1;} /* UNWIND-EXIT */  static object  LnkTLI58(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[58],(void **)(void *)&LnkLI58,first,ap);va_end(ap);return V1;} /* UNWIND-EXIT */
1283  static object  LnkTLI57(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[57],(void **)&LnkLI57,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-BODY */  static object  LnkTLI57(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[57],(void **)(void *)&LnkLI57,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-BODY */
1284  static object  LnkTLI56(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[56],(void **)&LnkLI56,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-LOCAL */  static object  LnkTLI56(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[56],(void **)(void *)&LnkLI56,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-LOCAL */
1285  static object  LnkTLI55(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[55],(void **)&LnkLI55,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-CLB */  static object  LnkTLI55(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[55],(void **)(void *)&LnkLI55,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-CLB */
1286  static object  LnkTLI54(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[54],(void **)&LnkLI54,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-CCB */  static object  LnkTLI54(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[54],(void **)(void *)&LnkLI54,1,first,ap);va_end(ap);return V1;} /* C2TAGBODY-CCB */
1287  static object  LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[53],(void **)&LnkLI53,1,first,ap);va_end(ap);return V1;} /* ADD-OBJECT */  static object  LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[53],(void **)(void *)&LnkLI53,1,first,ap);va_end(ap);return V1;} /* ADD-OBJECT */
1288  static object  LnkTLI52(){return call_proc0(VV[52],(void **)&LnkLI52);} /* C1NIL */  static object  LnkTLI52(){return call_proc0(VV[52],(void **)(void *)&LnkLI52);} /* C1NIL */
1289  static object  LnkTLI51(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[51],(void **)&LnkLI51,1,first,ap);va_end(ap);return V1;} /* ADD-LOOP-REGISTERS */  static object  LnkTLI51(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[51],(void **)(void *)&LnkLI51,1,first,ap);va_end(ap);return V1;} /* ADD-LOOP-REGISTERS */
1290  static object  LnkTLI50(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[50],(void **)&LnkLI50,2,first,ap);va_end(ap);return V1;} /* C1EXPR* */  static object  LnkTLI50(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[50],(void **)(void *)&LnkLI50,2,first,ap);va_end(ap);return V1;} /* C1EXPR* */
1291  static object  LnkTLI49(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[49],(void **)&LnkLI49,first,ap);va_end(ap);return V1;} /* MAKE-TAG */  static object  LnkTLI49(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[49],(void **)(void *)&LnkLI49,first,ap);va_end(ap);return V1;} /* MAKE-TAG */
1292  static object  LnkTLI48(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[48],(void **)&LnkLI48,first,ap);va_end(ap);return V1;} /* MAKE-INFO */  static object  LnkTLI48(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[48],(void **)(void *)&LnkLI48,first,ap);va_end(ap);return V1;} /* MAKE-INFO */
1293  static object  LnkTLI47(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[47],(void **)&LnkLI47,1,first,ap);va_end(ap);return V1;} /* ADD-REG1 */  static object  LnkTLI47(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[47],(void **)(void *)&LnkLI47,1,first,ap);va_end(ap);return V1;} /* ADD-REG1 */
1294  static object  LnkTLI46(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[46],(void **)&LnkLI46,2,first,ap);va_end(ap);return V1;} /* JUMPS-TO-P */  static object  LnkTLI46(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[46],(void **)(void *)&LnkLI46,2,first,ap);va_end(ap);return V1;} /* JUMPS-TO-P */
1295  static void LnkT45(){ call_or_link(VV[45],(void **)&Lnk45);} /* STRUCTURE-SUBTYPE-P */  static void LnkT45(){ call_or_link(VV[45],(void **)(void *)&Lnk45);} /* STRUCTURE-SUBTYPE-P */
1296    
1297  #ifdef SYSTEM_SPECIAL_INIT  #ifdef SYSTEM_SPECIAL_INIT
1298  SYSTEM_SPECIAL_INIT  SYSTEM_SPECIAL_INIT

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.9.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26