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

Diff of /gcl/cmpnew/cmpmulti.c

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

revision 1.4 by camm, Sat Jul 20 07:10:54 2002 UTC revision 1.5 by camm, Fri Aug 2 22:23:58 2002 UTC
# Line 317  T162:; Line 317  T162:;
317          setq(VV[7],Ct);          setq(VV[7],Ct);
318  goto T151;  goto T151;
319  T151:;  T151:;
320          V49 = make_fixnum(length((V43)));          V49 = make_fixnum((long)length((V43)));
321          V50= make_cons(VV[13],V49);          V50= make_cons(VV[13],V49);
322          {object V51 = (VFUN_NARGS=3,(*(LnkLI50))(VV[11],Cnil,/* INLINE-ARGS */V50));          {object V51 = (VFUN_NARGS=3,(*(LnkLI50))(VV[11],Cnil,/* INLINE-ARGS */V50));
323          bds_unwind1;          bds_unwind1;
# Line 348  goto T187; Line 348  goto T187;
348  T187:;  T187:;
349          if(endp(cddr((V53)))){          if(endp(cddr((V53)))){
350          goto T192;}          goto T192;}
351          V56 = make_fixnum(length((V53)));          V56 = make_fixnum((long)length((V53)));
352          (void)((*(LnkLI55))(VV[19],small_fixnum(2),V56));          (void)((*(LnkLI55))(VV[19],small_fixnum(2),V56));
353  goto T192;  goto T192;
354  T192:;  T192:;
# Line 546  TTL:; Line 546  TTL:;
546          goto T285;}          goto T285;}
547  goto T286;  goto T286;
548  T286:;  T286:;
549          V96 = make_fixnum(length((V86)));          V96 = make_fixnum((long)length((V86)));
550          (void)((*(LnkLI38))(VV[32],small_fixnum(2),V96));          (void)((*(LnkLI38))(VV[32],small_fixnum(2),V96));
551  goto T285;  goto T285;
552  T285:;  T285:;
# Line 834  T473:; Line 834  T473:;
834          return Cnil;          return Cnil;
835  }  }
836  static void LnkT72(){ call_or_link(VV[72],(void **)&Lnk72);} /* C2EXPR */  static void LnkT72(){ call_or_link(VV[72],(void **)&Lnk72);} /* C2EXPR */
837  static object  LnkTLI71(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[71],(void **)&LnkLI71,2,ap);} /* C2BIND-LOC */  static object  LnkTLI71(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[71],(void **)&LnkLI71,2,ap);va_end(ap);return V1;} /* C2BIND-LOC */
838  static void LnkT70(){ call_or_link(VV[70],(void **)&Lnk70);} /* WT-VAR-DECL */  static void LnkT70(){ call_or_link(VV[70],(void **)&Lnk70);} /* WT-VAR-DECL */
839  static object  LnkTLI69(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[69],(void **)&LnkLI69,1,ap);} /* C2VAR-KIND */  static object  LnkTLI69(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[69],(void **)&LnkLI69,1,ap);va_end(ap);return V1;} /* C2VAR-KIND */
840  static object  LnkTLI68(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[68],(void **)&LnkLI68,1,ap);} /* CHECK-VREF */  static object  LnkTLI68(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[68],(void **)&LnkLI68,1,ap);va_end(ap);return V1;} /* CHECK-VREF */
841  static object  LnkTLI67(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[67],(void **)&LnkLI67,2,ap);} /* ADD-INFO */  static object  LnkTLI67(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[67],(void **)&LnkLI67,2,ap);va_end(ap);return V1;} /* ADD-INFO */
842  static object  LnkTLI66(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[66],(void **)&LnkLI66,2,ap);} /* C1DECL-BODY */  static object  LnkTLI66(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[66],(void **)&LnkLI66,2,ap);va_end(ap);return V1;} /* C1DECL-BODY */
843  static object  LnkTLI65(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[65],(void **)&LnkLI65,3,ap);} /* CHECK-VDECL */  static object  LnkTLI65(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[65],(void **)&LnkLI65,3,ap);va_end(ap);return V1;} /* CHECK-VDECL */
844  static object  LnkTLI64(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[64],(void **)&LnkLI64,4,ap);} /* C1MAKE-VAR */  static object  LnkTLI64(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[64],(void **)&LnkLI64,4,ap);va_end(ap);return V1;} /* C1MAKE-VAR */
845  static object  LnkTLI63(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[63],(void **)&LnkLI63,1,ap);} /* C1ADD-GLOBALS */  static object  LnkTLI63(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[63],(void **)&LnkLI63,1,ap);va_end(ap);return V1;} /* C1ADD-GLOBALS */
846  static void LnkT62(){ call_or_link(VV[62],(void **)&Lnk62);} /* C1BODY */  static void LnkT62(){ call_or_link(VV[62],(void **)&Lnk62);} /* C1BODY */
847  static object  LnkTLI61(){return call_proc0(VV[61],(void **)&LnkLI61);} /* RESET-TOP */  static object  LnkTLI61(){return call_proc0(VV[61],(void **)&LnkLI61);} /* RESET-TOP */
848  static object  LnkTLI60(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[60],(void **)&LnkLI60,3,ap);} /* SET-VAR */  static object  LnkTLI60(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[60],(void **)&LnkLI60,3,ap);va_end(ap);return V1;} /* SET-VAR */
849  static object  LnkTLI59(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[59],(void **)&LnkLI59,2,ap);} /* RECORD-CALL-INFO */  static object  LnkTLI59(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[59],(void **)&LnkLI59,2,ap);va_end(ap);return V1;} /* RECORD-CALL-INFO */
850  static object  LnkTLI58(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[58],(void **)&LnkLI58,2,ap);} /* MULTIPLE-VALUE-CHECK */  static object  LnkTLI58(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[58],(void **)&LnkLI58,2,ap);va_end(ap);return V1;} /* MULTIPLE-VALUE-CHECK */
851  static object  LnkTLI57(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[57],(void **)&LnkLI57,1,ap);} /* C1VREF */  static object  LnkTLI57(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[57],(void **)&LnkLI57,1,ap);va_end(ap);return V1;} /* C1VREF */
852  static object  LnkTLI56(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[56],(void **)&LnkLI56,ap);} /* CMPERR */  static object  LnkTLI56(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[56],(void **)&LnkLI56,ap);va_end(ap);return V1;} /* CMPERR */
853  static object  LnkTLI55(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[55],(void **)&LnkLI55,3,ap);} /* TOO-MANY-ARGS */  static object  LnkTLI55(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[55],(void **)&LnkLI55,3,ap);va_end(ap);return V1;} /* TOO-MANY-ARGS */
854  static object  LnkTLI54(){return call_proc0(VV[54],(void **)&LnkLI54);} /* VS-PUSH */  static object  LnkTLI54(){return call_proc0(VV[54],(void **)&LnkLI54);} /* VS-PUSH */
855  static object  LnkTLI53(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[53],(void **)&LnkLI53,ap);} /* CMPWARN */  static object  LnkTLI53(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[53],(void **)&LnkLI53,ap);va_end(ap);return V1;} /* CMPWARN */
856  static object  LnkTLI52(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[52],(void **)&LnkLI52,1,ap);} /* C1EXPR */  static object  LnkTLI52(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[52],(void **)&LnkLI52,1,ap);va_end(ap);return V1;} /* C1EXPR */
857  static object  LnkTLI51(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[51],(void **)&LnkLI51,1,ap);} /* GET-RETURN-TYPE */  static object  LnkTLI51(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[51],(void **)&LnkLI51,1,ap);va_end(ap);return V1;} /* GET-RETURN-TYPE */
858  static object  LnkTLI50(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[50],(void **)&LnkLI50,ap);} /* UNWIND-EXIT */  static object  LnkTLI50(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[50],(void **)&LnkLI50,ap);va_end(ap);return V1;} /* UNWIND-EXIT */
859  static object  LnkTLI49(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[49],(void **)&LnkLI49,2,ap);} /* C1EXPR* */  static object  LnkTLI49(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[49],(void **)&LnkLI49,2,ap);va_end(ap);return V1;} /* C1EXPR* */
860  static object  LnkTLI48(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[48],(void **)&LnkLI48,ap);} /* MAKE-INFO */  static object  LnkTLI48(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[48],(void **)&LnkLI48,ap);va_end(ap);return V1;} /* MAKE-INFO */
861  static object  LnkTLI47(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[47],(void **)&LnkLI47,2,ap);} /* C2EXPR-TOP* */  static object  LnkTLI47(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[47],(void **)&LnkLI47,2,ap);va_end(ap);return V1;} /* C2EXPR-TOP* */
862  static object  LnkTLI46(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[46],(void **)&LnkLI46,1,ap);} /* WT1 */  static object  LnkTLI46(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[46],(void **)&LnkLI46,1,ap);va_end(ap);return V1;} /* WT1 */
863  static object  LnkTLI45(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[45],(void **)&LnkLI45,ap);} /* C2FUNCALL */  static object  LnkTLI45(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[45],(void **)&LnkLI45,ap);va_end(ap);return V1;} /* C2FUNCALL */
864  static object  LnkTLI44(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[44],(void **)&LnkLI44,1,ap);} /* C2EXPR* */  static object  LnkTLI44(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[44],(void **)&LnkLI44,1,ap);va_end(ap);return V1;} /* C2EXPR* */
865  static object  LnkTLI43(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[43],(void **)&LnkLI43,1,ap);} /* SAVE-FUNOB */  static object  LnkTLI43(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[43],(void **)&LnkLI43,1,ap);va_end(ap);return V1;} /* SAVE-FUNOB */
866  static object  LnkTLI42(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[42],(void **)&LnkLI42,2,ap);} /* C1ARGS */  static object  LnkTLI42(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[42],(void **)&LnkLI42,2,ap);va_end(ap);return V1;} /* C1ARGS */
867  static void LnkT41(){ call_or_link(VV[41],(void **)&Lnk41);} /* COPY-INFO */  static void LnkT41(){ call_or_link(VV[41],(void **)&Lnk41);} /* COPY-INFO */
868  static object  LnkTLI40(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[40],(void **)&LnkLI40,1,ap);} /* C1FUNOB */  static object  LnkTLI40(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[40],(void **)&LnkLI40,1,ap);va_end(ap);return V1;} /* C1FUNOB */
869  static object  LnkTLI39(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[39],(void **)&LnkLI39,1,ap);} /* C1FUNCALL */  static object  LnkTLI39(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[39],(void **)&LnkLI39,1,ap);va_end(ap);return V1;} /* C1FUNCALL */
870  static object  LnkTLI38(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[38],(void **)&LnkLI38,3,ap);} /* TOO-FEW-ARGS */  static object  LnkTLI38(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[38],(void **)&LnkLI38,3,ap);va_end(ap);return V1;} /* TOO-FEW-ARGS */
871    
872  #ifdef SYSTEM_SPECIAL_INIT  #ifdef SYSTEM_SPECIAL_INIT
873  SYSTEM_SPECIAL_INIT  SYSTEM_SPECIAL_INIT

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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