19 |
V4= V1; |
V4= V1; |
20 |
narg= narg - 2; |
narg= narg - 2; |
21 |
{ |
{ |
22 |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI1key,first,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)(void *)&LI1key,first,ap); |
23 |
if(Vcs[2]==0){ |
if(Vcs[2]==0){ |
24 |
V5= Cnil; |
V5= Cnil; |
25 |
V6= Cnil; |
V6= Cnil; |
715 |
base[0]=base[0]; |
base[0]=base[0]; |
716 |
return Cnil;} |
return Cnil;} |
717 |
} |
} |
718 |
static void LnkT27(){ call_or_link(VV[27],(void **)&Lnk27);} /* EVERY */ |
static void LnkT27(){ call_or_link(VV[27],(void **)(void *)&Lnk27);} /* EVERY */ |
719 |
static void LnkT26(){ call_or_link(VV[26],(void **)&Lnk26);} /* SOME */ |
static void LnkT26(){ call_or_link(VV[26],(void **)(void *)&Lnk26);} /* SOME */ |
720 |
static object LnkTLI25(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[25],(void **)&LnkLI25,first,ap);va_end(ap);return V1;} /* MAKE-SEQUENCE */ |
static object LnkTLI25(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[25],(void **)(void *)&LnkLI25,first,ap);va_end(ap);return V1;} /* MAKE-SEQUENCE */ |
721 |
static object LnkTLI24(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[24],(void **)&LnkLI24,1,first,ap);va_end(ap);return V1;} /* BEST-ARRAY-ELEMENT-TYPE */ |
static object LnkTLI24(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[24],(void **)(void *)&LnkLI24,1,first,ap);va_end(ap);return V1;} /* BEST-ARRAY-ELEMENT-TYPE */ |
722 |
static void LnkT23(){ call_or_link(VV[23],(void **)&Lnk23);} /* SPECIFIC-ERROR */ |
static void LnkT23(){ call_or_link(VV[23],(void **)(void *)&Lnk23);} /* SPECIFIC-ERROR */ |
723 |
static void LnkT22(){ call_or_link(VV[22],(void **)&Lnk22);} /* SUBTYPEP */ |
static void LnkT22(){ call_or_link(VV[22],(void **)(void *)&Lnk22);} /* SUBTYPEP */ |
724 |
static object LnkTLI21(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[21],(void **)&LnkLI21,1,first,ap);va_end(ap);return V1;} /* NORMALIZE-TYPE */ |
static object LnkTLI21(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[21],(void **)(void *)&LnkLI21,1,first,ap);va_end(ap);return V1;} /* NORMALIZE-TYPE */ |
725 |
|
|
726 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
727 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |