44 |
} |
} |
45 |
/* local entry for function UNION */ |
/* local entry for function UNION */ |
46 |
|
|
47 |
static object LI2(V12,V11,va_alist) |
static object LI2(object V12,object V11,object first,...) |
|
object V12,V11; |
|
|
va_dcl |
|
48 |
{ |
{ |
49 |
va_list ap; |
va_list ap; |
50 |
int narg = VFUN_NARGS; VMB2 VMS2 VMV2 |
int narg = VFUN_NARGS; VMB2 VMS2 VMV2 |
54 |
register object V16; |
register object V16; |
55 |
register object V17; |
register object V17; |
56 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
57 |
va_start(ap); |
va_start(ap,first); |
58 |
V13= V12; |
V13= V12; |
59 |
V14= V11; |
V14= V11; |
60 |
narg= narg - 2; |
narg= narg - 2; |
61 |
{ |
{ |
62 |
parse_key_new(narg,Vcs +2,(struct key *)&LI2key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI2key,first,ap); |
63 |
V15=(Vcs[2]); |
V15=(Vcs[2]); |
64 |
V16=(Vcs[3]); |
V16=(Vcs[3]); |
65 |
V17=(Vcs[4]); |
V17=(Vcs[4]); |
135 |
}} |
}} |
136 |
/* local entry for function NUNION */ |
/* local entry for function NUNION */ |
137 |
|
|
138 |
static object LI3(V26,V25,va_alist) |
static object LI3(object V26,object V25,object first,...) |
|
object V26,V25; |
|
|
va_dcl |
|
139 |
{ |
{ |
140 |
va_list ap; |
va_list ap; |
141 |
int narg = VFUN_NARGS; VMB3 VMS3 VMV3 |
int narg = VFUN_NARGS; VMB3 VMS3 VMV3 |
145 |
register object V30; |
register object V30; |
146 |
register object V31; |
register object V31; |
147 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
148 |
va_start(ap); |
va_start(ap,first); |
149 |
V27= V26; |
V27= V26; |
150 |
V28= V25; |
V28= V25; |
151 |
narg= narg - 2; |
narg= narg - 2; |
152 |
{ |
{ |
153 |
parse_key_new(narg,Vcs +2,(struct key *)&LI3key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI3key,first,ap); |
154 |
V29=(Vcs[2]); |
V29=(Vcs[2]); |
155 |
V30=(Vcs[3]); |
V30=(Vcs[3]); |
156 |
V31=(Vcs[4]); |
V31=(Vcs[4]); |
226 |
}} |
}} |
227 |
/* local entry for function INTERSECTION */ |
/* local entry for function INTERSECTION */ |
228 |
|
|
229 |
static object LI4(V39,V38,va_alist) |
static object LI4(object V39,object V38,object first,...) |
|
object V39,V38; |
|
|
va_dcl |
|
230 |
{ |
{ |
231 |
va_list ap; |
va_list ap; |
232 |
int narg = VFUN_NARGS; VMB4 VMS4 VMV4 |
int narg = VFUN_NARGS; VMB4 VMS4 VMV4 |
236 |
register object V43; |
register object V43; |
237 |
register object V44; |
register object V44; |
238 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
239 |
va_start(ap); |
va_start(ap,first); |
240 |
V40= V39; |
V40= V39; |
241 |
V41= V38; |
V41= V38; |
242 |
narg= narg - 2; |
narg= narg - 2; |
243 |
{ |
{ |
244 |
parse_key_new(narg,Vcs +2,(struct key *)&LI4key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI4key,first,ap); |
245 |
V42=(Vcs[2]); |
V42=(Vcs[2]); |
246 |
V43=(Vcs[3]); |
V43=(Vcs[3]); |
247 |
V44=(Vcs[4]); |
V44=(Vcs[4]); |
298 |
}} |
}} |
299 |
/* local entry for function NINTERSECTION */ |
/* local entry for function NINTERSECTION */ |
300 |
|
|
301 |
static object LI5(V50,V49,va_alist) |
static object LI5(object V50,object V49,object first,...) |
|
object V50,V49; |
|
|
va_dcl |
|
302 |
{ |
{ |
303 |
va_list ap; |
va_list ap; |
304 |
int narg = VFUN_NARGS; VMB5 VMS5 VMV5 |
int narg = VFUN_NARGS; VMB5 VMS5 VMV5 |
308 |
register object V54; |
register object V54; |
309 |
register object V55; |
register object V55; |
310 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
311 |
va_start(ap); |
va_start(ap,first); |
312 |
V51= V50; |
V51= V50; |
313 |
V52= V49; |
V52= V49; |
314 |
narg= narg - 2; |
narg= narg - 2; |
315 |
{ |
{ |
316 |
parse_key_new(narg,Vcs +2,(struct key *)&LI5key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI5key,first,ap); |
317 |
V53=(Vcs[2]); |
V53=(Vcs[2]); |
318 |
V54=(Vcs[3]); |
V54=(Vcs[3]); |
319 |
V55=(Vcs[4]); |
V55=(Vcs[4]); |
386 |
}} |
}} |
387 |
/* local entry for function SET-DIFFERENCE */ |
/* local entry for function SET-DIFFERENCE */ |
388 |
|
|
389 |
static object LI6(V62,V61,va_alist) |
static object LI6(object V62,object V61,object first,...) |
|
object V62,V61; |
|
|
va_dcl |
|
390 |
{ |
{ |
391 |
va_list ap; |
va_list ap; |
392 |
int narg = VFUN_NARGS; VMB6 VMS6 VMV6 |
int narg = VFUN_NARGS; VMB6 VMS6 VMV6 |
396 |
register object V66; |
register object V66; |
397 |
register object V67; |
register object V67; |
398 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
399 |
va_start(ap); |
va_start(ap,first); |
400 |
V63= V62; |
V63= V62; |
401 |
V64= V61; |
V64= V61; |
402 |
narg= narg - 2; |
narg= narg - 2; |
403 |
{ |
{ |
404 |
parse_key_new(narg,Vcs +2,(struct key *)&LI6key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI6key,first,ap); |
405 |
V65=(Vcs[2]); |
V65=(Vcs[2]); |
406 |
V66=(Vcs[3]); |
V66=(Vcs[3]); |
407 |
V67=(Vcs[4]); |
V67=(Vcs[4]); |
528 |
} |
} |
529 |
/* local entry for function NSET-DIFFERENCE */ |
/* local entry for function NSET-DIFFERENCE */ |
530 |
|
|
531 |
static object LI8(V81,V80,va_alist) |
static object LI8(object V81,object V80,object first,...) |
|
object V81,V80; |
|
|
va_dcl |
|
532 |
{ |
{ |
533 |
va_list ap; |
va_list ap; |
534 |
int narg = VFUN_NARGS; VMB8 VMS8 VMV8 |
int narg = VFUN_NARGS; VMB8 VMS8 VMV8 |
538 |
register object V85; |
register object V85; |
539 |
register object V86; |
register object V86; |
540 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
541 |
va_start(ap); |
va_start(ap,first); |
542 |
V82= V81; |
V82= V81; |
543 |
V83= V80; |
V83= V80; |
544 |
narg= narg - 2; |
narg= narg - 2; |
545 |
{ |
{ |
546 |
parse_key_new(narg,Vcs +2,(struct key *)&LI8key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI8key,first,ap); |
547 |
V84=(Vcs[2]); |
V84=(Vcs[2]); |
548 |
V85=(Vcs[3]); |
V85=(Vcs[3]); |
549 |
V86=(Vcs[4]); |
V86=(Vcs[4]); |
702 |
} |
} |
703 |
/* local entry for function SET-EXCLUSIVE-OR */ |
/* local entry for function SET-EXCLUSIVE-OR */ |
704 |
|
|
705 |
static object LI10(V102,V101,va_alist) |
static object LI10(object V102,object V101,object first,...) |
|
object V102,V101; |
|
|
va_dcl |
|
706 |
{ |
{ |
707 |
va_list ap; |
va_list ap; |
708 |
int narg = VFUN_NARGS; VMB10 VMS10 VMV10 |
int narg = VFUN_NARGS; VMB10 VMS10 VMV10 |
712 |
object V106; |
object V106; |
713 |
object V107; |
object V107; |
714 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
715 |
va_start(ap); |
va_start(ap,first); |
716 |
V103= V102; |
V103= V102; |
717 |
V104= V101; |
V104= V101; |
718 |
narg= narg - 2; |
narg= narg - 2; |
719 |
{ |
{ |
720 |
parse_key_new(narg,Vcs +2,(struct key *)&LI10key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI10key,first,ap); |
721 |
V105=(Vcs[2]); |
V105=(Vcs[2]); |
722 |
V106=(Vcs[3]); |
V106=(Vcs[3]); |
723 |
V107=(Vcs[4]); |
V107=(Vcs[4]); |
763 |
}} |
}} |
764 |
/* local entry for function NSET-EXCLUSIVE-OR */ |
/* local entry for function NSET-EXCLUSIVE-OR */ |
765 |
|
|
766 |
static object LI11(V114,V113,va_alist) |
static object LI11(object V114,object V113,object first,...) |
|
object V114,V113; |
|
|
va_dcl |
|
767 |
{ |
{ |
768 |
va_list ap; |
va_list ap; |
769 |
int narg = VFUN_NARGS; VMB11 VMS11 VMV11 |
int narg = VFUN_NARGS; VMB11 VMS11 VMV11 |
773 |
register object V118; |
register object V118; |
774 |
register object V119; |
register object V119; |
775 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
776 |
va_start(ap); |
va_start(ap,first); |
777 |
V115= V114; |
V115= V114; |
778 |
V116= V113; |
V116= V113; |
779 |
narg= narg - 2; |
narg= narg - 2; |
780 |
{ |
{ |
781 |
parse_key_new(narg,Vcs +2,(struct key *)&LI11key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI11key,first,ap); |
782 |
V117=(Vcs[2]); |
V117=(Vcs[2]); |
783 |
V118=(Vcs[3]); |
V118=(Vcs[3]); |
784 |
V119=(Vcs[4]); |
V119=(Vcs[4]); |
908 |
}} |
}} |
909 |
/* local entry for function SUBSETP */ |
/* local entry for function SUBSETP */ |
910 |
|
|
911 |
static object LI12(V132,V131,va_alist) |
static object LI12(object V132,object V131,object first,...) |
|
object V132,V131; |
|
|
va_dcl |
|
912 |
{ |
{ |
913 |
va_list ap; |
va_list ap; |
914 |
int narg = VFUN_NARGS; VMB12 VMS12 VMV12 |
int narg = VFUN_NARGS; VMB12 VMS12 VMV12 |
918 |
register object V136; |
register object V136; |
919 |
register object V137; |
register object V137; |
920 |
Vcs[0]=Vcs[0]; |
Vcs[0]=Vcs[0]; |
921 |
va_start(ap); |
va_start(ap,first); |
922 |
V133= V132; |
V133= V132; |
923 |
V134= V131; |
V134= V131; |
924 |
narg= narg - 2; |
narg= narg - 2; |
925 |
{ |
{ |
926 |
parse_key_new(narg,Vcs +2,(struct key *)&LI12key,ap); |
parse_key_new_new(narg,Vcs +2,(struct key *)&LI12key,first,ap); |
927 |
V135=(Vcs[2]); |
V135=(Vcs[2]); |
928 |
V136=(Vcs[3]); |
V136=(Vcs[3]); |
929 |
V137=(Vcs[4]); |
V137=(Vcs[4]); |