998 |
goto T521;} |
goto T521;} |
999 |
if(((*(LnkLI63))())==Cnil){ |
if(((*(LnkLI63))())==Cnil){ |
1000 |
goto T521;} |
goto T521;} |
1001 |
if(!((length((V160)))==(length(cdr(symbol_value(VV[29])))))){ |
if(!(((long)length((V160)))==((long)length(cdr(symbol_value(VV[29])))))){ |
1002 |
goto T521;} |
goto T521;} |
1003 |
bds_bind(VV[32],VV[33]); |
bds_bind(VV[32],VV[33]); |
1004 |
setq(VV[34],number_plus(symbol_value(VV[34]),small_fixnum(1))); |
setq(VV[34],number_plus(symbol_value(VV[34]),small_fixnum(1))); |
1064 |
V170 = make_fixnum(V169); |
V170 = make_fixnum(V169); |
1065 |
(void)((*(LnkLI54))(V170)); |
(void)((*(LnkLI54))(V170)); |
1066 |
princ_char(44,VV[20]); |
princ_char(44,VV[20]); |
1067 |
V169= (V169)+1; |
V169= (long)(V169)+1; |
1068 |
goto T564;} |
goto T564;} |
1069 |
goto T560; |
goto T560; |
1070 |
T560:; |
T560:; |
1086 |
base[0]=base[0]; |
base[0]=base[0]; |
1087 |
return Cnil; |
return Cnil; |
1088 |
} |
} |
1089 |
static object LnkTLI67(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[67],(void **)&LnkLI67,ap);} /* UNWIND-EXIT */ |
static object LnkTLI67(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[67],(void **)&LnkLI67,ap);va_end(ap);return V1;} /* UNWIND-EXIT */ |
1090 |
static object LnkTLI66(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[66],(void **)&LnkLI66,ap);} /* CMPNOTE */ |
static object LnkTLI66(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[66],(void **)&LnkLI66,ap);va_end(ap);return V1;} /* CMPNOTE */ |
1091 |
static object LnkTLI65(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[65],(void **)&LnkLI65,1,ap);} /* UNWIND-NO-EXIT */ |
static object LnkTLI65(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[65],(void **)&LnkLI65,1,ap);va_end(ap);return V1;} /* UNWIND-NO-EXIT */ |
1092 |
static object LnkTLI64(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[64],(void **)&LnkLI64,2,ap);} /* C2PSETQ */ |
static object LnkTLI64(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[64],(void **)&LnkLI64,2,ap);va_end(ap);return V1;} /* C2PSETQ */ |
1093 |
static object LnkTLI63(){return call_proc0(VV[63],(void **)&LnkLI63);} /* TAIL-RECURSION-POSSIBLE */ |
static object LnkTLI63(){return call_proc0(VV[63],(void **)&LnkLI63);} /* TAIL-RECURSION-POSSIBLE */ |
1094 |
static object LnkTLI62(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[62],(void **)&LnkLI62,1,ap);} /* WT-CCB-VS */ |
static object LnkTLI62(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[62],(void **)&LnkLI62,1,ap);va_end(ap);return V1;} /* WT-CCB-VS */ |
1095 |
static object LnkTLI61(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[61],(void **)&LnkLI61,1,ap);} /* PUSH-ARGS */ |
static object LnkTLI61(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[61],(void **)&LnkLI61,1,ap);va_end(ap);return V1;} /* PUSH-ARGS */ |
1096 |
static object LnkTLI60(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[60],(void **)&LnkLI60,3,ap);} /* DEFMACRO* */ |
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;} /* DEFMACRO* */ |
1097 |
static object LnkTLI59(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[59],(void **)&LnkLI59,1,ap);} /* WT-VS* */ |
static object LnkTLI59(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[59],(void **)&LnkLI59,1,ap);va_end(ap);return V1;} /* WT-VS* */ |
1098 |
static void LnkT58(){ call_or_link(VV[58],(void **)&Lnk58);} /* C2EXPR */ |
static void LnkT58(){ call_or_link(VV[58],(void **)&Lnk58);} /* C2EXPR */ |
1099 |
static object LnkTLI57(){return call_proc0(VV[57],(void **)&LnkLI57);} /* CCB-VS-PUSH */ |
static object LnkTLI57(){return call_proc0(VV[57],(void **)&LnkLI57);} /* CCB-VS-PUSH */ |
1100 |
static object LnkTLI56(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[56],(void **)&LnkLI56,1,ap);} /* CLINK */ |
static object LnkTLI56(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[56],(void **)&LnkLI56,1,ap);va_end(ap);return V1;} /* CLINK */ |
1101 |
static object LnkTLI55(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[55],(void **)&LnkLI55,ap);} /* WT-CLINK */ |
static object LnkTLI55(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[55],(void **)&LnkLI55,ap);va_end(ap);return V1;} /* WT-CLINK */ |
1102 |
static object LnkTLI54(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[54],(void **)&LnkLI54,1,ap);} /* WT1 */ |
static object LnkTLI54(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[54],(void **)&LnkLI54,1,ap);va_end(ap);return V1;} /* WT1 */ |
1103 |
static object LnkTLI53(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[53],(void **)&LnkLI53,1,ap);} /* WT-VS */ |
static object LnkTLI53(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[53],(void **)&LnkLI53,1,ap);va_end(ap);return V1;} /* WT-VS */ |
1104 |
static object LnkTLI52(){return call_proc0(VV[52],(void **)&LnkLI52);} /* VS-PUSH */ |
static object LnkTLI52(){return call_proc0(VV[52],(void **)&LnkLI52);} /* VS-PUSH */ |
1105 |
static object LnkTLI51(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[51],(void **)&LnkLI51,2,ap);} /* ADD-INFO */ |
static object LnkTLI51(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[51],(void **)&LnkLI51,2,ap);va_end(ap);return V1;} /* ADD-INFO */ |
1106 |
static object LnkTLI50(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[50],(void **)&LnkLI50,ap);} /* C1LAMBDA-EXPR */ |
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;} /* C1LAMBDA-EXPR */ |
1107 |
static void LnkT49(){ call_or_link(VV[49],(void **)&Lnk49);} /* COPY-INFO */ |
static void LnkT49(){ call_or_link(VV[49],(void **)&Lnk49);} /* COPY-INFO */ |
1108 |
static object LnkTLI48(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[48],(void **)&LnkLI48,2,ap);} /* C1DECL-BODY */ |
static object LnkTLI48(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[48],(void **)&LnkLI48,2,ap);va_end(ap);return V1;} /* C1DECL-BODY */ |
1109 |
static object LnkTLI47(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[47],(void **)&LnkLI47,3,ap);} /* CHECK-VDECL */ |
static object LnkTLI47(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[47],(void **)&LnkLI47,3,ap);va_end(ap);return V1;} /* CHECK-VDECL */ |
1110 |
static object LnkTLI46(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[46],(void **)&LnkLI46,1,ap);} /* C1ADD-GLOBALS */ |
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;} /* C1ADD-GLOBALS */ |
1111 |
static void LnkT45(){ call_or_link(VV[45],(void **)&Lnk45);} /* C1BODY */ |
static void LnkT45(){ call_or_link(VV[45],(void **)&Lnk45);} /* C1BODY */ |
1112 |
static object LnkTLI44(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[44],(void **)&LnkLI44,ap);} /* MAKE-FUN */ |
static object LnkTLI44(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[44],(void **)&LnkLI44,ap);va_end(ap);return V1;} /* MAKE-FUN */ |
1113 |
static object LnkTLI43(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[43],(void **)&LnkLI43,ap);} /* CMPERR */ |
static object LnkTLI43(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[43],(void **)&LnkLI43,ap);va_end(ap);return V1;} /* CMPERR */ |
1114 |
static object LnkTLI42(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[42],(void **)&LnkLI42,3,ap);} /* TOO-FEW-ARGS */ |
static object LnkTLI42(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[42],(void **)&LnkLI42,3,ap);va_end(ap);return V1;} /* TOO-FEW-ARGS */ |
1115 |
|
|
1116 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
1117 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |