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

Diff of /gcl/lsp/defstruct.c

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

revision 1.11 by camm, Tue Feb 18 04:06:52 2003 UTC revision 1.12 by camm, Wed Feb 26 22:21:36 2003 UTC
# Line 40  static object LI1(object V12,object V11, Line 40  static object LI1(object V12,object V11,
40          else {          else {
41          V24= first;}          V24= first;}
42          --narg; goto T2;          --narg; goto T2;
43  goto T1;          goto T1;
44  T1:;  T1:;
45          V24= Cnil;          V24= Cnil;
46  goto T2;          goto T2;
47  T2:;  T2:;
48          {register object V25;          {register object V25;
49          register object V26;          register object V26;
# Line 52  T2:; Line 52  T2:;
52          goto T6;}          goto T6;}
53          V25= (V20);          V25= (V20);
54          goto T4;          goto T4;
55  goto T6;          goto T6;
56  T6:;  T6:;
57          base[1]= coerce_to_string((V14));          base[1]= coerce_to_string((V14));
58          base[2]= coerce_to_string((V20));          base[2]= coerce_to_string((V20));
# Line 64  T6:; Line 64  T6:;
64          Lintern();          Lintern();
65          vs_top=sup;          vs_top=sup;
66          V25= vs_base[0];          V25= vs_base[0];
67  goto T4;          goto T4;
68  T4:;  T4:;
69          V26= Cnil;          V26= Cnil;
70          V27= Cnil;          V27= Cnil;
# Line 72  T4:; Line 72  T4:;
72          if((V28!= Cnil))goto T12;          if((V28!= Cnil))goto T12;
73          V26= symbol_value(VV[0]);          V26= symbol_value(VV[0]);
74          goto T11;          goto T11;
75  goto T12;          goto T12;
76  T12:;  T12:;
77          if((V28!= VV[20]))goto T14;          if((V28!= VV[20]))goto T14;
78          V26= symbol_value(VV[1]);          V26= symbol_value(VV[1]);
79          goto T11;          goto T11;
80  goto T14;          goto T14;
81  T14:;  T14:;
82          if((V28!= VV[19]))goto T16;          if((V28!= VV[19]))goto T16;
83          V26= symbol_value(VV[2]);          V26= symbol_value(VV[2]);
84          goto T11;          goto T11;
85  goto T16;          goto T16;
86  T16:;  T16:;
87          FEerror("The ECASE key value ~s is illegal.",1,V28);          FEerror("The ECASE key value ~s is illegal.",1,V28);
88          goto T11;}          goto T11;}
89  goto T11;          goto T11;
90  T11:;  T11:;
91          V29 = make_fixnum((long)length((V26)));          V29 = make_fixnum((long)length((V26)));
92          if(!(number_compare(V29,(Vcs[11]->c.c_car))>0)){          if(!(number_compare(V29,(Vcs[11]->c.c_car))>0)){
93          goto T19;}          goto T19;}
94          goto T18;          goto T18;
95  goto T19;          goto T19;
96  T19:;  T19:;
97          V30= number_plus((Vcs[11]->c.c_car),small_fixnum(10));          V30= number_plus((Vcs[11]->c.c_car),small_fixnum(10));
98          (void)((VFUN_NARGS=2,(*(LnkLI109))((V26),/* INLINE-ARGS */V30)));          (void)((VFUN_NARGS=2,(*(LnkLI109))((V26),/* INLINE-ARGS */V30)));
99  goto T18;          goto T18;
100  T18:;  T18:;
101          if(((V27))!=Cnil){          if(((V27))!=Cnil){
102          goto T21;}          goto T21;}
# Line 117  T18:; Line 117  T18:;
117          goto T31;}          goto T31;}
118          V31= Cnil;          V31= Cnil;
119          goto T30;          goto T30;
120  goto T31;          goto T31;
121  T31:;  T31:;
122          V32= aref1((V26),fixint((Vcs[11]->c.c_car)));          V32= aref1((V26),fixint((Vcs[11]->c.c_car)));
123          base[0]= (V25);          base[0]= (V25);
# Line 126  T31:; Line 126  T31:;
126          vs_top=sup;          vs_top=sup;
127          V33= vs_base[0];          V33= vs_base[0];
128          V31= ((/* INLINE-ARGS */V32)==(V33)?Ct:Cnil);          V31= ((/* INLINE-ARGS */V32)==(V33)?Ct:Cnil);
129  goto T30;          goto T30;
130  T30:;  T30:;
131          if(V31==Cnil)goto T29;          if(V31==Cnil)goto T29;
132          goto T21;          goto T21;
133  goto T29;          goto T29;
134  T29:;}  T29:;}
135          base[0]= (V25);{object V34;          base[0]= (V25);{object V34;
136          V34= aref1((V26),fixint((Vcs[11]->c.c_car)));          V34= aref1((V26),fixint((Vcs[11]->c.c_car)));
137          if(V34==Cnil)goto T38;          if(V34==Cnil)goto T38;
138          base[1]= V34;          base[1]= V34;
139          goto T37;          goto T37;
140  goto T38;          goto T38;
141  T38:;}  T38:;}
142          if(!(((V26))==(symbol_value(VV[0])))){          if(!(((V26))==(symbol_value(VV[0])))){
143          goto T42;}          goto T42;}
144          V35=          V35=
145          make_cclosure_new(LC16,Cnil,Vcs[11],Cdata);          make_cclosure_new(LC16,Cnil,Vcs[11],Cdata);
146          goto T40;          goto T40;
147  goto T42;          goto T42;
148  T42:;  T42:;
149          if(!(((V26))==(symbol_value(VV[1])))){          if(!(((V26))==(symbol_value(VV[1])))){
150          goto T45;}          goto T45;}
151          V35=          V35=
152          make_cclosure_new(LC17,Cnil,Vcs[11],Cdata);          make_cclosure_new(LC17,Cnil,Vcs[11],Cdata);
153          goto T40;          goto T40;
154  goto T45;          goto T45;
155  T45:;  T45:;
156          if(!(((V26))==(symbol_value(VV[2])))){          if(!(((V26))==(symbol_value(VV[2])))){
157          goto T48;}          goto T48;}
158          V35=          V35=
159          make_cclosure_new(LC18,Cnil,Vcs[11],Cdata);          make_cclosure_new(LC18,Cnil,Vcs[11],Cdata);
160          goto T40;          goto T40;
161  goto T48;          goto T48;
162  T48:;  T48:;
163          V35= Cnil;          V35= Cnil;
164  goto T40;          goto T40;
165  T40:;  T40:;
166          base[1]= aset1((V26),fixint((Vcs[11]->c.c_car)),V35);          base[1]= aset1((V26),fixint((Vcs[11]->c.c_car)),V35);
167  goto T37;          goto T37;
168  T37:;  T37:;
169          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
170          siLfset();          siLfset();
171          vs_top=sup;          vs_top=sup;
172  goto T21;          goto T21;
173  T21:;  T21:;
174          if(((V23))==Cnil){          if(((V23))==Cnil){
175          goto T52;}          goto T52;}
176          (void)(remprop((V25),VV[6]));          (void)(remprop((V25),VV[6]));
177          (void)(sputprop((V25),VV[7],Ct));          (void)(sputprop((V25),VV[7],Ct));
178          goto T50;          goto T50;
179  goto T52;          goto T52;
180  T52:;  T52:;
181          (void)(remprop((V25),VV[8]));          (void)(remprop((V25),VV[8]));
182          (void)(remprop((V25),VV[9]));          (void)(remprop((V25),VV[9]));
# Line 198  T52:; Line 198  T52:;
198          goto T60;}          goto T60;}
199          V27= Ct;          V27= Ct;
200          goto T50;          goto T50;
201  goto T60;          goto T60;
202  T60:;  T60:;
203          if(((V16))==Cnil){          if(((V16))==Cnil){
204          goto T73;}          goto T73;}
205          V37= (V16);          V37= (V16);
206          goto T71;          goto T71;
207  goto T73;          goto T73;
208  T73:;  T73:;
209          V37= (V13);          V37= (V13);
210  goto T71;          goto T71;
211  T71:;  T71:;
212          V38= make_cons(V37,(Vcs[11]->c.c_car));          V38= make_cons(V37,(Vcs[11]->c.c_car));
213          (void)(sputprop((V25),VV[6],/* INLINE-ARGS */V38));}          (void)(sputprop((V25),VV[6],/* INLINE-ARGS */V38));}
214  goto T50;          goto T50;
215  T50:;  T50:;
216          {object V39 = Cnil;          {object V39 = Cnil;
217          VMR1(V39)}}          VMR1(V39)}}
# Line 225  static object LI2(V45,V46,V47,V48,V49) Line 225  static object LI2(V45,V46,V47,V48,V49)
225    
226  object V45;object V46;object V47;object V48;object V49;  object V45;object V46;object V47;object V48;object V49;
227  {        VMB2 VMS2 VMV2  {        VMB2 VMS2 VMV2
228  goto TTL;          goto TTL;
229  TTL:;  TTL:;
230          {object V50;          {object V50;
231          register object V51;          register object V51;
# Line 235  TTL:; Line 235  TTL:;
235          V50= Cnil;          V50= Cnil;
236          goto T75;}          goto T75;}
237          base[0]=V52=MMcons(Cnil,Cnil);          base[0]=V52=MMcons(Cnil,Cnil);
238  goto T76;          goto T76;
239  T76:;  T76:;
240          if(((V53->c.c_car))!=Cnil){          if(((V53->c.c_car))!=Cnil){
241          goto T79;}          goto T79;}
242          (V52->c.c_car)= Cnil;          (V52->c.c_car)= Cnil;
243          goto T77;          goto T77;
244  goto T79;          goto T79;
245  T79:;  T79:;
246          if((car((V53->c.c_car)))!=Cnil){          if((car((V53->c.c_car)))!=Cnil){
247          goto T82;}          goto T82;}
248          (V52->c.c_car)= list(2,VV[11],cadr((V53->c.c_car)));          (V52->c.c_car)= list(2,VV[11],cadr((V53->c.c_car)));
249          goto T77;          goto T77;
250  goto T82;          goto T82;
251  T82:;  T82:;
252          (V52->c.c_car)= car((V53->c.c_car));          (V52->c.c_car)= car((V53->c.c_car));
253  goto T77;          goto T77;
254  T77:;  T77:;
255          V53=MMcdr(V53);          V53=MMcdr(V53);
256          if(endp(V53)){          if(endp(V53)){
# Line 258  T77:; Line 258  T77:;
258          goto T75;}          goto T75;}
259          V52=MMcdr(V52)=MMcons(Cnil,Cnil);          V52=MMcdr(V52)=MMcons(Cnil,Cnil);
260          goto T76;}          goto T76;}
261  goto T75;          goto T75;
262  T75:;  T75:;
263          {object V55;          {object V55;
264          object V56= (V49);          object V56= (V49);
# Line 266  T75:; Line 266  T75:;
266          V51= Cnil;          V51= Cnil;
267          goto T84;}          goto T84;}
268          base[0]=V55=MMcons(Cnil,Cnil);          base[0]=V55=MMcons(Cnil,Cnil);
269  goto T85;          goto T85;
270  T85:;  T85:;
271          if(((V56->c.c_car))!=Cnil){          if(((V56->c.c_car))!=Cnil){
272          goto T88;}          goto T88;}
273          (V55->c.c_cdr)= Cnil;          (V55->c.c_cdr)= Cnil;
274          goto T86;          goto T86;
275  goto T88;          goto T88;
276  T88:;  T88:;
277          if((car((V56->c.c_car)))!=Cnil){          if((car((V56->c.c_car)))!=Cnil){
278          goto T91;}          goto T91;}
279          (V55->c.c_cdr)= Cnil;          (V55->c.c_cdr)= Cnil;
280          goto T86;          goto T86;
281  goto T91;          goto T91;
282  T91:;  T91:;
283          if((cadr((V56->c.c_car)))!=Cnil){          if((cadr((V56->c.c_car)))!=Cnil){
284          goto T94;}          goto T94;}
285          (V55->c.c_cdr)= make_cons(car((V56->c.c_car)),Cnil);          (V55->c.c_cdr)= make_cons(car((V56->c.c_car)),Cnil);
286          goto T86;          goto T86;
287  goto T94;          goto T94;
288  T94:;  T94:;
289          V58= list(2,car((V56->c.c_car)),cadr((V56->c.c_car)));          V58= list(2,car((V56->c.c_car)),cadr((V56->c.c_car)));
290          (V55->c.c_cdr)= make_cons(/* INLINE-ARGS */V58,Cnil);          (V55->c.c_cdr)= make_cons(/* INLINE-ARGS */V58,Cnil);
291  goto T86;          goto T86;
292  T86:;  T86:;
293          {object cdr_V55=MMcdr(V55);while(!endp(cdr_V55)) {cdr_V55=MMcdr(cdr_V55);V55=MMcdr(V55);}}          {object cdr_V55=MMcdr(V55);while(!endp(cdr_V55)) {cdr_V55=MMcdr(cdr_V55);V55=MMcdr(V55);}}
294          V56=MMcdr(V56);          V56=MMcdr(V56);
# Line 297  T86:; Line 297  T86:;
297          V51= base[0];          V51= base[0];
298          goto T84;}          goto T84;}
299          goto T85;}          goto T85;}
300  goto T84;          goto T84;
301  T84:;  T84:;
302          if(!(type_of((V46))==t_cons)){          if(!(type_of((V46))==t_cons)){
303          goto T98;}          goto T98;}
# Line 307  T84:; Line 307  T84:;
307          V59= cadr((V46));          V59= cadr((V46));
308          V60= Cnil;          V60= Cnil;
309          V61= Cnil;          V61= Cnil;
310  goto T103;          goto T103;
311  T103:;  T103:;
312          if(!(endp_prop((V59)))){          if(!(endp_prop((V59)))){
313          goto T104;}          goto T104;}
# Line 318  T103:; Line 318  T103:;
318          base[1]= Cnil;          base[1]= Cnil;
319          goto T109;}          goto T109;}
320          base[2]=V62=MMcons(Cnil,Cnil);          base[2]=V62=MMcons(Cnil,Cnil);
321  goto T110;          goto T110;
322  T110:;  T110:;
323          if(!(type_of((V63->c.c_car))!=t_cons)){          if(!(type_of((V63->c.c_car))!=t_cons)){
324          goto T117;}          goto T117;}
325          V66= (V63->c.c_car);          V66= (V63->c.c_car);
326          goto T115;          goto T115;
327  goto T117;          goto T117;
328  T117:;  T117:;
329          V66= car((V63->c.c_car));          V66= car((V63->c.c_car));
330  goto T115;          goto T115;
331  T115:;  T115:;
332          {register object x= V66,V65= (V61);          {register object x= V66,V65= (V61);
333          while(!endp(V65))          while(!endp(V65))
# Line 335  T115:; Line 335  T115:;
335          goto T114;          goto T114;
336          }else V65=V65->c.c_cdr;          }else V65=V65->c.c_cdr;
337          goto T113;}          goto T113;}
338  goto T114;          goto T114;
339  T114:;  T114:;
340          (V62->c.c_cdr)= Cnil;          (V62->c.c_cdr)= Cnil;
341          goto T111;          goto T111;
342  goto T113;          goto T113;
343  T113:;  T113:;
344          (V62->c.c_cdr)= make_cons((V63->c.c_car),Cnil);          (V62->c.c_cdr)= make_cons((V63->c.c_car),Cnil);
345  goto T111;          goto T111;
346  T111:;  T111:;
347          {object cdr_V62=MMcdr(V62);while(!endp(cdr_V62)) {cdr_V62=MMcdr(cdr_V62);V62=MMcdr(V62);}}          {object cdr_V62=MMcdr(V62);while(!endp(cdr_V62)) {cdr_V62=MMcdr(cdr_V62);V62=MMcdr(V62);}}
348          V63=MMcdr(V63);          V63=MMcdr(V63);
# Line 351  T111:; Line 351  T111:;
351          base[1]= base[2];          base[1]= base[2];
352          goto T109;}          goto T109;}
353          goto T110;}          goto T110;}
354  goto T109;          goto T109;
355  T109:;  T109:;
356          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
357          Lreconc();          Lreconc();
358          vs_top=sup;          vs_top=sup;
359          V51= vs_base[0];          V51= vs_base[0];
360          goto T100;          goto T100;
361  goto T104;          goto T104;
362  T104:;  T104:;
363          {register object x= car((V59)),V67= VV[13];          {register object x= car((V59)),V67= VV[13];
364          while(!endp(V67))          while(!endp(V67))
# Line 366  T104:; Line 366  T104:;
366          goto T122;          goto T122;
367          }else V67=V67->c.c_cdr;          }else V67=V67->c.c_cdr;
368          goto T120;}          goto T120;}
369  goto T122;          goto T122;
370  T122:;  T122:;
371          if(!((car((V59)))==(VV[14]))){          if(!((car((V59)))==(VV[14]))){
372          goto T123;}          goto T123;}
373          goto T120;          goto T120;
374  goto T123;          goto T123;
375  T123:;  T123:;
376          V59= make_cons(VV[14],(V59));          V59= make_cons(VV[14],(V59));
377  goto T120;          goto T120;
378  T120:;  T120:;
379          if(!((car((V59)))==(VV[14]))){          if(!((car((V59)))==(VV[14]))){
380          goto T128;}          goto T128;}
# Line 385  T120:; Line 385  T120:;
385          V69= cdr((V59));          V69= cdr((V59));
386          V70= Cnil;          V70= Cnil;
387          V71= Cnil;          V71= Cnil;
388  goto T135;          goto T135;
389  T135:;  T135:;
390          if(!(endp_prop((V69)))){          if(!(endp_prop((V69)))){
391          goto T136;}          goto T136;}
# Line 396  T135:; Line 396  T135:;
396          base[1]= Cnil;          base[1]= Cnil;
397          goto T142;}          goto T142;}
398          base[2]=V72=MMcons(Cnil,Cnil);          base[2]=V72=MMcons(Cnil,Cnil);
399  goto T143;          goto T143;
400  T143:;  T143:;
401          if(!(type_of((V73->c.c_car))!=t_cons)){          if(!(type_of((V73->c.c_car))!=t_cons)){
402          goto T150;}          goto T150;}
403          V76= (V73->c.c_car);          V76= (V73->c.c_car);
404          goto T148;          goto T148;
405  goto T150;          goto T150;
406  T150:;  T150:;
407          V76= car((V73->c.c_car));          V76= car((V73->c.c_car));
408  goto T148;          goto T148;
409  T148:;  T148:;
410          {register object x= V76,V75= (V61);          {register object x= V76,V75= (V61);
411          while(!endp(V75))          while(!endp(V75))
# Line 413  T148:; Line 413  T148:;
413          goto T147;          goto T147;
414          }else V75=V75->c.c_cdr;          }else V75=V75->c.c_cdr;
415          goto T146;}          goto T146;}
416  goto T147;          goto T147;
417  T147:;  T147:;
418          (V72->c.c_cdr)= Cnil;          (V72->c.c_cdr)= Cnil;
419          goto T144;          goto T144;
420  goto T146;          goto T146;
421  T146:;  T146:;
422          (V72->c.c_cdr)= make_cons((V73->c.c_car),Cnil);          (V72->c.c_cdr)= make_cons((V73->c.c_car),Cnil);
423  goto T144;          goto T144;
424  T144:;  T144:;
425          {object cdr_V72=MMcdr(V72);while(!endp(cdr_V72)) {cdr_V72=MMcdr(cdr_V72);V72=MMcdr(V72);}}          {object cdr_V72=MMcdr(V72);while(!endp(cdr_V72)) {cdr_V72=MMcdr(cdr_V72);V72=MMcdr(V72);}}
426          V73=MMcdr(V73);          V73=MMcdr(V73);
# Line 429  T144:; Line 429  T144:;
429          base[1]= base[2];          base[1]= base[2];
430          goto T142;}          goto T142;}
431          goto T143;}          goto T143;}
432  goto T142;          goto T142;
433  T142:;  T142:;
434          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
435          Lreconc();          Lreconc();
436          vs_top=sup;          vs_top=sup;
437          V51= vs_base[0];          V51= vs_base[0];
438          goto T132;          goto T132;
439  goto T136;          goto T136;
440  T136:;  T136:;
441          {register object x= car((V69)),V77= VV[13];          {register object x= car((V69)),V77= VV[13];
442          while(!endp(V77))          while(!endp(V77))
# Line 444  T136:; Line 444  T136:;
444          goto T155;          goto T155;
445          }else V77=V77->c.c_cdr;          }else V77=V77->c.c_cdr;
446          goto T153;}          goto T153;}
447  goto T155;          goto T155;
448  T155:;  T155:;
449          if(!((car((V69)))==(VV[15]))){          if(!((car((V69)))==(VV[15]))){
450          goto T156;}          goto T156;}
# Line 454  T155:; Line 454  T155:;
454          goto T164;}          goto T164;}
455          if(type_of(car((V69)))==t_symbol){          if(type_of(car((V69)))==t_symbol){
456          goto T163;}          goto T163;}
457  goto T164;          goto T164;
458  T164:;  T164:;
459          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
460  goto T163;          goto T163;
461  T163:;  T163:;
462          V61= make_cons(car((V69)),(V61));          V61= make_cons(car((V69)),(V61));
463          V60= make_cons(car((V69)),(V60));          V60= make_cons(car((V69)),(V60));
# Line 471  T163:; Line 471  T163:;
471          base[1]= Cnil;          base[1]= Cnil;
472          goto T179;}          goto T179;}
473          base[2]=V78=MMcons(Cnil,Cnil);          base[2]=V78=MMcons(Cnil,Cnil);
474  goto T180;          goto T180;
475  T180:;  T180:;
476          if(!(type_of((V79->c.c_car))!=t_cons)){          if(!(type_of((V79->c.c_car))!=t_cons)){
477          goto T187;}          goto T187;}
478          V82= (V79->c.c_car);          V82= (V79->c.c_car);
479          goto T185;          goto T185;
480  goto T187;          goto T187;
481  T187:;  T187:;
482          V82= car((V79->c.c_car));          V82= car((V79->c.c_car));
483  goto T185;          goto T185;
484  T185:;  T185:;
485          {register object x= V82,V81= (V61);          {register object x= V82,V81= (V61);
486          while(!endp(V81))          while(!endp(V81))
# Line 488  T185:; Line 488  T185:;
488          goto T184;          goto T184;
489          }else V81=V81->c.c_cdr;          }else V81=V81->c.c_cdr;
490          goto T183;}          goto T183;}
491  goto T184;          goto T184;
492  T184:;  T184:;
493          (V78->c.c_cdr)= Cnil;          (V78->c.c_cdr)= Cnil;
494          goto T181;          goto T181;
495  goto T183;          goto T183;
496  T183:;  T183:;
497          (V78->c.c_cdr)= make_cons((V79->c.c_car),Cnil);          (V78->c.c_cdr)= make_cons((V79->c.c_car),Cnil);
498  goto T181;          goto T181;
499  T181:;  T181:;
500          {object cdr_V78=MMcdr(V78);while(!endp(cdr_V78)) {cdr_V78=MMcdr(cdr_V78);V78=MMcdr(V78);}}          {object cdr_V78=MMcdr(V78);while(!endp(cdr_V78)) {cdr_V78=MMcdr(cdr_V78);V78=MMcdr(V78);}}
501          V79=MMcdr(V79);          V79=MMcdr(V79);
# Line 504  T181:; Line 504  T181:;
504          base[1]= base[2];          base[1]= base[2];
505          goto T179;}          goto T179;}
506          goto T180;}          goto T180;}
507  goto T179;          goto T179;
508  T179:;  T179:;
509          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
510          Lreconc();          Lreconc();
511          vs_top=sup;          vs_top=sup;
512          V51= vs_base[0];          V51= vs_base[0];
513          goto T132;          goto T132;
514  goto T156;          goto T156;
515  T156:;  T156:;
516          if((car((V69)))==(VV[12])){          if((car((V69)))==(VV[12])){
517          goto T189;}          goto T189;}
518          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
519  goto T189;          goto T189;
520  T189:;  T189:;
521          V60= make_cons(VV[12],(V60));          V60= make_cons(VV[12],(V60));
522          {register object V83;          {register object V83;
523          V83= cdr((V69));          V83= cdr((V69));
524  goto T197;          goto T197;
525  T197:;  T197:;
526          if(!(endp_prop((V83)))){          if(!(endp_prop((V83)))){
527          goto T198;}          goto T198;}
528          goto T194;          goto T194;
529  goto T198;          goto T198;
530  T198:;  T198:;
531          V60= make_cons(car((V83)),(V60));          V60= make_cons(car((V83)),(V60));
532          if(!(type_of(car((V83)))!=t_cons)){          if(!(type_of(car((V83)))!=t_cons)){
# Line 535  T198:; Line 535  T198:;
535          goto T206;}          goto T206;}
536          V61= make_cons(car((V83)),(V61));          V61= make_cons(car((V83)),(V61));
537          goto T204;          goto T204;
538  goto T206;          goto T206;
539  T206:;  T206:;
540          if(!(type_of(caar((V83)))==t_symbol)){          if(!(type_of(caar((V83)))==t_symbol)){
541          goto T212;}          goto T212;}
# Line 543  T206:; Line 543  T206:;
543          goto T211;}          goto T211;}
544          if(!(endp_prop(cddar((V83))))){          if(!(endp_prop(cddar((V83))))){
545          goto T212;}          goto T212;}
546  goto T211;          goto T211;
547  T211:;  T211:;
548          V61= make_cons(caar((V83)),(V61));          V61= make_cons(caar((V83)),(V61));
549          goto T204;          goto T204;
550  goto T212;          goto T212;
551  T212:;  T212:;
552          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
553  goto T204;          goto T204;
554  T204:;  T204:;
555          V83= cdr((V83));          V83= cdr((V83));
556          goto T197;}          goto T197;}
557  goto T194;          goto T194;
558  T194:;  T194:;
559          base[0]= (V60);          base[0]= (V60);
560          {object V84;          {object V84;
# Line 563  T194:; Line 563  T194:;
563          base[1]= Cnil;          base[1]= Cnil;
564          goto T225;}          goto T225;}
565          base[2]=V84=MMcons(Cnil,Cnil);          base[2]=V84=MMcons(Cnil,Cnil);
566  goto T226;          goto T226;
567  T226:;  T226:;
568          if(!(type_of((V85->c.c_car))!=t_cons)){          if(!(type_of((V85->c.c_car))!=t_cons)){
569          goto T233;}          goto T233;}
570          V88= (V85->c.c_car);          V88= (V85->c.c_car);
571          goto T231;          goto T231;
572  goto T233;          goto T233;
573  T233:;  T233:;
574          V88= car((V85->c.c_car));          V88= car((V85->c.c_car));
575  goto T231;          goto T231;
576  T231:;  T231:;
577          {register object x= V88,V87= (V61);          {register object x= V88,V87= (V61);
578          while(!endp(V87))          while(!endp(V87))
# Line 580  T231:; Line 580  T231:;
580          goto T230;          goto T230;
581          }else V87=V87->c.c_cdr;          }else V87=V87->c.c_cdr;
582          goto T229;}          goto T229;}
583  goto T230;          goto T230;
584  T230:;  T230:;
585          (V84->c.c_cdr)= Cnil;          (V84->c.c_cdr)= Cnil;
586          goto T227;          goto T227;
587  goto T229;          goto T229;
588  T229:;  T229:;
589          (V84->c.c_cdr)= make_cons((V85->c.c_car),Cnil);          (V84->c.c_cdr)= make_cons((V85->c.c_car),Cnil);
590  goto T227;          goto T227;
591  T227:;  T227:;
592          {object cdr_V84=MMcdr(V84);while(!endp(cdr_V84)) {cdr_V84=MMcdr(cdr_V84);V84=MMcdr(V84);}}          {object cdr_V84=MMcdr(V84);while(!endp(cdr_V84)) {cdr_V84=MMcdr(cdr_V84);V84=MMcdr(V84);}}
593          V85=MMcdr(V85);          V85=MMcdr(V85);
# Line 596  T227:; Line 596  T227:;
596          base[1]= base[2];          base[1]= base[2];
597          goto T225;}          goto T225;}
598          goto T226;}          goto T226;}
599  goto T225;          goto T225;
600  T225:;  T225:;
601          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
602          Lreconc();          Lreconc();
603          vs_top=sup;          vs_top=sup;
604          V51= vs_base[0];          V51= vs_base[0];
605          goto T132;          goto T132;
606  goto T153;          goto T153;
607  T153:;  T153:;
608          if(!(type_of(car((V69)))!=t_cons)){          if(!(type_of(car((V69)))!=t_cons)){
609          goto T241;}          goto T241;}
610          V70= car((V69));          V70= car((V69));
611          goto T239;          goto T239;
612  goto T241;          goto T241;
613  T241:;  T241:;
614          if(!(endp_prop(cdar((V69))))){          if(!(endp_prop(cdar((V69))))){
615          goto T246;}          goto T246;}
616          V70= caar((V69));          V70= caar((V69));
617          goto T239;          goto T239;
618  goto T246;          goto T246;
619  T246:;  T246:;
620          goto T237;          goto T237;
621  goto T239;          goto T239;
622  T239:;  T239:;
623          base[0]= (V70);          base[0]= (V70);
624          base[1]= (V51);          base[1]= (V51);
# Line 632  T239:; Line 632  T239:;
632          goto T237;}          goto T237;}
633          V60= make_cons(car((V71)),(V60));          V60= make_cons(car((V71)),(V60));
634          goto T235;          goto T235;
635  goto T237;          goto T237;
636  T237:;  T237:;
637          V60= make_cons(car((V69)),(V60));          V60= make_cons(car((V69)),(V60));
638  goto T235;          goto T235;
639  T235:;  T235:;
640          if(!(type_of(car((V69)))!=t_cons)){          if(!(type_of(car((V69)))!=t_cons)){
641          goto T260;}          goto T260;}
642          if(type_of(car((V69)))==t_symbol){          if(type_of(car((V69)))==t_symbol){
643          goto T262;}          goto T262;}
644          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
645  goto T262;          goto T262;
646  T262:;  T262:;
647          V61= make_cons(car((V69)),(V61));          V61= make_cons(car((V69)),(V61));
648          goto T258;          goto T258;
649  goto T260;          goto T260;
650  T260:;  T260:;
651          if(type_of(caar((V69)))==t_symbol){          if(type_of(caar((V69)))==t_symbol){
652          goto T267;}          goto T267;}
653          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
654          goto T258;          goto T258;
655  goto T267;          goto T267;
656  T267:;  T267:;
657          if(endp_prop(cdar((V69)))){          if(endp_prop(cdar((V69)))){
658          goto T269;}          goto T269;}
659          if(!(endp_prop(cddar((V69))))){          if(!(endp_prop(cddar((V69))))){
660          goto T270;}          goto T270;}
661  goto T269;          goto T269;
662  T269:;  T269:;
663          V61= make_cons(caar((V69)),(V61));          V61= make_cons(caar((V69)),(V61));
664          goto T258;          goto T258;
665  goto T270;          goto T270;
666  T270:;  T270:;
667          if(type_of(caddar((V69)))==t_symbol){          if(type_of(caddar((V69)))==t_symbol){
668          goto T276;}          goto T276;}
669          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
670          goto T258;          goto T258;
671  goto T276;          goto T276;
672  T276:;  T276:;
673          if(endp_prop(cdddar((V69)))){          if(endp_prop(cdddar((V69)))){
674          goto T279;}          goto T279;}
675          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
676          goto T258;          goto T258;
677  goto T279;          goto T279;
678  T279:;  T279:;
679          V61= make_cons(caar((V69)),(V61));          V61= make_cons(caar((V69)),(V61));
680          V61= make_cons(caddar((V69)),(V61));          V61= make_cons(caddar((V69)),(V61));
681  goto T258;          goto T258;
682  T258:;  T258:;
683          V69= cdr((V69));          V69= cdr((V69));
684          goto T135;}          goto T135;}
685  goto T132;          goto T132;
686  T132:;  T132:;
687          goto T100;          goto T100;
688  goto T128;          goto T128;
689  T128:;  T128:;
690          if(type_of(car((V59)))==t_symbol){          if(type_of(car((V59)))==t_symbol){
691          goto T287;}          goto T287;}
692          (void)((*(LnkLI112))());          (void)((*(LnkLI112))());
693  goto T287;          goto T287;
694  T287:;  T287:;
695          V60= make_cons(car((V59)),(V60));          V60= make_cons(car((V59)),(V60));
696          V61= make_cons(car((V59)),(V61));          V61= make_cons(car((V59)),(V61));
697          V59= cdr((V59));          V59= cdr((V59));
698          goto T103;}          goto T103;}
699  goto T100;          goto T100;
700  T100:;  T100:;
701          V46= car((V46));          V46= car((V46));
702          goto T96;          goto T96;
703  goto T98;          goto T98;
704  T98:;  T98:;
705          V51= make_cons(VV[17],(V51));          V51= make_cons(VV[17],(V51));
706  goto T96;          goto T96;
707  T96:;  T96:;
708          if(((V47))!=Cnil){          if(((V47))!=Cnil){
709          goto T299;}          goto T299;}
710          {object V89 = list(4,VV[3],(V46),(V51),listA(3,VV[18],list(2,VV[11],(V45)),(V50)));          {object V89 = list(4,VV[3],(V46),(V51),listA(3,VV[18],list(2,VV[11],(V45)),(V50)));
711          VMR2(V89)}          VMR2(V89)}
712  goto T299;          goto T299;
713  T299:;  T299:;
714          if(((V47))==(VV[19])){          if(((V47))==(VV[19])){
715          goto T301;}          goto T301;}
# Line 717  T299:; Line 717  T299:;
717          goto T302;}          goto T302;}
718          if(!((car((V47)))==(VV[19]))){          if(!((car((V47)))==(VV[19]))){
719          goto T302;}          goto T302;}
720  goto T301;          goto T301;
721  T301:;  T301:;
722          {object V90 = list(4,VV[3],(V46),(V51),make_cons(VV[19],(V50)));          {object V90 = list(4,VV[3],(V46),(V51),make_cons(VV[19],(V50)));
723          VMR2(V90)}          VMR2(V90)}
724  goto T302;          goto T302;
725  T302:;  T302:;
726          if(!(((V47))==(VV[20]))){          if(!(((V47))==(VV[20]))){
727          goto T309;}          goto T309;}
728          {object V91 = list(4,VV[3],(V46),(V51),make_cons(VV[20],(V50)));          {object V91 = list(4,VV[3],(V46),(V51),make_cons(VV[20],(V50)));
729          VMR2(V91)}          VMR2(V91)}
730  goto T309;          goto T309;
731  T309:;  T309:;
732          {object V92;          {object V92;
733          base[0]= VV[21];          base[0]= VV[21];
# Line 740  T309:; Line 740  T309:;
740          goto T315;}          goto T315;}
741          {object V93 = (V92);          {object V93 = (V92);
742          VMR2(V93)}          VMR2(V93)}
743  goto T315;          goto T315;
744  T315:;  T315:;
745          {object V94 = Cnil;          {object V94 = Cnil;
746          VMR2(V94)}}}          VMR2(V94)}}}
# Line 752  T315:; Line 752  T315:;
752  static object LI3()  static object LI3()
753    
754  {        VMB3 VMS3 VMV3  {        VMB3 VMS3 VMV3
755  goto TTL;          goto TTL;
756  TTL:;  TTL:;
757          base[0]= VV[22];          base[0]= VV[22];
758          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 769  static object LI4(V101,V102,V103,V104,V1 Line 769  static object LI4(V101,V102,V103,V104,V1
769    
770  object V101;object V102;register object V103;object V104;register object V105;  object V101;object V102;register object V103;object V104;register object V105;
771  {        VMB4 VMS4 VMV4  {        VMB4 VMS4 VMV4
772  goto TTL;          goto TTL;
773  TTL:;  TTL:;
774          {object V106;          {object V106;
775          V106= (((V103))==Cnil?Ct:Cnil);          V106= (((V103))==Cnil?Ct:Cnil);
# Line 777  TTL:; Line 777  TTL:;
777          goto T320;}          goto T320;}
778          {object V107 = (V106);          {object V107 = (V106);
779          VMR4(V107)}          VMR4(V107)}
780  goto T320;          goto T320;
781  T320:;  T320:;
782          if(((V103))==(VV[19])){          if(((V103))==(VV[19])){
783          goto T322;}          goto T322;}
# Line 785  T320:; Line 785  T320:;
785          goto T323;}          goto T323;}
786          if(!((car((V103)))==(VV[19]))){          if(!((car((V103)))==(VV[19]))){
787          goto T323;}          goto T323;}
788  goto T322;          goto T322;
789  T322:;  T322:;
790          if(((V104))!=Cnil){          if(((V104))!=Cnil){
791          goto T329;}          goto T329;}
# Line 793  T322:; Line 793  T322:;
793          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
794          Lerror();          Lerror();
795          vs_top=sup;          vs_top=sup;
796  goto T329;          goto T329;
797  T329:;  T329:;
798          V108= list(3,VV[27],VV[28],(V105));          V108= list(3,VV[27],VV[28],(V105));
799          V109= list(3,VV[30],VV[31],(V105));          V109= list(3,VV[30],VV[31],(V105));
800          {object V110 = list(4,VV[3],(V102),VV[24],list(4,VV[25],VV[26],/* INLINE-ARGS */V108,list(3,VV[29],/* INLINE-ARGS */V109,list(2,VV[11],(V101)))));          {object V110 = list(4,VV[3],(V102),VV[24],list(4,VV[25],VV[26],/* INLINE-ARGS */V108,list(3,VV[29],/* INLINE-ARGS */V109,list(2,VV[11],(V101)))));
801          VMR4(V110)}          VMR4(V110)}
802  goto T323;          goto T323;
803  T323:;  T323:;
804          if(!(((V103))==(VV[20]))){          if(!(((V103))==(VV[20]))){
805          goto T334;}          goto T334;}
# Line 809  T323:; Line 809  T323:;
809          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
810          Lerror();          Lerror();
811          vs_top=sup;          vs_top=sup;
812  goto T336;          goto T336;
813  T336:;  T336:;
814          if(!(number_compare((V105),small_fixnum(0))==0)){          if(!(number_compare((V105),small_fixnum(0))==0)){
815          goto T341;}          goto T341;}
816          {object V111 = list(4,VV[3],(V102),VV[33],list(3,VV[25],VV[34],list(3,VV[29],VV[35],list(2,VV[11],(V101)))));          {object V111 = list(4,VV[3],(V102),VV[33],list(3,VV[25],VV[34],list(3,VV[29],VV[35],list(2,VV[11],(V101)))));
817          VMR4(V111)}          VMR4(V111)}
818  goto T341;          goto T341;
819  T341:;  T341:;
820          V112= list(2,list(3,VV[38],(V105),VV[39]),VV[40]);          V112= list(2,list(3,VV[38],(V105),VV[39]),VV[40]);
821          {object V113 = list(4,VV[3],(V102),VV[36],listA(4,VV[37],/* INLINE-ARGS */V112,list(2,VV[41],list(3,VV[25],VV[42],list(3,VV[29],VV[43],list(2,VV[11],(V101))))),VV[44]));          {object V113 = list(4,VV[3],(V102),VV[36],listA(4,VV[37],/* INLINE-ARGS */V112,list(2,VV[41],list(3,VV[25],VV[42],list(3,VV[29],VV[43],list(2,VV[11],(V101))))),VV[44]));
822          VMR4(V113)}          VMR4(V113)}
823  goto T334;          goto T334;
824  T334:;  T334:;
825          {object V114;          {object V114;
826          base[0]= VV[45];          base[0]= VV[45];
# Line 832  T334:; Line 832  T334:;
832          goto T346;}          goto T346;}
833          {object V115 = (V114);          {object V115 = (V114);
834          VMR4(V115)}          VMR4(V115)}
835  goto T346;          goto T346;
836  T346:;  T346:;
837          {object V116 = Cnil;          {object V116 = Cnil;
838          VMR4(V116)}}}          VMR4(V116)}}}
# Line 845  static object LI5(V119,V120) Line 845  static object LI5(V119,V120)
845    
846  register object V119;object V120;  register object V119;object V120;
847  {        VMB5 VMS5 VMV5  {        VMB5 VMS5 VMV5
848  goto TTL;          goto TTL;
849  TTL:;  TTL:;
850          {object V121;          {object V121;
851          object V122;          object V122;
# Line 859  TTL:; Line 859  TTL:;
859          goto T350;}          goto T350;}
860          V121= (V119);          V121= (V119);
861          goto T348;          goto T348;
862  goto T350;          goto T350;
863  T350:;  T350:;
864          if(!(endp_prop(cdr((V119))))){          if(!(endp_prop(cdr((V119))))){
865          goto T354;}          goto T354;}
866          V121= car((V119));          V121= car((V119));
867          goto T348;          goto T348;
868  goto T354;          goto T354;
869  T354:;  T354:;
870          V121= car((V119));          V121= car((V119));
871          V122= cadr((V119));          V122= cadr((V119));
# Line 875  T354:; Line 875  T354:;
875          V125= cddr((V119));          V125= cddr((V119));
876          V126= Cnil;          V126= Cnil;
877          V127= Cnil;          V127= Cnil;
878  goto T363;          goto T363;
879  T363:;  T363:;
880          if(!(endp_prop((V125)))){          if(!(endp_prop((V125)))){
881          goto T364;}          goto T364;}
882          goto T348;          goto T348;
883  goto T364;          goto T364;
884  T364:;  T364:;
885          V126= car((V125));          V126= car((V125));
886          if(!(endp_prop(cdr((V125))))){          if(!(endp_prop(cdr((V125))))){
# Line 890  T364:; Line 890  T364:;
890          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
891          Lerror();          Lerror();
892          vs_top=sup;          vs_top=sup;
893  goto T370;          goto T370;
894  T370:;  T370:;
895          V127= cadr((V125));          V127= cadr((V125));
896          {object V128= (V126);          {object V128= (V126);
897          if((V128!= VV[75]))goto T378;          if((V128!= VV[75]))goto T378;
898          V123= (V127);          V123= (V127);
899          goto T377;          goto T377;
900  goto T378;          goto T378;
901  T378:;  T378:;
902          if((V128!= VV[114]))goto T380;          if((V128!= VV[114]))goto T380;
903          V124= (V127);          V124= (V127);
904          goto T377;          goto T377;
905  goto T380;          goto T380;
906  T380:;  T380:;
907          base[0]= VV[47];          base[0]= VV[47];
908          base[1]= (V125);          base[1]= (V125);
909          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
910          Lerror();          Lerror();
911          vs_top=sup;}          vs_top=sup;}
912  goto T377;          goto T377;
913  T377:;  T377:;
914          V125= cddr((V125));          V125= cddr((V125));
915          goto T363;}          goto T363;}
916  goto T348;          goto T348;
917  T348:;  T348:;
918          {object V129 = list(5,(V121),(V122),(V123),(V124),(V120));          {object V129 = list(5,(V121),(V122),(V123),(V124),(V120));
919          VMR5(V129)}}          VMR5(V129)}}
# Line 926  static object LI6(V132,V133) Line 926  static object LI6(V132,V133)
926    
927  object V132;register object V133;  object V132;register object V133;
928  {        VMB6 VMS6 VMV6  {        VMB6 VMS6 VMV6
929  goto TTL;          goto TTL;
930  TTL:;  TTL:;
931          if(((V133))!=Cnil){          if(((V133))!=Cnil){
932          goto T388;}          goto T388;}
933          {object V134 = Cnil;          {object V134 = Cnil;
934          VMR6(V134)}          VMR6(V134)}
935  goto T388;          goto T388;
936  T388:;  T388:;
937          {register object V135;          {register object V135;
938          base[0]= caar((V133));          base[0]= caar((V133));
# Line 954  T388:; Line 954  T388:;
954          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
955          Lerror();          Lerror();
956          vs_top=sup;          vs_top=sup;
957  goto T398;          goto T398;
958  T398:;  T398:;
959          {object V136;          {object V136;
960          object V137;          object V137;
# Line 967  T398:; Line 967  T398:;
967          if(V139==Cnil)goto T413;          if(V139==Cnil)goto T413;
968          V138= V139;          V138= V139;
969          goto T412;          goto T412;
970  goto T413;          goto T413;
971  T413:;}  T413:;}
972          V138= Ct;          V138= Ct;
973  goto T412;          goto T412;
974  T412:;  T412:;
975          V140= (*(LnkLI117))(V138);{object V142;          V140= (*(LnkLI117))(V138);{object V142;
976          V142= caddr(car((V133)));          V142= caddr(car((V133)));
977          if(V142==Cnil)goto T416;          if(V142==Cnil)goto T416;
978          V141= V142;          V141= V142;
979          goto T415;          goto T415;
980  goto T416;          goto T416;
981  T416:;}  T416:;}
982          V141= Ct;          V141= Ct;
983  goto T415;          goto T415;
984  T415:;  T415:;
985          V143= (*(LnkLI117))(V141);          V143= (*(LnkLI117))(V141);
986          if(equal(/* INLINE-ARGS */V140,/* INLINE-ARGS */V143)){          if(equal(/* INLINE-ARGS */V140,/* INLINE-ARGS */V143)){
# Line 990  T415:; Line 990  T415:;
990          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
991          Lerror();          Lerror();
992          vs_top=sup;          vs_top=sup;
993  goto T409;          goto T409;
994  T409:;  T409:;
995          V144= list(5,caar((V135)),cadar((V135)),caddar((V135)),cadddr(car((V135))),car(cddddr(car((V133)))));          V144= list(5,caar((V135)),cadar((V135)),caddar((V135)),cadddr(car((V135))),car(cddddr(car((V133)))));
996          V145= (*(LnkLI118))((V132),cdr((V133)));          V145= (*(LnkLI118))((V132),cdr((V133)));
997          {object V146 = make_cons(/* INLINE-ARGS */V144,/* INLINE-ARGS */V145);          {object V146 = make_cons(/* INLINE-ARGS */V144,/* INLINE-ARGS */V145);
998          VMR6(V146)}          VMR6(V146)}
999  goto T396;          goto T396;
1000  T396:;  T396:;
1001          V147= car((V133));          V147= car((V133));
1002          V148= (*(LnkLI118))((V132),cdr((V133)));          V148= (*(LnkLI118))((V132),cdr((V133)));
# Line 1011  static object LI7(V153,V154,V155) Line 1011  static object LI7(V153,V154,V155)
1011    
1012  object V153;object V154;object V155;  object V153;object V154;object V155;
1013  {        VMB7 VMS7 VMV7  {        VMB7 VMS7 VMV7
1014  goto TTL;          goto TTL;
1015  TTL:;  TTL:;
1016          {object V156;          {object V156;
1017          V156= Cnil;          V156= Cnil;
# Line 1030  TTL:; Line 1030  TTL:;
1030          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
1031          Lerror();          Lerror();
1032          vs_top=sup;          vs_top=sup;
1033  goto T426;          goto T426;
1034  T426:;  T426:;
1035          V159= structure_ref((V158),VV[53],2);          V159= structure_ref((V158),VV[53],2);
1036          {object V160;          {object V160;
# Line 1038  T426:; Line 1038  T426:;
1038          V162 = make_fixnum((long)length((V159)));          V162 = make_fixnum((long)length((V159)));
1039          V160= (number_compare((V153),V162)<=0?((V153)):V162);          V160= (number_compare((V153),V162)<=0?((V153)):V162);
1040          V161= small_fixnum(0);          V161= small_fixnum(0);
1041  goto T434;          goto T434;
1042  T434:;  T434:;
1043          if(!(number_compare((V161),(V160))>=0)){          if(!(number_compare((V161),(V160))>=0)){
1044          goto T435;}          goto T435;}
1045          goto T422;          goto T422;
1046  goto T435;          goto T435;
1047  T435:;  T435:;
1048          V163= aref1((V159),fixint((V161)));          V163= aref1((V159),fixint((V161)));
1049          (void)(aset1((V157),fixint((V161)),/* INLINE-ARGS */V163));          (void)(aset1((V157),fixint((V161)),/* INLINE-ARGS */V163));
1050          V161= one_plus((V161));          V161= one_plus((V161));
1051          goto T434;}}          goto T434;}}
1052  goto T422;          goto T422;
1053  T422:;  T422:;
1054          {register object V164;          {register object V164;
1055          register object V165;          register object V165;
1056          V164= (V155);          V164= (V155);
1057          V165= car((V164));          V165= car((V164));
1058  goto T447;          goto T447;
1059  T447:;  T447:;
1060          if(!(endp_prop((V164)))){          if(!(endp_prop((V164)))){
1061          goto T448;}          goto T448;}
1062          goto T443;          goto T443;
1063  goto T448;          goto T448;
1064  T448:;  T448:;
1065          V156= car(cddddr((V165)));          V156= car(cddddr((V165)));
1066          {register object V166;          {register object V166;
# Line 1078  T448:; Line 1078  T448:;
1078          vs_top=sup;          vs_top=sup;
1079          V168= vs_base[0];          V168= vs_base[0];
1080          (void)(aset1((V157),fixint((V156)),V168));}          (void)(aset1((V157),fixint((V156)),V168));}
1081  goto T454;          goto T454;
1082  T454:;  T454:;
1083          V164= cdr((V164));          V164= cdr((V164));
1084          V165= car((V164));          V165= car((V164));
1085          goto T447;}          goto T447;}
1086  goto T443;          goto T443;
1087  T443:;  T443:;
1088          V169 = make_fixnum((long)length(symbol_value(VV[56])));          V169 = make_fixnum((long)length(symbol_value(VV[56])));
1089          if(!(number_compare((V153),V169)<0)){          if(!(number_compare((V153),V169)<0)){
1090          goto T468;}          goto T468;}
1091          {register object V171;          {register object V171;
1092          V171= small_fixnum(0);          V171= small_fixnum(0);
1093  goto T473;          goto T473;
1094  T473:;  T473:;
1095          if(!(number_compare((V171),V153)>=0)){          if(!(number_compare((V171),V153)>=0)){
1096          goto T474;}          goto T474;}
1097          goto T470;          goto T470;
1098  goto T474;          goto T474;
1099  T474:;  T474:;
1100          {long V172= fix(aref1((V157),fixint((V171))));          {long V172= fix(aref1((V157),fixint((V171))));
1101          if((/* INLINE-ARGS */V172)==(0)){          if((/* INLINE-ARGS */V172)==(0)){
1102          goto T478;}}          goto T478;}}
1103          {object V173 = (V157);          {object V173 = (V157);
1104          VMR7(V173)}          VMR7(V173)}
1105  goto T478;          goto T478;
1106  T478:;  T478:;
1107          V171= one_plus((V171));          V171= one_plus((V171));
1108          goto T473;}          goto T473;}
1109  goto T470;          goto T470;
1110  T470:;  T470:;
1111          {object V174 = symbol_value(VV[56]);          {object V174 = symbol_value(VV[56]);
1112          VMR7(V174)}          VMR7(V174)}
1113  goto T468;          goto T468;
1114  T468:;  T468:;
1115          {object V175 = (V157);          {object V175 = (V157);
1116          VMR7(V175)}}}          VMR7(V175)}}}
# Line 1123  static object LI8(V178,V179) Line 1123  static object LI8(V178,V179)
1123    
1124  long V178;long V179;  long V178;long V179;
1125  {        VMB8 VMS8 VMV8  {        VMB8 VMS8 VMV8
1126  goto TTL;          goto TTL;
1127  TTL:;  TTL:;
1128          base[0]= make_fixnum(V178);          base[0]= make_fixnum(V178);
1129          base[1]= make_fixnum(V179);          base[1]= make_fixnum(V179);
# Line 1141  static object LI9(V184,V185,V186) Line 1141  static object LI9(V184,V185,V186)
1141    
1142  object V184;object V185;object V186;  object V184;object V185;object V186;
1143  {        VMB9 VMS9 VMV9  {        VMB9 VMS9 VMV9
1144  goto TTL;          goto TTL;
1145  TTL:;  TTL:;
1146          {register object V187;          {register object V187;
1147          object V188;          object V188;
# Line 1153  TTL:; Line 1153  TTL:;
1153          register object V191;          register object V191;
1154          V190= (V186);          V190= (V186);
1155          V191= car((V190));          V191= car((V190));
1156  goto T496;          goto T496;
1157  T496:;  T496:;
1158          if(!(endp_prop((V190)))){          if(!(endp_prop((V190)))){
1159          goto T497;}          goto T497;}
1160          goto T492;          goto T492;
1161  goto T497;          goto T497;
1162  T497:;  T497:;
1163          if(((V191))==Cnil){          if(((V191))==Cnil){
1164          goto T501;}          goto T501;}
# Line 1190  T497:; Line 1190  T497:;
1190          Lsymbol_value();          Lsymbol_value();
1191          vs_top=sup;          vs_top=sup;
1192          V194= vs_base[0];          V194= vs_base[0];
1193  goto T516;          goto T516;
1194  T516:;  T516:;
1195          base[1]= (V194);          base[1]= (V194);
1196          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
# Line 1199  T516:; Line 1199  T516:;
1199          if((vs_base[0])!=Cnil){          if((vs_base[0])!=Cnil){
1200          goto T524;}          goto T524;}
1201          goto T510;          goto T510;
1202  goto T524;          goto T524;
1203  T524:;  T524:;
1204          {object V196;          {object V196;
1205          V196= (*(LnkLI123))((V194),(V187));          V196= (*(LnkLI123))((V194),(V187));
1206          if(type_of(cdr(V191))!=t_cons)FEwrong_type_argument(Scons,cdr(V191));          if(type_of(cdr(V191))!=t_cons)FEwrong_type_argument(Scons,cdr(V191));
1207          (cdr(V191))->c.c_car = (V196);          (cdr(V191))->c.c_car = (V196);
1208          (void)(cdr(V191));}}          (void)(cdr(V191));}}
1209  goto T510;          goto T510;
1210  T510:;  T510:;
1211          {register object x= (V187),V197= VV[58];          {register object x= (V187),V197= VV[58];
1212          while(!endp(V197))          while(!endp(V197))
# Line 1214  T510:; Line 1214  T510:;
1214          goto T530;          goto T530;
1215          }else V197=V197->c.c_cdr;          }else V197=V197->c.c_cdr;
1216          goto T501;}          goto T501;}
1217  goto T530;          goto T530;
1218  T530:;  T530:;
1219          V188= Ct;          V188= Ct;
1220  goto T501;          goto T501;
1221  T501:;  T501:;
1222          V190= cdr((V190));          V190= cdr((V190));
1223          V191= car((V190));          V191= car((V190));
1224          goto T496;}          goto T496;}
1225  goto T492;          goto T492;
1226  T492:;  T492:;
1227          {object V198;          {object V198;
1228          if(((V188))==Cnil){          if(((V188))==Cnil){
1229          goto T538;}          goto T538;}
1230          V198= Cnil;          V198= Cnil;
1231          goto T537;          goto T537;
1232  goto T538;          goto T538;
1233  T538:;  T538:;
1234          V199 = make_fixnum((long)length(symbol_value(VV[57])));          V199 = make_fixnum((long)length(symbol_value(VV[57])));
1235          if(number_compare((V184),V199)<0){          if(number_compare((V184),V199)<0){
1236          goto T540;}          goto T540;}
1237          V198= Cnil;          V198= Cnil;
1238          goto T537;          goto T537;
1239  goto T540;          goto T540;
1240  T540:;{object V200;  T540:;{object V200;
1241          V200= symbol_value(VV[57]);          V200= symbol_value(VV[57]);
1242          base[0]= Ct;          base[0]= Ct;
# Line 1245  T540:;{object V200; Line 1245  T540:;{object V200;
1245          vs_top=sup;          vs_top=sup;
1246          V201= vs_base[0];          V201= vs_base[0];
1247          V198= list(3,V200,number_times((V184),V201),Cnil);}          V198= list(3,V200,number_times((V184),V201),Cnil);}
1248  goto T537;          goto T537;
1249  T537:;  T537:;
1250          if(((V198))==Cnil){          if(((V198))==Cnil){
1251          goto T545;}          goto T545;}
1252          {object V202 = (V198);          {object V202 = (V198);
1253          VMR9(V202)}          VMR9(V202)}
1254  goto T545;          goto T545;
1255  T545:;  T545:;
1256          {object V203;          {object V203;
1257          register long V204;          register long V204;
# Line 1269  T545:; Line 1269  T545:;
1269          register object V210;          register object V210;
1270          V209= (V186);          V209= (V186);
1271          V210= car((V209));          V210= car((V209));
1272  goto T556;          goto T556;
1273  T556:;  T556:;
1274          if(!(endp_prop((V209)))){          if(!(endp_prop((V209)))){
1275          goto T557;}          goto T557;}
1276          goto T552;          goto T552;
1277  goto T557;          goto T557;
1278  T557:;  T557:;
1279          V207= caddr((V210));          V207= caddr((V210));
1280          base[1]= (V207);          base[1]= (V207);
# Line 1291  T557:; Line 1291  T557:;
1291          (void)(cddr(V210));          (void)(cddr(V210));
1292          V206= fix(symbol_value(VV[55]));          V206= fix(symbol_value(VV[55]));
1293          V210= nconc((V210),VV[60]);          V210= nconc((V210),VV[60]);
1294  goto T566;          goto T566;
1295  T566:;  T566:;
1296          V208= (long)(*(LnkLI125))(V204,V206);          V208= (long)(*(LnkLI125))(V204,V206);
1297          if(!((V204)==(V208))){          if(!((V204)==(V208))){
1298          goto T579;}          goto T579;}
1299          goto T578;          goto T578;
1300  goto T579;          goto T579;
1301  T579:;  T579:;
1302          V189= Ct;          V189= Ct;
1303  goto T578;          goto T578;
1304  T578:;  T578:;
1305          V204= V208;          V204= V208;
1306          V214 = make_fixnum(V204);          V214 = make_fixnum(V204);
# Line 1316  T578:; Line 1316  T578:;
1316          V209= cdr((V209));          V209= cdr((V209));
1317          V210= car((V209));          V210= car((V209));
1318          goto T556;}          goto T556;}
1319  goto T552;          goto T552;
1320  T552:;  T552:;
1321          base[0]= Ct;          base[0]= Ct;
1322          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
# Line 1373  static object LI10(object V232,object V2 Line 1373  static object LI10(object V232,object V2
1373          else {          else {
1374          V246= va_arg(ap,object);}          V246= va_arg(ap,object);}
1375          --narg; goto T600;          --narg; goto T600;
1376  goto T598;          goto T598;
1377  T598:;  T598:;
1378          V245= Cnil;          V245= Cnil;
1379  goto T599;          goto T599;
1380  T599:;  T599:;
1381          V246= Cnil;          V246= Cnil;
1382  goto T600;          goto T600;
1383  T600:;  T600:;
1384          {object V247;          {object V247;
1385          object V248;          object V248;
# Line 1388  T600:; Line 1388  T600:;
1388          if(type_of((V235))==t_cons){          if(type_of((V235))==t_cons){
1389          goto T606;}          goto T606;}
1390          goto T605;          goto T605;
1391  goto T606;          goto T606;
1392  T606:;  T606:;
1393          if((car((V235)))==(VV[19])){          if((car((V235)))==(VV[19])){
1394          goto T608;}          goto T608;}
1395          goto T605;          goto T605;
1396  goto T608;          goto T608;
1397  T608:;  T608:;
1398          V235= VV[19];          V235= VV[19];
1399  goto T605;          goto T605;
1400  T605:;  T605:;
1401          V248= make_fixnum((long)length((V237)));          V248= make_fixnum((long)length((V237)));
1402          {register object V249;          {register object V249;
1403          register object V250;          register object V250;
1404          V249= (V237);          V249= (V237);
1405          V250= car((V249));          V250= car((V249));
1406  goto T617;          goto T617;
1407  T617:;  T617:;
1408          if(!(endp_prop((V249)))){          if(!(endp_prop((V249)))){
1409          goto T618;}          goto T618;}
1410          goto T613;          goto T613;
1411  goto T618;          goto T618;
1412  T618:;  T618:;
1413          if((V250)==Cnil){          if((V250)==Cnil){
1414          goto T622;}          goto T622;}
1415          if((car((V250)))!=Cnil){          if((car((V250)))!=Cnil){
1416          goto T623;}          goto T623;}
1417          goto T622;          goto T622;
1418  goto T623;          goto T623;
1419  T623:;  T623:;
1420          base[1]= (Vcs[0]->c.c_car);          base[1]= (Vcs[0]->c.c_car);
1421          base[2]= (V233);          base[2]= (V233);
# Line 1432  T623:; Line 1432  T623:;
1432          vs_base=base+1;}          vs_base=base+1;}
1433          (void) (*Lnk126)();          (void) (*Lnk126)();
1434          vs_top=sup;          vs_top=sup;
1435  goto T622;          goto T622;
1436  T622:;  T622:;
1437          V249= cdr((V249));          V249= cdr((V249));
1438          V250= car((V249));          V250= car((V249));
1439          goto T617;}          goto T617;}
1440  goto T613;          goto T613;
1441  T613:;  T613:;
1442          if(((V238))==Cnil){          if(((V238))==Cnil){
1443          goto T638;}          goto T638;}
# Line 1448  T613:; Line 1448  T613:;
1448          if((V252!= Cnil))goto T645;          if((V252!= Cnil))goto T645;
1449          base[1]= symbol_function(VV[127]);          base[1]= symbol_function(VV[127]);
1450          goto T644;          goto T644;
1451  goto T645;          goto T645;
1452  T645:;  T645:;
1453          if((V252!= VV[20]))goto T646;          if((V252!= VV[20]))goto T646;
1454          base[1]= symbol_function(VV[128]);          base[1]= symbol_function(VV[128]);
1455          goto T644;          goto T644;
1456  goto T646;          goto T646;
1457  T646:;  T646:;
1458          if((V252!= VV[19]))goto T647;          if((V252!= VV[19]))goto T647;
1459          base[1]= symbol_function(VV[129]);          base[1]= symbol_function(VV[129]);
1460          goto T644;          goto T644;
1461  goto T647;          goto T647;
1462  T647:;  T647:;
1463          FEerror("The ECASE key value ~s is illegal.",1,V252);          FEerror("The ECASE key value ~s is illegal.",1,V252);
1464          base[1]= Cnil;          base[1]= Cnil;
1465          goto T644;}          goto T644;}
1466  goto T644;          goto T644;
1467  T644:;  T644:;
1468          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
1469          siLfset();          siLfset();
1470          vs_top=sup;          vs_top=sup;
1471  goto T638;          goto T638;
1472  T638:;  T638:;
1473          if(((V235))!=Cnil){          if(((V235))!=Cnil){
1474          goto T650;}          goto T650;}
# Line 1490  T638:; Line 1490  T638:;
1490          vs_top=sup;          vs_top=sup;
1491          V247= vs_base[0];          V247= vs_base[0];
1492          goto T648;          goto T648;
1493  goto T650;          goto T650;
1494  T650:;  T650:;
1495          {object V255;          {object V255;
1496          object V256;          object V256;
# Line 1500  T650:; Line 1500  T650:;
1500          V258= Cnil;          V258= Cnil;
1501          goto T662;}          goto T662;}
1502          V258= get((V240),VV[53],Cnil);          V258= get((V240),VV[53],Cnil);
1503  goto T662;          goto T662;
1504  T662:;  T662:;
1505          V255= Cnil;          V255= Cnil;
1506          V256= small_fixnum(0);          V256= small_fixnum(0);
# Line 1518  T662:; Line 1518  T662:;
1518          V260= structure_ref((V259),VV[53],4);          V260= structure_ref((V259),VV[53],4);
1519          if((/* INLINE-ARGS */V260)==((V258))){          if((/* INLINE-ARGS */V260)==((V258))){
1520          goto T666;}}          goto T666;}}
1521  goto T672;          goto T672;
1522  T672:;  T672:;
1523  goto T667;          goto T667;
1524  T667:;  T667:;
1525          (void)((VFUN_NARGS=2,(*(LnkLI132))(VV[62],(V240))));          (void)((VFUN_NARGS=2,(*(LnkLI132))(VV[62],(V240))));
1526  goto T666;          goto T666;
1527  T666:;  T666:;
1528          {object V261;          {object V261;
1529          object V263;          object V263;
# Line 1535  T666:; Line 1535  T666:;
1535          vs_top=sup;          vs_top=sup;
1536          V263= vs_base[0];          V263= vs_base[0];
1537          (void)(structure_set(V258,VV[53],3,(V263)));}          (void)(structure_set(V258,VV[53],3,(V263)));}
1538  goto T663;          goto T663;
1539  T663:;  T663:;
1540          if(((V235))!=Cnil){          if(((V235))!=Cnil){
1541          goto T678;}          goto T678;}
# Line 1543  T663:; Line 1543  T663:;
1543          V256= cadr((V255));          V256= cadr((V255));
1544          V257= caddr((V255));          V257= caddr((V255));
1545          V255= car((V255));          V255= car((V255));
1546  goto T678;          goto T678;
1547  T678:;  T678:;
1548          if(((V235))==Cnil){          if(((V235))==Cnil){
1549          goto T690;}          goto T690;}
1550          V264= Cnil;          V264= Cnil;
1551          goto T689;          goto T689;
1552  goto T690;          goto T690;
1553  T690:;  T690:;
1554          V264= (*(LnkLI130))((V248),(V240),(V237));          V264= (*(LnkLI130))((V248),(V240),(V237));
1555  goto T689;          goto T689;
1556  T689:;  T689:;
1557          V247= (VFUN_NARGS=32,(*(LnkLI134))(VV[63],(Vcs[0]->c.c_car),VV[64],(V248),VV[65],V264,VV[66],(V255),VV[67],(V256),VV[68],(V257),VV[69],(V239),VV[70],(V258),VV[71],(V241),VV[72],(V237),VV[73],(V242),VV[74],(V243),VV[75],(V235),VV[76],(V236),VV[77],(V245),VV[78],(V233)));}          V247= (VFUN_NARGS=32,(*(LnkLI134))(VV[63],(Vcs[0]->c.c_car),VV[64],(V248),VV[65],V264,VV[66],(V255),VV[67],(V256),VV[68],(V257),VV[69],(V239),VV[70],(V258),VV[71],(V241),VV[72],(V237),VV[73],(V242),VV[74],(V243),VV[75],(V235),VV[76],(V236),VV[77],(V245),VV[78],(V233)));}
1558  goto T648;          goto T648;
1559  T648:;  T648:;
1560          {object V265;          {object V265;
1561          V265= get((Vcs[0]->c.c_car),VV[53],Cnil);          V265= get((Vcs[0]->c.c_car),VV[53],Cnil);
# Line 1564  T648:; Line 1564  T648:;
1564          if(((V265))==Cnil){          if(((V265))==Cnil){
1565          goto T698;}          goto T698;}
1566          (void)((VFUN_NARGS=1,(*(LnkLI132))(VV[79])));          (void)((VFUN_NARGS=1,(*(LnkLI132))(VV[79])));
1567  goto T698;          goto T698;
1568  T698:;  T698:;
1569          if((V265)!=Cnil){          if((V265)!=Cnil){
1570          goto T694;}          goto T694;}
1571          (void)(sputprop((Vcs[0]->c.c_car),VV[53],(V247)));          (void)(sputprop((Vcs[0]->c.c_car),VV[53],(V247)));
1572          goto T694;          goto T694;
1573  goto T696;          goto T696;
1574  T696:;  T696:;
1575          if(((V265))==Cnil){          if(((V265))==Cnil){
1576          goto T702;}          goto T702;}
1577          (void)((*(LnkLI135))((V265),(V247),(Vcs[0]->c.c_car)));          (void)((*(LnkLI135))((V265),(V247),(Vcs[0]->c.c_car)));
1578          goto T694;          goto T694;
1579  goto T702;          goto T702;
1580  T702:;  T702:;
1581          (void)(sputprop((Vcs[0]->c.c_car),VV[53],(V247)));          (void)(sputprop((Vcs[0]->c.c_car),VV[53],(V247)));
1582  goto T694;          goto T694;
1583  T694:;  T694:;
1584          if(((V245))==Cnil){          if(((V245))==Cnil){
1585          goto T704;}          goto T704;}
1586          (void)(sputprop((Vcs[0]->c.c_car),VV[80],(V245)));          (void)(sputprop((Vcs[0]->c.c_car),VV[80],(V245)));
1587  goto T704;          goto T704;
1588  T704:;  T704:;
1589          if(((V235))!=Cnil){          if(((V235))!=Cnil){
1590          goto T692;}          goto T692;}
# Line 1605  T704:; Line 1605  T704:;
1605          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
1606          siLfset();          siLfset();
1607          vs_top=sup;          vs_top=sup;
1608  goto T716;          goto T716;
1609  T716:;  T716:;
1610          (void)(sputprop((V244),VV[82],VV[83]));          (void)(sputprop((V244),VV[82],VV[83]));
1611          (void)(sputprop((V244),VV[84],(Vcs[0]->c.c_car)));}          (void)(sputprop((V244),VV[84],(Vcs[0]->c.c_car)));}
1612  goto T692;          goto T692;
1613  T692:;  T692:;
1614          {object V266 = Cnil;          {object V266 = Cnil;
1615          VMR10(V266)}}          VMR10(V266)}}
# Line 1672  static void L11() Line 1672  static void L11()
1672          goto T720;}          goto T720;}
1673          V269= cdr(base[2]);          V269= cdr(base[2]);
1674          base[2]= car(base[2]);          base[2]= car(base[2]);
1675  goto T720;          goto T720;
1676  T720:;  T720:;
1677          base[4]= coerce_to_string(base[2]);          base[4]= coerce_to_string(base[2]);
1678          base[5]= VV[85];          base[5]= VV[85];
# Line 1716  T720:; Line 1716  T720:;
1716          V287= (V269);          V287= (V269);
1717          V288= Cnil;          V288= Cnil;
1718          V289= Cnil;          V289= Cnil;
1719  goto T747;          goto T747;
1720  T747:;  T747:;
1721          if(!(endp_prop((V287)))){          if(!(endp_prop((V287)))){
1722          goto T748;}          goto T748;}
1723          goto T745;          goto T745;
1724  goto T748;          goto T748;
1725  T748:;  T748:;
1726          if(!(type_of(car((V287)))==t_cons)){          if(!(type_of(car((V287)))==t_cons)){
1727          goto T754;}          goto T754;}
# Line 1736  T748:; Line 1736  T748:;
1736          V270= VV[89];          V270= VV[89];
1737          V286= Ct;          V286= Ct;
1738          goto T752;          goto T752;
1739  goto T764;          goto T764;
1740  T764:;  T764:;
1741          V270= (V289);          V270= (V289);
1742          goto T752;          goto T752;
1743  goto T762;          goto T762;
1744  T762:;  T762:;
1745          if((V290!= VV[136]))goto T770;          if((V290!= VV[136]))goto T770;
1746          if(((V289))!=Cnil){          if(((V289))!=Cnil){
1747          goto T772;}          goto T772;}
1748          V273= Ct;          V273= Ct;
1749          goto T752;          goto T752;
1750  goto T772;          goto T772;
1751  T772:;  T772:;
1752          if(!(endp_prop(cddar((V287))))){          if(!(endp_prop(cddar((V287))))){
1753          goto T776;}          goto T776;}
1754          V271= make_cons((V289),(V271));          V271= make_cons((V289),(V271));
1755          goto T752;          goto T752;
1756  goto T776;          goto T776;
1757  T776:;  T776:;
1758          V271= make_cons(cdar((V287)),(V271));          V271= make_cons(cdar((V287)),(V271));
1759          goto T752;          goto T752;
1760  goto T770;          goto T770;
1761  T770:;  T770:;
1762          if((V290!= VV[137]))goto T780;          if((V290!= VV[137]))goto T780;
1763          V274= (V289);          V274= (V289);
1764          goto T752;          goto T752;
1765  goto T780;          goto T780;
1766  T780:;  T780:;
1767          if((V290!= VV[52]))goto T782;          if((V290!= VV[52]))goto T782;
1768          V285= (V289);          V285= (V289);
1769          goto T752;          goto T752;
1770  goto T782;          goto T782;
1771  T782:;  T782:;
1772          if((V290!= VV[138]))goto T784;          if((V290!= VV[138]))goto T784;
1773          V275= (V289);          V275= (V289);
1774          V276= Ct;          V276= Ct;
1775          goto T752;          goto T752;
1776  goto T784;          goto T784;
1777  T784:;  T784:;
1778          if((V290!= VV[139]))goto T788;          if((V290!= VV[139]))goto T788;
1779          V277= cdar((V287));          V277= cdar((V287));
# Line 1785  T784:; Line 1785  T784:;
1785          Lerror();          Lerror();
1786          vs_top=sup;          vs_top=sup;
1787          goto T752;          goto T752;
1788  goto T788;          goto T788;
1789  T788:;  T788:;
1790          if((V290!= VV[71]))goto T795;          if((V290!= VV[71]))goto T795;
1791          if(type_of((V289))==t_cons){          if(type_of((V289))==t_cons){
1792          goto T797;}          goto T797;}
1793          goto T796;          goto T796;
1794  goto T797;          goto T797;
1795  T797:;  T797:;
1796          if((car((V289)))==(VV[91])){          if((car((V289)))==(VV[91])){
1797          goto T799;}          goto T799;}
1798          goto T796;          goto T796;
1799  goto T799;          goto T799;
1800  T799:;  T799:;
1801          V289= cadr((V289));          V289= cadr((V289));
1802  goto T796;          goto T796;
1803  T796:;  T796:;
1804          V278= (V289);          V278= (V289);
1805          goto T752;          goto T752;
1806  goto T795;          goto T795;
1807  T795:;  T795:;
1808          if((V290!= VV[75]))goto T803;          if((V290!= VV[75]))goto T803;
1809          V279= (V289);          V279= (V289);
1810          goto T752;          goto T752;
1811  goto T803;          goto T803;
1812  T803:;  T803:;
1813          if((V290!= VV[140]))goto T805;          if((V290!= VV[140]))goto T805;
1814          V281= (V289);          V281= (V289);
1815          goto T752;          goto T752;
1816  goto T805;          goto T805;
1817  T805:;  T805:;
1818          base[4]= VV[92];          base[4]= VV[92];
1819          base[5]= (V288);          base[5]= (V288);
# Line 1821  T805:; Line 1821  T805:;
1821          Lerror();          Lerror();
1822          vs_top=sup;          vs_top=sup;
1823          goto T752;}          goto T752;}
1824  goto T754;          goto T754;
1825  T754:;  T754:;
1826          if(!(type_of(car((V287)))==t_cons)){          if(!(type_of(car((V287)))==t_cons)){
1827          goto T811;}          goto T811;}
1828          V288= caar((V287));          V288= caar((V287));
1829          goto T809;          goto T809;
1830  goto T811;          goto T811;
1831  T811:;  T811:;
1832          V288= car((V287));          V288= car((V287));
1833  goto T809;          goto T809;
1834  T809:;  T809:;
1835          {object V291= (V288);          {object V291= (V288);
1836          if((V291!= VV[136]))goto T815;          if((V291!= VV[136]))goto T815;
1837          V271= make_cons((V272),(V271));          V271= make_cons((V272),(V271));
1838          goto T752;          goto T752;
1839  goto T815;          goto T815;
1840  T815:;  T815:;
1841          if((V291!= VV[137])          if((V291!= VV[137])
1842          && (V291!= VV[138])          && (V291!= VV[138])
1843          && (V291!= VV[71]))goto T817;          && (V291!= VV[71]))goto T817;
1844          goto T752;          goto T752;
1845  goto T817;          goto T817;
1846  T817:;  T817:;
1847          if((V291!= VV[78]))goto T818;          if((V291!= VV[78]))goto T818;
1848          V270= VV[93];          V270= VV[93];
1849          V286= Ct;          V286= Ct;
1850          goto T752;          goto T752;
1851  goto T818;          goto T818;
1852  T818:;  T818:;
1853          if((V291!= VV[76]))goto T822;          if((V291!= VV[76]))goto T822;
1854          V280= Ct;          V280= Ct;
1855          goto T752;          goto T752;
1856  goto T822;          goto T822;
1857  T822:;  T822:;
1858          base[4]= VV[94];          base[4]= VV[94];
1859          base[5]= (V288);          base[5]= (V288);
1860          vs_top=(vs_base=base+4)+2;          vs_top=(vs_base=base+4)+2;
1861          Lerror();          Lerror();
1862          vs_top=sup;}          vs_top=sup;}
1863  goto T752;          goto T752;
1864  T752:;  T752:;
1865          V287= cdr((V287));          V287= cdr((V287));
1866          goto T747;}          goto T747;}
1867  goto T745;          goto T745;
1868  T745:;  T745:;
1869          base[4]= coerce_to_string((V270));          base[4]= coerce_to_string((V270));
1870          vs_top=(vs_base=base+4)+1;          vs_top=(vs_base=base+4)+1;
# Line 1876  T745:; Line 1876  T745:;
1876          if(((V278))==Cnil){          if(((V278))==Cnil){
1877          goto T833;}          goto T833;}
1878          goto T832;          goto T832;
1879  goto T833;          goto T833;
1880  T833:;  T833:;
1881          V292= get(car((V277)),VV[53],Cnil);          V292= get(car((V277)),VV[53],Cnil);
1882          V278= structure_ref(V292,VV[53],6);          V278= structure_ref(V292,VV[53],6);
1883  goto T832;          goto T832;
1884  T832:;  T832:;
1885          if(endp_prop((V268))){          if(endp_prop((V268))){
1886          goto T837;}          goto T837;}
# Line 1888  T832:; Line 1888  T832:;
1888          goto T837;}          goto T837;}
1889          V284= car((V268));          V284= car((V268));
1890          V268= cdr((V268));          V268= cdr((V268));
1891  goto T837;          goto T837;
1892  T837:;  T837:;
1893          if(((V277))==Cnil){          if(((V277))==Cnil){
1894          goto T845;}          goto T845;}
# Line 1901  T837:; Line 1901  T837:;
1901          vs_top=(vs_base=base+4)+2;          vs_top=(vs_base=base+4)+2;
1902          Lerror();          Lerror();
1903          vs_top=sup;          vs_top=sup;
1904  goto T845;          goto T845;
1905  T845:;  T845:;
1906          if(((V277))!=Cnil){          if(((V277))!=Cnil){
1907          goto T855;}          goto T855;}
1908          V282= small_fixnum(0);          V282= small_fixnum(0);
1909          goto T853;          goto T853;
1910  goto T855;          goto T855;
1911  T855:;  T855:;
1912          V295= get(car((V277)),VV[53],Cnil);          V295= get(car((V277)),VV[53],Cnil);
1913          V282= structure_ref(V295,VV[53],14);          V282= structure_ref(V295,VV[53],14);
1914  goto T853;          goto T853;
1915  T853:;  T853:;
1916          if(((V279))==Cnil){          if(((V279))==Cnil){
1917          goto T860;}          goto T860;}
1918          if(((V281))==Cnil){          if(((V281))==Cnil){
1919          goto T860;}          goto T860;}
1920          V282= number_plus((V282),(V281));          V282= number_plus((V282),(V281));
1921  goto T860;          goto T860;
1922  T860:;  T860:;
1923          if(((V279))==Cnil){          if(((V279))==Cnil){
1924          goto T866;}          goto T866;}
# Line 1926  T860:; Line 1926  T860:;
1926          goto T866;}          goto T866;}
1927          V283= (V282);          V283= (V282);
1928          V282= one_plus((V282));          V282= one_plus((V282));
1929  goto T866;          goto T866;
1930  T866:;  T866:;
1931          {register object V296;          {register object V296;
1932          register object V297;          register object V297;
1933          V296= (V268);          V296= (V268);
1934          V297= Cnil;          V297= Cnil;
1935  goto T876;          goto T876;
1936  T876:;  T876:;
1937          if(!(endp_prop((V296)))){          if(!(endp_prop((V296)))){
1938          goto T877;}          goto T877;}
1939          V268= nreverse((V297));          V268= nreverse((V297));
1940          goto T874;          goto T874;
1941  goto T877;          goto T877;
1942  T877:;  T877:;
1943          V298= (*(LnkLI141))(car((V296)),(V282));          V298= (*(LnkLI141))(car((V296)),(V282));
1944          V297= make_cons(/* INLINE-ARGS */V298,(V297));          V297= make_cons(/* INLINE-ARGS */V298,(V297));
1945          V282= one_plus((V282));          V282= one_plus((V282));
1946          V296= cdr((V296));          V296= cdr((V296));
1947          goto T876;}          goto T876;}
1948  goto T874;          goto T874;
1949  T874:;  T874:;
1950          if(((V279))==Cnil){          if(((V279))==Cnil){
1951          goto T889;}          goto T889;}
# Line 1953  T874:; Line 1953  T874:;
1953          goto T889;}          goto T889;}
1954          V299= list(2,Cnil,base[2]);          V299= list(2,Cnil,base[2]);
1955          V268= make_cons(/* INLINE-ARGS */V299,(V268));          V268= make_cons(/* INLINE-ARGS */V299,(V268));
1956  goto T889;          goto T889;
1957  T889:;  T889:;
1958          if(((V279))==Cnil){          if(((V279))==Cnil){
1959          goto T895;}          goto T895;}
# Line 1965  T889:; Line 1965  T889:;
1965          vs_top=sup;          vs_top=sup;
1966          V300= vs_base[0];          V300= vs_base[0];
1967          V268= append(V300,(V268));          V268= append(V300,(V268));
1968  goto T895;          goto T895;
1969  T895:;  T895:;
1970          {object V301;          {object V301;
1971          V301= (((V277))==Cnil?Ct:Cnil);          V301= (((V277))==Cnil?Ct:Cnil);
1972          if(((V301))==Cnil){          if(((V301))==Cnil){
1973          goto T906;}          goto T906;}
1974          goto T903;          goto T903;
1975  goto T906;          goto T906;
1976  T906:;  T906:;
1977          if(!(endp_prop(cdr((V277))))){          if(!(endp_prop(cdr((V277))))){
1978          goto T909;}          goto T909;}
# Line 1980  T906:; Line 1980  T906:;
1980          V303= structure_ref(V302,VV[53],7);          V303= structure_ref(V302,VV[53],7);
1981          V268= append(/* INLINE-ARGS */V303,(V268));          V268= append(/* INLINE-ARGS */V303,(V268));
1982          goto T903;          goto T903;
1983  goto T909;          goto T909;
1984  T909:;  T909:;
1985          {object V305;          {object V305;
1986          object V306= cdr((V277));          object V306= cdr((V277));
# Line 1988  T909:; Line 1988  T909:;
1988          V304= Cnil;          V304= Cnil;
1989          goto T914;}          goto T914;}
1990          base[4]=V305=MMcons(Cnil,Cnil);          base[4]=V305=MMcons(Cnil,Cnil);
1991  goto T915;          goto T915;
1992  T915:;  T915:;
1993          (V305->c.c_car)= (*(LnkLI141))((V306->c.c_car),small_fixnum(0));          (V305->c.c_car)= (*(LnkLI141))((V306->c.c_car),small_fixnum(0));
1994          V306=MMcdr(V306);          V306=MMcdr(V306);
# Line 1997  T915:; Line 1997  T915:;
1997          goto T914;}          goto T914;}
1998          V305=MMcdr(V305)=MMcons(Cnil,Cnil);          V305=MMcdr(V305)=MMcons(Cnil,Cnil);
1999          goto T915;}          goto T915;}
2000  goto T914;          goto T914;
2001  T914:;  T914:;
2002          V308= get(car((V277)),VV[53],Cnil);          V308= get(car((V277)),VV[53],Cnil);
2003          V309= structure_ref(V308,VV[53],7);          V309= structure_ref(V308,VV[53],7);
2004          V310= (*(LnkLI118))(V304,/* INLINE-ARGS */V309);          V310= (*(LnkLI118))(V304,/* INLINE-ARGS */V309);
2005          V268= append(/* INLINE-ARGS */V310,(V268));}          V268= append(/* INLINE-ARGS */V310,(V268));}
2006  goto T903;          goto T903;
2007  T903:;  T903:;
2008          if(((V273))==Cnil){          if(((V273))==Cnil){
2009          goto T920;}          goto T920;}
# Line 2014  T903:; Line 2014  T903:;
2014          Lerror();          Lerror();
2015          vs_top=sup;          vs_top=sup;
2016          goto T918;          goto T918;
2017  goto T920;          goto T920;
2018  T920:;  T920:;
2019          if(((V271))!=Cnil){          if(((V271))!=Cnil){
2020          goto T918;}          goto T918;}
2021          V271= make_cons((V272),Cnil);          V271= make_cons((V272),Cnil);
2022  goto T918;          goto T918;
2023  T918:;{object V311;  T918:;{object V311;
2024          {object V314;          {object V314;
2025          object V315= (V271);          object V315= (V271);
# Line 2027  T918:;{object V311; Line 2027  T918:;{object V311;
2027          V313= Cnil;          V313= Cnil;
2028          goto T931;}          goto T931;}
2029          base[4]=V314=MMcons(Cnil,Cnil);          base[4]=V314=MMcons(Cnil,Cnil);
2030  goto T932;          goto T932;
2031  T932:;  T932:;
2032          base[5]= (V315->c.c_car);          base[5]= (V315->c.c_car);
2033          vs_top=(vs_base=base+5)+1;          vs_top=(vs_base=base+5)+1;
# Line 2040  T932:; Line 2040  T932:;
2040          goto T931;}          goto T931;}
2041          V314=MMcdr(V314)=MMcons(Cnil,Cnil);          V314=MMcdr(V314)=MMcons(Cnil,Cnil);
2042          goto T932;}          goto T932;}
2043  goto T931;          goto T931;
2044  T931:;  T931:;
2045          {register object x= Ct,V312= V313;          {register object x= Ct,V312= V313;
2046          while(!endp(V312))          while(!endp(V312))
# Line 2049  T931:; Line 2049  T931:;
2049          goto T930;          goto T930;
2050          }else V312=V312->c.c_cdr;          }else V312=V312->c.c_cdr;
2051          V311= Cnil;}          V311= Cnil;}
2052  goto T930;          goto T930;
2053  T930:;  T930:;
2054          if(V311==Cnil)goto T929;          if(V311==Cnil)goto T929;
2055          goto T928;          goto T928;
2056  goto T929;          goto T929;
2057  T929:;}  T929:;}
2058          {object V316;          {object V316;
2059          base[6]= VV[97];          base[6]= VV[97];
# Line 2067  T929:;} Line 2067  T929:;}
2067          vs_top=sup;          vs_top=sup;
2068          V316= vs_base[0];          V316= vs_base[0];
2069          V271= make_cons((V316),(V271));}          V271= make_cons((V316),(V271));}
2070  goto T928;          goto T928;
2071  T928:;  T928:;
2072          if(((V279))==Cnil){          if(((V279))==Cnil){
2073          goto T940;}          goto T940;}
# Line 2080  T928:; Line 2080  T928:;
2080          vs_top=(vs_base=base+4)+2;          vs_top=(vs_base=base+4)+2;
2081          Lerror();          Lerror();
2082          vs_top=sup;          vs_top=sup;
2083  goto T945;          goto T945;
2084  T945:;  T945:;
2085          V275= Cnil;          V275= Cnil;
2086  goto T940;          goto T940;
2087  T940:;  T940:;
2088          if(((V277))==Cnil){          if(((V277))==Cnil){
2089          goto T951;}          goto T951;}
2090          V277= car((V277));          V277= car((V277));
2091  goto T951;          goto T951;
2092  T951:;  T951:;
2093          if(((V278))==Cnil){          if(((V278))==Cnil){
2094          goto T955;}          goto T955;}
# Line 2098  T951:; Line 2098  T951:;
2098          vs_top=(vs_base=base+4)+1;          vs_top=(vs_base=base+4)+1;
2099          Lerror();          Lerror();
2100          vs_top=sup;          vs_top=sup;
2101  goto T955;          goto T955;
2102  T955:;  T955:;
2103          base[4]= VV[101];          base[4]= VV[101];
2104          base[5]= list(2,VV[11],base[2]);          base[5]= list(2,VV[11],base[2]);
# Line 2125  T955:; Line 2125  T955:;
2125          base[4]= Cnil;          base[4]= Cnil;
2126          goto T978;}          goto T978;}
2127          base[5]=V319=MMcons(Cnil,Cnil);          base[5]=V319=MMcons(Cnil,Cnil);
2128  goto T979;          goto T979;
2129  T979:;  T979:;
2130          (V319->c.c_car)= (*(LnkLI142))(base[2],(V320->c.c_car),(V279),(V280),(V268));          (V319->c.c_car)= (*(LnkLI142))(base[2],(V320->c.c_car),(V279),(V280),(V268));
2131          V320=MMcdr(V320);          V320=MMcdr(V320);
# Line 2134  T979:; Line 2134  T979:;
2134          goto T978;}          goto T978;}
2135          V319=MMcdr(V319)=MMcons(Cnil,Cnil);          V319=MMcdr(V319)=MMcons(Cnil,Cnil);
2136          goto T979;}          goto T979;}
2137  goto T978;          goto T978;
2138  T978:;  T978:;
2139          if(((V279))==Cnil){          if(((V279))==Cnil){
2140          goto T983;}          goto T983;}
# Line 2143  T978:; Line 2143  T978:;
2143          V322= (*(LnkLI143))(base[2],(V275),(V279),(V280),(V283));          V322= (*(LnkLI143))(base[2],(V275),(V279),(V280),(V283));
2144          base[5]= make_cons(/* INLINE-ARGS */V322,Cnil);          base[5]= make_cons(/* INLINE-ARGS */V322,Cnil);
2145          goto T981;          goto T981;
2146  goto T983;          goto T983;
2147  T983:;  T983:;
2148          base[5]= Cnil;          base[5]= Cnil;
2149  goto T981;          goto T981;
2150  T981:;  T981:;
2151          V323= list(2,VV[11],base[2]);          V323= list(2,VV[11],base[2]);
2152          base[6]= make_cons(/* INLINE-ARGS */V323,Cnil);          base[6]= make_cons(/* INLINE-ARGS */V323,Cnil);
# Line 2239  static object LI13(V346,V347,V348) Line 2239  static object LI13(V346,V347,V348)
2239    
2240  register object V346;register object V347;object V348;  register object V346;register object V347;object V348;
2241  {        VMB13 VMS13 VMV13  {        VMB13 VMS13 VMV13
2242  goto TTL;          goto TTL;
2243  TTL:;  TTL:;
2244          if((structure_ref((V346),VV[53],3))==Cnil){          if((structure_ref((V346),VV[53],3))==Cnil){
2245          goto T1007;}          goto T1007;}
2246          V349= structure_ref((V346),VV[53],3);          V349= structure_ref((V346),VV[53],3);
2247          (void)(structure_set((V347),VV[53],3,/* INLINE-ARGS */V349));          (void)(structure_set((V347),VV[53],3,/* INLINE-ARGS */V349));
2248  goto T1007;          goto T1007;
2249  T1007:;  T1007:;
2250          if((structure_ref((V346),VV[53],11))==Cnil){          if((structure_ref((V346),VV[53],11))==Cnil){
2251          goto T1010;}          goto T1010;}
2252          (void)(structure_set((V347),VV[53],11,Ct));          (void)(structure_set((V347),VV[53],11,Ct));
2253  goto T1010;          goto T1010;
2254  T1010:;  T1010:;
2255          if(equalp((V347),(V346))){          if(equalp((V347),(V346))){
2256          goto T1014;}          goto T1014;}
2257          (void)((VFUN_NARGS=2,(*(LnkLI132))(VV[102],(V348))));          (void)((VFUN_NARGS=2,(*(LnkLI132))(VV[102],(V348))));
2258          {object V350 = sputprop((V348),VV[53],(V347));          {object V350 = sputprop((V348),VV[53],(V347));
2259          VMR13(V350)}          VMR13(V350)}
2260  goto T1014;          goto T1014;
2261  T1014:;  T1014:;
2262          {object V351 = Cnil;          {object V351 = Cnil;
2263          VMR13(V351)}          VMR13(V351)}
# Line 2269  static object LI14(V353) Line 2269  static object LI14(V353)
2269    
2270  object V353;  object V353;
2271  {        VMB14 VMS14 VMV14  {        VMB14 VMS14 VMV14
2272  goto TTL;          goto TTL;
2273  TTL:;  TTL:;
2274          {object V354;          {object V354;
2275          if(type_of((V353))==t_symbol){          if(type_of((V353))==t_symbol){
2276          goto T1018;}          goto T1018;}
2277          V354= Cnil;          V354= Cnil;
2278          goto T1017;          goto T1017;
2279  goto T1018;          goto T1018;
2280  T1018:;  T1018:;
2281          V354= get((V353),VV[53],Cnil);          V354= get((V353),VV[53],Cnil);
2282  goto T1017;          goto T1017;
2283  T1017:;  T1017:;
2284          if(((V354))==Cnil){          if(((V354))==Cnil){
2285          goto T1021;}          goto T1021;}
2286          {object V355 = structure_set((V354),VV[53],11,Ct);          {object V355 = structure_set((V354),VV[53],11,Ct);
2287          VMR14(V355)}          VMR14(V355)}
2288  goto T1021;          goto T1021;
2289  T1021:;  T1021:;
2290          {object V356 = Cnil;          {object V356 = Cnil;
2291          VMR14(V356)}}          VMR14(V356)}}
# Line 2305  static void L15() Line 2305  static void L15()
2305          V358=(base[1]);          V358=(base[1]);
2306          V359=(base[2]);          V359=(base[2]);
2307          vs_top=sup;          vs_top=sup;
2308  goto TTL;          goto TTL;
2309  TTL:;  TTL:;
2310          if(((V359))==Cnil){          if(((V359))==Cnil){
2311          goto T1023;}          goto T1023;}
# Line 2315  TTL:; Line 2315  TTL:;
2315          vs_top=(vs_base=base+3)+1;          vs_top=(vs_base=base+3)+1;
2316          Lerror();          Lerror();
2317          vs_top=sup;          vs_top=sup;
2318  goto T1023;          goto T1023;
2319  T1023:;  T1023:;
2320          {register object V360;          {register object V360;
2321          register object V361;          register object V361;
# Line 2333  T1023:; Line 2333  T1023:;
2333          base[5]= Cnil;          base[5]= Cnil;
2334          vs_top=(vs_base=base+5)+1;          vs_top=(vs_base=base+5)+1;
2335          return;          return;
2336  goto T1035;          goto T1035;
2337  T1035:;  T1035:;
2338          V360= (V362);}{object V363;          V360= (V362);}{object V363;
2339          V363= get(car((V360)),VV[53],Cnil);          V363= get(car((V360)),VV[53],Cnil);
2340          if(V363==Cnil)goto T1039;          if(V363==Cnil)goto T1039;
2341          V361= V363;          V361= V363;
2342          goto T1038;          goto T1038;
2343  goto T1039;          goto T1039;
2344  T1039:;}  T1039:;}
2345          base[5]= VV[105];          base[5]= VV[105];
2346          base[6]= car((V360));          base[6]= car((V360));
# Line 2348  T1039:;} Line 2348  T1039:;}
2348          Lerror();          Lerror();
2349          vs_top=sup;          vs_top=sup;
2350          V361= vs_base[0];          V361= vs_base[0];
2351  goto T1038;          goto T1038;
2352  T1038:;  T1038:;
2353          {register object V364;          {register object V364;
2354          V364= cdr((V360));          V364= cdr((V360));
2355  goto T1045;          goto T1045;
2356  T1045:;  T1045:;
2357          if(!(endp_prop((V364)))){          if(!(endp_prop((V364)))){
2358          goto T1046;}          goto T1046;}
2359          {register object V365;          {register object V365;
2360          V365= structure_ref((V361),VV[53],13);          V365= structure_ref((V361),VV[53],13);
2361  goto T1051;          goto T1051;
2362  T1051:;  T1051:;
2363          if(!(endp_prop((V365)))){          if(!(endp_prop((V365)))){
2364          goto T1052;}          goto T1052;}
# Line 2367  T1051:; Line 2367  T1051:;
2367          vs_top=(vs_base=base+5)+2;          vs_top=(vs_base=base+5)+2;
2368          Lerror();          Lerror();
2369          return;          return;
2370  goto T1052;          goto T1052;
2371  T1052:;  T1052:;
2372          if(!(type_of(car((V365)))==t_symbol)){          if(!(type_of(car((V365)))==t_symbol)){
2373          goto T1058;}          goto T1058;}
# Line 2380  T1052:; Line 2380  T1052:;
2380          vs_base=base+6;}          vs_base=base+6;}
2381          super_funcall_no_event(base[5]);          super_funcall_no_event(base[5]);
2382          return;          return;
2383  goto T1058;          goto T1058;
2384  T1058:;  T1058:;
2385          V365= cdr((V365));          V365= cdr((V365));
2386          goto T1051;}          goto T1051;}
2387  goto T1046;          goto T1046;
2388  T1046:;  T1046:;
2389          base[5]= coerce_to_string(car((V364)));          base[5]= coerce_to_string(car((V364)));
2390          base[6]= VV[107];          base[6]= VV[107];
# Line 2432  register object *base0; Line 2432  register object *base0;
2432          base[1]= car((V369));          base[1]= car((V369));
2433          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
2434          return;          return;
2435  goto T1077;          goto T1077;
2436  T1077:;  T1077:;
2437          base[1]= Cnil;          base[1]= Cnil;
2438          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
# Line 2487  register object *base0; Line 2487  register object *base0;
2487          if(!(type_of((V372))==t_structure)){          if(!(type_of((V372))==t_structure)){
2488          goto T1082;}          goto T1082;}
2489          goto T1081;          goto T1081;
2490  goto T1082;          goto T1082;
2491  T1082:;  T1082:;
2492          base[1]= VV[5];          base[1]= VV[5];
2493          base[2]= (V372);          base[2]= (V372);
2494          vs_top=(vs_base=base+1)+2;          vs_top=(vs_base=base+1)+2;
2495          Lerror();          Lerror();
2496          vs_top=sup;          vs_top=sup;
2497  goto T1081;          goto T1081;
2498  T1081:;  T1081:;
2499          base[1]= (V372);          base[1]= (V372);
2500          base[2]= (base0[0]->c.c_car);          base[2]= (base0[0]->c.c_car);

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12

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