107 |
vs_top=sup; |
vs_top=sup; |
108 |
if((vs_base[0])==Cnil){ |
if((vs_base[0])==Cnil){ |
109 |
goto T34;} |
goto T34;} |
110 |
{int V23= fix(structure_ref((V22),VV[2],6)); |
{long V23= fix(structure_ref((V22),VV[2],6)); |
111 |
V24 = make_fixnum((/* INLINE-ARGS */V23)+(fix(symbol_value(VV[3])))); |
V24 = make_fixnum((/* INLINE-ARGS */V23)+(fix(symbol_value(VV[3])))); |
112 |
{object V25 = structure_set((V22),VV[2],6,V24); |
{object V25 = structure_set((V22),VV[2],6,V24); |
113 |
VMR3(V25)}} |
VMR3(V25)}} |
1114 |
static object LnkTLI47(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[47],&LnkLI47,1,ap);} /* ADD-REG1 */ |
static object LnkTLI47(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[47],&LnkLI47,1,ap);} /* ADD-REG1 */ |
1115 |
static object LnkTLI46(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[46],&LnkLI46,2,ap);} /* JUMPS-TO-P */ |
static object LnkTLI46(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[46],&LnkLI46,2,ap);} /* JUMPS-TO-P */ |
1116 |
static LnkT45(){ call_or_link(VV[45],&Lnk45);} /* STRUCTURE-SUBTYPE-P */ |
static LnkT45(){ call_or_link(VV[45],&Lnk45);} /* STRUCTURE-SUBTYPE-P */ |
1117 |
|
|
1118 |
|
#ifdef SYSTEM_SPECIAL_INIT |
1119 |
|
SYSTEM_SPECIAL_INIT |
1120 |
|
#endif |
1121 |
|
|