37 |
goto T1;} |
goto T1;} |
38 |
{object V5 = Cnil; |
{object V5 = Cnil; |
39 |
VMR2(V5)} |
VMR2(V5)} |
40 |
goto T1; |
goto T1; |
41 |
T1:; |
T1:; |
42 |
base[0]= (V3); |
base[0]= (V3); |
43 |
base[1]= small_fixnum(100); |
base[1]= small_fixnum(100); |
49 |
goto T6;} |
goto T6;} |
50 |
{object V7 = Ct; |
{object V7 = Ct; |
51 |
VMR2(V7)} |
VMR2(V7)} |
52 |
goto T6; |
goto T6; |
53 |
T6:; |
T6:; |
54 |
base[0]= (V3); |
base[0]= (V3); |
55 |
base[1]= small_fixnum(400); |
base[1]= small_fixnum(400); |
118 |
V17=(base[1]); |
V17=(base[1]); |
119 |
vs_top=sup; |
vs_top=sup; |
120 |
goto T28; |
goto T28; |
121 |
goto T27; |
goto T27; |
122 |
T27:; |
T27:; |
123 |
V17= symbol_value(VV[9]); |
V17= symbol_value(VV[9]); |
124 |
goto T28; |
goto T28; |
125 |
T28:; |
T28:; |
126 |
{object V18; |
{object V18; |
127 |
object V19; |
object V19; |
196 |
V23= number_plus(VV[8],V26); |
V23= number_plus(VV[8],V26); |
197 |
{register object V27; |
{register object V27; |
198 |
V27= Cnil; |
V27= Cnil; |
199 |
goto T55; |
goto T55; |
200 |
T55:; |
T55:; |
201 |
V28= (*(LnkLI17))((V23)); |
V28= (*(LnkLI17))((V23)); |
202 |
V27= number_minus((V21),/* INLINE-ARGS */V28); |
V27= number_minus((V21),/* INLINE-ARGS */V28); |
204 |
goto T62;} |
goto T62;} |
205 |
V29= small_fixnum(366); |
V29= small_fixnum(366); |
206 |
goto T60; |
goto T60; |
207 |
goto T62; |
goto T62; |
208 |
T62:; |
T62:; |
209 |
V29= small_fixnum(365); |
V29= small_fixnum(365); |
210 |
goto T60; |
goto T60; |
211 |
T60:; |
T60:; |
212 |
if(!(number_compare((V27),V29)<0)){ |
if(!(number_compare((V27),V29)<0)){ |
213 |
goto T56;} |
goto T56;} |
214 |
V21= one_plus((V27)); |
V21= one_plus((V27)); |
215 |
goto T53; |
goto T53; |
216 |
goto T56; |
goto T56; |
217 |
T56:; |
T56:; |
218 |
V23= number_plus((V23),small_fixnum(1)); |
V23= number_plus((V23),small_fixnum(1)); |
219 |
goto T55;} |
goto T55;} |
220 |
goto T53; |
goto T53; |
221 |
T53:; |
T53:; |
222 |
if(((*(LnkLI18))((V23)))==Cnil){ |
if(((*(LnkLI18))((V23)))==Cnil){ |
223 |
goto T70;} |
goto T70;} |
234 |
base[10]= (V17); |
base[10]= (V17); |
235 |
vs_top=(vs_base=base+2)+9; |
vs_top=(vs_base=base+2)+9; |
236 |
return; |
return; |
237 |
goto T73; |
goto T73; |
238 |
T73:; |
T73:; |
239 |
if(!(number_compare((V21),small_fixnum(60))>0)){ |
if(!(number_compare((V21),small_fixnum(60))>0)){ |
240 |
goto T70;} |
goto T70;} |
241 |
V21= number_minus((V21),small_fixnum(1)); |
V21= number_minus((V21),small_fixnum(1)); |
242 |
goto T70; |
goto T70; |
243 |
T70:; |
T70:; |
244 |
{register object V30; |
{register object V30; |
245 |
V30= VV[12]; |
V30= VV[12]; |
246 |
goto T90; |
goto T90; |
247 |
T90:; |
T90:; |
248 |
if(!(number_compare((V21),car((V30)))<=0)){ |
if(!(number_compare((V21),car((V30)))<=0)){ |
249 |
goto T91;} |
goto T91;} |
250 |
V31 = make_fixnum((long)length((V30))); |
V31 = make_fixnum((long)length((V30))); |
251 |
V22= number_minus(small_fixnum(13),V31); |
V22= number_minus(small_fixnum(13),V31); |
252 |
goto T88; |
goto T88; |
253 |
goto T91; |
goto T91; |
254 |
T91:; |
T91:; |
255 |
V21= number_minus((V21),car((V30))); |
V21= number_minus((V21),car((V30))); |
256 |
V30= cdr((V30)); |
V30= cdr((V30)); |
257 |
goto T90;} |
goto T90;} |
258 |
goto T88; |
goto T88; |
259 |
T88:; |
T88:; |
260 |
base[2]= (V18); |
base[2]= (V18); |
261 |
base[3]= (V19); |
base[3]= (V19); |
297 |
else { |
else { |
298 |
V44= first;} |
V44= first;} |
299 |
--narg; goto T111; |
--narg; goto T111; |
300 |
goto T110; |
goto T110; |
301 |
T110:; |
T110:; |
302 |
V44= symbol_value(VV[9]); |
V44= symbol_value(VV[9]); |
303 |
goto T111; |
goto T111; |
304 |
T111:; |
T111:; |
305 |
V40= number_plus((V40),(V44)); |
V40= number_plus((V40),(V44)); |
306 |
base[0]= small_fixnum(0); |
base[0]= small_fixnum(0); |
350 |
V53= vs_base[0]; |
V53= vs_base[0]; |
351 |
vs_top=sup; |
vs_top=sup; |
352 |
goto T131; |
goto T131; |
353 |
goto T122; |
goto T122; |
354 |
T122:; |
T122:; |
355 |
V45= Cnil; |
V45= Cnil; |
356 |
goto T123; |
goto T123; |
357 |
T123:; |
T123:; |
358 |
V46= Cnil; |
V46= Cnil; |
359 |
goto T124; |
goto T124; |
360 |
T124:; |
T124:; |
361 |
V47= Cnil; |
V47= Cnil; |
362 |
goto T125; |
goto T125; |
363 |
T125:; |
T125:; |
364 |
V48= Cnil; |
V48= Cnil; |
365 |
goto T126; |
goto T126; |
366 |
T126:; |
T126:; |
367 |
V49= Cnil; |
V49= Cnil; |
368 |
goto T127; |
goto T127; |
369 |
T127:; |
T127:; |
370 |
V50= Cnil; |
V50= Cnil; |
371 |
goto T128; |
goto T128; |
372 |
T128:; |
T128:; |
373 |
V51= Cnil; |
V51= Cnil; |
374 |
goto T129; |
goto T129; |
375 |
T129:; |
T129:; |
376 |
V52= Cnil; |
V52= Cnil; |
377 |
goto T130; |
goto T130; |
378 |
T130:; |
T130:; |
379 |
V53= Cnil; |
V53= Cnil; |
380 |
goto T131; |
goto T131; |
381 |
T131:; |
T131:; |
382 |
base[0]= (V50); |
base[0]= (V50); |
383 |
base[1]= small_fixnum(100); |
base[1]= small_fixnum(100); |
392 |
goto T138;} |
goto T138;} |
393 |
V43= number_plus((V43),small_fixnum(100)); |
V43= number_plus((V43),small_fixnum(100)); |
394 |
goto T115; |
goto T115; |
395 |
goto T138; |
goto T138; |
396 |
T138:; |
T138:; |
397 |
V57= number_minus((V43),(V50)); |
V57= number_minus((V43),(V50)); |
398 |
if(!(number_compare(/* INLINE-ARGS */V57,small_fixnum(50))>=0)){ |
if(!(number_compare(/* INLINE-ARGS */V57,small_fixnum(50))>=0)){ |
399 |
goto T115;} |
goto T115;} |
400 |
V43= number_minus((V43),small_fixnum(100));} |
V43= number_minus((V43),small_fixnum(100));} |
401 |
goto T115; |
goto T115; |
402 |
T115:; |
T115:; |
403 |
if(((*(LnkLI18))((V43)))==Cnil){ |
if(((*(LnkLI18))((V43)))==Cnil){ |
404 |
goto T145;} |
goto T145;} |
405 |
if(number_compare((V42),small_fixnum(2))>0){ |
if(number_compare((V42),small_fixnum(2))>0){ |
406 |
goto T144;} |
goto T144;} |
407 |
goto T145; |
goto T145; |
408 |
T145:; |
T145:; |
409 |
V41= number_minus((V41),small_fixnum(1)); |
V41= number_minus((V41),small_fixnum(1)); |
410 |
goto T144; |
goto T144; |
411 |
T144:; |
T144:; |
412 |
base[1]= (V41); |
base[1]= (V41); |
413 |
base[2]= (*(LnkLI17))((V43)); |
base[2]= (*(LnkLI17))((V43)); |