/[gcl]/gcl/lsp/seqlib.c
ViewVC logotype

Diff of /gcl/lsp/seqlib.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.15 by camm, Wed Feb 26 22:21:36 2003 UTC revision 1.16 by camm, Thu Feb 27 00:07:48 2003 UTC
# Line 14  TTL:; Line 14  TTL:;
14          goto T2;}          goto T2;}
15          {object V3 = VV[0];          {object V3 = VV[0];
16          VMR1(V3)}          VMR1(V3)}
17  goto T2;          goto T2;
18  T2:;  T2:;
19          if(!(type_of((V2))==t_string)){          if(!(type_of((V2))==t_string)){
20          goto T5;}          goto T5;}
21          {object V4 = VV[1];          {object V4 = VV[1];
22          VMR1(V4)}          VMR1(V4)}
23  goto T5;          goto T5;
24  T5:;  T5:;
25          if(!((type_of((V2))==t_bitvector))){          if(!((type_of((V2))==t_bitvector))){
26          goto T8;}          goto T8;}
27          {object V5 = VV[2];          {object V5 = VV[2];
28          VMR1(V5)}          VMR1(V5)}
29  goto T8;          goto T8;
30  T8:;  T8:;
31          if(!(type_of((V2))==t_vector||          if(!(type_of((V2))==t_vector||
32  type_of((V2))==t_string||  type_of((V2))==t_string||
# Line 39  type_of((V2))==t_bitvector)){ Line 39  type_of((V2))==t_bitvector)){
39          V6= vs_base[0];          V6= vs_base[0];
40          {object V7 = list(2,VV[3],V6);          {object V7 = list(2,VV[3],V6);
41          VMR1(V7)}          VMR1(V7)}
42  goto T11;          goto T11;
43  T11:;  T11:;
44          base[0]= VV[4];          base[0]= VV[4];
45          base[1]= (V2);          base[1]= (V2);
# Line 68  TTL:; Line 68  TTL:;
68          vs_top=sup;          vs_top=sup;
69          {object V17 = vs_base[0];          {object V17 = vs_base[0];
70          VMR2(V17)}          VMR2(V17)}
71  goto T18;          goto T18;
72  T18:;  T18:;
73          if(((V14))==Cnil){          if(((V14))==Cnil){
74          goto T23;}          goto T23;}
# Line 80  T18:; Line 80  T18:;
80          V18= vs_base[0];          V18= vs_base[0];
81          {object V19 = ((V18)==Cnil?Ct:Cnil);          {object V19 = ((V18)==Cnil?Ct:Cnil);
82          VMR2(V19)}          VMR2(V19)}
83  goto T23;          goto T23;
84  T23:;  T23:;
85          {object V20 = (eql((V15),(V16))?Ct:Cnil);          {object V20 = (eql((V15),(V16))?Ct:Cnil);
86          VMR2(V20)}          VMR2(V20)}
# Line 99  TTL:; Line 99  TTL:;
99          goto T29;}          goto T29;}
100          if(type_of((V24))==t_fixnum){          if(type_of((V24))==t_fixnum){
101          goto T28;}          goto T28;}
102  goto T29;          goto T29;
103  T29:;  T29:;
104          base[0]= VV[5];          base[0]= VV[5];
105          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
106          Lerror();          Lerror();
107          vs_top=sup;          vs_top=sup;
108  goto T28;          goto T28;
109  T28:;  T28:;
110          if(!((fix((V23)))>(fix((V24))))){          if(!((fix((V23)))>(fix((V24))))){
111          goto T35;}          goto T35;}
# Line 115  T28:; Line 115  T28:;
115          vs_top=sup;          vs_top=sup;
116          {object V25 = vs_base[0];          {object V25 = vs_base[0];
117          VMR3(V25)}          VMR3(V25)}
118  goto T35;          goto T35;
119  T35:;  T35:;
120          {object V26 = Cnil;          {object V26 = Cnil;
121          VMR3(V26)}          VMR3(V26)}
# Line 155  static object LI5(object V28,object firs Line 155  static object LI5(object V28,object firs
155          else {          else {
156          V30= first;}          V30= first;}
157          --narg; goto T40;          --narg; goto T40;
158  goto T39;          goto T39;
159  T39:;  T39:;
160          V30= Cnil;          V30= Cnil;
161  goto T40;          goto T40;
162  T40:;  T40:;
163          base[0]= VV[8];          base[0]= VV[8];
164          base[1]= VV[9];          base[1]= VV[9];
# Line 166  T40:; Line 166  T40:;
166          goto T46;}          goto T46;}
167          base[2]= list(2,(V29),(V30));          base[2]= list(2,(V29),(V30));
168          goto T44;          goto T44;
169  goto T46;          goto T46;
170  T46:;  T46:;
171          base[2]= (V29);          base[2]= (V29);
172  goto T44;          goto T44;
173  T44:;  T44:;
174          vs_top=(vs_base=base+0)+3;          vs_top=(vs_base=base+0)+3;
175          (void) (*Lnk32)();          (void) (*Lnk32)();
# Line 193  TTL:; Line 193  TTL:;
193          if(!((fix((V34)))<=((long)length((V35))))){          if(!((fix((V34)))<=((long)length((V35))))){
194          goto T52;}          goto T52;}
195          goto T51;          goto T51;
196  goto T52;          goto T52;
197  T52:;  T52:;
198          (void)((VFUN_NARGS=1,(*(LnkLI33))((V34))));          (void)((VFUN_NARGS=1,(*(LnkLI33))((V34))));
199  goto T51;          goto T51;
200  T51:;  T51:;
201          {long V36 = fix((V34));          {long V36 = fix((V34));
202          VMR6((object)V36)}          VMR6((object)V36)}
203  goto T49;          goto T49;
204  T49:;  T49:;
205          if(((V34))!=Cnil){          if(((V34))!=Cnil){
206          goto T55;}          goto T55;}
207          {long V37 = (long)length((V35));          {long V37 = (long)length((V35));
208          VMR6((object)V37)}          VMR6((object)V37)}
209  goto T55;          goto T55;
210  T55:;  T55:;
211          {long V38 = fix((VFUN_NARGS=1,(*(LnkLI33))((V34))));          {long V38 = fix((VFUN_NARGS=1,(*(LnkLI33))((V34))));
212          VMR6((object)V38)}          VMR6((object)V38)}
# Line 224  TTL:; Line 224  TTL:;
224          if(!((fix((V40)))>=(0))){          if(!((fix((V40)))>=(0))){
225          goto T61;}          goto T61;}
226          goto T60;          goto T60;
227  goto T61;          goto T61;
228  T61:;  T61:;
229          (void)((VFUN_NARGS=1,(*(LnkLI33))((V40))));          (void)((VFUN_NARGS=1,(*(LnkLI33))((V40))));
230  goto T60;          goto T60;
231  T60:;  T60:;
232          {long V41 = fix((V40));          {long V41 = fix((V40));
233          VMR7((object)V41)}          VMR7((object)V41)}
234  goto T58;          goto T58;
235  T58:;  T58:;
236          if(((V40))!=Cnil){          if(((V40))!=Cnil){
237          goto T64;}          goto T64;}
238          {long V42 = 0;          {long V42 = 0;
239          VMR7((object)V42)}          VMR7((object)V42)}
240  goto T64;          goto T64;
241  T64:;  T64:;
242          {long V43 = fix((VFUN_NARGS=1,(*(LnkLI33))((V40))));          {long V43 = fix((VFUN_NARGS=1,(*(LnkLI33))((V40))));
243          VMR7((object)V43)}          VMR7((object)V43)}
# Line 275  static void L8() Line 275  static void L8()
275          goto T69;}          goto T69;}
276          V52= (long)(*(LnkLI36))((V47));          V52= (long)(*(LnkLI36))((V47));
277          goto T67;          goto T67;
278  goto T69;          goto T69;
279  T69:;  T69:;
280          V52= 0;          V52= 0;
281  goto T67;          goto T67;
282  T67:;  T67:;
283          {register long V53;          {register long V53;
284          V53= (long)(*(LnkLI37))((V48),(V45));          V53= (long)(*(LnkLI37))((V48),(V45));
285          if(!((V52)<=(V53))){          if(!((V52)<=(V53))){
286          goto T73;}          goto T73;}
287          goto T72;          goto T72;
288  goto T73;          goto T73;
289  T73:;  T73:;
290          V54 = make_fixnum(V52);          V54 = make_fixnum(V52);
291          V55 = make_fixnum(V53);          V55 = make_fixnum(V53);
292          (void)((VFUN_NARGS=2,(*(LnkLI33))(V54,V55)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V54,V55)));
293  goto T72;          goto T72;
294  T72:;  T72:;
295          if(((V46))!=Cnil){          if(((V46))!=Cnil){
296          goto T76;}          goto T76;}
# Line 301  T72:; Line 301  T72:;
301          vs_base=vs_top;          vs_base=vs_top;
302          super_funcall_no_event((V44));          super_funcall_no_event((V44));
303          return;          return;
304  goto T81;          goto T81;
305  T81:;  T81:;
306          V56= elt((V45),V52);          V56= elt((V45),V52);
307          V49= (          V49= (
308          (type_of((V51)) == t_sfun ?(*(((V51))->sfn.sfn_self)):          (type_of((V51)) == t_sfun ?(*(((V51))->sfn.sfn_self)):
309          (fcall.fun=((V51)),fcall.argd=1,fcalln))(/* INLINE-ARGS */V56));          (fcall.fun=((V51)),fcall.argd=1,fcalln))(/* INLINE-ARGS */V56));
310          V52= (long)(1)+(V52);          V52= (long)(1)+(V52);
311  goto T78;          goto T78;
312  T78:;  T78:;
313          {register object V57;          {register object V57;
314          V57= (V49);          V57= (V49);
315  goto T88;          goto T88;
316  T88:;  T88:;
317          if(!((V52)>=(V53))){          if(!((V52)>=(V53))){
318          goto T89;}          goto T89;}
319          base[12]= (V57);          base[12]= (V57);
320          vs_top=(vs_base=base+12)+1;          vs_top=(vs_base=base+12)+1;
321          return;          return;
322  goto T89;          goto T89;
323  T89:;  T89:;
324          {object V59;          {object V59;
325          V59= elt((V45),V52);          V59= elt((V45),V52);
# Line 333  T89:; Line 333  T89:;
333          (type_of((V44)) == t_sfun ?(*(((V44))->sfn.sfn_self)):          (type_of((V44)) == t_sfun ?(*(((V44))->sfn.sfn_self)):
334          (fcall.fun=((V44)),fcall.argd=2,fcalln))((V57),V58));          (fcall.fun=((V44)),fcall.argd=2,fcalln))((V57),V58));
335          goto T88;}          goto T88;}
336  goto T76;          goto T76;
337  T76:;  T76:;
338          if(((V50))!=Cnil){          if(((V50))!=Cnil){
339          goto T101;}          goto T101;}
# Line 342  T76:; Line 342  T76:;
342          vs_base=vs_top;          vs_base=vs_top;
343          super_funcall_no_event((V44));          super_funcall_no_event((V44));
344          return;          return;
345  goto T104;          goto T104;
346  T104:;  T104:;
347          V53= (long)(V53)+(-1);          V53= (long)(V53)+(-1);
348          V60= elt((V45),V53);          V60= elt((V45),V53);
349          V49= (          V49= (
350          (type_of((V51)) == t_sfun ?(*(((V51))->sfn.sfn_self)):          (type_of((V51)) == t_sfun ?(*(((V51))->sfn.sfn_self)):
351          (fcall.fun=((V51)),fcall.argd=1,fcalln))(/* INLINE-ARGS */V60));          (fcall.fun=((V51)),fcall.argd=1,fcalln))(/* INLINE-ARGS */V60));
352  goto T101;          goto T101;
353  T101:;  T101:;
354          {register object V61;          {register object V61;
355          V61= (V49);          V61= (V49);
356  goto T111;          goto T111;
357  T111:;  T111:;
358          if(!((V52)>=(V53))){          if(!((V52)>=(V53))){
359          goto T112;}          goto T112;}
360          base[12]= (V61);          base[12]= (V61);
361          vs_top=(vs_base=base+12)+1;          vs_top=(vs_base=base+12)+1;
362          return;          return;
363  goto T112;          goto T112;
364  T112:;  T112:;
365          V53= (long)(-1)+(V53);          V53= (long)(-1)+(V53);
366          base[12]= elt((V45),V53);          base[12]= elt((V45),V53);
# Line 399  static object LI9(object V64,object V63, Line 399  static object LI9(object V64,object V63,
399          goto T125;}          goto T125;}
400          V69= (long)(*(LnkLI36))((V67));          V69= (long)(*(LnkLI36))((V67));
401          goto T123;          goto T123;
402  goto T125;          goto T125;
403  T125:;  T125:;
404          V69= 0;          V69= 0;
405  goto T123;          goto T123;
406  T123:;  T123:;
407          {register long V70;          {register long V70;
408          V70= (long)(*(LnkLI37))((V68),(V65));          V70= (long)(*(LnkLI37))((V68),(V65));
409          if(!((V69)<=(V70))){          if(!((V69)<=(V70))){
410          goto T129;}          goto T129;}
411          goto T128;          goto T128;
412  goto T129;          goto T129;
413  T129:;  T129:;
414          V71 = make_fixnum(V69);          V71 = make_fixnum(V69);
415          V72 = make_fixnum(V70);          V72 = make_fixnum(V70);
416          (void)((VFUN_NARGS=2,(*(LnkLI33))(V71,V72)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V71,V72)));
417  goto T128;          goto T128;
418  T128:;  T128:;
419          {register long V73;          {register long V73;
420          V73= V69;          V73= V69;
421  goto T133;          goto T133;
422  T133:;  T133:;
423          if(!((V73)>=(V70))){          if(!((V73)>=(V70))){
424          goto T134;}          goto T134;}
425          {object V74 = (V65);          {object V74 = (V65);
426          VMR9(V74)}          VMR9(V74)}
427  goto T134;          goto T134;
428  T134:;  T134:;
429          (void)(elt_set((V65),V73,(V66)));          (void)(elt_set((V65),V73,(V66)));
430          V73= (long)(1)+(V73);          V73= (long)(1)+(V73);
# Line 461  static object LI10(object V76,object V75 Line 461  static object LI10(object V76,object V75
461          goto T144;}          goto T144;}
462          V83= (long)(*(LnkLI36))((V79));          V83= (long)(*(LnkLI36))((V79));
463          goto T142;          goto T142;
464  goto T144;          goto T144;
465  T144:;  T144:;
466          V83= 0;          V83= 0;
467  goto T142;          goto T142;
468  T142:;  T142:;
469          {long V84;          {long V84;
470          V84= (long)(*(LnkLI37))((V80),(V77));          V84= (long)(*(LnkLI37))((V80),(V77));
471          if(!((V83)<=(V84))){          if(!((V83)<=(V84))){
472          goto T148;}          goto T148;}
473          goto T147;          goto T147;
474  goto T148;          goto T148;
475  T148:;  T148:;
476          V85 = make_fixnum(V83);          V85 = make_fixnum(V83);
477          V86 = make_fixnum(V84);          V86 = make_fixnum(V84);
478          (void)((VFUN_NARGS=2,(*(LnkLI33))(V85,V86)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V85,V86)));
479  goto T147;          goto T147;
480  T147:;  T147:;
481          {long V87;          {long V87;
482          if(((V81))==Cnil){          if(((V81))==Cnil){
483          goto T152;}          goto T152;}
484          V87= (long)(*(LnkLI36))((V81));          V87= (long)(*(LnkLI36))((V81));
485          goto T150;          goto T150;
486  goto T152;          goto T152;
487  T152:;  T152:;
488          V87= 0;          V87= 0;
489  goto T150;          goto T150;
490  T150:;  T150:;
491          {long V88;          {long V88;
492          V88= (long)(*(LnkLI37))((V82),(V78));          V88= (long)(*(LnkLI37))((V82),(V78));
493          if(!((V87)<=(V88))){          if(!((V87)<=(V88))){
494          goto T156;}          goto T156;}
495          goto T155;          goto T155;
496  goto T156;          goto T156;
497  T156:;  T156:;
498          V89 = make_fixnum(V87);          V89 = make_fixnum(V87);
499          V90 = make_fixnum(V88);          V90 = make_fixnum(V88);
500          (void)((VFUN_NARGS=2,(*(LnkLI33))(V89,V90)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V89,V90)));
501  goto T155;          goto T155;
502  T155:;  T155:;
503          if(!(((V77))==((V78)))){          if(!(((V77))==((V78)))){
504          goto T159;}          goto T159;}
# Line 513  T155:; Line 513  T155:;
513          goto T166;}          goto T166;}
514          V92= (long)(V84)-(V83);          V92= (long)(V84)-(V83);
515          goto T164;          goto T164;
516  goto T166;          goto T166;
517  T166:;  T166:;
518          V92= (long)(V88)-(V87);          V92= (long)(V88)-(V87);
519  goto T164;          goto T164;
520  T164:;  T164:;
521          V93= (long)(V83)+((long)(-1)+(V92));          V93= (long)(V83)+((long)(-1)+(V92));
522          V94= (long)(V87)+((long)(-1)+(V92));          V94= (long)(V87)+((long)(-1)+(V92));
523  goto T171;          goto T171;
524  T171:;  T171:;
525          if(!((V91)>=(V92))){          if(!((V91)>=(V92))){
526          goto T172;}          goto T172;}
527          {object V95 = (V77);          {object V95 = (V77);
528          VMR10(V95)}          VMR10(V95)}
529  goto T172;          goto T172;
530  T172:;  T172:;
531          V96= elt((V78),V94);          V96= elt((V78),V94);
532          (void)(elt_set((V77),V93,/* INLINE-ARGS */V96));          (void)(elt_set((V77),V93,/* INLINE-ARGS */V96));
# Line 534  T172:; Line 534  T172:;
534          V93= (long)(-1)+(V93);          V93= (long)(-1)+(V93);
535          V94= (long)(-1)+(V94);          V94= (long)(-1)+(V94);
536          goto T171;}          goto T171;}
537  goto T159;          goto T159;
538  T159:;  T159:;
539          {register long V97;          {register long V97;
540          long V98;          long V98;
# Line 545  T159:; Line 545  T159:;
545          goto T187;}          goto T187;}
546          V98= (long)(V84)-(V83);          V98= (long)(V84)-(V83);
547          goto T185;          goto T185;
548  goto T187;          goto T187;
549  T187:;  T187:;
550          V98= (long)(V88)-(V87);          V98= (long)(V88)-(V87);
551  goto T185;          goto T185;
552  T185:;  T185:;
553          V99= V83;          V99= V83;
554          V100= V87;          V100= V87;
555  goto T192;          goto T192;
556  T192:;  T192:;
557          if(!((V97)>=(V98))){          if(!((V97)>=(V98))){
558          goto T193;}          goto T193;}
559          {object V101 = (V77);          {object V101 = (V77);
560          VMR10(V101)}          VMR10(V101)}
561  goto T193;          goto T193;
562  T193:;  T193:;
563          V102= elt((V78),V100);          V102= elt((V78),V100);
564          (void)(elt_set((V77),V99,/* INLINE-ARGS */V102));          (void)(elt_set((V77),V99,/* INLINE-ARGS */V102));
# Line 605  static object LI11(object V104,object V1 Line 605  static object LI11(object V104,object V1
605          if(!(((V113))==(Cnil))){          if(!(((V113))==(Cnil))){
606          goto T204;}          goto T204;}
607          V113= symbol_function(VV[35]);          V113= symbol_function(VV[35]);
608  goto T204;          goto T204;
609  T204:;  T204:;
610          {long V114;          {long V114;
611          if(((V110))==Cnil){          if(((V110))==Cnil){
612          goto T210;}          goto T210;}
613          V114= (long)(*(LnkLI36))((V110));          V114= (long)(*(LnkLI36))((V110));
614          goto T208;          goto T208;
615  goto T210;          goto T210;
616  T210:;  T210:;
617          V114= 0;          V114= 0;
618  goto T208;          goto T208;
619  T208:;  T208:;
620          {long V115;          {long V115;
621          V115= (long)(*(LnkLI37))((V111),(V106));          V115= (long)(*(LnkLI37))((V111),(V106));
622          if(!((V114)<=(V115))){          if(!((V114)<=(V115))){
623          goto T214;}          goto T214;}
624          goto T213;          goto T213;
625  goto T214;          goto T214;
626  T214:;  T214:;
627          V116 = make_fixnum(V114);          V116 = make_fixnum(V114);
628          V117 = make_fixnum(V115);          V117 = make_fixnum(V115);
629          (void)((VFUN_NARGS=2,(*(LnkLI33))(V116,V117)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V116,V117)));
630  goto T213;          goto T213;
631  T213:;  T213:;
632          {IDECL(GEN V118,V118space,V118alloc);          {IDECL(GEN V118,V118space,V118alloc);
633          if(((V112))!=Cnil){          if(((V112))!=Cnil){
634          goto T218;}          goto T218;}
635          ISETQ_FIX(V118,V118alloc,2147483647);          ISETQ_FIX(V118,V118alloc,2147483647);
636          goto T216;          goto T216;
637  goto T218;          goto T218;
638  T218:;SETQ_IO(V118,V118alloc,(V112));  T218:;SETQ_IO(V118,V118alloc,(V112));
639  goto T216;          goto T216;
640  T216:;  T216:;
641          if((V108)==Cnil){          if((V108)==Cnil){
642          goto T221;}          goto T221;}
643          if((V109)==Cnil){          if((V109)==Cnil){
644          goto T221;}          goto T221;}
645          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
646  goto T221;          goto T221;
647  T221:;  T221:;
648          if(((V107))!=Cnil){          if(((V107))!=Cnil){
649          goto T223;}          goto T223;}
# Line 655  T221:; Line 655  T221:;
655          V120= Cnil;          V120= Cnil;
656          {register long V121;          {register long V121;
657          V121= 0;          V121= 0;
658  goto T231;          goto T231;
659  T231:;  T231:;
660          if(!((V121)>=(V114))){          if(!((V121)>=(V114))){
661          goto T232;}          goto T232;}
662          goto T228;          goto T228;
663  goto T232;          goto T232;
664  T232:;  T232:;
665          {register object V122;          {register object V122;
666          V122= car((V119));          V122= car((V119));
# Line 670  T232:; Line 670  T232:;
670          V119= cdr((V119));}          V119= cdr((V119));}
671          V121= (long)(1)+(V121);          V121= (long)(1)+(V121);
672          goto T231;}          goto T231;}
673  goto T228;          goto T228;
674  T228:;  T228:;
675          {register long V124;          {register long V124;
676          register long V125;          register long V125;
677          V124= V114;          V124= V114;
678          V125= 0;          V125= 0;
679  goto T249;          goto T249;
680  T249:;  T249:;
681          if((V124)>=(V115)){          if((V124)>=(V115)){
682          goto T251;}          goto T251;}
# Line 686  T249:; Line 686  T249:;
686          goto T251;}          goto T251;}
687          if(!(endp_prop((V119)))){          if(!(endp_prop((V119)))){
688          goto T250;}          goto T250;}
689  goto T251;          goto T251;
690  T251:;  T251:;
691          base[0]= (V120);          base[0]= (V120);
692          base[1]= (V119);          base[1]= (V119);
# Line 695  T251:; Line 695  T251:;
695          vs_top=sup;          vs_top=sup;
696          {object V128 = vs_base[0];          {object V128 = vs_base[0];
697          VMR11(V128)}          VMR11(V128)}
698  goto T250;          goto T250;
699  T250:;  T250:;
700          base[0]= car((V119));          base[0]= car((V119));
701          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 709  T250:; Line 709  T250:;
709          V130= car((V119));          V130= car((V119));
710          V119= cdr((V119));          V119= cdr((V119));
711          goto T260;}          goto T260;}
712  goto T262;          goto T262;
713  T262:;  T262:;
714          {register object V131;          {register object V131;
715          V131= car((V119));          V131= car((V119));
# Line 717  T262:; Line 717  T262:;
717          {register object V132;          {register object V132;
718          V132= car((V119));          V132= car((V119));
719          V119= cdr((V119));}          V119= cdr((V119));}
720  goto T260;          goto T260;
721  T260:;  T260:;
722          V124= (long)(1)+(V124);          V124= (long)(1)+(V124);
723          goto T249;}}          goto T249;}}
724  goto T226;          goto T226;
725  T226:;  T226:;
726          V133 = make_fixnum(V114);          V133 = make_fixnum(V114);
727          V134 = make_fixnum(V115);          V134 = make_fixnum(V115);
728          V135 = make_integer(V118);          V135 = make_integer(V118);
729          {object V136 = (VFUN_NARGS=16,(*(LnkLI44))((V105),(V106),VV[11],(V107),VV[12],(V108),VV[13],(V109),VV[14],V133,VV[15],V134,VV[16],V135,VV[17],(V113)));          {object V136 = (VFUN_NARGS=16,(*(LnkLI44))((V105),(V106),VV[11],(V107),VV[12],(V108),VV[13],(V109),VV[14],V133,VV[15],V134,VV[16],V135,VV[17],(V113)));
730          VMR11(V136)}          VMR11(V136)}
731  goto T223;          goto T223;
732  T223:;  T223:;
733          V137 = make_fixnum(V114);          V137 = make_fixnum(V114);
734          V138 = make_fixnum(V115);          V138 = make_fixnum(V115);
# Line 771  static object LI12(object V142,object V1 Line 771  static object LI12(object V142,object V1
771          if(!(((V149))==(Cnil))){          if(!(((V149))==(Cnil))){
772          goto T281;}          goto T281;}
773          V149= symbol_function(VV[35]);          V149= symbol_function(VV[35]);
774  goto T281;          goto T281;
775  T281:;  T281:;
776          V150= symbol_function(VV[46]);          V150= symbol_function(VV[46]);
777          {object V151 = (VFUN_NARGS=14,(*(LnkLI45))((V143),(V144),VV[11],(V145),VV[12],V150,VV[14],(V146),VV[15],(V147),VV[16],(V148),VV[17],(V149)));          {object V151 = (VFUN_NARGS=14,(*(LnkLI45))((V143),(V144),VV[11],(V145),VV[12],V150,VV[14],(V146),VV[15],(V147),VV[16],(V148),VV[17],(V149)));
# Line 811  static object LI13(object V153,object V1 Line 811  static object LI13(object V153,object V1
811          if(!(((V160))==(Cnil))){          if(!(((V160))==(Cnil))){
812          goto T287;}          goto T287;}
813          V160= symbol_function(VV[35]);          V160= symbol_function(VV[35]);
814  goto T287;          goto T287;
815  T287:;  T287:;
816          V161= symbol_function(VV[46]);          V161= symbol_function(VV[46]);
817          {object V162 = (VFUN_NARGS=14,(*(LnkLI45))((V154),(V155),VV[11],(V156),VV[13],V161,VV[14],(V157),VV[15],(V158),VV[16],(V159),VV[17],(V160)));          {object V162 = (VFUN_NARGS=14,(*(LnkLI45))((V154),(V155),VV[11],(V156),VV[13],V161,VV[14],(V157),VV[15],(V158),VV[16],(V159),VV[17],(V160)));
# Line 857  static object LI14(object V164,object V1 Line 857  static object LI14(object V164,object V1
857          if(!(((V173))==(Cnil))){          if(!(((V173))==(Cnil))){
858          goto T294;}          goto T294;}
859          V173= symbol_function(VV[35]);          V173= symbol_function(VV[35]);
860  goto T294;          goto T294;
861  T294:;  T294:;
862          {register long V175;          {register long V175;
863          if(((V170))==Cnil){          if(((V170))==Cnil){
864          goto T300;}          goto T300;}
865          V175= (long)(*(LnkLI36))((V170));          V175= (long)(*(LnkLI36))((V170));
866          goto T298;          goto T298;
867  goto T300;          goto T300;
868  T300:;  T300:;
869          V175= 0;          V175= 0;
870  goto T298;          goto T298;
871  T298:;  T298:;
872          {long V176;          {long V176;
873          V176= (long)(*(LnkLI37))((V171),(V166));          V176= (long)(*(LnkLI37))((V171),(V166));
874          if(!((V175)<=(V176))){          if(!((V175)<=(V176))){
875          goto T304;}          goto T304;}
876          goto T303;          goto T303;
877  goto T304;          goto T304;
878  T304:;  T304:;
879          V177 = make_fixnum(V175);          V177 = make_fixnum(V175);
880          V178 = make_fixnum(V176);          V178 = make_fixnum(V176);
881          (void)((VFUN_NARGS=2,(*(LnkLI33))(V177,V178)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V177,V178)));
882  goto T303;          goto T303;
883  T303:;  T303:;
884          {IDECL(register GEN V179,V179space,V179alloc);          {IDECL(register GEN V179,V179space,V179alloc);
885          if(((V172))!=Cnil){          if(((V172))!=Cnil){
886          goto T308;}          goto T308;}
887          ISETQ_FIX(V179,V179alloc,2147483647);          ISETQ_FIX(V179,V179alloc,2147483647);
888          goto T306;          goto T306;
889  goto T308;          goto T308;
890  T308:;SETQ_IO(V179,V179alloc,(V172));  T308:;SETQ_IO(V179,V179alloc,(V172));
891  goto T306;          goto T306;
892  T306:;  T306:;
893          if((V168)==Cnil){          if((V168)==Cnil){
894          goto T311;}          goto T311;}
895          if((V169)==Cnil){          if((V169)==Cnil){
896          goto T311;}          goto T311;}
897          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
898  goto T311;          goto T311;
899  T311:;  T311:;
900          if(((V167))!=Cnil){          if(((V167))!=Cnil){
901          goto T313;}          goto T313;}
# Line 907  T311:; Line 907  T311:;
907          V181= (V180);          V181= (V180);
908          {long V182;          {long V182;
909          V182= 0;          V182= 0;
910  goto T323;          goto T323;
911  T323:;  T323:;
912          if(!((V182)>=(V175))){          if(!((V182)>=(V175))){
913          goto T324;}          goto T324;}
914          goto T320;          goto T320;
915  goto T324;          goto T324;
916  T324:;  T324:;
917          {object V183;          {object V183;
918          V183= car((V181));          V183= car((V181));
919          V181= cdr((V181));}          V181= cdr((V181));}
920          V182= (long)(1)+(V182);          V182= (long)(1)+(V182);
921          goto T323;}          goto T323;}
922  goto T320;          goto T320;
923  T320:;  T320:;
924          {long V184;          {long V184;
925          long V185;          long V185;
926          V184= V175;          V184= V175;
927          V185= 0;          V185= 0;
928  goto T338;          goto T338;
929  T338:;  T338:;
930          if((V184)>=(V176)){          if((V184)>=(V176)){
931          goto T340;}          goto T340;}
# Line 935  T338:; Line 935  T338:;
935          goto T340;}          goto T340;}
936          if(!(endp_prop(cdr((V181))))){          if(!(endp_prop(cdr((V181))))){
937          goto T339;}          goto T339;}
938  goto T340;          goto T340;
939  T340:;  T340:;
940          {object V188 = cdr((V180));          {object V188 = cdr((V180));
941          VMR14(V188)}          VMR14(V188)}
942  goto T339;          goto T339;
943  T339:;  T339:;
944          base[1]= cadr((V181));          base[1]= cadr((V181));
945          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
# Line 952  T339:; Line 952  T339:;
952          if(type_of((V181))!=t_cons)FEwrong_type_argument(Scons,(V181));          if(type_of((V181))!=t_cons)FEwrong_type_argument(Scons,(V181));
953          ((V181))->c.c_cdr = cddr((V181));          ((V181))->c.c_cdr = cddr((V181));
954          goto T347;          goto T347;
955  goto T349;          goto T349;
956  T349:;  T349:;
957          V181= cdr((V181));          V181= cdr((V181));
958  goto T347;          goto T347;
959  T347:;  T347:;
960          V184= (long)(1)+(V184);          V184= (long)(1)+(V184);
961          goto T338;}}          goto T338;}}
962  goto T316;          goto T316;
963  T316:;  T316:;
964          {long V190;          {long V190;
965          V191 = make_fixnum(V175);          V191 = make_fixnum(V175);
# Line 970  T316:; Line 970  T316:;
970          V195 = make_integer(V179);          V195 = make_integer(V179);
971          if(!(number_compare(V194,V195)<0)){          if(!(number_compare(V194,V195)<0)){
972          goto T360;}ISETQ_FIX(V179,V179alloc,V190);          goto T360;}ISETQ_FIX(V179,V179alloc,V190);
973  goto T360;          goto T360;
974  T360:;  T360:;
975          V196 = make_integer(V179);          V196 = make_integer(V179);
976          if(!(number_compare(V196,small_fixnum(0))<0)){          if(!(number_compare(V196,small_fixnum(0))<0)){
977          goto T364;}          goto T364;}
978          ISETQ_FIX(V179,V179alloc,0);          ISETQ_FIX(V179,V179alloc,0);
979  goto T364;          goto T364;
980  T364:;  T364:;
981          {object V197;          {object V197;
982          register long V198;          register long V198;
# Line 989  T364:; Line 989  T364:;
989          V198= 0;          V198= 0;
990          V199= 0;          V199= 0;
991          V200= 0;          V200= 0;
992  goto T373;          goto T373;
993  T373:;  T373:;
994          if(!((V198)>=(V174))){          if(!((V198)>=(V174))){
995          goto T374;}          goto T374;}
996          {object V204 = (V197);          {object V204 = (V197);
997          VMR14(V204)}          VMR14(V204)}
998  goto T374;          goto T374;
999  T374:;  T374:;
1000          if(!((V175)<=(V198))){          if(!((V175)<=(V198))){
1001          goto T380;}          goto T380;}
# Line 1014  T374:; Line 1014  T374:;
1014          goto T380;}          goto T380;}
1015          V200= (long)(1)+(V200);          V200= (long)(1)+(V200);
1016          goto T378;          goto T378;
1017  goto T380;          goto T380;
1018  T380:;  T380:;
1019          V208= elt((V166),V198);          V208= elt((V166),V198);
1020          (void)(elt_set((V197),V199,/* INLINE-ARGS */V208));          (void)(elt_set((V197),V199,/* INLINE-ARGS */V208));
1021          V199= (long)(1)+(V199);          V199= (long)(1)+(V199);
1022  goto T378;          goto T378;
1023  T378:;  T378:;
1024          V198= (long)(1)+(V198);          V198= (long)(1)+(V198);
1025          goto T373;}}          goto T373;}}
1026  goto T313;          goto T313;
1027  T313:;  T313:;
1028          {long V209;          {long V209;
1029          V210 = make_fixnum(V175);          V210 = make_fixnum(V175);
# Line 1034  T313:; Line 1034  T313:;
1034          V214 = make_integer(V179);          V214 = make_integer(V179);
1035          if(!(number_compare(V213,V214)<0)){          if(!(number_compare(V213,V214)<0)){
1036          goto T397;}ISETQ_FIX(V179,V179alloc,V209);          goto T397;}ISETQ_FIX(V179,V179alloc,V209);
1037  goto T397;          goto T397;
1038  T397:;  T397:;
1039          V215 = make_integer(V179);          V215 = make_integer(V179);
1040          if(!(number_compare(V215,small_fixnum(0))<0)){          if(!(number_compare(V215,small_fixnum(0))<0)){
1041          goto T401;}          goto T401;}
1042          ISETQ_FIX(V179,V179alloc,0);          ISETQ_FIX(V179,V179alloc,0);
1043  goto T401;          goto T401;
1044  T401:;  T401:;
1045          {object V216;          {object V216;
1046          register long V217;          register long V217;
# Line 1054  T401:; Line 1054  T401:;
1054          V223 = fix(make_integer(V179));          V223 = fix(make_integer(V179));
1055          V218= (long)(-1)+((long)(V174)-(V223));          V218= (long)(-1)+((long)(V174)-(V223));
1056          V219= 0;          V219= 0;
1057  goto T410;          goto T410;
1058  T410:;  T410:;
1059          if(!((V217)<(0))){          if(!((V217)<(0))){
1060          goto T411;}          goto T411;}
1061          {object V224 = (V216);          {object V224 = (V216);
1062          VMR14(V224)}          VMR14(V224)}
1063  goto T411;          goto T411;
1064  T411:;  T411:;
1065          if(!((V175)<=(V217))){          if(!((V175)<=(V217))){
1066          goto T417;}          goto T417;}
# Line 1079  T411:; Line 1079  T411:;
1079          goto T417;}          goto T417;}
1080          V219= (long)(1)+(V219);          V219= (long)(1)+(V219);
1081          goto T415;          goto T415;
1082  goto T417;          goto T417;
1083  T417:;  T417:;
1084          V228= elt((V166),V217);          V228= elt((V166),V217);
1085          (void)(elt_set((V216),V218,/* INLINE-ARGS */V228));          (void)(elt_set((V216),V218,/* INLINE-ARGS */V228));
1086          V218= (long)(-1)+(V218);          V218= (long)(-1)+(V218);
1087  goto T415;          goto T415;
1088  T415:;  T415:;
1089          V217= (long)(-1)+(V217);          V217= (long)(-1)+(V217);
1090          goto T410;}}}}}}          goto T410;}}}}}}
# Line 1124  static object LI15(object V230,object V2 Line 1124  static object LI15(object V230,object V2
1124          if(!(((V237))==(Cnil))){          if(!(((V237))==(Cnil))){
1125          goto T434;}          goto T434;}
1126          V237= symbol_function(VV[35]);          V237= symbol_function(VV[35]);
1127  goto T434;          goto T434;
1128  T434:;  T434:;
1129          V238= symbol_function(VV[46]);          V238= symbol_function(VV[46]);
1130          {object V239 = (VFUN_NARGS=14,(*(LnkLI44))((V231),(V232),VV[11],(V233),VV[12],V238,VV[14],(V234),VV[15],(V235),VV[16],(V236),VV[17],(V237)));          {object V239 = (VFUN_NARGS=14,(*(LnkLI44))((V231),(V232),VV[11],(V233),VV[12],V238,VV[14],(V234),VV[15],(V235),VV[16],(V236),VV[17],(V237)));
# Line 1164  static object LI16(object V241,object V2 Line 1164  static object LI16(object V241,object V2
1164          if(!(((V248))==(Cnil))){          if(!(((V248))==(Cnil))){
1165          goto T440;}          goto T440;}
1166          V248= symbol_function(VV[35]);          V248= symbol_function(VV[35]);
1167  goto T440;          goto T440;
1168  T440:;  T440:;
1169          V249= symbol_function(VV[46]);          V249= symbol_function(VV[46]);
1170          {object V250 = (VFUN_NARGS=14,(*(LnkLI44))((V242),(V243),VV[11],(V244),VV[13],V249,VV[14],(V245),VV[15],(V246),VV[16],(V247),VV[17],(V248)));          {object V250 = (VFUN_NARGS=14,(*(LnkLI44))((V242),(V243),VV[11],(V244),VV[13],V249,VV[14],(V245),VV[15],(V246),VV[16],(V247),VV[17],(V248)));
# Line 1206  static object LI17(object V252,object V2 Line 1206  static object LI17(object V252,object V2
1206          if(!(((V260))==(Cnil))){          if(!(((V260))==(Cnil))){
1207          goto T446;}          goto T446;}
1208          V260= symbol_function(VV[35]);          V260= symbol_function(VV[35]);
1209  goto T446;          goto T446;
1210  T446:;  T446:;
1211          {long V261;          {long V261;
1212          if(((V258))==Cnil){          if(((V258))==Cnil){
1213          goto T452;}          goto T452;}
1214          V261= (long)(*(LnkLI36))((V258));          V261= (long)(*(LnkLI36))((V258));
1215          goto T450;          goto T450;
1216  goto T452;          goto T452;
1217  T452:;  T452:;
1218          V261= 0;          V261= 0;
1219  goto T450;          goto T450;
1220  T450:;  T450:;
1221          {long V262;          {long V262;
1222          V262= (long)(*(LnkLI37))((V259),(V254));          V262= (long)(*(LnkLI37))((V259),(V254));
1223          if(!((V261)<=(V262))){          if(!((V261)<=(V262))){
1224          goto T456;}          goto T456;}
1225          goto T455;          goto T455;
1226  goto T456;          goto T456;
1227  T456:;  T456:;
1228          V263 = make_fixnum(V261);          V263 = make_fixnum(V261);
1229          V264 = make_fixnum(V262);          V264 = make_fixnum(V262);
1230          (void)((VFUN_NARGS=2,(*(LnkLI33))(V263,V264)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V263,V264)));
1231  goto T455;          goto T455;
1232  T455:;  T455:;
1233          if((V256)==Cnil){          if((V256)==Cnil){
1234          goto T458;}          goto T458;}
1235          if((V257)==Cnil){          if((V257)==Cnil){
1236          goto T458;}          goto T458;}
1237          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
1238  goto T458;          goto T458;
1239  T458:;  T458:;
1240          if(((V255))!=Cnil){          if(((V255))!=Cnil){
1241          goto T460;}          goto T460;}
# Line 1243  T458:; Line 1243  T458:;
1243          register long V266;          register long V266;
1244          V265= V261;          V265= V261;
1245          V266= 0;          V266= 0;
1246  goto T465;          goto T465;
1247  T465:;  T465:;
1248          if(!((V265)>=(V262))){          if(!((V265)>=(V262))){
1249          goto T466;}          goto T466;}
1250          {object V267 = make_fixnum(V266);          {object V267 = make_fixnum(V266);
1251          VMR17(V267)}          VMR17(V267)}
1252  goto T466;          goto T466;
1253  T466:;  T466:;
1254          base[0]= elt((V254),V265);          base[0]= elt((V254),V265);
1255          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 1259  T466:; Line 1259  T466:;
1259          if(((*(LnkLI43))((V256),(V257),(V253),V268))==Cnil){          if(((*(LnkLI43))((V256),(V257),(V253),V268))==Cnil){
1260          goto T470;}          goto T470;}
1261          V266= (long)(1)+(V266);          V266= (long)(1)+(V266);
1262  goto T470;          goto T470;
1263  T470:;  T470:;
1264          V265= (long)(1)+(V265);          V265= (long)(1)+(V265);
1265          goto T465;}          goto T465;}
1266  goto T460;          goto T460;
1267  T460:;  T460:;
1268          {register long V269;          {register long V269;
1269          register long V270;          register long V270;
1270          V269= (long)(-1)+(V262);          V269= (long)(-1)+(V262);
1271          V270= 0;          V270= 0;
1272  goto T482;          goto T482;
1273  T482:;  T482:;
1274          if(!((V269)<(V261))){          if(!((V269)<(V261))){
1275          goto T483;}          goto T483;}
1276          {object V271 = make_fixnum(V270);          {object V271 = make_fixnum(V270);
1277          VMR17(V271)}          VMR17(V271)}
1278  goto T483;          goto T483;
1279  T483:;  T483:;
1280          base[0]= elt((V254),V269);          base[0]= elt((V254),V269);
1281          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 1285  T483:; Line 1285  T483:;
1285          if(((*(LnkLI43))((V256),(V257),(V253),V272))==Cnil){          if(((*(LnkLI43))((V256),(V257),(V253),V272))==Cnil){
1286          goto T487;}          goto T487;}
1287          V270= (long)(1)+(V270);          V270= (long)(1)+(V270);
1288  goto T487;          goto T487;
1289  T487:;  T487:;
1290          V269= (long)(-1)+(V269);          V269= (long)(-1)+(V269);
1291          goto T482;}}}          goto T482;}}}
# Line 1323  static object LI18(object V274,object V2 Line 1323  static object LI18(object V274,object V2
1323          if(!(((V280))==(Cnil))){          if(!(((V280))==(Cnil))){
1324          goto T497;}          goto T497;}
1325          V280= symbol_function(VV[35]);          V280= symbol_function(VV[35]);
1326  goto T497;          goto T497;
1327  T497:;  T497:;
1328          V281= symbol_function(VV[46]);          V281= symbol_function(VV[46]);
1329          {object V282 = (VFUN_NARGS=12,(*(LnkLI50))((V275),(V276),VV[11],(V277),VV[12],V281,VV[14],(V278),VV[15],(V279),VV[17],(V280)));          {object V282 = (VFUN_NARGS=12,(*(LnkLI50))((V275),(V276),VV[11],(V277),VV[12],V281,VV[14],(V278),VV[15],(V279),VV[17],(V280)));
# Line 1361  static object LI19(object V284,object V2 Line 1361  static object LI19(object V284,object V2
1361          if(!(((V290))==(Cnil))){          if(!(((V290))==(Cnil))){
1362          goto T503;}          goto T503;}
1363          V290= symbol_function(VV[35]);          V290= symbol_function(VV[35]);
1364  goto T503;          goto T503;
1365  T503:;  T503:;
1366          V291= symbol_function(VV[46]);          V291= symbol_function(VV[46]);
1367          {object V292 = (VFUN_NARGS=12,(*(LnkLI50))((V285),(V286),VV[11],(V287),VV[13],V291,VV[14],(V288),VV[15],(V289),VV[17],(V290)));          {object V292 = (VFUN_NARGS=12,(*(LnkLI50))((V285),(V286),VV[11],(V287),VV[13],V291,VV[14],(V288),VV[15],(V289),VV[17],(V290)));
# Line 1405  static object LI20(object V294,object V2 Line 1405  static object LI20(object V294,object V2
1405          if(!(((V303))==(Cnil))){          if(!(((V303))==(Cnil))){
1406          goto T509;}          goto T509;}
1407          V303= symbol_function(VV[35]);          V303= symbol_function(VV[35]);
1408  goto T509;          goto T509;
1409  T509:;  T509:;
1410          {long V304;          {long V304;
1411          if(((V300))==Cnil){          if(((V300))==Cnil){
1412          goto T515;}          goto T515;}
1413          V304= (long)(*(LnkLI36))((V300));          V304= (long)(*(LnkLI36))((V300));
1414          goto T513;          goto T513;
1415  goto T515;          goto T515;
1416  T515:;  T515:;
1417          V304= 0;          V304= 0;
1418  goto T513;          goto T513;
1419  T513:;  T513:;
1420          {long V305;          {long V305;
1421          V305= (long)(*(LnkLI37))((V301),(V296));          V305= (long)(*(LnkLI37))((V301),(V296));
1422          if(!((V304)<=(V305))){          if(!((V304)<=(V305))){
1423          goto T519;}          goto T519;}
1424          goto T518;          goto T518;
1425  goto T519;          goto T519;
1426  T519:;  T519:;
1427          V306 = make_fixnum(V304);          V306 = make_fixnum(V304);
1428          V307 = make_fixnum(V305);          V307 = make_fixnum(V305);
1429          (void)((VFUN_NARGS=2,(*(LnkLI33))(V306,V307)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V306,V307)));
1430  goto T518;          goto T518;
1431  T518:;  T518:;
1432          {IDECL(GEN V308,V308space,V308alloc);          {IDECL(GEN V308,V308space,V308alloc);
1433          if(((V302))!=Cnil){          if(((V302))!=Cnil){
1434          goto T523;}          goto T523;}
1435          ISETQ_FIX(V308,V308alloc,2147483647);          ISETQ_FIX(V308,V308alloc,2147483647);
1436          goto T521;          goto T521;
1437  goto T523;          goto T523;
1438  T523:;SETQ_IO(V308,V308alloc,(V302));  T523:;SETQ_IO(V308,V308alloc,(V302));
1439  goto T521;          goto T521;
1440  T521:;  T521:;
1441          if((V298)==Cnil){          if((V298)==Cnil){
1442          goto T526;}          goto T526;}
1443          if((V299)==Cnil){          if((V299)==Cnil){
1444          goto T526;}          goto T526;}
1445          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
1446  goto T526;          goto T526;
1447  T526:;  T526:;
1448          if(((V297))!=Cnil){          if(((V297))!=Cnil){
1449          goto T528;}          goto T528;}
# Line 1451  T526:; Line 1451  T526:;
1451          register long V310;          register long V310;
1452          V309= V304;          V309= V304;
1453          V310= 0;          V310= 0;
1454  goto T533;          goto T533;
1455  T533:;  T533:;
1456          if(!((V309)>=(V305))){          if(!((V309)>=(V305))){
1457          goto T534;}          goto T534;}
1458          {object V311 = make_fixnum(V310);          {object V311 = make_fixnum(V310);
1459          VMR20(V311)}          VMR20(V311)}
1460  goto T534;          goto T534;
1461  T534:;  T534:;
1462          V312 = make_fixnum(V310);          V312 = make_fixnum(V310);
1463          V313 = make_integer(V308);          V313 = make_integer(V308);
# Line 1471  T534:; Line 1471  T534:;
1471          if(((*(LnkLI43))((V298),(V299),(V295),V314))==Cnil){          if(((*(LnkLI43))((V298),(V299),(V295),V314))==Cnil){
1472          goto T538;}          goto T538;}
1473          V310= (long)(1)+(V310);          V310= (long)(1)+(V310);
1474  goto T538;          goto T538;
1475  T538:;  T538:;
1476          V309= (long)(1)+(V309);          V309= (long)(1)+(V309);
1477          goto T533;}          goto T533;}
1478  goto T528;          goto T528;
1479  T528:;  T528:;
1480          {register long V315;          {register long V315;
1481          register long V316;          register long V316;
1482          V315= (long)(-1)+(V305);          V315= (long)(-1)+(V305);
1483          V316= 0;          V316= 0;
1484  goto T552;          goto T552;
1485  T552:;  T552:;
1486          if(!((V315)<(V304))){          if(!((V315)<(V304))){
1487          goto T553;}          goto T553;}
1488          {object V317 = make_fixnum(V316);          {object V317 = make_fixnum(V316);
1489          VMR20(V317)}          VMR20(V317)}
1490  goto T553;          goto T553;
1491  T553:;  T553:;
1492          V318 = make_fixnum(V316);          V318 = make_fixnum(V316);
1493          V319 = make_integer(V308);          V319 = make_integer(V308);
# Line 1501  T553:; Line 1501  T553:;
1501          if(((*(LnkLI43))((V298),(V299),(V295),V320))==Cnil){          if(((*(LnkLI43))((V298),(V299),(V295),V320))==Cnil){
1502          goto T557;}          goto T557;}
1503          V316= (long)(1)+(V316);          V316= (long)(1)+(V316);
1504  goto T557;          goto T557;
1505  T557:;  T557:;
1506          V315= (long)(-1)+(V315);          V315= (long)(-1)+(V315);
1507          goto T552;}}}}          goto T552;}}}}
# Line 1541  static object LI21(object V322,object V3 Line 1541  static object LI21(object V322,object V3
1541          if(!(((V329))==(Cnil))){          if(!(((V329))==(Cnil))){
1542          goto T569;}          goto T569;}
1543          V329= symbol_function(VV[35]);          V329= symbol_function(VV[35]);
1544  goto T569;          goto T569;
1545  T569:;  T569:;
1546          V330= symbol_function(VV[46]);          V330= symbol_function(VV[46]);
1547          {object V331 = (VFUN_NARGS=14,(*(LnkLI47))((V323),(V324),VV[11],(V325),VV[12],V330,VV[14],(V326),VV[15],(V327),VV[16],(V328),VV[17],(V329)));          {object V331 = (VFUN_NARGS=14,(*(LnkLI47))((V323),(V324),VV[11],(V325),VV[12],V330,VV[14],(V326),VV[15],(V327),VV[16],(V328),VV[17],(V329)));
# Line 1581  static object LI22(object V333,object V3 Line 1581  static object LI22(object V333,object V3
1581          if(!(((V340))==(Cnil))){          if(!(((V340))==(Cnil))){
1582          goto T575;}          goto T575;}
1583          V340= symbol_function(VV[35]);          V340= symbol_function(VV[35]);
1584  goto T575;          goto T575;
1585  T575:;  T575:;
1586          V341= symbol_function(VV[46]);          V341= symbol_function(VV[46]);
1587          {object V342 = (VFUN_NARGS=14,(*(LnkLI47))((V334),(V335),VV[11],(V336),VV[13],V341,VV[14],(V337),VV[15],(V338),VV[16],(V339),VV[17],(V340)));          {object V342 = (VFUN_NARGS=14,(*(LnkLI47))((V334),(V335),VV[11],(V336),VV[13],V341,VV[14],(V337),VV[15],(V338),VV[16],(V339),VV[17],(V340)));
# Line 1629  static object LI23(object V345,object V3 Line 1629  static object LI23(object V345,object V3
1629          if(!(((V355))==(Cnil))){          if(!(((V355))==(Cnil))){
1630          goto T582;}          goto T582;}
1631          V355= symbol_function(VV[35]);          V355= symbol_function(VV[35]);
1632  goto T582;          goto T582;
1633  T582:;  T582:;
1634          {long V357;          {long V357;
1635          if(((V352))==Cnil){          if(((V352))==Cnil){
1636          goto T588;}          goto T588;}
1637          V357= (long)(*(LnkLI36))((V352));          V357= (long)(*(LnkLI36))((V352));
1638          goto T586;          goto T586;
1639  goto T588;          goto T588;
1640  T588:;  T588:;
1641          V357= 0;          V357= 0;
1642  goto T586;          goto T586;
1643  T586:;  T586:;
1644          {long V358;          {long V358;
1645          V358= (long)(*(LnkLI37))((V353),(V348));          V358= (long)(*(LnkLI37))((V353),(V348));
1646          if(!((V357)<=(V358))){          if(!((V357)<=(V358))){
1647          goto T592;}          goto T592;}
1648          goto T591;          goto T591;
1649  goto T592;          goto T592;
1650  T592:;  T592:;
1651          V359 = make_fixnum(V357);          V359 = make_fixnum(V357);
1652          V360 = make_fixnum(V358);          V360 = make_fixnum(V358);
1653          (void)((VFUN_NARGS=2,(*(LnkLI33))(V359,V360)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V359,V360)));
1654  goto T591;          goto T591;
1655  T591:;  T591:;
1656          {IDECL(GEN V361,V361space,V361alloc);          {IDECL(GEN V361,V361space,V361alloc);
1657          if(((V354))!=Cnil){          if(((V354))!=Cnil){
1658          goto T596;}          goto T596;}
1659          ISETQ_FIX(V361,V361alloc,2147483647);          ISETQ_FIX(V361,V361alloc,2147483647);
1660          goto T594;          goto T594;
1661  goto T596;          goto T596;
1662  T596:;SETQ_IO(V361,V361alloc,(V354));  T596:;SETQ_IO(V361,V361alloc,(V354));
1663  goto T594;          goto T594;
1664  T594:;  T594:;
1665          if((V350)==Cnil){          if((V350)==Cnil){
1666          goto T599;}          goto T599;}
1667          if((V351)==Cnil){          if((V351)==Cnil){
1668          goto T599;}          goto T599;}
1669          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
1670  goto T599;          goto T599;
1671  T599:;  T599:;
1672          if(((V349))!=Cnil){          if(((V349))!=Cnil){
1673          goto T601;}          goto T601;}
# Line 1679  T599:; Line 1679  T599:;
1679          V362= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V365,V366));          V362= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V365,V366));
1680          V363= 0;          V363= 0;
1681          V364= 0;          V364= 0;
1682  goto T607;          goto T607;
1683  T607:;  T607:;
1684          if(!((V363)>=(V356))){          if(!((V363)>=(V356))){
1685          goto T608;}          goto T608;}
1686          {object V367 = (V362);          {object V367 = (V362);
1687          VMR23(V367)}          VMR23(V367)}
1688  goto T608;          goto T608;
1689  T608:;  T608:;
1690          if(!((V357)<=(V363))){          if(!((V357)<=(V363))){
1691          goto T614;}          goto T614;}
# Line 1705  T608:; Line 1705  T608:;
1705          (void)(elt_set((V362),V363,(V346)));          (void)(elt_set((V362),V363,(V346)));
1706          V364= (long)(1)+(V364);          V364= (long)(1)+(V364);
1707          goto T612;          goto T612;
1708  goto T614;          goto T614;
1709  T614:;  T614:;
1710          V371= elt((V348),V363);          V371= elt((V348),V363);
1711          (void)(elt_set((V362),V363,/* INLINE-ARGS */V371));          (void)(elt_set((V362),V363,/* INLINE-ARGS */V371));
1712  goto T612;          goto T612;
1713  T612:;  T612:;
1714          V363= (long)(1)+(V363);          V363= (long)(1)+(V363);
1715          goto T607;}          goto T607;}
1716  goto T601;          goto T601;
1717  T601:;  T601:;
1718          {register object V372;          {register object V372;
1719          register long V373;          register long V373;
# Line 1723  T601:; Line 1723  T601:;
1723          V372= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V375,V376));          V372= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V375,V376));
1724          V373= (long)(-1)+(V356);          V373= (long)(-1)+(V356);
1725          V374= 0;          V374= 0;
1726  goto T633;          goto T633;
1727  T633:;  T633:;
1728          if(!((V373)<(0))){          if(!((V373)<(0))){
1729          goto T634;}          goto T634;}
1730          {object V377 = (V372);          {object V377 = (V372);
1731          VMR23(V377)}          VMR23(V377)}
1732  goto T634;          goto T634;
1733  T634:;  T634:;
1734          if(!((V357)<=(V373))){          if(!((V357)<=(V373))){
1735          goto T640;}          goto T640;}
# Line 1749  T634:; Line 1749  T634:;
1749          (void)(elt_set((V372),V373,(V346)));          (void)(elt_set((V372),V373,(V346)));
1750          V374= (long)(1)+(V374);          V374= (long)(1)+(V374);
1751          goto T638;          goto T638;
1752  goto T640;          goto T640;
1753  T640:;  T640:;
1754          V381= elt((V348),V373);          V381= elt((V348),V373);
1755          (void)(elt_set((V372),V373,/* INLINE-ARGS */V381));          (void)(elt_set((V372),V373,/* INLINE-ARGS */V381));
1756  goto T638;          goto T638;
1757  T638:;  T638:;
1758          V373= (long)(-1)+(V373);          V373= (long)(-1)+(V373);
1759          goto T633;}}}}}          goto T633;}}}}}
# Line 1795  static object LI24(object V384,object V3 Line 1795  static object LI24(object V384,object V3
1795          if(!(((V392))==(Cnil))){          if(!(((V392))==(Cnil))){
1796          goto T656;}          goto T656;}
1797          V392= symbol_function(VV[35]);          V392= symbol_function(VV[35]);
1798  goto T656;          goto T656;
1799  T656:;  T656:;
1800          V393= symbol_function(VV[46]);          V393= symbol_function(VV[46]);
1801          {object V394 = (VFUN_NARGS=15,(*(LnkLI51))((V385),(V386),(V387),VV[11],(V388),VV[12],V393,VV[14],(V389),VV[15],(V390),VV[16],(V391),VV[17],(V392)));          {object V394 = (VFUN_NARGS=15,(*(LnkLI51))((V385),(V386),(V387),VV[11],(V388),VV[12],V393,VV[14],(V389),VV[15],(V390),VV[16],(V391),VV[17],(V392)));
# Line 1837  static object LI25(object V397,object V3 Line 1837  static object LI25(object V397,object V3
1837          if(!(((V405))==(Cnil))){          if(!(((V405))==(Cnil))){
1838          goto T662;}          goto T662;}
1839          V405= symbol_function(VV[35]);          V405= symbol_function(VV[35]);
1840  goto T662;          goto T662;
1841  T662:;  T662:;
1842          V406= symbol_function(VV[46]);          V406= symbol_function(VV[46]);
1843          {object V407 = (VFUN_NARGS=15,(*(LnkLI51))((V398),(V399),(V400),VV[11],(V401),VV[13],V406,VV[14],(V402),VV[15],(V403),VV[16],(V404),VV[17],(V405)));          {object V407 = (VFUN_NARGS=15,(*(LnkLI51))((V398),(V399),(V400),VV[11],(V401),VV[13],V406,VV[14],(V402),VV[15],(V403),VV[16],(V404),VV[17],(V405)));
# Line 1883  static object LI26(object V410,object V4 Line 1883  static object LI26(object V410,object V4
1883          if(!(((V420))==(Cnil))){          if(!(((V420))==(Cnil))){
1884          goto T668;}          goto T668;}
1885          V420= symbol_function(VV[35]);          V420= symbol_function(VV[35]);
1886  goto T668;          goto T668;
1887  T668:;  T668:;
1888          {long V421;          {long V421;
1889          if(((V417))==Cnil){          if(((V417))==Cnil){
1890          goto T674;}          goto T674;}
1891          V421= (long)(*(LnkLI36))((V417));          V421= (long)(*(LnkLI36))((V417));
1892          goto T672;          goto T672;
1893  goto T674;          goto T674;
1894  T674:;  T674:;
1895          V421= 0;          V421= 0;
1896  goto T672;          goto T672;
1897  T672:;  T672:;
1898          {long V422;          {long V422;
1899          V422= (long)(*(LnkLI37))((V418),(V413));          V422= (long)(*(LnkLI37))((V418),(V413));
1900          if(!((V421)<=(V422))){          if(!((V421)<=(V422))){
1901          goto T678;}          goto T678;}
1902          goto T677;          goto T677;
1903  goto T678;          goto T678;
1904  T678:;  T678:;
1905          V423 = make_fixnum(V421);          V423 = make_fixnum(V421);
1906          V424 = make_fixnum(V422);          V424 = make_fixnum(V422);
1907          (void)((VFUN_NARGS=2,(*(LnkLI33))(V423,V424)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V423,V424)));
1908  goto T677;          goto T677;
1909  T677:;  T677:;
1910          {IDECL(GEN V425,V425space,V425alloc);          {IDECL(GEN V425,V425space,V425alloc);
1911          if(((V419))!=Cnil){          if(((V419))!=Cnil){
1912          goto T682;}          goto T682;}
1913          ISETQ_FIX(V425,V425alloc,2147483647);          ISETQ_FIX(V425,V425alloc,2147483647);
1914          goto T680;          goto T680;
1915  goto T682;          goto T682;
1916  T682:;SETQ_IO(V425,V425alloc,(V419));  T682:;SETQ_IO(V425,V425alloc,(V419));
1917  goto T680;          goto T680;
1918  T680:;  T680:;
1919          if((V415)==Cnil){          if((V415)==Cnil){
1920          goto T685;}          goto T685;}
1921          if((V416)==Cnil){          if((V416)==Cnil){
1922          goto T685;}          goto T685;}
1923          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
1924  goto T685;          goto T685;
1925  T685:;  T685:;
1926          if(((V414))!=Cnil){          if(((V414))!=Cnil){
1927          goto T687;}          goto T687;}
# Line 1929  T685:; Line 1929  T685:;
1929          register long V427;          register long V427;
1930          V426= V421;          V426= V421;
1931          V427= 0;          V427= 0;
1932  goto T692;          goto T692;
1933  T692:;  T692:;
1934          if(!((V426)>=(V422))){          if(!((V426)>=(V422))){
1935          goto T693;}          goto T693;}
1936          {object V428 = (V413);          {object V428 = (V413);
1937          VMR26(V428)}          VMR26(V428)}
1938  goto T693;          goto T693;
1939  T693:;  T693:;
1940          V429 = make_fixnum(V427);          V429 = make_fixnum(V427);
1941          V430 = make_integer(V425);          V430 = make_integer(V425);
# Line 1950  T693:; Line 1950  T693:;
1950          goto T697;}          goto T697;}
1951          (void)(elt_set((V413),V426,(V411)));          (void)(elt_set((V413),V426,(V411)));
1952          V427= (long)(1)+(V427);          V427= (long)(1)+(V427);
1953  goto T697;          goto T697;
1954  T697:;  T697:;
1955          V426= (long)(1)+(V426);          V426= (long)(1)+(V426);
1956          goto T692;}          goto T692;}
1957  goto T687;          goto T687;
1958  T687:;  T687:;
1959          {register long V432;          {register long V432;
1960          register long V433;          register long V433;
1961          V432= (long)(-1)+(V422);          V432= (long)(-1)+(V422);
1962          V433= 0;          V433= 0;
1963  goto T712;          goto T712;
1964  T712:;  T712:;
1965          if(!((V432)<(V421))){          if(!((V432)<(V421))){
1966          goto T713;}          goto T713;}
1967          {object V434 = (V413);          {object V434 = (V413);
1968          VMR26(V434)}          VMR26(V434)}
1969  goto T713;          goto T713;
1970  T713:;  T713:;
1971          V435 = make_fixnum(V433);          V435 = make_fixnum(V433);
1972          V436 = make_integer(V425);          V436 = make_integer(V425);
# Line 1981  T713:; Line 1981  T713:;
1981          goto T717;}          goto T717;}
1982          (void)(elt_set((V413),V432,(V411)));          (void)(elt_set((V413),V432,(V411)));
1983          V433= (long)(1)+(V433);          V433= (long)(1)+(V433);
1984  goto T717;          goto T717;
1985  T717:;  T717:;
1986          V432= (long)(-1)+(V432);          V432= (long)(-1)+(V432);
1987          goto T712;}}}}          goto T712;}}}}
# Line 2023  static object LI27(object V440,object V4 Line 2023  static object LI27(object V440,object V4
2023          if(!(((V448))==(Cnil))){          if(!(((V448))==(Cnil))){
2024          goto T730;}          goto T730;}
2025          V448= symbol_function(VV[35]);          V448= symbol_function(VV[35]);
2026  goto T730;          goto T730;
2027  T730:;  T730:;
2028          V449= symbol_function(VV[46]);          V449= symbol_function(VV[46]);
2029          {object V450 = (VFUN_NARGS=15,(*(LnkLI52))((V441),(V442),(V443),VV[11],(V444),VV[12],V449,VV[14],(V445),VV[15],(V446),VV[16],(V447),VV[17],(V448)));          {object V450 = (VFUN_NARGS=15,(*(LnkLI52))((V441),(V442),(V443),VV[11],(V444),VV[12],V449,VV[14],(V445),VV[15],(V446),VV[16],(V447),VV[17],(V448)));
# Line 2065  static object LI28(object V453,object V4 Line 2065  static object LI28(object V453,object V4
2065          if(!(((V461))==(Cnil))){          if(!(((V461))==(Cnil))){
2066          goto T736;}          goto T736;}
2067          V461= symbol_function(VV[35]);          V461= symbol_function(VV[35]);
2068  goto T736;          goto T736;
2069  T736:;  T736:;
2070          V462= symbol_function(VV[46]);          V462= symbol_function(VV[46]);
2071          {object V463 = (VFUN_NARGS=15,(*(LnkLI52))((V454),(V455),(V456),VV[11],(V457),VV[13],V462,VV[14],(V458),VV[15],(V459),VV[16],(V460),VV[17],(V461)));          {object V463 = (VFUN_NARGS=15,(*(LnkLI52))((V454),(V455),(V456),VV[11],(V457),VV[13],V462,VV[14],(V458),VV[15],(V459),VV[16],(V460),VV[17],(V461)));
# Line 2107  static object LI29(object V465,object V4 Line 2107  static object LI29(object V465,object V4
2107          if(!(((V473))==(Cnil))){          if(!(((V473))==(Cnil))){
2108          goto T742;}          goto T742;}
2109          V473= symbol_function(VV[35]);          V473= symbol_function(VV[35]);
2110  goto T742;          goto T742;
2111  T742:;  T742:;
2112          {long V474;          {long V474;
2113          if(((V471))==Cnil){          if(((V471))==Cnil){
2114          goto T748;}          goto T748;}
2115          V474= (long)(*(LnkLI36))((V471));          V474= (long)(*(LnkLI36))((V471));
2116          goto T746;          goto T746;
2117  goto T748;          goto T748;
2118  T748:;  T748:;
2119          V474= 0;          V474= 0;
2120  goto T746;          goto T746;
2121  T746:;  T746:;
2122          {long V475;          {long V475;
2123          V475= (long)(*(LnkLI37))((V472),(V467));          V475= (long)(*(LnkLI37))((V472),(V467));
2124          if(!((V474)<=(V475))){          if(!((V474)<=(V475))){
2125          goto T752;}          goto T752;}
2126          goto T751;          goto T751;
2127  goto T752;          goto T752;
2128  T752:;  T752:;
2129          V476 = make_fixnum(V474);          V476 = make_fixnum(V474);
2130          V477 = make_fixnum(V475);          V477 = make_fixnum(V475);
2131          (void)((VFUN_NARGS=2,(*(LnkLI33))(V476,V477)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V476,V477)));
2132  goto T751;          goto T751;
2133  T751:;  T751:;
2134          if((V469)==Cnil){          if((V469)==Cnil){
2135          goto T754;}          goto T754;}
2136          if((V470)==Cnil){          if((V470)==Cnil){
2137          goto T754;}          goto T754;}
2138          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
2139  goto T754;          goto T754;
2140  T754:;  T754:;
2141          if(((V468))!=Cnil){          if(((V468))!=Cnil){
2142          goto T756;}          goto T756;}
2143          {register long V478;          {register long V478;
2144          V478= V474;          V478= V474;
2145  goto T760;          goto T760;
2146  T760:;  T760:;
2147          if(!((V478)>=(V475))){          if(!((V478)>=(V475))){
2148          goto T761;}          goto T761;}
2149          {object V479 = Cnil;          {object V479 = Cnil;
2150          VMR29(V479)}          VMR29(V479)}
2151  goto T761;          goto T761;
2152  T761:;  T761:;
2153          base[0]= elt((V467),V478);          base[0]= elt((V467),V478);
2154          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2159  T761:; Line 2159  T761:;
2159          goto T765;}          goto T765;}
2160          {object V481 = elt((V467),V478);          {object V481 = elt((V467),V478);
2161          VMR29(V481)}          VMR29(V481)}
2162  goto T765;          goto T765;
2163  T765:;  T765:;
2164          V478= (long)(1)+(V478);          V478= (long)(1)+(V478);
2165          goto T760;}          goto T760;}
2166  goto T756;          goto T756;
2167  T756:;  T756:;
2168          {register long V482;          {register long V482;
2169          V482= (long)(-1)+(V475);          V482= (long)(-1)+(V475);
2170  goto T775;          goto T775;
2171  T775:;  T775:;
2172          if(!((V482)<(V474))){          if(!((V482)<(V474))){
2173          goto T776;}          goto T776;}
2174          {object V483 = Cnil;          {object V483 = Cnil;
2175          VMR29(V483)}          VMR29(V483)}
2176  goto T776;          goto T776;
2177  T776:;  T776:;
2178          base[0]= elt((V467),V482);          base[0]= elt((V467),V482);
2179          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2184  T776:; Line 2184  T776:;
2184          goto T780;}          goto T780;}
2185          {object V485 = elt((V467),V482);          {object V485 = elt((V467),V482);
2186          VMR29(V485)}          VMR29(V485)}
2187  goto T780;          goto T780;
2188  T780:;  T780:;
2189          V482= (long)(-1)+(V482);          V482= (long)(-1)+(V482);
2190          goto T775;}}}          goto T775;}}}
# Line 2222  static object LI30(object V487,object V4 Line 2222  static object LI30(object V487,object V4
2222          if(!(((V493))==(Cnil))){          if(!(((V493))==(Cnil))){
2223          goto T789;}          goto T789;}
2224          V493= symbol_function(VV[35]);          V493= symbol_function(VV[35]);
2225  goto T789;          goto T789;
2226  T789:;  T789:;
2227          V494= symbol_function(VV[46]);          V494= symbol_function(VV[46]);
2228          {object V495 = (VFUN_NARGS=12,(*(LnkLI53))((V488),(V489),VV[11],(V490),VV[12],V494,VV[14],(V491),VV[15],(V492),VV[17],(V493)));          {object V495 = (VFUN_NARGS=12,(*(LnkLI53))((V488),(V489),VV[11],(V490),VV[12],V494,VV[14],(V491),VV[15],(V492),VV[17],(V493)));
# Line 2260  static object LI31(object V497,object V4 Line 2260  static object LI31(object V497,object V4
2260          if(!(((V503))==(Cnil))){          if(!(((V503))==(Cnil))){
2261          goto T795;}          goto T795;}
2262          V503= symbol_function(VV[35]);          V503= symbol_function(VV[35]);
2263  goto T795;          goto T795;
2264  T795:;  T795:;
2265          V504= symbol_function(VV[46]);          V504= symbol_function(VV[46]);
2266          {object V505 = (VFUN_NARGS=12,(*(LnkLI53))((V498),(V499),VV[11],(V500),VV[13],V504,VV[14],(V501),VV[15],(V502),VV[17],(V503)));          {object V505 = (VFUN_NARGS=12,(*(LnkLI53))((V498),(V499),VV[11],(V500),VV[13],V504,VV[14],(V501),VV[15],(V502),VV[17],(V503)));
# Line 2302  static object LI32(object V507,object V5 Line 2302  static object LI32(object V507,object V5
2302          if(!(((V515))==(Cnil))){          if(!(((V515))==(Cnil))){
2303          goto T801;}          goto T801;}
2304          V515= symbol_function(VV[35]);          V515= symbol_function(VV[35]);
2305  goto T801;          goto T801;
2306  T801:;  T801:;
2307          {long V516;          {long V516;
2308          if(((V513))==Cnil){          if(((V513))==Cnil){
2309          goto T807;}          goto T807;}
2310          V516= (long)(*(LnkLI36))((V513));          V516= (long)(*(LnkLI36))((V513));
2311          goto T805;          goto T805;
2312  goto T807;          goto T807;
2313  T807:;  T807:;
2314          V516= 0;          V516= 0;
2315  goto T805;          goto T805;
2316  T805:;  T805:;
2317          {long V517;          {long V517;
2318          V517= (long)(*(LnkLI37))((V514),(V509));          V517= (long)(*(LnkLI37))((V514),(V509));
2319          if(!((V516)<=(V517))){          if(!((V516)<=(V517))){
2320          goto T811;}          goto T811;}
2321          goto T810;          goto T810;
2322  goto T811;          goto T811;
2323  T811:;  T811:;
2324          V518 = make_fixnum(V516);          V518 = make_fixnum(V516);
2325          V519 = make_fixnum(V517);          V519 = make_fixnum(V517);
2326          (void)((VFUN_NARGS=2,(*(LnkLI33))(V518,V519)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V518,V519)));
2327  goto T810;          goto T810;
2328  T810:;  T810:;
2329          if((V511)==Cnil){          if((V511)==Cnil){
2330          goto T813;}          goto T813;}
2331          if((V512)==Cnil){          if((V512)==Cnil){
2332          goto T813;}          goto T813;}
2333          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
2334  goto T813;          goto T813;
2335  T813:;  T813:;
2336          if(((V510))!=Cnil){          if(((V510))!=Cnil){
2337          goto T815;}          goto T815;}
2338          {register long V520;          {register long V520;
2339          V520= V516;          V520= V516;
2340  goto T819;          goto T819;
2341  T819:;  T819:;
2342          if(!((V520)>=(V517))){          if(!((V520)>=(V517))){
2343          goto T820;}          goto T820;}
2344          {object V521 = Cnil;          {object V521 = Cnil;
2345          VMR32(V521)}          VMR32(V521)}
2346  goto T820;          goto T820;
2347  T820:;  T820:;
2348          base[0]= elt((V509),V520);          base[0]= elt((V509),V520);
2349          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2354  T820:; Line 2354  T820:;
2354          goto T824;}          goto T824;}
2355          {object V523 = make_fixnum(V520);          {object V523 = make_fixnum(V520);
2356          VMR32(V523)}          VMR32(V523)}
2357  goto T824;          goto T824;
2358  T824:;  T824:;
2359          V520= (long)(1)+(V520);          V520= (long)(1)+(V520);
2360          goto T819;}          goto T819;}
2361  goto T815;          goto T815;
2362  T815:;  T815:;
2363          {register long V524;          {register long V524;
2364          V524= (long)(-1)+(V517);          V524= (long)(-1)+(V517);
2365  goto T834;          goto T834;
2366  T834:;  T834:;
2367          if(!((V524)<(V516))){          if(!((V524)<(V516))){
2368          goto T835;}          goto T835;}
2369          {object V525 = Cnil;          {object V525 = Cnil;
2370          VMR32(V525)}          VMR32(V525)}
2371  goto T835;          goto T835;
2372  T835:;  T835:;
2373          base[0]= elt((V509),V524);          base[0]= elt((V509),V524);
2374          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2379  T835:; Line 2379  T835:;
2379          goto T839;}          goto T839;}
2380          {object V527 = make_fixnum(V524);          {object V527 = make_fixnum(V524);
2381          VMR32(V527)}          VMR32(V527)}
2382  goto T839;          goto T839;
2383  T839:;  T839:;
2384          V524= (long)(-1)+(V524);          V524= (long)(-1)+(V524);
2385          goto T834;}}}          goto T834;}}}
# Line 2417  static object LI33(object V529,object V5 Line 2417  static object LI33(object V529,object V5
2417          if(!(((V535))==(Cnil))){          if(!(((V535))==(Cnil))){
2418          goto T848;}          goto T848;}
2419          V535= symbol_function(VV[35]);          V535= symbol_function(VV[35]);
2420  goto T848;          goto T848;
2421  T848:;  T848:;
2422          V536= symbol_function(VV[46]);          V536= symbol_function(VV[46]);
2423          {object V537 = (VFUN_NARGS=12,(*(LnkLI54))((V530),(V531),VV[11],(V532),VV[12],V536,VV[14],(V533),VV[15],(V534),VV[17],(V535)));          {object V537 = (VFUN_NARGS=12,(*(LnkLI54))((V530),(V531),VV[11],(V532),VV[12],V536,VV[14],(V533),VV[15],(V534),VV[17],(V535)));
# Line 2455  static object LI34(object V539,object V5 Line 2455  static object LI34(object V539,object V5
2455          if(!(((V545))==(Cnil))){          if(!(((V545))==(Cnil))){
2456          goto T854;}          goto T854;}
2457          V545= symbol_function(VV[35]);          V545= symbol_function(VV[35]);
2458  goto T854;          goto T854;
2459  T854:;  T854:;
2460          V546= symbol_function(VV[46]);          V546= symbol_function(VV[46]);
2461          {object V547 = (VFUN_NARGS=12,(*(LnkLI54))((V540),(V541),VV[11],(V542),VV[13],V546,VV[14],(V543),VV[15],(V544),VV[17],(V545)));          {object V547 = (VFUN_NARGS=12,(*(LnkLI54))((V540),(V541),VV[11],(V542),VV[13],V546,VV[14],(V543),VV[15],(V544),VV[17],(V545)));
# Line 2497  static object LI35(object V548,object fi Line 2497  static object LI35(object V548,object fi
2497          if((V552)==Cnil){          if((V552)==Cnil){
2498          goto T860;}          goto T860;}
2499          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
2500  goto T860;          goto T860;
2501  T860:;  T860:;
2502          if(!(type_of((V549))==t_cons||((V549))==Cnil)){          if(!(type_of((V549))==t_cons||((V549))==Cnil)){
2503          goto T861;}          goto T861;}
# Line 2511  T860:; Line 2511  T860:;
2511          goto T870;}          goto T870;}
2512          {object V556 = Cnil;          {object V556 = Cnil;
2513          VMR35(V556)}          VMR35(V556)}
2514  goto T870;          goto T870;
2515  T870:;  T870:;
2516          {register object V557;          {register object V557;
2517          register object V558;          register object V558;
2518          V557= (V549);          V557= (V549);
2519          V558= Cnil;          V558= Cnil;
2520  goto T874;          goto T874;
2521  T874:;  T874:;
2522          if(!(endp_prop(cdr((V557))))){          if(!(endp_prop(cdr((V557))))){
2523          goto T875;}          goto T875;}
# Line 2528  T874:; Line 2528  T874:;
2528          vs_top=sup;          vs_top=sup;
2529          {object V559 = vs_base[0];          {object V559 = vs_base[0];
2530          VMR35(V559)}          VMR35(V559)}
2531  goto T875;          goto T875;
2532  T875:;  T875:;
2533          base[0]= car((V557));          base[0]= car((V557));
2534          base[1]= cdr((V557));          base[1]= cdr((V557));
# Line 2544  T875:; Line 2544  T875:;
2544          if((vs_base[0])!=Cnil){          if((vs_base[0])!=Cnil){
2545          goto T881;}          goto T881;}
2546          V558= make_cons(car((V557)),(V558));          V558= make_cons(car((V557)),(V558));
2547  goto T881;          goto T881;
2548  T881:;  T881:;
2549          V557= cdr((V557));          V557= cdr((V557));
2550          goto T874;}          goto T874;}
2551  goto T861;          goto T861;
2552  T861:;  T861:;
2553          {object V560 = (VFUN_NARGS=13,(*(LnkLI56))((V549),VV[11],(V550),VV[12],(V551),VV[13],(V552),VV[14],(V553),VV[15],(V554),VV[17],(V555)));          {object V560 = (VFUN_NARGS=13,(*(LnkLI56))((V549),VV[11],(V550),VV[12],(V551),VV[13],(V552),VV[14],(V553),VV[15],(V554),VV[17],(V555)));
2554          VMR35(V560)}          VMR35(V560)}
# Line 2592  static object LI36(object V561,object fi Line 2592  static object LI36(object V561,object fi
2592          if((V565)==Cnil){          if((V565)==Cnil){
2593          goto T898;}          goto T898;}
2594          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
2595  goto T898;          goto T898;
2596  T898:;  T898:;
2597          if(!(type_of((V562))==t_cons||((V562))==Cnil)){          if(!(type_of((V562))==t_cons||((V562))==Cnil)){
2598          goto T899;}          goto T899;}
# Line 2606  T898:; Line 2606  T898:;
2606          goto T908;}          goto T908;}
2607          {object V570 = Cnil;          {object V570 = Cnil;
2608          VMR36(V570)}          VMR36(V570)}
2609  goto T908;          goto T908;
2610  T908:;  T908:;
2611          {register object V571;          {register object V571;
2612          V571= (V562);          V571= (V562);
2613  goto T912;          goto T912;
2614  T912:;  T912:;
2615          if(!(endp_prop(cdr((V571))))){          if(!(endp_prop(cdr((V571))))){
2616          goto T913;}          goto T913;}
2617          {object V572 = (V562);          {object V572 = (V562);
2618          VMR36(V572)}          VMR36(V572)}
2619  goto T913;          goto T913;
2620  T913:;  T913:;
2621          base[0]= car((V571));          base[0]= car((V571));
2622          base[1]= cdr((V571));          base[1]= cdr((V571));
# Line 2636  T913:; Line 2636  T913:;
2636          if(type_of((V571))!=t_cons)FEwrong_type_argument(Scons,(V571));          if(type_of((V571))!=t_cons)FEwrong_type_argument(Scons,(V571));
2637          ((V571))->c.c_cdr = cddr((V571));          ((V571))->c.c_cdr = cddr((V571));
2638          goto T917;          goto T917;
2639  goto T919;          goto T919;
2640  T919:;  T919:;
2641          V571= cdr((V571));          V571= cdr((V571));
2642  goto T917;          goto T917;
2643  T917:;  T917:;
2644          goto T912;}          goto T912;}
2645  goto T899;          goto T899;
2646  T899:;  T899:;
2647          {register long V573;          {register long V573;
2648          if(((V566))==Cnil){          if(((V566))==Cnil){
2649          goto T935;}          goto T935;}
2650          V573= (long)(*(LnkLI36))((V566));          V573= (long)(*(LnkLI36))((V566));
2651          goto T933;          goto T933;
2652  goto T935;          goto T935;
2653  T935:;  T935:;
2654          V573= 0;          V573= 0;
2655  goto T933;          goto T933;
2656  T933:;  T933:;
2657          {register long V574;          {register long V574;
2658          V574= (long)(*(LnkLI37))((V567),(V562));          V574= (long)(*(LnkLI37))((V567),(V562));
2659          if(!((V573)<=(V574))){          if(!((V573)<=(V574))){
2660          goto T939;}          goto T939;}
2661          goto T938;          goto T938;
2662  goto T939;          goto T939;
2663  T939:;  T939:;
2664          V575 = make_fixnum(V573);          V575 = make_fixnum(V573);
2665          V576 = make_fixnum(V574);          V576 = make_fixnum(V574);
2666          (void)((VFUN_NARGS=2,(*(LnkLI33))(V575,V576)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V575,V576)));
2667  goto T938;          goto T938;
2668  T938:;  T938:;
2669          if(((V563))!=Cnil){          if(((V563))!=Cnil){
2670          goto T942;}          goto T942;}
# Line 2672  T938:; Line 2672  T938:;
2672          long V578;          long V578;
2673          V577= 0;          V577= 0;
2674          V578= V573;          V578= V573;
2675  goto T947;          goto T947;
2676  T947:;  T947:;
2677          if(!((V578)>=(V574))){          if(!((V578)>=(V574))){
2678          goto T948;}          goto T948;}
# Line 2684  T947:; Line 2684  T947:;
2684          V579= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V582,V583));          V579= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V582,V583));
2685          V580= 0;          V580= 0;
2686          V581= 0;          V581= 0;
2687  goto T955;          goto T955;
2688  T955:;  T955:;
2689          if(!((V580)>=(V569))){          if(!((V580)>=(V569))){
2690          goto T956;}          goto T956;}
2691          {object V584 = (V579);          {object V584 = (V579);
2692          VMR36(V584)}          VMR36(V584)}
2693  goto T956;          goto T956;
2694  T956:;  T956:;
2695          {object V585;          {object V585;
2696          if((V573)<=(V580)){          if((V573)<=(V580)){
2697          goto T962;}          goto T962;}
2698          V585= Cnil;          V585= Cnil;
2699          goto T961;          goto T961;
2700  goto T962;          goto T962;
2701  T962:;  T962:;
2702          if((V580)<(V574)){          if((V580)<(V574)){
2703          goto T964;}          goto T964;}
2704          V585= Cnil;          V585= Cnil;
2705          goto T961;          goto T961;
2706  goto T964;          goto T964;
2707  T964:;  T964:;
2708          base[0]= elt((V562),V580);          base[0]= elt((V562),V580);
2709          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2713  T964:; Line 2713  T964:;
2713          V587 = make_fixnum((long)(1)+(V580));          V587 = make_fixnum((long)(1)+(V580));
2714          V588 = make_fixnum(V574);          V588 = make_fixnum(V574);
2715          V585= (VFUN_NARGS=12,(*(LnkLI54))(V586,(V562),VV[12],(V564),VV[13],(V565),VV[14],V587,VV[15],V588,VV[17],(V568)));          V585= (VFUN_NARGS=12,(*(LnkLI54))(V586,(V562),VV[12],(V564),VV[13],(V565),VV[14],V587,VV[15],V588,VV[17],(V568)));
2716  goto T961;          goto T961;
2717  T961:;  T961:;
2718          if(((V585))==Cnil){          if(((V585))==Cnil){
2719          goto T969;}          goto T969;}
2720          goto T960;          goto T960;
2721  goto T969;          goto T969;
2722  T969:;  T969:;
2723          V589= elt((V562),V580);          V589= elt((V562),V580);
2724          (void)(elt_set((V579),V581,/* INLINE-ARGS */V589));          (void)(elt_set((V579),V581,/* INLINE-ARGS */V589));
2725          V581= (long)(1)+(V581);}          V581= (long)(1)+(V581);}
2726  goto T960;          goto T960;
2727  T960:;  T960:;
2728          V580= (long)(1)+(V580);          V580= (long)(1)+(V580);
2729          goto T955;}          goto T955;}
2730  goto T948;          goto T948;
2731  T948:;  T948:;
2732          base[0]= elt((V562),V578);          base[0]= elt((V562),V578);
2733          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2739  T948:; Line 2739  T948:;
2739          if(((VFUN_NARGS=12,(*(LnkLI54))(V590,(V562),VV[12],(V564),VV[13],(V565),VV[14],V591,VV[15],V592,VV[17],(V568))))==Cnil){          if(((VFUN_NARGS=12,(*(LnkLI54))(V590,(V562),VV[12],(V564),VV[13],(V565),VV[14],V591,VV[15],V592,VV[17],(V568))))==Cnil){
2740          goto T977;}          goto T977;}
2741          V577= (long)(1)+(V577);          V577= (long)(1)+(V577);
2742  goto T977;          goto T977;
2743  T977:;  T977:;
2744          V578= (long)(1)+(V578);          V578= (long)(1)+(V578);
2745          goto T947;}          goto T947;}
2746  goto T942;          goto T942;
2747  T942:;  T942:;
2748          {long V593;          {long V593;
2749          long V594;          long V594;
2750          V593= 0;          V593= 0;
2751          V594= (long)(-1)+(V574);          V594= (long)(-1)+(V574);
2752  goto T989;          goto T989;
2753  T989:;  T989:;
2754          if(!((V594)<(V573))){          if(!((V594)<(V573))){
2755          goto T990;}          goto T990;}
# Line 2761  T989:; Line 2761  T989:;
2761          V595= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V598,V599));          V595= (VFUN_NARGS=2,(*(LnkLI48))(/* INLINE-ARGS */V598,V599));
2762          V596= (long)(-1)+(V569);          V596= (long)(-1)+(V569);
2763          V597= (long)((long)(-1)+(V569))-(V593);          V597= (long)((long)(-1)+(V569))-(V593);
2764  goto T997;          goto T997;
2765  T997:;  T997:;
2766          if(!((V596)<(0))){          if(!((V596)<(0))){
2767          goto T998;}          goto T998;}
2768          {object V600 = (V595);          {object V600 = (V595);
2769          VMR36(V600)}          VMR36(V600)}
2770  goto T998;          goto T998;
2771  T998:;  T998:;
2772          {object V601;          {object V601;
2773          if((V573)<=(V596)){          if((V573)<=(V596)){
2774          goto T1004;}          goto T1004;}
2775          V601= Cnil;          V601= Cnil;
2776          goto T1003;          goto T1003;
2777  goto T1004;          goto T1004;
2778  T1004:;  T1004:;
2779          if((V596)<(V574)){          if((V596)<(V574)){
2780          goto T1006;}          goto T1006;}
2781          V601= Cnil;          V601= Cnil;
2782          goto T1003;          goto T1003;
2783  goto T1006;          goto T1006;
2784  T1006:;  T1006:;
2785          base[0]= elt((V562),V596);          base[0]= elt((V562),V596);
2786          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2790  T1006:; Line 2790  T1006:;
2790          V603 = make_fixnum(V573);          V603 = make_fixnum(V573);
2791          V604 = make_fixnum(V596);          V604 = make_fixnum(V596);
2792          V601= (VFUN_NARGS=14,(*(LnkLI54))(V602,(V562),VV[11],Ct,VV[12],(V564),VV[13],(V565),VV[14],V603,VV[15],V604,VV[17],(V568)));          V601= (VFUN_NARGS=14,(*(LnkLI54))(V602,(V562),VV[11],Ct,VV[12],(V564),VV[13],(V565),VV[14],V603,VV[15],V604,VV[17],(V568)));
2793  goto T1003;          goto T1003;
2794  T1003:;  T1003:;
2795          if(((V601))==Cnil){          if(((V601))==Cnil){
2796          goto T1011;}          goto T1011;}
2797          goto T1002;          goto T1002;
2798  goto T1011;          goto T1011;
2799  T1011:;  T1011:;
2800          V605= elt((V562),V596);          V605= elt((V562),V596);
2801          (void)(elt_set((V595),V597,/* INLINE-ARGS */V605));          (void)(elt_set((V595),V597,/* INLINE-ARGS */V605));
2802          V597= (long)(-1)+(V597);}          V597= (long)(-1)+(V597);}
2803  goto T1002;          goto T1002;
2804  T1002:;  T1002:;
2805          V596= (long)(-1)+(V596);          V596= (long)(-1)+(V596);
2806          goto T997;}          goto T997;}
2807  goto T990;          goto T990;
2808  T990:;  T990:;
2809          base[0]= elt((V562),V594);          base[0]= elt((V562),V594);
2810          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2816  T990:; Line 2816  T990:;
2816          if(((VFUN_NARGS=14,(*(LnkLI54))(V606,(V562),VV[11],Ct,VV[12],(V564),VV[13],(V565),VV[14],V607,VV[15],V608,VV[17],(V568))))==Cnil){          if(((VFUN_NARGS=14,(*(LnkLI54))(V606,(V562),VV[11],Ct,VV[12],(V564),VV[13],(V565),VV[14],V607,VV[15],V608,VV[17],(V568))))==Cnil){
2817          goto T1019;}          goto T1019;}
2818          V593= (long)(1)+(V593);          V593= (long)(1)+(V593);
2819  goto T1019;          goto T1019;
2820  T1019:;  T1019:;
2821          V594= (long)(-1)+(V594);          V594= (long)(-1)+(V594);
2822          goto T989;}}}}          goto T989;}}}}
# Line 2864  static object LI37(object V610,object V6 Line 2864  static object LI37(object V610,object V6
2864          if((V615)==Cnil){          if((V615)==Cnil){
2865          goto T1029;}          goto T1029;}
2866          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
2867  goto T1029;          goto T1029;
2868  T1029:;  T1029:;
2869          {register long V621;          {register long V621;
2870          if(((V617))==Cnil){          if(((V617))==Cnil){
2871          goto T1032;}          goto T1032;}
2872          V621= (long)(*(LnkLI36))((V617));          V621= (long)(*(LnkLI36))((V617));
2873          goto T1030;          goto T1030;
2874  goto T1032;          goto T1032;
2875  T1032:;  T1032:;
2876          V621= 0;          V621= 0;
2877  goto T1030;          goto T1030;
2878  T1030:;  T1030:;
2879          {register long V622;          {register long V622;
2880          V622= (long)(*(LnkLI37))((V619),(V611));          V622= (long)(*(LnkLI37))((V619),(V611));
2881          if(!((V621)<=(V622))){          if(!((V621)<=(V622))){
2882          goto T1036;}          goto T1036;}
2883          goto T1035;          goto T1035;
2884  goto T1036;          goto T1036;
2885  T1036:;  T1036:;
2886          V623 = make_fixnum(V621);          V623 = make_fixnum(V621);
2887          V624 = make_fixnum(V622);          V624 = make_fixnum(V622);
2888          (void)((VFUN_NARGS=2,(*(LnkLI33))(V623,V624)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V623,V624)));
2889  goto T1035;          goto T1035;
2890  T1035:;  T1035:;
2891          {register long V625;          {register long V625;
2892          if(((V618))==Cnil){          if(((V618))==Cnil){
2893          goto T1040;}          goto T1040;}
2894          V625= (long)(*(LnkLI36))((V618));          V625= (long)(*(LnkLI36))((V618));
2895          goto T1038;          goto T1038;
2896  goto T1040;          goto T1040;
2897  T1040:;  T1040:;
2898          V625= 0;          V625= 0;
2899  goto T1038;          goto T1038;
2900  T1038:;  T1038:;
2901          {register long V626;          {register long V626;
2902          V626= (long)(*(LnkLI37))((V620),(V612));          V626= (long)(*(LnkLI37))((V620),(V612));
2903          if(!((V625)<=(V626))){          if(!((V625)<=(V626))){
2904          goto T1044;}          goto T1044;}
2905          goto T1043;          goto T1043;
2906  goto T1044;          goto T1044;
2907  T1044:;  T1044:;
2908          V627 = make_fixnum(V625);          V627 = make_fixnum(V625);
2909          V628 = make_fixnum(V626);          V628 = make_fixnum(V626);
2910          (void)((VFUN_NARGS=2,(*(LnkLI33))(V627,V628)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V627,V628)));
2911  goto T1043;          goto T1043;
2912  T1043:;  T1043:;
2913          if(((V613))!=Cnil){          if(((V613))!=Cnil){
2914          goto T1047;}          goto T1047;}
# Line 2916  T1043:; Line 2916  T1043:;
2916          register long V630;          register long V630;
2917          V629= V621;          V629= V621;
2918          V630= V625;          V630= V625;
2919  goto T1052;          goto T1052;
2920  T1052:;  T1052:;
2921          if((V629)>=(V622)){          if((V629)>=(V622)){
2922          goto T1054;}          goto T1054;}
2923          if(!((V630)>=(V626))){          if(!((V630)>=(V626))){
2924          goto T1053;}          goto T1053;}
2925  goto T1054;          goto T1054;
2926  T1054:;  T1054:;
2927          if(!((V629)>=(V622))){          if(!((V629)>=(V622))){
2928          goto T1059;}          goto T1059;}
# Line 2930  T1054:; Line 2930  T1054:;
2930          goto T1059;}          goto T1059;}
2931          {object V631 = Cnil;          {object V631 = Cnil;
2932          VMR37(V631)}          VMR37(V631)}
2933  goto T1059;          goto T1059;
2934  T1059:;  T1059:;
2935          {object V632 = make_fixnum(V629);          {object V632 = make_fixnum(V629);
2936          VMR37(V632)}          VMR37(V632)}
2937  goto T1053;          goto T1053;
2938  T1053:;  T1053:;
2939          base[0]= elt((V611),V629);          base[0]= elt((V611),V629);
2940          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2950  T1053:; Line 2950  T1053:;
2950          goto T1064;}          goto T1064;}
2951          {object V635 = make_fixnum(V629);          {object V635 = make_fixnum(V629);
2952          VMR37(V635)}          VMR37(V635)}
2953  goto T1064;          goto T1064;
2954  T1064:;  T1064:;
2955          V629= (long)(1)+(V629);          V629= (long)(1)+(V629);
2956          V630= (long)(1)+(V630);          V630= (long)(1)+(V630);
2957          goto T1052;}          goto T1052;}
2958  goto T1047;          goto T1047;
2959  T1047:;  T1047:;
2960          {register long V636;          {register long V636;
2961          register long V637;          register long V637;
2962          V636= (long)(-1)+(V622);          V636= (long)(-1)+(V622);
2963          V637= (long)(-1)+(V626);          V637= (long)(-1)+(V626);
2964  goto T1078;          goto T1078;
2965  T1078:;  T1078:;
2966          if((V636)<(V621)){          if((V636)<(V621)){
2967          goto T1080;}          goto T1080;}
2968          if(!((V637)<(V625))){          if(!((V637)<(V625))){
2969          goto T1079;}          goto T1079;}
2970  goto T1080;          goto T1080;
2971  T1080:;  T1080:;
2972          if(!((V636)<(V621))){          if(!((V636)<(V621))){
2973          goto T1085;}          goto T1085;}
# Line 2975  T1080:; Line 2975  T1080:;
2975          goto T1085;}          goto T1085;}
2976          {object V638 = Cnil;          {object V638 = Cnil;
2977          VMR37(V638)}          VMR37(V638)}
2978  goto T1085;          goto T1085;
2979  T1085:;  T1085:;
2980          {object V639 = make_fixnum((long)(1)+(V636));          {object V639 = make_fixnum((long)(1)+(V636));
2981          VMR37(V639)}          VMR37(V639)}
2982  goto T1079;          goto T1079;
2983  T1079:;  T1079:;
2984          base[0]= elt((V611),V636);          base[0]= elt((V611),V636);
2985          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 2995  T1079:; Line 2995  T1079:;
2995          goto T1090;}          goto T1090;}
2996          {object V642 = make_fixnum((long)(1)+(V636));          {object V642 = make_fixnum((long)(1)+(V636));
2997          VMR37(V642)}          VMR37(V642)}
2998  goto T1090;          goto T1090;
2999  T1090:;  T1090:;
3000          V636= (long)(-1)+(V636);          V636= (long)(-1)+(V636);
3001          V637= (long)(-1)+(V637);          V637= (long)(-1)+(V637);
# Line 3044  static object LI38(object V644,object V6 Line 3044  static object LI38(object V644,object V6
3044          if((V649)==Cnil){          if((V649)==Cnil){
3045          goto T1102;}          goto T1102;}
3046          (void)((*(LnkLI42))());          (void)((*(LnkLI42))());
3047  goto T1102;          goto T1102;
3048  T1102:;  T1102:;
3049          {long V655;          {long V655;
3050          if(((V651))==Cnil){          if(((V651))==Cnil){
3051          goto T1105;}          goto T1105;}
3052          V655= (long)(*(LnkLI36))((V651));          V655= (long)(*(LnkLI36))((V651));
3053          goto T1103;          goto T1103;
3054  goto T1105;          goto T1105;
3055  T1105:;  T1105:;
3056          V655= 0;          V655= 0;
3057  goto T1103;          goto T1103;
3058  T1103:;  T1103:;
3059          {long V656;          {long V656;
3060          V656= (long)(*(LnkLI37))((V653),(V645));          V656= (long)(*(LnkLI37))((V653),(V645));
3061          if(!((V655)<=(V656))){          if(!((V655)<=(V656))){
3062          goto T1109;}          goto T1109;}
3063          goto T1108;          goto T1108;
3064  goto T1109;          goto T1109;
3065  T1109:;  T1109:;
3066          V657 = make_fixnum(V655);          V657 = make_fixnum(V655);
3067          V658 = make_fixnum(V656);          V658 = make_fixnum(V656);
3068          (void)((VFUN_NARGS=2,(*(LnkLI33))(V657,V658)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V657,V658)));
3069  goto T1108;          goto T1108;
3070  T1108:;  T1108:;
3071          {register long V659;          {register long V659;
3072          if(((V652))==Cnil){          if(((V652))==Cnil){
3073          goto T1113;}          goto T1113;}
3074          V659= (long)(*(LnkLI36))((V652));          V659= (long)(*(LnkLI36))((V652));
3075          goto T1111;          goto T1111;
3076  goto T1113;          goto T1113;
3077  T1113:;  T1113:;
3078          V659= 0;          V659= 0;
3079  goto T1111;          goto T1111;
3080  T1111:;  T1111:;
3081          {long V660;          {long V660;
3082          V660= (long)(*(LnkLI37))((V654),(V646));          V660= (long)(*(LnkLI37))((V654),(V646));
3083          if(!((V659)<=(V660))){          if(!((V659)<=(V660))){
3084          goto T1117;}          goto T1117;}
3085          goto T1116;          goto T1116;
3086  goto T1117;          goto T1117;
3087  T1117:;  T1117:;
3088          V661 = make_fixnum(V659);          V661 = make_fixnum(V659);
3089          V662 = make_fixnum(V660);          V662 = make_fixnum(V660);
3090          (void)((VFUN_NARGS=2,(*(LnkLI33))(V661,V662)));          (void)((VFUN_NARGS=2,(*(LnkLI33))(V661,V662)));
3091  goto T1116;          goto T1116;
3092  T1116:;  T1116:;
3093          if(((V647))!=Cnil){          if(((V647))!=Cnil){
3094          goto T1120;}          goto T1120;}
3095  goto T1123;          goto T1123;
3096  T1123:;  T1123:;
3097          {register long V663;          {register long V663;
3098          register long V664;          register long V664;
3099          V663= V655;          V663= V655;
3100          V664= V659;          V664= V659;
3101  goto T1129;          goto T1129;
3102  T1129:;  T1129:;
3103          if(!((V663)>=(V656))){          if(!((V663)>=(V656))){
3104          goto T1130;}          goto T1130;}
3105          {object V665 = make_fixnum(V659);          {object V665 = make_fixnum(V659);
3106          VMR38(V665)}          VMR38(V665)}
3107  goto T1130;          goto T1130;
3108  T1130:;  T1130:;
3109          if(!((V664)>=(V660))){          if(!((V664)>=(V660))){
3110          goto T1134;}          goto T1134;}
3111          {object V666 = Cnil;          {object V666 = Cnil;
3112          VMR38(V666)}          VMR38(V666)}
3113  goto T1134;          goto T1134;
3114  T1134:;  T1134:;
3115          base[0]= elt((V645),V663);          base[0]= elt((V645),V663);
3116          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 3125  T1134:; Line 3125  T1134:;
3125          if(((*(LnkLI43))((V648),(V649),V667,V668))!=Cnil){          if(((*(LnkLI43))((V648),(V649),V667,V668))!=Cnil){
3126          goto T1137;}          goto T1137;}
3127          goto T1125;          goto T1125;
3128  goto T1137;          goto T1137;
3129  T1137:;  T1137:;
3130          V663= (long)(1)+(V663);          V663= (long)(1)+(V663);
3131          V664= (long)(1)+(V664);          V664= (long)(1)+(V664);
3132          goto T1129;}          goto T1129;}
3133  goto T1125;          goto T1125;
3134  T1125:;  T1125:;
3135          V659= (long)(1)+(V659);          V659= (long)(1)+(V659);
3136          goto T1123;          goto T1123;
3137  goto T1120;          goto T1120;
3138  T1120:;  T1120:;
3139  goto T1151;          goto T1151;
3140  T1151:;  T1151:;
3141          {register long V669;          {register long V669;
3142          register long V670;          register long V670;
3143          V669= (long)(-1)+(V656);          V669= (long)(-1)+(V656);
3144          V670= (long)(-1)+(V660);          V670= (long)(-1)+(V660);
3145  goto T1157;          goto T1157;
3146  T1157:;  T1157:;
3147          if(!((V669)<(V655))){          if(!((V669)<(V655))){
3148          goto T1158;}          goto T1158;}
3149          {object V671 = make_fixnum((long)(1)+(V670));          {object V671 = make_fixnum((long)(1)+(V670));
3150          VMR38(V671)}          VMR38(V671)}
3151  goto T1158;          goto T1158;
3152  T1158:;  T1158:;
3153          if(!((V670)<(V659))){          if(!((V670)<(V659))){
3154          goto T1162;}          goto T1162;}
3155          {object V672 = Cnil;          {object V672 = Cnil;
3156          VMR38(V672)}          VMR38(V672)}
3157  goto T1162;          goto T1162;
3158  T1162:;  T1162:;
3159          base[0]= elt((V645),V669);          base[0]= elt((V645),V669);
3160          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 3169  T1162:; Line 3169  T1162:;
3169          if(((*(LnkLI43))((V648),(V649),V673,V674))!=Cnil){          if(((*(LnkLI43))((V648),(V649),V673,V674))!=Cnil){
3170          goto T1165;}          goto T1165;}
3171          goto T1153;          goto T1153;
3172  goto T1165;          goto T1165;
3173  T1165:;  T1165:;
3174          V669= (long)(-1)+(V669);          V669= (long)(-1)+(V669);
3175          V670= (long)(-1)+(V670);          V670= (long)(-1)+(V670);
3176          goto T1157;}          goto T1157;}
3177  goto T1153;          goto T1153;
3178  T1153:;  T1153:;
3179          V660= (long)(-1)+(V660);          V660= (long)(-1)+(V660);
3180          goto T1151;}}}}          goto T1151;}}}}
# Line 3208  static void L39() Line 3208  static void L39()
3208          vs_top=(vs_base=base+4)+3;          vs_top=(vs_base=base+4)+3;
3209          (void) (*Lnk57)();          (void) (*Lnk57)();
3210          return;          return;
3211  goto T1180;          goto T1180;
3212  T1180:;  T1180:;
3213          base[4]= (*(LnkLI58))((V675),0,(long)length((V675)),(V676),(V677));          base[4]= (*(LnkLI58))((V675),0,(long)length((V675)),(V676),(V677));
3214          vs_top=(vs_base=base+4)+1;          vs_top=(vs_base=base+4)+1;
# Line 3245  TTL:; Line 3245  TTL:;
3245          goto T1187;}          goto T1187;}
3246          {object V689 = (V684);          {object V689 = (V684);
3247          VMR41(V689)}          VMR41(V689)}
3248  goto T1187;          goto T1187;
3249  T1187:;  T1187:;
3250          {register long V690;          {register long V690;
3251          register long V691;          register long V691;
# Line 3257  T1187:; Line 3257  T1187:;
3257          V693= (          V693= (
3258          (type_of((V688)) == t_sfun ?(*(((V688))->sfn.sfn_self)):          (type_of((V688)) == t_sfun ?(*(((V688))->sfn.sfn_self)):
3259          (fcall.fun=((V688)),fcall.argd=1,fcalln))((V692)));          (fcall.fun=((V688)),fcall.argd=1,fcalln))((V692)));
3260  goto T1195;          goto T1195;
3261  T1195:;  T1195:;
3262  goto T1199;          goto T1199;
3263  T1199:;  T1199:;
3264          V691= (long)(-1)+(V691);          V691= (long)(-1)+(V691);
3265          if((V690)<(V691)){          if((V690)<(V691)){
3266          goto T1203;}          goto T1203;}
3267          goto T1193;          goto T1193;
3268  goto T1203;          goto T1203;
3269  T1203:;  T1203:;
3270          base[3]= elt((V684),V691);          base[3]= elt((V684),V691);
3271          vs_top=(vs_base=base+3)+1;          vs_top=(vs_base=base+3)+1;
# Line 3279  T1203:; Line 3279  T1203:;
3279          if((vs_base[0])==Cnil){          if((vs_base[0])==Cnil){
3280          goto T1200;}          goto T1200;}
3281          goto T1197;          goto T1197;
3282  goto T1200;          goto T1200;
3283  T1200:;  T1200:;
3284          goto T1199;          goto T1199;
3285  goto T1197;          goto T1197;
3286  T1197:;  T1197:;
3287  goto T1214;          goto T1214;
3288  T1214:;  T1214:;
3289          V690= (long)(1)+(V690);          V690= (long)(1)+(V690);
3290          if((V690)<(V691)){          if((V690)<(V691)){
3291          goto T1218;}          goto T1218;}
3292          goto T1193;          goto T1193;
3293  goto T1218;          goto T1218;
3294  T1218:;  T1218:;
3295          base[3]= elt((V684),V690);          base[3]= elt((V684),V690);
3296          vs_top=(vs_base=base+3)+1;          vs_top=(vs_base=base+3)+1;
# Line 3304  T1218:; Line 3304  T1218:;
3304          if((vs_base[0])!=Cnil){          if((vs_base[0])!=Cnil){
3305          goto T1215;}          goto T1215;}
3306          goto T1212;          goto T1212;
3307  goto T1215;          goto T1215;
3308  T1215:;  T1215:;
3309          goto T1214;          goto T1214;
3310  goto T1212;          goto T1212;
3311  T1212:;  T1212:;
3312          {object V694;          {object V694;
3313          V694= elt((V684),V690);          V694= elt((V684),V690);
# Line 3315  T1212:; Line 3315  T1212:;
3315          (void)(elt_set((V684),V690,/* INLINE-ARGS */V695));          (void)(elt_set((V684),V690,/* INLINE-ARGS */V695));
3316          (void)(elt_set((V684),V691,(V694)));}          (void)(elt_set((V684),V691,(V694)));}
3317          goto T1195;          goto T1195;
3318  goto T1193;          goto T1193;
3319  T1193:;  T1193:;
3320          V696= elt((V684),V690);          V696= elt((V684),V690);
3321          (void)(elt_set((V684),V685,/* INLINE-ARGS */V696));          (void)(elt_set((V684),V685,/* INLINE-ARGS */V696));
# Line 3352  static void L43() Line 3352  static void L43()
3352          vs_top=(vs_base=base+4)+3;          vs_top=(vs_base=base+4)+3;
3353          (void) (*Lnk57)();          (void) (*Lnk57)();
3354          return;          return;
3355  goto T1241;          goto T1241;
3356  T1241:;  T1241:;
3357          if(type_of((V697))==t_string){          if(type_of((V697))==t_string){
3358          goto T1246;}          goto T1246;}
3359          if(!((type_of((V697))==t_bitvector))){          if(!((type_of((V697))==t_bitvector))){
3360          goto T1247;}          goto T1247;}
3361  goto T1246;          goto T1246;
3362  T1246:;  T1246:;
3363          base[4]= (V697);          base[4]= (V697);
3364          base[5]= (V698);          base[5]= (V698);
# Line 3367  T1246:; Line 3367  T1246:;
3367          vs_top=(vs_base=base+4)+4;          vs_top=(vs_base=base+4)+4;
3368          (void) (*Lnk59)();          (void) (*Lnk59)();
3369          return;          return;
3370  goto T1247;          goto T1247;
3371  T1247:;  T1247:;
3372          base[4]= (*(LnkLI60))((V697),VV[0]);          base[4]= (*(LnkLI60))((V697),VV[0]);
3373          base[5]= (V698);          base[5]= (V698);
# Line 3414  static object LI44(object V705,object V7 Line 3414  static object LI44(object V705,object V7
3414          if(!(equal((V710),Cnil))){          if(!(equal((V710),Cnil))){
3415          goto T1262;}          goto T1262;}
3416          V710= symbol_function(VV[35]);          V710= symbol_function(VV[35]);
3417  goto T1262;          goto T1262;
3418  T1262:;  T1262:;
3419          {register object V713;          {register object V713;
3420          register long V714;          register long V714;
# Line 3425  T1262:; Line 3425  T1262:;
3425          V714= 0;          V714= 0;
3426          V715= 0;          V715= 0;
3427          V716= 0;          V716= 0;
3428  goto T1271;          goto T1271;
3429  T1271:;  T1271:;
3430          if(!((V715)==(V711))){          if(!((V715)==(V711))){
3431          goto T1272;}          goto T1272;}
# Line 3433  T1271:; Line 3433  T1271:;
3433          goto T1272;}          goto T1272;}
3434          {object V718 = (V713);          {object V718 = (V713);
3435          VMR43(V718)}          VMR43(V718)}
3436  goto T1272;          goto T1272;
3437  T1272:;  T1272:;
3438          if(!((V715)<(V711))){          if(!((V715)<(V711))){
3439          goto T1280;}          goto T1280;}
# Line 3458  T1272:; Line 3458  T1272:;
3458          (void)(elt_set((V713),V714,/* INLINE-ARGS */V719));          (void)(elt_set((V713),V714,/* INLINE-ARGS */V719));
3459          V715= (long)(1)+(V715);          V715= (long)(1)+(V715);
3460          goto T1278;          goto T1278;
3461  goto T1285;          goto T1285;
3462  T1285:;  T1285:;
3463          base[1]= elt((V708),V716);          base[1]= elt((V708),V716);
3464          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
# Line 3479  T1285:; Line 3479  T1285:;
3479          (void)(elt_set((V713),V714,/* INLINE-ARGS */V720));          (void)(elt_set((V713),V714,/* INLINE-ARGS */V720));
3480          V716= (long)(1)+(V716);          V716= (long)(1)+(V716);
3481          goto T1278;          goto T1278;
3482  goto T1294;          goto T1294;
3483  T1294:;  T1294:;
3484          V721= elt((V707),V715);          V721= elt((V707),V715);
3485          (void)(elt_set((V713),V714,/* INLINE-ARGS */V721));          (void)(elt_set((V713),V714,/* INLINE-ARGS */V721));
3486          V715= (long)(1)+(V715);          V715= (long)(1)+(V715);
3487          goto T1278;          goto T1278;
3488  goto T1280;          goto T1280;
3489  T1280:;  T1280:;
3490          if(!((V715)<(V711))){          if(!((V715)<(V711))){
3491          goto T1305;}          goto T1305;}
# Line 3493  T1280:; Line 3493  T1280:;
3493          (void)(elt_set((V713),V714,/* INLINE-ARGS */V722));          (void)(elt_set((V713),V714,/* INLINE-ARGS */V722));
3494          V715= (long)(1)+(V715);          V715= (long)(1)+(V715);
3495          goto T1278;          goto T1278;
3496  goto T1305;          goto T1305;
3497  T1305:;  T1305:;
3498          V723= elt((V708),V716);          V723= elt((V708),V716);
3499          (void)(elt_set((V713),V714,/* INLINE-ARGS */V723));          (void)(elt_set((V713),V714,/* INLINE-ARGS */V723));
3500          V716= (long)(1)+(V716);          V716= (long)(1)+(V716);
3501  goto T1278;          goto T1278;
3502  T1278:;  T1278:;
3503          V714= (long)(1)+(V714);          V714= (long)(1)+(V714);
3504          goto T1271;}}          goto T1271;}}
# Line 3543  static void L45() Line 3543  static void L45()
3543          vs_top=sup;          vs_top=sup;
3544          base[3]= vs_base[0];          base[3]= vs_base[0];
3545          goto T1315;          goto T1315;
3546  goto T1317;          goto T1317;
3547  T1317:;  T1317:;
3548          base[3]= make_fixnum((long)length((V724)));          base[3]= make_fixnum((long)length((V724)));
3549  goto T1315;          goto T1315;
3550  T1315:;  T1315:;
3551          {object V728;          {object V728;
3552          {object V729;          {object V729;
# Line 3555  T1315:; Line 3555  T1315:;
3555          V728= Cnil;          V728= Cnil;
3556          goto T1324;}          goto T1324;}
3557          base[4]=V729=MMcons(Cnil,Cnil);          base[4]=V729=MMcons(Cnil,Cnil);
3558  goto T1325;          goto T1325;
3559  T1325:;  T1325:;
3560          base[5]= (V730->c.c_car);          base[5]= (V730->c.c_car);
3561          vs_top=(vs_base=base+5)+1;          vs_top=(vs_base=base+5)+1;
# Line 3568  T1325:; Line 3568  T1325:;
3568          goto T1324;}          goto T1324;}
3569          V729=MMcdr(V729)=MMcons(Cnil,Cnil);          V729=MMcdr(V729)=MMcons(Cnil,Cnil);
3570          goto T1325;}          goto T1325;}
3571  goto T1324;          goto T1324;
3572  T1324:;  T1324:;
3573           vs_top=base+4;           vs_top=base+4;
3574           while(!endp(V728))           while(!endp(V728))
# Line 3599  T1324:; Line 3599  T1324:;
3599          vs_top=(vs_base=base+3)+2;          vs_top=(vs_base=base+3)+2;
3600          siLfill_pointer_set();          siLfill_pointer_set();
3601          vs_top=sup;          vs_top=sup;
3602  goto T1328;          goto T1328;
3603  T1328:;  T1328:;
3604          {register object V731;          {register object V731;
3605          register object V732;          register object V732;
3606          V731= (V727);          V731= (V727);
3607          V732= small_fixnum(0);          V732= small_fixnum(0);
3608  goto T1342;          goto T1342;
3609  T1342:;  T1342:;
3610          if(!(number_compare((V732),(V731))>=0)){          if(!(number_compare((V732),(V731))>=0)){
3611          goto T1343;}          goto T1343;}
3612          base[3]= (V724);          base[3]= (V724);
3613          vs_top=(vs_base=base+3)+1;          vs_top=(vs_base=base+3)+1;
3614          return;          return;
3615  goto T1343;          goto T1343;
3616  T1343:;  T1343:;
3617          base[3]= (V725);          base[3]= (V725);
3618          {object V734;          {object V734;
# Line 3622  T1343:; Line 3622  T1343:;
3622          V734= Cnil;          V734= Cnil;
3623          goto T1350;}          goto T1350;}
3624          base[4]=V735=MMcons(Cnil,Cnil);          base[4]=V735=MMcons(Cnil,Cnil);
3625  goto T1351;          goto T1351;
3626  T1351:;  T1351:;
3627          {register object V737;          {register object V737;
3628          V737= (V736->c.c_car);          V737= (V736->c.c_car);
# Line 3633  T1351:; Line 3633  T1351:;
3633          goto T1350;}          goto T1350;}
3634          V735=MMcdr(V735)=MMcons(Cnil,Cnil);          V735=MMcdr(V735)=MMcons(Cnil,Cnil);
3635          goto T1351;}          goto T1351;}
3636  goto T1350;          goto T1350;
3637  T1350:;  T1350:;
3638           vs_top=base+4;           vs_top=base+4;
3639           while(!endp(V734))           while(!endp(V734))
# Line 3720  TTL:; Line 3720  TTL:;
3720          base[1]= (V747);          base[1]= (V747);
3721          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3722          return;          return;
3723  goto T1368;          goto T1368;
3724  T1368:;  T1368:;
3725          if(!((V748)==(2))){          if(!((V748)==(2))){
3726          goto T1366;}          goto T1366;}
# Line 3740  T1368:; Line 3740  T1368:;
3740          base[1]= (V747);          base[1]= (V747);
3741          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3742          return;          return;
3743  goto T1377;          goto T1377;
3744  T1377:;  T1377:;
3745          base[1]= (V754);          base[1]= (V754);
3746          base[2]= (V753);          base[2]= (V753);
# Line 3752  T1377:; Line 3752  T1377:;
3752          base[1]= nreverse((V747));          base[1]= nreverse((V747));
3753          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3754          return;          return;
3755  goto T1382;          goto T1382;
3756  T1382:;  T1382:;
3757          base[1]= (V747);          base[1]= (V747);
3758          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3759          return;          return;
3760  goto T1366;          goto T1366;
3761  T1366:;  T1366:;
3762          V748= (long)(V748>=0&&(2)>0?(V748)/(2):ifloor(V748,2));          V748= (long)(V748>=0&&(2)>0?(V748)/(2):ifloor(V748,2));
3763          {long V755;          {long V755;
3764          register object V756;          register object V756;
3765          V755= 1;          V755= 1;
3766          V756= (V747);          V756= (V747);
3767  goto T1391;          goto T1391;
3768  T1391:;  T1391:;
3769          if(!((V755)>=(V748))){          if(!((V755)>=(V748))){
3770          goto T1392;}          goto T1392;}
# Line 3773  T1391:; Line 3773  T1391:;
3773          if(type_of((V756))!=t_cons)FEwrong_type_argument(Scons,(V756));          if(type_of((V756))!=t_cons)FEwrong_type_argument(Scons,(V756));
3774          ((V756))->c.c_cdr = Cnil;          ((V756))->c.c_cdr = Cnil;
3775          goto T1388;          goto T1388;
3776  goto T1392;          goto T1392;
3777  T1392:;  T1392:;
3778          V755= (long)(1)+(V755);          V755= (long)(1)+(V755);
3779          V756= cdr((V756));          V756= cdr((V756));
3780          goto T1391;}          goto T1391;}
3781  goto T1388;          goto T1388;
3782  T1388:;  T1388:;
3783          base[1]= (V749);          base[1]= (V749);
3784          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
# Line 3795  T1388:; Line 3795  T1388:;
3795          base[1]= (V750);          base[1]= (V750);
3796          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3797          return;          return;
3798  goto T1412;          goto T1412;
3799  T1412:;  T1412:;
3800          if(!(endp_prop((V750)))){          if(!(endp_prop((V750)))){
3801          goto T1410;}          goto T1410;}
3802          base[1]= (V749);          base[1]= (V749);
3803          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3804          return;          return;
3805  goto T1410;          goto T1410;
3806  T1410:;  T1410:;
3807          V751= make_cons(Cnil,Cnil);          V751= make_cons(Cnil,Cnil);
3808          V752= (V751);          V752= (V751);
# Line 3812  T1410:; Line 3812  T1410:;
3812          V754= (          V754= (
3813          (type_of(base0[2]) == t_sfun ?(*((base0[2])->sfn.sfn_self)):          (type_of(base0[2]) == t_sfun ?(*((base0[2])->sfn.sfn_self)):
3814          (fcall.fun=(base0[2]),fcall.argd=1,fcalln))(car((V750))));          (fcall.fun=(base0[2]),fcall.argd=1,fcalln))(car((V750))));
3815  goto T1361;          goto T1361;
3816  T1361:;  T1361:;
3817          base[1]= (V753);          base[1]= (V753);
3818          base[2]= (V754);          base[2]= (V754);
# Line 3822  T1361:; Line 3822  T1361:;
3822          if((vs_base[0])==Cnil){          if((vs_base[0])==Cnil){
3823          goto T1424;}          goto T1424;}
3824          goto T1362;          goto T1362;
3825  goto T1424;          goto T1424;
3826  T1424:;  T1424:;
3827          base[1]= (V754);          base[1]= (V754);
3828          base[2]= (V753);          base[2]= (V753);
# Line 3832  T1424:; Line 3832  T1424:;
3832          if((vs_base[0])==Cnil){          if((vs_base[0])==Cnil){
3833          goto T1429;}          goto T1429;}
3834          goto T1363;          goto T1363;
3835  goto T1429;          goto T1429;
3836  T1429:;  T1429:;
3837          goto T1362;          goto T1362;
3838  goto T1362;          goto T1362;
3839  T1362:;  T1362:;
3840          if(type_of((V752))!=t_cons)FEwrong_type_argument(Scons,(V752));          if(type_of((V752))!=t_cons)FEwrong_type_argument(Scons,(V752));
3841          ((V752))->c.c_cdr = (V749);          ((V752))->c.c_cdr = (V749);
# Line 3848  T1362:; Line 3848  T1362:;
3848          base[1]= cdr((V751));          base[1]= cdr((V751));
3849          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3850          return;          return;
3851  goto T1438;          goto T1438;
3852  T1438:;  T1438:;
3853          V753= (          V753= (
3854          (type_of(base0[2]) == t_sfun ?(*((base0[2])->sfn.sfn_self)):          (type_of(base0[2]) == t_sfun ?(*((base0[2])->sfn.sfn_self)):
3855          (fcall.fun=(base0[2]),fcall.argd=1,fcalln))(car((V749))));          (fcall.fun=(base0[2]),fcall.argd=1,fcalln))(car((V749))));
3856          goto T1361;          goto T1361;
3857  goto T1363;          goto T1363;
3858  T1363:;  T1363:;
3859          if(type_of((V752))!=t_cons)FEwrong_type_argument(Scons,(V752));          if(type_of((V752))!=t_cons)FEwrong_type_argument(Scons,(V752));
3860          ((V752))->c.c_cdr = (V750);          ((V752))->c.c_cdr = (V750);
# Line 3867  T1363:; Line 3867  T1363:;
3867          base[1]= cdr((V751));          base[1]= cdr((V751));
3868          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
3869          return;          return;
3870  goto T1449;          goto T1449;
3871  T1449:;  T1449:;
3872          V754= (          V754= (
3873          (type_of(base0[2]) == t_sfun ?(*((base0[2])->sfn.sfn_self)):          (type_of(base0[2]) == t_sfun ?(*((base0[2])->sfn.sfn_self)):

Legend:
Removed from v.1.15  
changed lines
  Added in v.1.16

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26