4 |
void init_cmpcall(){do_init(VV);} |
void init_cmpcall(){do_init(VV);} |
5 |
/* local entry for function FAST-LINK-PROCLAIMED-TYPE-P */ |
/* local entry for function FAST-LINK-PROCLAIMED-TYPE-P */ |
6 |
|
|
7 |
static object LI1(V1,va_alist) |
static object LI1(object V1,object first,...) |
|
object V1; |
|
|
va_dcl |
|
8 |
{ |
{ |
9 |
va_list ap; |
va_list ap; |
10 |
int narg = VFUN_NARGS; VMB1 VMS1 VMV1 |
int narg = VFUN_NARGS; VMB1 VMS1 VMV1 |
11 |
{register object V2; |
{register object V2; |
12 |
object V3; |
object V3; |
13 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
14 |
va_start(ap); |
va_start(ap,first); |
15 |
if(narg <1) too_few_arguments(); |
if(narg <1) too_few_arguments(); |
16 |
V2= V1; |
V2= V1; |
17 |
narg = narg - 1; |
narg = narg - 1; |
18 |
if (narg <= 0) goto T1; |
if (narg <= 0) goto T1; |
19 |
else { |
else { |
20 |
V3= va_arg(ap,object);} |
V3= first;} |
21 |
--narg; goto T2; |
--narg; goto T2; |
22 |
goto T1; |
goto T1; |
23 |
T1:; |
T1:; |
383 |
} |
} |
384 |
/* local entry for function C2FUNCALL */ |
/* local entry for function C2FUNCALL */ |
385 |
|
|
386 |
static object LI5(V55,V54,va_alist) |
static object LI5(object V55,object V54,object first,...) |
|
object V55,V54; |
|
|
va_dcl |
|
387 |
{ |
{ |
388 |
va_list ap; |
va_list ap; |
389 |
int narg = VFUN_NARGS; VMB5 VMS5 VMV5 |
int narg = VFUN_NARGS; VMB5 VMS5 VMV5 |
393 |
register object V58; |
register object V58; |
394 |
object V59; |
object V59; |
395 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
396 |
va_start(ap); |
va_start(ap,first); |
397 |
if(narg <2) too_few_arguments(); |
if(narg <2) too_few_arguments(); |
398 |
V56= V55; |
V56= V55; |
399 |
V57= V54; |
V57= V54; |
400 |
narg = narg - 2; |
narg = narg - 2; |
401 |
if (narg <= 0) goto T118; |
if (narg <= 0) goto T118; |
402 |
else { |
else { |
403 |
V58= va_arg(ap,object);} |
V58= first;} |
404 |
if (--narg <= 0) goto T119; |
if (--narg <= 0) goto T119; |
405 |
else { |
else { |
406 |
V59= va_arg(ap,object);} |
V59= va_arg(ap,object);} |
521 |
} |
} |
522 |
/* local entry for function FCALLN-INLINE */ |
/* local entry for function FCALLN-INLINE */ |
523 |
|
|
524 |
static object LI6(va_alist) |
static object LI6(object first,...) |
|
va_dcl |
|
525 |
{ |
{ |
526 |
va_list ap; |
va_list ap; |
527 |
int narg = VFUN_NARGS; VMB6 VMS6 VMV6 |
int narg = VFUN_NARGS; VMB6 VMS6 VMV6 |
528 |
{register object V70; |
{register object V70; |
529 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
530 |
va_start(ap); |
va_start(ap,first); |
531 |
narg= narg - 0; |
narg= narg - 0; |
532 |
V71 = list_vector(narg,ap); |
V71 = list_vector_new(narg,first,ap); |
533 |
V70= V71; |
V70= V71; |
534 |
{register object V72; |
{register object V72; |
535 |
object V73; |
object V73; |
1298 |
V169= Cnil;} |
V169= Cnil;} |
1299 |
goto T555; |
goto T555; |
1300 |
T555:; |
T555:; |
1301 |
princ_str("(va_alist)va_dcl{",VV[29]); |
princ_str("(object first,...){",VV[29]); |
1302 |
base[0]= (*(LnkLI143))((V166)); |
base[0]= (*(LnkLI143))((V166)); |
1303 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
1304 |
(void) (*Lnk144)(); |
(void) (*Lnk144)(); |
1306 |
V171= vs_base[0]; |
V171= vs_base[0]; |
1307 |
(void)((*(LnkLI117))(V171)); |
(void)((*(LnkLI117))(V171)); |
1308 |
princ_str("V1;",VV[29]); |
princ_str("V1;",VV[29]); |
1309 |
princ_str("va_list ap;va_start(ap);V1=call_",VV[29]); |
princ_str("va_list ap;va_start(ap,first);V1=call_",VV[29]); |
1310 |
if(((V169))==Cnil){ |
if(((V169))==Cnil){ |
1311 |
goto T566;} |
goto T566;} |
1312 |
V172= VV[80]; |
V172= VV[80]; |
1317 |
goto T564; |
goto T564; |
1318 |
T564:; |
T564:; |
1319 |
(void)((*(LnkLI117))(V172)); |
(void)((*(LnkLI117))(V172)); |
1320 |
princ_str("proc(VV[",VV[29]); |
princ_str("proc_new(VV[",VV[29]); |
1321 |
V173= (*(LnkLI145))((V164)); |
V173= (*(LnkLI145))((V164)); |
1322 |
(void)((*(LnkLI117))(/* INLINE-ARGS */V173)); |
(void)((*(LnkLI117))(/* INLINE-ARGS */V173)); |
1323 |
princ_str("],(void **)&Lnk",VV[29]); |
princ_str("],(void **)&Lnk",VV[29]); |
1329 |
(void)((*(LnkLI117))(V174)); |
(void)((*(LnkLI117))(V174)); |
1330 |
goto T572; |
goto T572; |
1331 |
T572:; |
T572:; |
1332 |
princ_str(",ap);va_end(ap);return V1;}",VV[29]); |
princ_str(",first,ap);va_end(ap);return V1;}",VV[29]); |
1333 |
goto T520;} |
goto T520;} |
1334 |
goto T551; |
goto T551; |
1335 |
T551:; |
T551:; |
1515 |
} |
} |
1516 |
/* local entry for function WT-SIMPLE-CALL */ |
/* local entry for function WT-SIMPLE-CALL */ |
1517 |
|
|
1518 |
static object LI16(V204,V203,V202,va_alist) |
static object LI16(object V204,object V203,object V202,object first,...) |
|
object V204,V203,V202; |
|
|
va_dcl |
|
1519 |
{ |
{ |
1520 |
va_list ap; |
va_list ap; |
1521 |
int narg = VFUN_NARGS; VMB16 VMS16 VMV16 |
int narg = VFUN_NARGS; VMB16 VMS16 VMV16 |
1524 |
object V207; |
object V207; |
1525 |
object V208; |
object V208; |
1526 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
1527 |
va_start(ap); |
va_start(ap,first); |
1528 |
if(narg <3) too_few_arguments(); |
if(narg <3) too_few_arguments(); |
1529 |
V205= V204; |
V205= V204; |
1530 |
V206= V203; |
V206= V203; |
1532 |
narg = narg - 3; |
narg = narg - 3; |
1533 |
if (narg <= 0) goto T673; |
if (narg <= 0) goto T673; |
1534 |
else { |
else { |
1535 |
V208= va_arg(ap,object);} |
V208= first;} |
1536 |
--narg; goto T674; |
--narg; goto T674; |
1537 |
goto T673; |
goto T673; |
1538 |
T673:; |
T673:; |
1920 |
} |
} |
1921 |
} |
} |
1922 |
static void LnkT152(){ call_or_link(VV[152],(void **)&Lnk152);} /* WT-INLINE-LOC */ |
static void LnkT152(){ call_or_link(VV[152],(void **)&Lnk152);} /* WT-INLINE-LOC */ |
1923 |
static object LnkTLI151(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[151],(void **)&LnkLI151,1,ap);va_end(ap);return V1;} /* ARGS-CAUSE-SIDE-EFFECT */ |
static object LnkTLI151(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[151],(void **)&LnkLI151,1,first,ap);va_end(ap);return V1;} /* ARGS-CAUSE-SIDE-EFFECT */ |
1924 |
static void LnkT149(){ call_or_link(VV[149],(void **)&Lnk149);} /* WT-LOC */ |
static void LnkT149(){ call_or_link(VV[149],(void **)&Lnk149);} /* WT-LOC */ |
1925 |
static object LnkTLI148(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[148],(void **)&LnkLI148,ap);va_end(ap);return V1;} /* REMOVE */ |
static object LnkTLI148(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[148],(void **)&LnkLI148,first,ap);va_end(ap);return V1;} /* REMOVE */ |
1926 |
static object LnkTLI147(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[147],(void **)&LnkLI147,ap);va_end(ap);return V1;} /* FIND */ |
static object LnkTLI147(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[147],(void **)&LnkLI147,first,ap);va_end(ap);return V1;} /* FIND */ |
1927 |
static object LnkTLI146(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[146],(void **)&LnkLI146,258,ap);va_end(ap);return V1;} /* PROCLAIMED-ARGD */ |
static object LnkTLI146(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[146],(void **)&LnkLI146,258,first,ap);va_end(ap);return V1;} /* PROCLAIMED-ARGD */ |
1928 |
static object LnkTLI145(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[145],(void **)&LnkLI145,1,ap);va_end(ap);return V1;} /* ADD-OBJECT */ |
static object LnkTLI145(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[145],(void **)&LnkLI145,1,first,ap);va_end(ap);return V1;} /* ADD-OBJECT */ |
1929 |
static void LnkT144(){ call_or_link(VV[144],(void **)&Lnk144);} /* DECLARATION-TYPE */ |
static void LnkT144(){ call_or_link(VV[144],(void **)&Lnk144);} /* DECLARATION-TYPE */ |
1930 |
static object LnkTLI143(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[143],(void **)&LnkLI143,1,ap);va_end(ap);return V1;} /* REP-TYPE */ |
static object LnkTLI143(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[143],(void **)&LnkLI143,1,first,ap);va_end(ap);return V1;} /* REP-TYPE */ |
1931 |
static void LnkT142(){ call_or_link(VV[142],(void **)&Lnk142);} /* GET-OUTPUT-STREAM-STRING */ |
static void LnkT142(){ call_or_link(VV[142],(void **)&Lnk142);} /* GET-OUTPUT-STREAM-STRING */ |
1932 |
static void LnkT141(){ call_or_link(VV[141],(void **)&Lnk141);} /* MAKE-STRING-OUTPUT-STREAM */ |
static void LnkT141(){ call_or_link(VV[141],(void **)&Lnk141);} /* MAKE-STRING-OUTPUT-STREAM */ |
1933 |
static object LnkTLI140(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[140],(void **)&LnkLI140,1,ap);va_end(ap);return V1;} /* ADD-SYMBOL */ |
static object LnkTLI140(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[140],(void **)&LnkLI140,1,first,ap);va_end(ap);return V1;} /* ADD-SYMBOL */ |
1934 |
static object LnkTLI139(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[139],(void **)&LnkLI139,4,ap);va_end(ap);return V1;} /* C2CALL-UNKNOWN-GLOBAL */ |
static object LnkTLI139(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[139],(void **)&LnkLI139,4,first,ap);va_end(ap);return V1;} /* C2CALL-UNKNOWN-GLOBAL */ |
1935 |
static object LnkTLI138(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[138],(void **)&LnkLI138,3,ap);va_end(ap);return V1;} /* ADD-FAST-LINK */ |
static object LnkTLI138(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[138],(void **)&LnkLI138,3,first,ap);va_end(ap);return V1;} /* ADD-FAST-LINK */ |
1936 |
static object LnkTLI137(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[137],(void **)&LnkLI137,2,ap);va_end(ap);return V1;} /* INLINE-PROC */ |
static object LnkTLI137(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[137],(void **)&LnkLI137,2,first,ap);va_end(ap);return V1;} /* INLINE-PROC */ |
1937 |
static object LnkTLI136(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[136],(void **)&LnkLI136,2,ap);va_end(ap);return V1;} /* CHECK-FNAME-ARGS */ |
static object LnkTLI136(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[136],(void **)&LnkLI136,2,first,ap);va_end(ap);return V1;} /* CHECK-FNAME-ARGS */ |
1938 |
static object LnkTLI135(){return call_proc0(VV[135],(void **)&LnkLI135);} /* CLOSE-INLINE-BLOCKS */ |
static object LnkTLI135(){return call_proc0(VV[135],(void **)&LnkLI135);} /* CLOSE-INLINE-BLOCKS */ |
1939 |
static object LnkTLI134(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[134],(void **)&LnkLI134,2,ap);va_end(ap);return V1;} /* GET-INLINE-LOC */ |
static object LnkTLI134(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[134],(void **)&LnkLI134,2,first,ap);va_end(ap);return V1;} /* GET-INLINE-LOC */ |
1940 |
static void LnkT133(){ call_or_link(VV[133],(void **)&Lnk133);} /* SAVE-AVMA */ |
static void LnkT133(){ call_or_link(VV[133],(void **)&Lnk133);} /* SAVE-AVMA */ |
1941 |
static object LnkTLI132(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[132],(void **)&LnkLI132,3,ap);va_end(ap);return V1;} /* GET-INLINE-INFO */ |
static object LnkTLI132(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[132],(void **)&LnkLI132,3,first,ap);va_end(ap);return V1;} /* GET-INLINE-INFO */ |
1942 |
static object LnkTLI131(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[131],(void **)&LnkLI131,ap);va_end(ap);return V1;} /* CMPNOTE */ |
static object LnkTLI131(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[131],(void **)&LnkLI131,first,ap);va_end(ap);return V1;} /* CMPNOTE */ |
1943 |
static object LnkTLI130(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[130],(void **)&LnkLI130,1,ap);va_end(ap);return V1;} /* UNWIND-NO-EXIT */ |
static object LnkTLI130(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[130],(void **)&LnkLI130,1,first,ap);va_end(ap);return V1;} /* UNWIND-NO-EXIT */ |
1944 |
static object LnkTLI129(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[129],(void **)&LnkLI129,2,ap);va_end(ap);return V1;} /* C2PSETQ */ |
static object LnkTLI129(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[129],(void **)&LnkLI129,2,first,ap);va_end(ap);return V1;} /* C2PSETQ */ |
1945 |
static object LnkTLI128(){return call_proc0(VV[128],(void **)&LnkLI128);} /* TAIL-RECURSION-POSSIBLE */ |
static object LnkTLI128(){return call_proc0(VV[128],(void **)&LnkLI128);} /* TAIL-RECURSION-POSSIBLE */ |
1946 |
static object LnkTLI127(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[127],(void **)&LnkLI127,1,ap);va_end(ap);return V1;} /* INLINE-POSSIBLE */ |
static object LnkTLI127(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[127],(void **)&LnkLI127,1,first,ap);va_end(ap);return V1;} /* INLINE-POSSIBLE */ |
1947 |
static void LnkT126(){ call_or_link(VV[126],(void **)&Lnk126);} /* INC-INLINE-BLOCKS */ |
static void LnkT126(){ call_or_link(VV[126],(void **)&Lnk126);} /* INC-INLINE-BLOCKS */ |
1948 |
static object LnkTLI125(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[125],(void **)&LnkLI125,ap);va_end(ap);return V1;} /* CMPWARN */ |
static object LnkTLI125(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[125],(void **)&LnkLI125,first,ap);va_end(ap);return V1;} /* CMPWARN */ |
1949 |
static object LnkTLI124(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[124],(void **)&LnkLI124,3,ap);va_end(ap);return V1;} /* C2LET */ |
static object LnkTLI124(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[124],(void **)&LnkLI124,3,first,ap);va_end(ap);return V1;} /* C2LET */ |
1950 |
static object LnkTLI123(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[123],(void **)&LnkLI123,ap);va_end(ap);return V1;} /* CMPERR */ |
static object LnkTLI123(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[123],(void **)&LnkLI123,first,ap);va_end(ap);return V1;} /* CMPERR */ |
1951 |
static object LnkTLI122(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[122],(void **)&LnkLI122,ap);va_end(ap);return V1;} /* C2LAMBDA-EXPR */ |
static object LnkTLI122(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[122],(void **)&LnkLI122,first,ap);va_end(ap);return V1;} /* C2LAMBDA-EXPR */ |
1952 |
static object LnkTLI121(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[121],(void **)&LnkLI121,1,ap);va_end(ap);return V1;} /* NEED-TO-SET-VS-POINTERS */ |
static object LnkTLI121(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[121],(void **)&LnkLI121,1,first,ap);va_end(ap);return V1;} /* NEED-TO-SET-VS-POINTERS */ |
1953 |
static object LnkTLI120(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[120],(void **)&LnkLI120,1,ap);va_end(ap);return V1;} /* PUSH-ARGS-LISPCALL */ |
static object LnkTLI120(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[120],(void **)&LnkLI120,1,first,ap);va_end(ap);return V1;} /* PUSH-ARGS-LISPCALL */ |
1954 |
static object LnkTLI119(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[119],(void **)&LnkLI119,ap);va_end(ap);return V1;} /* CS-PUSH */ |
static object LnkTLI119(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[119],(void **)&LnkLI119,first,ap);va_end(ap);return V1;} /* CS-PUSH */ |
1955 |
static object LnkTLI118(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[118],(void **)&LnkLI118,ap);va_end(ap);return V1;} /* UNWIND-EXIT */ |
static object LnkTLI118(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[118],(void **)&LnkLI118,first,ap);va_end(ap);return V1;} /* UNWIND-EXIT */ |
1956 |
static object LnkTLI117(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[117],(void **)&LnkLI117,1,ap);va_end(ap);return V1;} /* WT1 */ |
static object LnkTLI117(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[117],(void **)&LnkLI117,1,first,ap);va_end(ap);return V1;} /* WT1 */ |
1957 |
static object LnkTLI116(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[116],(void **)&LnkLI116,1,ap);va_end(ap);return V1;} /* PUSH-ARGS */ |
static object LnkTLI116(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[116],(void **)&LnkLI116,1,first,ap);va_end(ap);return V1;} /* PUSH-ARGS */ |
1958 |
static object LnkTLI115(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[115],(void **)&LnkLI115,1,ap);va_end(ap);return V1;} /* C2EXPR* */ |
static object LnkTLI115(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[115],(void **)&LnkLI115,1,first,ap);va_end(ap);return V1;} /* C2EXPR* */ |
1959 |
static object LnkTLI114(){return call_proc0(VV[114],(void **)&LnkLI114);} /* VS-PUSH */ |
static object LnkTLI114(){return call_proc0(VV[114],(void **)&LnkLI114);} /* VS-PUSH */ |
1960 |
static object LnkTLI113(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[113],(void **)&LnkLI113,2,ap);va_end(ap);return V1;} /* ARGS-INFO-CHANGED-VARS */ |
static object LnkTLI113(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[113],(void **)&LnkLI113,2,first,ap);va_end(ap);return V1;} /* ARGS-INFO-CHANGED-VARS */ |
1961 |
static object LnkTLI112(){return call_proc0(VV[112],(void **)&LnkLI112);} /* BABOON */ |
static object LnkTLI112(){return call_proc0(VV[112],(void **)&LnkLI112);} /* BABOON */ |
1962 |
static object LnkTLI111(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[111],(void **)&LnkLI111,3,ap);va_end(ap);return V1;} /* C2FUNCALL-SFUN */ |
static object LnkTLI111(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[111],(void **)&LnkLI111,3,first,ap);va_end(ap);return V1;} /* C2FUNCALL-SFUN */ |
1963 |
static object LnkTLI110(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[110],(void **)&LnkLI110,2,ap);va_end(ap);return V1;} /* C2CALL-LAMBDA */ |
static object LnkTLI110(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[110],(void **)&LnkLI110,2,first,ap);va_end(ap);return V1;} /* C2CALL-LAMBDA */ |
1964 |
static object LnkTLI109(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[109],(void **)&LnkLI109,2,ap);va_end(ap);return V1;} /* C2CALL-LOCAL */ |
static object LnkTLI109(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[109],(void **)&LnkLI109,2,first,ap);va_end(ap);return V1;} /* C2CALL-LOCAL */ |
1965 |
static object LnkTLI108(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[108],(void **)&LnkLI108,4,ap);va_end(ap);return V1;} /* C2CALL-GLOBAL */ |
static object LnkTLI108(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[108],(void **)&LnkLI108,4,first,ap);va_end(ap);return V1;} /* C2CALL-GLOBAL */ |
1966 |
static object LnkTLI107(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[107],(void **)&LnkLI107,ap);va_end(ap);return V1;} /* C2FUNCALL */ |
static object LnkTLI107(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[107],(void **)&LnkLI107,first,ap);va_end(ap);return V1;} /* C2FUNCALL */ |
1967 |
static object LnkTLI106(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[106],(void **)&LnkLI106,2,ap);va_end(ap);return V1;} /* ADD-INFO */ |
static object LnkTLI106(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[106],(void **)&LnkLI106,2,first,ap);va_end(ap);return V1;} /* ADD-INFO */ |
1968 |
static object LnkTLI105(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[105],(void **)&LnkLI105,1,ap);va_end(ap);return V1;} /* C1EXPR */ |
static object LnkTLI105(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[105],(void **)&LnkLI105,1,first,ap);va_end(ap);return V1;} /* C1EXPR */ |
1969 |
static object LnkTLI104(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[104],(void **)&LnkLI104,ap);va_end(ap);return V1;} /* MAKE-INFO */ |
static object LnkTLI104(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[104],(void **)&LnkLI104,first,ap);va_end(ap);return V1;} /* MAKE-INFO */ |
1970 |
static object LnkTLI103(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[103],(void **)&LnkLI103,ap);va_end(ap);return V1;} /* C1LAMBDA-EXPR */ |
static object LnkTLI103(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[103],(void **)&LnkLI103,first,ap);va_end(ap);return V1;} /* C1LAMBDA-EXPR */ |
1971 |
static object LnkTLI102(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[102],(void **)&LnkLI102,1,ap);va_end(ap);return V1;} /* CMP-MACROEXPAND */ |
static object LnkTLI102(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[102],(void **)&LnkLI102,1,first,ap);va_end(ap);return V1;} /* CMP-MACROEXPAND */ |
1972 |
static object LnkTLI101(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[101],(void **)&LnkLI101,1,ap);va_end(ap);return V1;} /* CMP-MACRO-FUNCTION */ |
static object LnkTLI101(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[101],(void **)&LnkLI101,1,first,ap);va_end(ap);return V1;} /* CMP-MACRO-FUNCTION */ |
1973 |
static object LnkTLI100(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[100],(void **)&LnkLI100,1,ap);va_end(ap);return V1;} /* C1LOCAL-FUN */ |
static object LnkTLI100(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[100],(void **)&LnkLI100,1,first,ap);va_end(ap);return V1;} /* C1LOCAL-FUN */ |
1974 |
|
|
1975 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
1976 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |