587 |
goto T176; |
goto T176; |
588 |
T176:; |
T176:; |
589 |
base[6]= VV[41]; |
base[6]= VV[41]; |
590 |
V112 = make_fixnum(length((V95))); |
V112 = make_fixnum((long)length((V95))); |
591 |
V116= reverse((V95)); |
V116= reverse((V95)); |
592 |
{object V114; |
{object V114; |
593 |
object V115= /* INLINE-ARGS */V116; |
object V115= /* INLINE-ARGS */V116; |
624 |
goto TTL; |
goto TTL; |
625 |
TTL:; |
TTL:; |
626 |
if(!((car((V119)))==(VV[25]))){ |
if(!((car((V119)))==(VV[25]))){ |
627 |
goto T185;}switch(length(cdr((V119)))){ |
goto T185;}switch((long)length(cdr((V119)))){ |
628 |
case 0: |
case 0: |
629 |
goto T188; |
goto T188; |
630 |
T188:; |
T188:; |
709 |
VMR11(V140)}} |
VMR11(V140)}} |
710 |
return Cnil; |
return Cnil; |
711 |
} |
} |
712 |
static object LnkTLI58(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[58],(void **)&LnkLI58,1,ap);} /* BOIN-P */ |
static object LnkTLI58(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[58],(void **)&LnkLI58,1,ap);va_end(ap);return V1;} /* BOIN-P */ |
713 |
static object LnkTLI57(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[57],(void **)&LnkLI57,ap);} /* REMOVE */ |
static object LnkTLI57(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[57],(void **)&LnkLI57,ap);va_end(ap);return V1;} /* REMOVE */ |
714 |
static object LnkTLI56(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[56],(void **)&LnkLI56,1,ap);} /* TYPECASE-ERROR-STRINGS */ |
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;} /* TYPECASE-ERROR-STRINGS */ |
715 |
static object LnkTLI53(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[53],(void **)&LnkLI53,1,ap);} /* ASK-FOR-FORM */ |
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;} /* ASK-FOR-FORM */ |
716 |
|
|
717 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
718 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |