122 |
if((vs_base[0])==Cnil){ |
if((vs_base[0])==Cnil){ |
123 |
goto T34;} |
goto T34;} |
124 |
{long V23= fix(structure_ref((V22),VV[2],6)); |
{long V23= fix(structure_ref((V22),VV[2],6)); |
125 |
V24 = make_fixnum((/* INLINE-ARGS */V23)+(fix(symbol_value(VV[3])))); |
V24 = make_fixnum((long)(/* INLINE-ARGS */V23)+(fix(symbol_value(VV[3])))); |
126 |
{object V25 = structure_set((V22),VV[2],6,V24); |
{object V25 = structure_set((V22),VV[2],6,V24); |
127 |
VMR3(V25)}} |
VMR3(V25)}} |
128 |
goto T34; |
goto T34; |
813 |
T407:; |
T407:; |
814 |
if(endp(cdr((V118)))){ |
if(endp(cdr((V118)))){ |
815 |
goto T410;} |
goto T410;} |
816 |
V119 = make_fixnum(length((V118))); |
V119 = make_fixnum((long)length((V118))); |
817 |
(void)((*(LnkLI69))(VV[1],small_fixnum(1),V119)); |
(void)((*(LnkLI69))(VV[1],small_fixnum(1),V119)); |
818 |
goto T405; |
goto T405; |
819 |
goto T410; |
goto T410; |
1246 |
} |
} |
1247 |
static object LnkTLI84(){return call_proc0(VV[84],(void **)&LnkLI84);} /* CLOSE-INLINE-BLOCKS */ |
static object LnkTLI84(){return call_proc0(VV[84],(void **)&LnkLI84);} /* CLOSE-INLINE-BLOCKS */ |
1248 |
static void LnkT83(){ call_or_link(VV[83],(void **)&Lnk83);} /* WT-INLINE-LOC */ |
static void LnkT83(){ call_or_link(VV[83],(void **)&Lnk83);} /* WT-INLINE-LOC */ |
1249 |
static object LnkTLI82(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[82],(void **)&LnkLI82,ap);} /* INLINE-ARGS */ |
static object LnkTLI82(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[82],(void **)&LnkLI82,ap);va_end(ap);return V1;} /* INLINE-ARGS */ |
1250 |
static object LnkTLI81(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[81],(void **)&LnkLI81,1,ap);} /* CMP-MACROEXPAND-1 */ |
static object LnkTLI81(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[81],(void **)&LnkLI81,1,ap);va_end(ap);return V1;} /* CMP-MACROEXPAND-1 */ |
1251 |
static object LnkTLI80(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[80],(void **)&LnkLI80,1,ap);} /* C1TAGBODY */ |
static object LnkTLI80(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[80],(void **)&LnkLI80,1,ap);va_end(ap);return V1;} /* C1TAGBODY */ |
1252 |
static void LnkT79(){ call_or_link(VV[79],(void **)&Lnk79);} /* SUBTYPEP */ |
static void LnkT79(){ call_or_link(VV[79],(void **)&Lnk79);} /* SUBTYPEP */ |
1253 |
static object LnkTLI78(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[78],(void **)&LnkLI78,1,ap);} /* C1EXPR */ |
static object LnkTLI78(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[78],(void **)&LnkLI78,1,ap);va_end(ap);return V1;} /* C1EXPR */ |
1254 |
static object LnkTLI77(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[77],(void **)&LnkLI77,1,ap);} /* WT-CCB-VS */ |
static object LnkTLI77(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[77],(void **)&LnkLI77,1,ap);va_end(ap);return V1;} /* WT-CCB-VS */ |
1255 |
static object LnkTLI76(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[76],(void **)&LnkLI76,1,ap);} /* UNWIND-NO-EXIT */ |
static object LnkTLI76(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[76],(void **)&LnkLI76,1,ap);va_end(ap);return V1;} /* UNWIND-NO-EXIT */ |
1256 |
static object LnkTLI75(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[75],(void **)&LnkLI75,1,ap);} /* C2GO-LOCAL */ |
static object LnkTLI75(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[75],(void **)&LnkLI75,1,ap);va_end(ap);return V1;} /* C2GO-LOCAL */ |
1257 |
static object LnkTLI74(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[74],(void **)&LnkLI74,1,ap);} /* C2GO-CLB */ |
static object LnkTLI74(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[74],(void **)&LnkLI74,1,ap);va_end(ap);return V1;} /* C2GO-CLB */ |
1258 |
static object LnkTLI73(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[73],(void **)&LnkLI73,1,ap);} /* C2GO-CCB */ |
static object LnkTLI73(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[73],(void **)&LnkLI73,1,ap);va_end(ap);return V1;} /* C2GO-CCB */ |
1259 |
static object LnkTLI70(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[70],(void **)&LnkLI70,ap);} /* CMPERR */ |
static object LnkTLI70(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[70],(void **)&LnkLI70,ap);va_end(ap);return V1;} /* CMPERR */ |
1260 |
static object LnkTLI69(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[69],(void **)&LnkLI69,3,ap);} /* TOO-MANY-ARGS */ |
static object LnkTLI69(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[69],(void **)&LnkLI69,3,ap);va_end(ap);return V1;} /* TOO-MANY-ARGS */ |
1261 |
static object LnkTLI68(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[68],(void **)&LnkLI68,3,ap);} /* TOO-FEW-ARGS */ |
static object LnkTLI68(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[68],(void **)&LnkLI68,3,ap);va_end(ap);return V1;} /* TOO-FEW-ARGS */ |
1262 |
static object LnkTLI67(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[67],(void **)&LnkLI67,1,ap);} /* WT-VS* */ |
static object LnkTLI67(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[67],(void **)&LnkLI67,1,ap);va_end(ap);return V1;} /* WT-VS* */ |
1263 |
static object LnkTLI66(){return call_proc0(VV[66],(void **)&LnkLI66);} /* CCB-VS-PUSH */ |
static object LnkTLI66(){return call_proc0(VV[66],(void **)&LnkLI66);} /* CCB-VS-PUSH */ |
1264 |
static object LnkTLI65(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[65],(void **)&LnkLI65,1,ap);} /* CLINK */ |
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;} /* CLINK */ |
1265 |
static object LnkTLI64(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[64],(void **)&LnkLI64,ap);} /* WT-CLINK */ |
static object LnkTLI64(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[64],(void **)&LnkLI64,ap);va_end(ap);return V1;} /* WT-CLINK */ |
1266 |
static object LnkTLI63(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[63],(void **)&LnkLI63,1,ap);} /* WT-VS */ |
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;} /* WT-VS */ |
1267 |
static object LnkTLI62(){return call_proc0(VV[62],(void **)&LnkLI62);} /* VS-PUSH */ |
static object LnkTLI62(){return call_proc0(VV[62],(void **)&LnkLI62);} /* VS-PUSH */ |
1268 |
static void LnkT61(){ call_or_link(VV[61],(void **)&Lnk61);} /* C2EXPR */ |
static void LnkT61(){ call_or_link(VV[61],(void **)&Lnk61);} /* C2EXPR */ |
1269 |
static object LnkTLI60(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[60],(void **)&LnkLI60,1,ap);} /* WT1 */ |
static object LnkTLI60(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[60],(void **)&LnkLI60,1,ap);va_end(ap);return V1;} /* WT1 */ |
1270 |
static object LnkTLI59(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[59],(void **)&LnkLI59,1,ap);} /* WT-SWITCH-CASE */ |
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-SWITCH-CASE */ |
1271 |
static object LnkTLI58(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[58],(void **)&LnkLI58,ap);} /* UNWIND-EXIT */ |
static object LnkTLI58(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[58],(void **)&LnkLI58,ap);va_end(ap);return V1;} /* UNWIND-EXIT */ |
1272 |
static object LnkTLI57(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[57],(void **)&LnkLI57,1,ap);} /* C2TAGBODY-BODY */ |
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;} /* C2TAGBODY-BODY */ |
1273 |
static object LnkTLI56(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[56],(void **)&LnkLI56,1,ap);} /* C2TAGBODY-LOCAL */ |
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;} /* C2TAGBODY-LOCAL */ |
1274 |
static object LnkTLI55(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[55],(void **)&LnkLI55,1,ap);} /* C2TAGBODY-CLB */ |
static object LnkTLI55(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[55],(void **)&LnkLI55,1,ap);va_end(ap);return V1;} /* C2TAGBODY-CLB */ |
1275 |
static object LnkTLI54(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[54],(void **)&LnkLI54,1,ap);} /* C2TAGBODY-CCB */ |
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;} /* C2TAGBODY-CCB */ |
1276 |
static object LnkTLI53(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[53],(void **)&LnkLI53,1,ap);} /* ADD-OBJECT */ |
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;} /* ADD-OBJECT */ |
1277 |
static object LnkTLI52(){return call_proc0(VV[52],(void **)&LnkLI52);} /* C1NIL */ |
static object LnkTLI52(){return call_proc0(VV[52],(void **)&LnkLI52);} /* C1NIL */ |
1278 |
static object LnkTLI51(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[51],(void **)&LnkLI51,1,ap);} /* ADD-LOOP-REGISTERS */ |
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;} /* ADD-LOOP-REGISTERS */ |
1279 |
static object LnkTLI50(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[50],(void **)&LnkLI50,2,ap);} /* C1EXPR* */ |
static object LnkTLI50(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[50],(void **)&LnkLI50,2,ap);va_end(ap);return V1;} /* C1EXPR* */ |
1280 |
static object LnkTLI49(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[49],(void **)&LnkLI49,ap);} /* MAKE-TAG */ |
static object LnkTLI49(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[49],(void **)&LnkLI49,ap);va_end(ap);return V1;} /* MAKE-TAG */ |
1281 |
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 */ |
1282 |
static object LnkTLI47(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[47],(void **)&LnkLI47,1,ap);} /* ADD-REG1 */ |
static object LnkTLI47(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[47],(void **)&LnkLI47,1,ap);va_end(ap);return V1;} /* ADD-REG1 */ |
1283 |
static object LnkTLI46(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[46],(void **)&LnkLI46,2,ap);} /* JUMPS-TO-P */ |
static object LnkTLI46(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[46],(void **)&LnkLI46,2,ap);va_end(ap);return V1;} /* JUMPS-TO-P */ |
1284 |
static void LnkT45(){ call_or_link(VV[45],(void **)&Lnk45);} /* STRUCTURE-SUBTYPE-P */ |
static void LnkT45(){ call_or_link(VV[45],(void **)&Lnk45);} /* STRUCTURE-SUBTYPE-P */ |
1285 |
|
|
1286 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |