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

Diff of /gcl/lsp/seq.c

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

revision 1.7 by camm, Tue Sep 24 14:47:01 2002 UTC revision 1.8 by camm, Tue Sep 24 19:01:45 2002 UTC
# Line 214  T91:; Line 214  T91:;
214          Llength();          Llength();
215          vs_top=sup;          vs_top=sup;
216          (V26->c.c_car)= vs_base[0];          (V26->c.c_car)= vs_base[0];
217          if(endp(V27=MMcdr(V27))){          V27=MMcdr(V27);
218            if(endp(V27)){
219          V25= base[0];          V25= base[0];
220          goto T90;}          goto T90;}
221          V26=MMcdr(V26)=MMcons(Cnil,Cnil);          V26=MMcdr(V26)=MMcons(Cnil,Cnil);
# Line 300  T123:; Line 301  T123:;
301          Llength();          Llength();
302          vs_top=sup;          vs_top=sup;
303          (V42->c.c_car)= vs_base[0];          (V42->c.c_car)= vs_base[0];
304          if(endp(V43=MMcdr(V43))){          V43=MMcdr(V43);
305            if(endp(V43)){
306          V41= base[0];          V41= base[0];
307          goto T122;}          goto T122;}
308          V42=MMcdr(V42)=MMcons(Cnil,Cnil);          V42=MMcdr(V42)=MMcons(Cnil,Cnil);
# Line 341  T140:; Line 343  T140:;
343          {register object V50;          {register object V50;
344          V50= (V49->c.c_car);          V50= (V49->c.c_car);
345          (V48->c.c_car)= elt((V50),V44);}          (V48->c.c_car)= elt((V50),V44);}
346          if(endp(V49=MMcdr(V49))){          V49=MMcdr(V49);
347            if(endp(V49)){
348          V47= base[1];          V47= base[1];
349          goto T139;}          goto T139;}
350          V48=MMcdr(V48)=MMcons(Cnil,Cnil);          V48=MMcdr(V48)=MMcons(Cnil,Cnil);
# Line 385  T158:; Line 388  T158:;
388          {register object V59;          {register object V59;
389          V59= (V58->c.c_car);          V59= (V58->c.c_car);
390          (V57->c.c_car)= elt((V59),V52);}          (V57->c.c_car)= elt((V59),V52);}
391          if(endp(V58=MMcdr(V58))){          V58=MMcdr(V58);
392            if(endp(V58)){
393          V56= base[1];          V56= base[1];
394          goto T157;}          goto T157;}
395          V57=MMcdr(V57)=MMcons(Cnil,Cnil);          V57=MMcdr(V57)=MMcons(Cnil,Cnil);
# Line 443  T168:; Line 447  T168:;
447          Llength();          Llength();
448          vs_top=sup;          vs_top=sup;
449          (V69->c.c_car)= vs_base[0];          (V69->c.c_car)= vs_base[0];
450          if(endp(V70=MMcdr(V70))){          V70=MMcdr(V70);
451            if(endp(V70)){
452          V68= base[0];          V68= base[0];
453          goto T167;}          goto T167;}
454          V69=MMcdr(V69)=MMcons(Cnil,Cnil);          V69=MMcdr(V69)=MMcons(Cnil,Cnil);
# Line 479  T181:; Line 484  T181:;
484          {register object V76;          {register object V76;
485          V76= (V75->c.c_car);          V76= (V75->c.c_car);
486          (V74->c.c_car)= elt((V76),V66);}          (V74->c.c_car)= elt((V76),V66);}
487          if(endp(V75=MMcdr(V75))){          V75=MMcdr(V75);
488            if(endp(V75)){
489          V73= base[1];          V73= base[1];
490          goto T180;}          goto T180;}
491          V74=MMcdr(V74)=MMcons(Cnil,Cnil);          V74=MMcdr(V74)=MMcons(Cnil,Cnil);
# Line 542  T193:; Line 548  T193:;
548          Llength();          Llength();
549          vs_top=sup;          vs_top=sup;
550          (V87->c.c_car)= vs_base[0];          (V87->c.c_car)= vs_base[0];
551          if(endp(V88=MMcdr(V88))){          V88=MMcdr(V88);
552            if(endp(V88)){
553          V86= base[0];          V86= base[0];
554          goto T192;}          goto T192;}
555          V87=MMcdr(V87)=MMcons(Cnil,Cnil);          V87=MMcdr(V87)=MMcons(Cnil,Cnil);
# Line 577  T207:; Line 584  T207:;
584          {register object V93;          {register object V93;
585          V93= (V92->c.c_car);          V93= (V92->c.c_car);
586          (V91->c.c_car)= elt((V93),V84);}          (V91->c.c_car)= elt((V93),V84);}
587          if(endp(V92=MMcdr(V92))){          V92=MMcdr(V92);
588            if(endp(V92)){
589          V90= base[1];          V90= base[1];
590          goto T206;}          goto T206;}
591          V91=MMcdr(V91)=MMcons(Cnil,Cnil);          V91=MMcdr(V91)=MMcons(Cnil,Cnil);

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

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