?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Mon Jun 3 15:21:17 PDT 2002
[netwalk.git] / netwalk.c
blobb2c95fb9cab71e5992941dfb582249a9e32aa095
1 #ifdef __cplusplus
2 extern "C" {
3 #endif
4 /*
5 ANSI C code generated by SmallEiffel The GNU Eiffel Compiler
6 Release -0.74 Beta #18 (Monday March 4th 2002)
7 Copyright (C), 1994-2002 - LORIA - UHP - INRIA - FRANCE
8 Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
9 http://SmallEiffel.loria.fr
10 C Compiler options used: -pipe -O2 -I/usr/include/SDL -D_REENTRANT `sdl-config --libs`
11 */
12 #ifdef __cplusplus
13 }
14 #endif
15 #include "netwalk.h"
16 #ifdef __cplusplus
17 extern "C" {
18 #endif
19 /*
20 -- This file is free software, which comes along with SmallEiffel. This
21 -- software is distributed in the hope that it will be useful, but WITHOUT
22 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
23 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
24 -- this header is kept unaltered, and a notification of the changes is added.
25 -- You are allowed to redistribute it and sell it, alone or as a part of
26 -- another product.
27 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
28 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
29 -- http://SmallEiffel.loria.fr
30 --
31 */
32 /*
33 This file (SmallEiffel/sys/runtime/base.c) is included for _all_ modes of
34 compilation (-boost, -no_check, ... -all_check, -debug_check).
35 */
36
37 /*
38 The wrapper for `malloc' (generated C code is supposed to use
39 only `se_malloc' instead of direct `malloc').
40 */
41 void* se_malloc(size_t size) {
42 void *result = malloc(size);
43 if (result == NULL) {
44 #ifdef SE_EXCEPTIONS
45 internal_exception_handler(No_more_memory);
46 #elif SE_NO_CHECK
47 error0("No more memory.", NULL);
48 #else
49 fprintf(SE_ERR,"No more memory.\n");
50 se_print_run_time_stack();
51 exit(EXIT_FAILURE);
52 #endif
53 }
54 return result;
55 }
56
57 /*
58 The wrapper for `calloc' (generated C code is supposed to use
59 only `se_calloc' instead of direct `calloc').
60 */
61 void* se_calloc(size_t nmemb, size_t size) {
62 void *result = calloc(nmemb,size);
63 if (result == NULL) {
64 #ifdef SE_EXCEPTIONS
65 internal_exception_handler(No_more_memory);
66 #elif SE_NO_CHECK
67 error0("No more memory.", NULL);
68 #else
69 fprintf(SE_ERR,"No more memory.\n");
70 se_print_run_time_stack();
71 exit(EXIT_FAILURE);
72 #endif
73 }
74 return result;
75 }
76 T152 M152=0;
77 T155 M155=0;
78
79 int se_cmpT22(T22 o1,T22 o2){
80 return memcmp(&o1,&o2,sizeof(o1));}
81 T57 M57={57};
82
83 void se_prinT57(T57**o){
84 if(*o==NULL){
85 fprintf(SE_ERR,"Void");
86 return;
87 }
88 fprintf(SE_ERR,"STD_INPUT_OUTPUT");
89 fprintf(SE_ERR,"#%p",*o);
90 }
91 T114 M114={114,NULL};
92
93 void se_prinT114(T114**o){
94 if(*o==NULL){
95 fprintf(SE_ERR,"Void");
96 return;
97 }
98 fprintf(SE_ERR,"COMMAND_ACTIVATE");
99 fprintf(SE_ERR,"#%p",*o);
100 fprintf(SE_ERR,"\n\t[ ");
101 fprintf(SE_ERR,"main = ");
102 se_prinT0((T0**)(&((*o)->_main)));
103 fprintf(SE_ERR,"\n\t]");
104 }
105 T135 M135={135,NULL};
106
107 void se_prinT135(T135**o){
108 if(*o==NULL){
109 fprintf(SE_ERR,"Void");
110 return;
111 }
112 fprintf(SE_ERR,"COMMAND_QUIT");
113 fprintf(SE_ERR,"#%p",*o);
114 fprintf(SE_ERR,"\n\t[ ");
115 fprintf(SE_ERR,"main = ");
116 se_prinT0((T0**)(&((*o)->_main)));
117 fprintf(SE_ERR,"\n\t]");
118 }
119 T130 M130={130,NULL,NULL,NULL};
120
121 void se_prinT130(T130**o){
122 if(*o==NULL){
123 fprintf(SE_ERR,"Void");
124 return;
125 }
126 fprintf(SE_ERR,"IO_SCORE");
127 fprintf(SE_ERR,"#%p",*o);
128 fprintf(SE_ERR,"\n\t[ ");
129 fprintf(SE_ERR,"score_table = ");
130 se_prinT0((T0**)(&((*o)->_score_table)));
131 fprintf(SE_ERR,"\n\t ");
132 fprintf(SE_ERR,"tfr = ");
133 se_prinT0((T0**)(&((*o)->_tfr)));
134 fprintf(SE_ERR,"\n\t ");
135 fprintf(SE_ERR,"tfw = ");
136 se_prinT0((T0**)(&((*o)->_tfw)));
137 fprintf(SE_ERR,"\n\t]");
138 }
139 T47 M47={47,NULL,0,NULL};
140
141 void se_prinT47(T47**o){
142 if(*o==NULL){
143 fprintf(SE_ERR,"Void");
144 return;
145 }
146 fprintf(SE_ERR,"DICTIONARY_NODE[COMMAND,INTEGER]");
147 fprintf(SE_ERR,"#%p",*o);
148 fprintf(SE_ERR,"\n\t[ ");
149 fprintf(SE_ERR,"item = ");
150 se_prinT0((T0**)(&((*o)->_item)));
151 fprintf(SE_ERR,"\n\t ");
152 fprintf(SE_ERR,"key = ");
153 se_prinT2((&((*o)->_key)));
154 fprintf(SE_ERR,"\n\t ");
155 fprintf(SE_ERR,"next = ");
156 se_prinT0((T0**)(&((*o)->_next)));
157 fprintf(SE_ERR,"\n\t]");
158 }
159 T75 M75={75,0,0,0,0,NULL,0};
160
161 void se_prinT75(T75**o){
162 if(*o==NULL){
163 fprintf(SE_ERR,"Void");
164 return;
165 }
166 fprintf(SE_ERR,"ARRAY2[TILE]");
167 fprintf(SE_ERR,"#%p",*o);
168 fprintf(SE_ERR,"\n\t[ ");
169 fprintf(SE_ERR,"upper2 = ");
170 se_prinT2((&((*o)->_upper2)));
171 fprintf(SE_ERR,"\n\t ");
172 fprintf(SE_ERR,"upper1 = ");
173 se_prinT2((&((*o)->_upper1)));
174 fprintf(SE_ERR,"\n\t ");
175 fprintf(SE_ERR,"lower2 = ");
176 se_prinT2((&((*o)->_lower2)));
177 fprintf(SE_ERR,"\n\t ");
178 fprintf(SE_ERR,"lower1 = ");
179 se_prinT2((&((*o)->_lower1)));
180 fprintf(SE_ERR,"\n\t ");
181 fprintf(SE_ERR,"storage = ");
182 se_prinT76((&((*o)->_storage)));
183 fprintf(SE_ERR,"\n\t ");
184 fprintf(SE_ERR,"capacity = ");
185 se_prinT2((&((*o)->_capacity)));
186 fprintf(SE_ERR,"\n\t]");
187 }
188 T41 M41={41,NULL,NULL};
189
190 void se_prinT41(T41**o){
191 if(*o==NULL){
192 fprintf(SE_ERR,"Void");
193 return;
194 }
195 fprintf(SE_ERR,"ITERATOR_ON_LINKED_LIST[WIDGET]");
196 fprintf(SE_ERR,"#%p",*o);
197 fprintf(SE_ERR,"\n\t[ ");
198 fprintf(SE_ERR,"linked_list = ");
199 se_prinT0((T0**)(&((*o)->_linked_list)));
200 fprintf(SE_ERR,"\n\t ");
201 fprintf(SE_ERR,"current_link = ");
202 se_prinT0((T0**)(&((*o)->_current_link)));
203 fprintf(SE_ERR,"\n\t]");
204 }
205 T43 M43={43,NULL,NULL};
206
207 void se_prinT43(T43**o){
208 if(*o==NULL){
209 fprintf(SE_ERR,"Void");
210 return;
211 }
212 fprintf(SE_ERR,"LINK[WIDGET]");
213 fprintf(SE_ERR,"#%p",*o);
214 fprintf(SE_ERR,"\n\t[ ");
215 fprintf(SE_ERR,"item = ");
216 se_prinT0((T0**)(&((*o)->_item)));
217 fprintf(SE_ERR,"\n\t ");
218 fprintf(SE_ERR,"next = ");
219 se_prinT0((T0**)(&((*o)->_next)));
220 fprintf(SE_ERR,"\n\t]");
221 }
222 T87 M87={87,NULL,NULL};
223
224 void se_prinT87(T87**o){
225 if(*o==NULL){
226 fprintf(SE_ERR,"Void");
227 return;
228 }
229 fprintf(SE_ERR,"LINK[TILE]");
230 fprintf(SE_ERR,"#%p",*o);
231 fprintf(SE_ERR,"\n\t[ ");
232 fprintf(SE_ERR,"item = ");
233 se_prinT0((T0**)(&((*o)->_item)));
234 fprintf(SE_ERR,"\n\t ");
235 fprintf(SE_ERR,"next = ");
236 se_prinT0((T0**)(&((*o)->_next)));
237 fprintf(SE_ERR,"\n\t]");
238 }
239 T83 M83={83,NULL,0,0,0};
240
241 void se_prinT83(T83**o){
242 if(*o==NULL){
243 fprintf(SE_ERR,"Void");
244 return;
245 }
246 fprintf(SE_ERR,"ARRAY[INTEGER]");
247 fprintf(SE_ERR,"#%p",*o);
248 fprintf(SE_ERR,"\n\t[ ");
249 fprintf(SE_ERR,"storage = ");
250 se_prinT85((&((*o)->_storage)));
251 fprintf(SE_ERR,"\n\t ");
252 fprintf(SE_ERR,"capacity = ");
253 se_prinT2((&((*o)->_capacity)));
254 fprintf(SE_ERR,"\n\t ");
255 fprintf(SE_ERR,"upper = ");
256 se_prinT2((&((*o)->_upper)));
257 fprintf(SE_ERR,"\n\t ");
258 fprintf(SE_ERR,"lower = ");
259 se_prinT2((&((*o)->_lower)));
260 fprintf(SE_ERR,"\n\t]");
261 }
262 T117 M117={117,0,NULL,0,0,0,0,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL};
263
264 void se_prinT117(T117**o){
265 if(*o==NULL){
266 fprintf(SE_ERR,"Void");
267 return;
268 }
269 fprintf(SE_ERR,"OPTIONS_WINDOW");
270 fprintf(SE_ERR,"#%p",*o);
271 fprintf(SE_ERR,"\n\t[ ");
272 fprintf(SE_ERR,"has_focus = ");
273 se_prinT6((&((*o)->_has_focus)));
274 fprintf(SE_ERR,"\n\t ");
275 fprintf(SE_ERR,"signal_table = ");
276 se_prinT0((T0**)(&((*o)->_signal_table)));
277 fprintf(SE_ERR,"\n\t ");
278 fprintf(SE_ERR,"offsetx = ");
279 se_prinT2((&((*o)->_offsetx)));
280 fprintf(SE_ERR,"\n\t ");
281 fprintf(SE_ERR,"offsety = ");
282 se_prinT2((&((*o)->_offsety)));
283 fprintf(SE_ERR,"\n\t ");
284 fprintf(SE_ERR,"width = ");
285 se_prinT2((&((*o)->_width)));
286 fprintf(SE_ERR,"\n\t ");
287 fprintf(SE_ERR,"height = ");
288 se_prinT2((&((*o)->_height)));
289 fprintf(SE_ERR,"\n\t ");
290 fprintf(SE_ERR,"widget_list = ");
291 se_prinT0((T0**)(&((*o)->_widget_list)));
292 fprintf(SE_ERR,"\n\t ");
293 fprintf(SE_ERR,"focus_widget = ");
294 se_prinT0((T0**)(&((*o)->_focus_widget)));
295 fprintf(SE_ERR,"\n\t ");
296 fprintf(SE_ERR,"preset_lb = ");
297 se_prinT0((T0**)(&((*o)->_preset_lb)));
298 fprintf(SE_ERR,"\n\t ");
299 fprintf(SE_ERR,"wrap_cb = ");
300 se_prinT0((T0**)(&((*o)->_wrap_cb)));
301 fprintf(SE_ERR,"\n\t ");
302 fprintf(SE_ERR,"width_tb = ");
303 se_prinT0((T0**)(&((*o)->_width_tb)));
304 fprintf(SE_ERR,"\n\t ");
305 fprintf(SE_ERR,"height_tb = ");
306 se_prinT0((T0**)(&((*o)->_height_tb)));
307 fprintf(SE_ERR,"\n\t ");
308 fprintf(SE_ERR,"setting = ");
309 se_prinT0((T0**)(&((*o)->_setting)));
310 fprintf(SE_ERR,"\n\t ");
311 fprintf(SE_ERR,"preset = ");
312 se_prinT0((T0**)(&((*o)->_preset)));
313 fprintf(SE_ERR,"\n\t ");
314 fprintf(SE_ERR,"preset_list = ");
315 se_prinT0((T0**)(&((*o)->_preset_list)));
316 fprintf(SE_ERR,"\n\t]");
317 }
318
319 void se_prinT82(T82*o){
320 fprintf(SE_ERR,"NATIVE_ARRAY[BOOLEAN]");
321 fprintf(SE_ERR,"#%p",*o);
322 }
323 T126 M126={126,0,NULL,0,0,0,0,0};
324
325 void se_prinT126(T126**o){
326 if(*o==NULL){
327 fprintf(SE_ERR,"Void");
328 return;
329 }
330 fprintf(SE_ERR,"CHECKBOX");
331 fprintf(SE_ERR,"#%p",*o);
332 fprintf(SE_ERR,"\n\t[ ");
333 fprintf(SE_ERR,"has_focus = ");
334 se_prinT6((&((*o)->_has_focus)));
335 fprintf(SE_ERR,"\n\t ");
336 fprintf(SE_ERR,"signal_table = ");
337 se_prinT0((T0**)(&((*o)->_signal_table)));
338 fprintf(SE_ERR,"\n\t ");
339 fprintf(SE_ERR,"offsetx = ");
340 se_prinT2((&((*o)->_offsetx)));
341 fprintf(SE_ERR,"\n\t ");
342 fprintf(SE_ERR,"offsety = ");
343 se_prinT2((&((*o)->_offsety)));
344 fprintf(SE_ERR,"\n\t ");
345 fprintf(SE_ERR,"width = ");
346 se_prinT2((&((*o)->_width)));
347 fprintf(SE_ERR,"\n\t ");
348 fprintf(SE_ERR,"height = ");
349 se_prinT2((&((*o)->_height)));
350 fprintf(SE_ERR,"\n\t ");
351 fprintf(SE_ERR,"value = ");
352 se_prinT6((&((*o)->_value)));
353 fprintf(SE_ERR,"\n\t]");
354 }
355
356 void se_prinT49(T49*o){
357 fprintf(SE_ERR,"NATIVE_ARRAY[DICTIONARY_NODE[COMMAND,INTEGER]]");
358 fprintf(SE_ERR,"#%p",*o);
359 }
360 T89 M89=0;
361
362 void se_prinT89(T89*o){
363 fprintf(SE_ERR,"EVENTMAKER");
364 }
365
366 void se_prinT111(T111**o){
367 if(*o==NULL){
368 fprintf(SE_ERR,"Void");
369 return;
370 }
371 fprintf(SE_ERR,"PROCEDURE[HS_WINDOW,TUPLE[WIDGET]]");
372 fprintf(SE_ERR,"#%p",*o);
373 }
374 T54 M54={54,NULL,NULL,NULL,NULL,NULL,NULL,NULL};
375
376 void se_prinT54(T54**o){
377 if(*o==NULL){
378 fprintf(SE_ERR,"Void");
379 return;
380 }
381 fprintf(SE_ERR,"CONFIG_DATA");
382 fprintf(SE_ERR,"#%p",*o);
383 fprintf(SE_ERR,"\n\t[ ");
384 fprintf(SE_ERR,"score_file = ");
385 se_prinT7((EIF_STRING*)(&((*o)->_score_file)));
386 fprintf(SE_ERR,"\n\t ");
387 fprintf(SE_ERR,"preset_list = ");
388 se_prinT0((T0**)(&((*o)->_preset_list)));
389 fprintf(SE_ERR,"\n\t ");
390 fprintf(SE_ERR,"mainttf = ");
391 se_prinT7((EIF_STRING*)(&((*o)->_mainttf)));
392 fprintf(SE_ERR,"\n\t ");
393 fprintf(SE_ERR,"bigttf = ");
394 se_prinT7((EIF_STRING*)(&((*o)->_bigttf)));
395 fprintf(SE_ERR,"\n\t ");
396 fprintf(SE_ERR,"mainfont = ");
397 se_prinT0((T0**)(&((*o)->_mainfont)));
398 fprintf(SE_ERR,"\n\t ");
399 fprintf(SE_ERR,"bigfont = ");
400 se_prinT0((T0**)(&((*o)->_bigfont)));
401 fprintf(SE_ERR,"\n\t ");
402 fprintf(SE_ERR,"default_preset = ");
403 se_prinT7((EIF_STRING*)(&((*o)->_default_preset)));
404 fprintf(SE_ERR,"\n\t]");
405 }
406 T108 M108=0;
407
408 void se_prinT108(T108*o){
409 fprintf(SE_ERR,"HASH_TABLE_SIZE");
410 }
411 T102 M102={102,NULL};
412
413 void se_prinT102(T102**o){
414 if(*o==NULL){
415 fprintf(SE_ERR,"Void");
416 return;
417 }
418 fprintf(SE_ERR,"TUPLE[PRESET]");
419 fprintf(SE_ERR,"#%p",*o);
420 fprintf(SE_ERR,"\n\t[ ");
421 fprintf(SE_ERR,"first = ");
422 se_prinT0((T0**)(&((*o)->_first)));
423 fprintf(SE_ERR,"\n\t]");
424 }
425
426 T0*new_tuple102(T0* i1){
427 T102*n=new102();
428 n->_first=i1;
429 return (T0*)n;}
430 T107 M107={107,0,NULL,0,0,0,0,NULL,NULL};
431
432 void se_prinT107(T107**o){
433 if(*o==NULL){
434 fprintf(SE_ERR,"Void");
435 return;
436 }
437 fprintf(SE_ERR,"LABEL");
438 fprintf(SE_ERR,"#%p",*o);
439 fprintf(SE_ERR,"\n\t[ ");
440 fprintf(SE_ERR,"has_focus = ");
441 se_prinT6((&((*o)->_has_focus)));
442 fprintf(SE_ERR,"\n\t ");
443 fprintf(SE_ERR,"signal_table = ");
444 se_prinT0((T0**)(&((*o)->_signal_table)));
445 fprintf(SE_ERR,"\n\t ");
446 fprintf(SE_ERR,"offsetx = ");
447 se_prinT2((&((*o)->_offsetx)));
448 fprintf(SE_ERR,"\n\t ");
449 fprintf(SE_ERR,"offsety = ");
450 se_prinT2((&((*o)->_offsety)));
451 fprintf(SE_ERR,"\n\t ");
452 fprintf(SE_ERR,"width = ");
453 se_prinT2((&((*o)->_width)));
454 fprintf(SE_ERR,"\n\t ");
455 fprintf(SE_ERR,"height = ");
456 se_prinT2((&((*o)->_height)));
457 fprintf(SE_ERR,"\n\t ");
458 fprintf(SE_ERR,"string = ");
459 se_prinT7((EIF_STRING*)(&((*o)->_string)));
460 fprintf(SE_ERR,"\n\t ");
461 fprintf(SE_ERR,"img = ");
462 se_prinT0((T0**)(&((*o)->_img)));
463 fprintf(SE_ERR,"\n\t]");
464 }
465 T121 M121={121,NULL,NULL};
466
467 void se_prinT121(T121**o){
468 if(*o==NULL){
469 fprintf(SE_ERR,"Void");
470 return;
471 }
472 fprintf(SE_ERR,"LINK[STRING]");
473 fprintf(SE_ERR,"#%p",*o);
474 fprintf(SE_ERR,"\n\t[ ");
475 fprintf(SE_ERR,"item = ");
476 se_prinT7((EIF_STRING*)(&((*o)->_item)));
477 fprintf(SE_ERR,"\n\t ");
478 fprintf(SE_ERR,"next = ");
479 se_prinT0((T0**)(&((*o)->_next)));
480 fprintf(SE_ERR,"\n\t]");
481 }
482
483 void se_prinT124(T124**o){
484 if(*o==NULL){
485 fprintf(SE_ERR,"Void");
486 return;
487 }
488 fprintf(SE_ERR,"PROCEDURE[OPTIONS_WINDOW,TUPLE[WIDGET]]");
489 fprintf(SE_ERR,"#%p",*o);
490 }
491 T120 M120={120,0,NULL,0,0,0,0,NULL,NULL,0,NULL};
492
493 void se_prinT120(T120**o){
494 if(*o==NULL){
495 fprintf(SE_ERR,"Void");
496 return;
497 }
498 fprintf(SE_ERR,"LISTBOX");
499 fprintf(SE_ERR,"#%p",*o);
500 fprintf(SE_ERR,"\n\t[ ");
501 fprintf(SE_ERR,"has_focus = ");
502 se_prinT6((&((*o)->_has_focus)));
503 fprintf(SE_ERR,"\n\t ");
504 fprintf(SE_ERR,"signal_table = ");
505 se_prinT0((T0**)(&((*o)->_signal_table)));
506 fprintf(SE_ERR,"\n\t ");
507 fprintf(SE_ERR,"offsetx = ");
508 se_prinT2((&((*o)->_offsetx)));
509 fprintf(SE_ERR,"\n\t ");
510 fprintf(SE_ERR,"offsety = ");
511 se_prinT2((&((*o)->_offsety)));
512 fprintf(SE_ERR,"\n\t ");
513 fprintf(SE_ERR,"width = ");
514 se_prinT2((&((*o)->_width)));
515 fprintf(SE_ERR,"\n\t ");
516 fprintf(SE_ERR,"height = ");
517 se_prinT2((&((*o)->_height)));
518 fprintf(SE_ERR,"\n\t ");
519 fprintf(SE_ERR,"string_list = ");
520 se_prinT0((T0**)(&((*o)->_string_list)));
521 fprintf(SE_ERR,"\n\t ");
522 fprintf(SE_ERR,"string = ");
523 se_prinT7((EIF_STRING*)(&((*o)->_string)));
524 fprintf(SE_ERR,"\n\t ");
525 fprintf(SE_ERR,"list_i = ");
526 se_prinT2((&((*o)->_list_i)));
527 fprintf(SE_ERR,"\n\t ");
528 fprintf(SE_ERR,"textimg = ");
529 se_prinT0((T0**)(&((*o)->_textimg)));
530 fprintf(SE_ERR,"\n\t]");
531 }
532
533 void se_prinT76(T76*o){
534 fprintf(SE_ERR,"NATIVE_ARRAY[TILE]");
535 fprintf(SE_ERR,"#%p",*o);
536 }
537
538 void se_prinT149(T149**o){
539 if(*o==NULL){
540 fprintf(SE_ERR,"Void");
541 return;
542 }
543 fprintf(SE_ERR,"PROCEDURE[IO_SCORE,TUPLE[SCORE,STRING]]");
544 fprintf(SE_ERR,"#%p",*o);
545 }
546 T53 M53={53,0,NULL};
547
548 void se_prinT53(T53**o){
549 if(*o==NULL){
550 fprintf(SE_ERR,"Void");
551 return;
552 }
553 fprintf(SE_ERR,"TTF_FONT");
554 fprintf(SE_ERR,"#%p",*o);
555 fprintf(SE_ERR,"\n\t[ ");
556 fprintf(SE_ERR,"is_connected = ");
557 se_prinT6((&((*o)->_is_connected)));
558 fprintf(SE_ERR,"\n\t ");
559 fprintf(SE_ERR,"ptr = ");
560 se_prinT8((&((*o)->_ptr)));
561 fprintf(SE_ERR,"\n\t]");
562 }
563 T50 M50={50,0,NULL};
564
565 void se_prinT50(T50**o){
566 if(*o==NULL){
567 fprintf(SE_ERR,"Void");
568 return;
569 }
570 fprintf(SE_ERR,"IMAGE");
571 fprintf(SE_ERR,"#%p",*o);
572 fprintf(SE_ERR,"\n\t[ ");
573 fprintf(SE_ERR,"is_connected = ");
574 se_prinT6((&((*o)->_is_connected)));
575 fprintf(SE_ERR,"\n\t ");
576 fprintf(SE_ERR,"ptr = ");
577 se_prinT8((&((*o)->_ptr)));
578 fprintf(SE_ERR,"\n\t]");
579 }
580 T122 M122={122,NULL,NULL};
581
582 void se_prinT122(T122**o){
583 if(*o==NULL){
584 fprintf(SE_ERR,"Void");
585 return;
586 }
587 fprintf(SE_ERR,"ITERATOR_ON_LINKED_LIST[PRESET]");
588 fprintf(SE_ERR,"#%p",*o);
589 fprintf(SE_ERR,"\n\t[ ");
590 fprintf(SE_ERR,"linked_list = ");
591 se_prinT0((T0**)(&((*o)->_linked_list)));
592 fprintf(SE_ERR,"\n\t ");
593 fprintf(SE_ERR,"current_link = ");
594 se_prinT0((T0**)(&((*o)->_current_link)));
595 fprintf(SE_ERR,"\n\t]");
596 }
597 T151 M151={151,NULL,NULL};
598
599 void se_prinT151(T151**o){
600 if(*o==NULL){
601 fprintf(SE_ERR,"Void");
602 return;
603 }
604 fprintf(SE_ERR,"ITERATOR_ON_LINKED_LIST[SCORE_DISPLAY]");
605 fprintf(SE_ERR,"#%p",*o);
606 fprintf(SE_ERR,"\n\t[ ");
607 fprintf(SE_ERR,"linked_list = ");
608 se_prinT0((T0**)(&((*o)->_linked_list)));
609 fprintf(SE_ERR,"\n\t ");
610 fprintf(SE_ERR,"current_link = ");
611 se_prinT0((T0**)(&((*o)->_current_link)));
612 fprintf(SE_ERR,"\n\t]");
613 }
614 T77 M77={77,0,NULL,0};
615
616 void se_prinT77(T77**o){
617 if(*o==NULL){
618 fprintf(SE_ERR,"Void");
619 return;
620 }
621 fprintf(SE_ERR,"STD_RAND");
622 fprintf(SE_ERR,"#%p",*o);
623 fprintf(SE_ERR,"\n\t[ ");
624 fprintf(SE_ERR,"seed = ");
625 se_prinT2((&((*o)->_seed)));
626 fprintf(SE_ERR,"\n\t ");
627 fprintf(SE_ERR,"iv = ");
628 se_prinT0((T0**)(&((*o)->_iv)));
629 fprintf(SE_ERR,"\n\t ");
630 fprintf(SE_ERR,"iy = ");
631 se_prinT2((&((*o)->_iy)));
632 fprintf(SE_ERR,"\n\t]");
633 }
634 T51 M51={51,0,0,NULL};
635
636 void se_prinT51(T51**o){
637 if(*o==NULL){
638 fprintf(SE_ERR,"Void");
639 return;
640 }
641 fprintf(SE_ERR,"COLOR");
642 fprintf(SE_ERR,"#%p",*o);
643 fprintf(SE_ERR,"\n\t[ ");
644 fprintf(SE_ERR,"to_integer = ");
645 se_prinT2((&((*o)->_to_integer)));
646 fprintf(SE_ERR,"\n\t ");
647 fprintf(SE_ERR,"to_gfx_integer = ");
648 se_prinT2((&((*o)->_to_gfx_integer)));
649 fprintf(SE_ERR,"\n\t ");
650 fprintf(SE_ERR,"pointer = ");
651 se_prinT8((&((*o)->_pointer)));
652 fprintf(SE_ERR,"\n\t]");
653 }
654 T97 M97={97,0,NULL,0,0,0,0,NULL,NULL,NULL};
655
656 void se_prinT97(T97**o){
657 if(*o==NULL){
658 fprintf(SE_ERR,"Void");
659 return;
660 }
661 fprintf(SE_ERR,"NEWHS_WINDOW");
662 fprintf(SE_ERR,"#%p",*o);
663 fprintf(SE_ERR,"\n\t[ ");
664 fprintf(SE_ERR,"has_focus = ");
665 se_prinT6((&((*o)->_has_focus)));
666 fprintf(SE_ERR,"\n\t ");
667 fprintf(SE_ERR,"signal_table = ");
668 se_prinT0((T0**)(&((*o)->_signal_table)));
669 fprintf(SE_ERR,"\n\t ");
670 fprintf(SE_ERR,"offsetx = ");
671 se_prinT2((&((*o)->_offsetx)));
672 fprintf(SE_ERR,"\n\t ");
673 fprintf(SE_ERR,"offsety = ");
674 se_prinT2((&((*o)->_offsety)));
675 fprintf(SE_ERR,"\n\t ");
676 fprintf(SE_ERR,"width = ");
677 se_prinT2((&((*o)->_width)));
678 fprintf(SE_ERR,"\n\t ");
679 fprintf(SE_ERR,"height = ");
680 se_prinT2((&((*o)->_height)));
681 fprintf(SE_ERR,"\n\t ");
682 fprintf(SE_ERR,"widget_list = ");
683 se_prinT0((T0**)(&((*o)->_widget_list)));
684 fprintf(SE_ERR,"\n\t ");
685 fprintf(SE_ERR,"focus_widget = ");
686 se_prinT0((T0**)(&((*o)->_focus_widget)));
687 fprintf(SE_ERR,"\n\t ");
688 fprintf(SE_ERR,"name_tb = ");
689 se_prinT0((T0**)(&((*o)->_name_tb)));
690 fprintf(SE_ERR,"\n\t]");
691 }
692 T99 M99={99,0,NULL,0,0,0,0,NULL,NULL,0,NULL};
693
694 void se_prinT99(T99**o){
695 if(*o==NULL){
696 fprintf(SE_ERR,"Void");
697 return;
698 }
699 fprintf(SE_ERR,"HS_WINDOW");
700 fprintf(SE_ERR,"#%p",*o);
701 fprintf(SE_ERR,"\n\t[ ");
702 fprintf(SE_ERR,"has_focus = ");
703 se_prinT6((&((*o)->_has_focus)));
704 fprintf(SE_ERR,"\n\t ");
705 fprintf(SE_ERR,"signal_table = ");
706 se_prinT0((T0**)(&((*o)->_signal_table)));
707 fprintf(SE_ERR,"\n\t ");
708 fprintf(SE_ERR,"offsetx = ");
709 se_prinT2((&((*o)->_offsetx)));
710 fprintf(SE_ERR,"\n\t ");
711 fprintf(SE_ERR,"offsety = ");
712 se_prinT2((&((*o)->_offsety)));
713 fprintf(SE_ERR,"\n\t ");
714 fprintf(SE_ERR,"width = ");
715 se_prinT2((&((*o)->_width)));
716 fprintf(SE_ERR,"\n\t ");
717 fprintf(SE_ERR,"height = ");
718 se_prinT2((&((*o)->_height)));
719 fprintf(SE_ERR,"\n\t ");
720 fprintf(SE_ERR,"widget_list = ");
721 se_prinT0((T0**)(&((*o)->_widget_list)));
722 fprintf(SE_ERR,"\n\t ");
723 fprintf(SE_ERR,"focus_widget = ");
724 se_prinT0((T0**)(&((*o)->_focus_widget)));
725 fprintf(SE_ERR,"\n\t ");
726 fprintf(SE_ERR,"row_count = ");
727 se_prinT2((&((*o)->_row_count)));
728 fprintf(SE_ERR,"\n\t ");
729 fprintf(SE_ERR,"score_list = ");
730 se_prinT0((T0**)(&((*o)->_score_list)));
731 fprintf(SE_ERR,"\n\t]");
732 }
733 T80 M80={80,NULL,0,0,0};
734
735 void se_prinT80(T80**o){
736 if(*o==NULL){
737 fprintf(SE_ERR,"Void");
738 return;
739 }
740 fprintf(SE_ERR,"ARRAY[BOOLEAN]");
741 fprintf(SE_ERR,"#%p",*o);
742 fprintf(SE_ERR,"\n\t[ ");
743 fprintf(SE_ERR,"storage = ");
744 se_prinT82((&((*o)->_storage)));
745 fprintf(SE_ERR,"\n\t ");
746 fprintf(SE_ERR,"capacity = ");
747 se_prinT2((&((*o)->_capacity)));
748 fprintf(SE_ERR,"\n\t ");
749 fprintf(SE_ERR,"upper = ");
750 se_prinT2((&((*o)->_upper)));
751 fprintf(SE_ERR,"\n\t ");
752 fprintf(SE_ERR,"lower = ");
753 se_prinT2((&((*o)->_lower)));
754 fprintf(SE_ERR,"\n\t]");
755 }
756 T140 M140={140,0};
757
758 void se_prinT140(T140**o){
759 if(*o==NULL){
760 fprintf(SE_ERR,"Void");
761 return;
762 }
763 fprintf(SE_ERR,"MEMO[INTEGER]");
764 fprintf(SE_ERR,"#%p",*o);
765 fprintf(SE_ERR,"\n\t[ ");
766 fprintf(SE_ERR,"item = ");
767 se_prinT2((&((*o)->_item)));
768 fprintf(SE_ERR,"\n\t]");
769 }
770 T118 M118={118,0,NULL,NULL,0,NULL};
771
772 void se_prinT118(T118**o){
773 if(*o==NULL){
774 fprintf(SE_ERR,"Void");
775 return;
776 }
777 fprintf(SE_ERR,"LINKED_LIST[STRING]");
778 fprintf(SE_ERR,"#%p",*o);
779 fprintf(SE_ERR,"\n\t[ ");
780 fprintf(SE_ERR,"upper = ");
781 se_prinT2((&((*o)->_upper)));
782 fprintf(SE_ERR,"\n\t ");
783 fprintf(SE_ERR,"first_link = ");
784 se_prinT0((T0**)(&((*o)->_first_link)));
785 fprintf(SE_ERR,"\n\t ");
786 fprintf(SE_ERR,"last_link = ");
787 se_prinT0((T0**)(&((*o)->_last_link)));
788 fprintf(SE_ERR,"\n\t ");
789 fprintf(SE_ERR,"mem_idx = ");
790 se_prinT2((&((*o)->_mem_idx)));
791 fprintf(SE_ERR,"\n\t ");
792 fprintf(SE_ERR,"mem_lnk = ");
793 se_prinT0((T0**)(&((*o)->_mem_lnk)));
794 fprintf(SE_ERR,"\n\t]");
795 }
796 T113 M113={113,0,NULL,0,0,0,0,NULL,NULL};
797
798 void se_prinT113(T113**o){
799 if(*o==NULL){
800 fprintf(SE_ERR,"Void");
801 return;
802 }
803 fprintf(SE_ERR,"BUTTON");
804 fprintf(SE_ERR,"#%p",*o);
805 fprintf(SE_ERR,"\n\t[ ");
806 fprintf(SE_ERR,"has_focus = ");
807 se_prinT6((&((*o)->_has_focus)));
808 fprintf(SE_ERR,"\n\t ");
809 fprintf(SE_ERR,"signal_table = ");
810 se_prinT0((T0**)(&((*o)->_signal_table)));
811 fprintf(SE_ERR,"\n\t ");
812 fprintf(SE_ERR,"offsetx = ");
813 se_prinT2((&((*o)->_offsetx)));
814 fprintf(SE_ERR,"\n\t ");
815 fprintf(SE_ERR,"offsety = ");
816 se_prinT2((&((*o)->_offsety)));
817 fprintf(SE_ERR,"\n\t ");
818 fprintf(SE_ERR,"width = ");
819 se_prinT2((&((*o)->_width)));
820 fprintf(SE_ERR,"\n\t ");
821 fprintf(SE_ERR,"height = ");
822 se_prinT2((&((*o)->_height)));
823 fprintf(SE_ERR,"\n\t ");
824 fprintf(SE_ERR,"string = ");
825 se_prinT7((EIF_STRING*)(&((*o)->_string)));
826 fprintf(SE_ERR,"\n\t ");
827 fprintf(SE_ERR,"img = ");
828 se_prinT0((T0**)(&((*o)->_img)));
829 fprintf(SE_ERR,"\n\t]");
830 }
831 T55 M55={55,0,NULL,NULL,0};
832
833 void se_prinT55(T55**o){
834 if(*o==NULL){
835 fprintf(SE_ERR,"Void");
836 return;
837 }
838 fprintf(SE_ERR,"TEXT_FILE_READ");
839 fprintf(SE_ERR,"#%p",*o);
840 fprintf(SE_ERR,"\n\t[ ");
841 fprintf(SE_ERR,"push_back_flag = ");
842 se_prinT6((&((*o)->_push_back_flag)));
843 fprintf(SE_ERR,"\n\t ");
844 fprintf(SE_ERR,"path = ");
845 se_prinT7((EIF_STRING*)(&((*o)->_path)));
846 fprintf(SE_ERR,"\n\t ");
847 fprintf(SE_ERR,"input_stream = ");
848 se_prinT8((&((*o)->_input_stream)));
849 fprintf(SE_ERR,"\n\t ");
850 fprintf(SE_ERR,"memory = ");
851 se_prinT2((&((*o)->_memory)));
852 fprintf(SE_ERR,"\n\t]");
853 }
854
855 void se_prinT69(T69*o){
856 fprintf(SE_ERR,"NATIVE_ARRAY[STRING]");
857 fprintf(SE_ERR,"#%p",*o);
858 }
859 T65 M65={65,NULL,NULL,NULL};
860
861 void se_prinT65(T65**o){
862 if(*o==NULL){
863 fprintf(SE_ERR,"Void");
864 return;
865 }
866 fprintf(SE_ERR,"PRESET");
867 fprintf(SE_ERR,"#%p",*o);
868 fprintf(SE_ERR,"\n\t[ ");
869 fprintf(SE_ERR,"name = ");
870 se_prinT7((EIF_STRING*)(&((*o)->_name)));
871 fprintf(SE_ERR,"\n\t ");
872 fprintf(SE_ERR,"setting = ");
873 se_prinT0((T0**)(&((*o)->_setting)));
874 fprintf(SE_ERR,"\n\t ");
875 fprintf(SE_ERR,"hiscore = ");
876 se_prinT0((T0**)(&((*o)->_hiscore)));
877 fprintf(SE_ERR,"\n\t]");
878 }
879 T128 M128={128,NULL};
880
881 void se_prinT128(T128**o){
882 if(*o==NULL){
883 fprintf(SE_ERR,"Void");
884 return;
885 }
886 fprintf(SE_ERR,"COMMAND_PRESET_CHANGE");
887 fprintf(SE_ERR,"#%p",*o);
888 fprintf(SE_ERR,"\n\t[ ");
889 fprintf(SE_ERR,"main = ");
890 se_prinT0((T0**)(&((*o)->_main)));
891 fprintf(SE_ERR,"\n\t]");
892 }
893 T105 M105={105,0,NULL,NULL,0,NULL};
894
895 void se_prinT105(T105**o){
896 if(*o==NULL){
897 fprintf(SE_ERR,"Void");
898 return;
899 }
900 fprintf(SE_ERR,"LINKED_LIST[SCORE_DISPLAY]");
901 fprintf(SE_ERR,"#%p",*o);
902 fprintf(SE_ERR,"\n\t[ ");
903 fprintf(SE_ERR,"upper = ");
904 se_prinT2((&((*o)->_upper)));
905 fprintf(SE_ERR,"\n\t ");
906 fprintf(SE_ERR,"first_link = ");
907 se_prinT0((T0**)(&((*o)->_first_link)));
908 fprintf(SE_ERR,"\n\t ");
909 fprintf(SE_ERR,"last_link = ");
910 se_prinT0((T0**)(&((*o)->_last_link)));
911 fprintf(SE_ERR,"\n\t ");
912 fprintf(SE_ERR,"mem_idx = ");
913 se_prinT2((&((*o)->_mem_idx)));
914 fprintf(SE_ERR,"\n\t ");
915 fprintf(SE_ERR,"mem_lnk = ");
916 se_prinT0((T0**)(&((*o)->_mem_lnk)));
917 fprintf(SE_ERR,"\n\t]");
918 }
919 T68 M68={68,0,0,0};
920
921 void se_prinT68(T68**o){
922 if(*o==NULL){
923 fprintf(SE_ERR,"Void");
924 return;
925 }
926 fprintf(SE_ERR,"SETTING");
927 fprintf(SE_ERR,"#%p",*o);
928 fprintf(SE_ERR,"\n\t[ ");
929 fprintf(SE_ERR,"width = ");
930 se_prinT2((&((*o)->_width)));
931 fprintf(SE_ERR,"\n\t ");
932 fprintf(SE_ERR,"height = ");
933 se_prinT2((&((*o)->_height)));
934 fprintf(SE_ERR,"\n\t ");
935 fprintf(SE_ERR,"wrap = ");
936 se_prinT6((&((*o)->_wrap)));
937 fprintf(SE_ERR,"\n\t]");
938 }
939 T129 M129={129,NULL};
940
941 void se_prinT129(T129**o){
942 if(*o==NULL){
943 fprintf(SE_ERR,"Void");
944 return;
945 }
946 fprintf(SE_ERR,"COMMAND_CANCEL");
947 fprintf(SE_ERR,"#%p",*o);
948 fprintf(SE_ERR,"\n\t[ ");
949 fprintf(SE_ERR,"main = ");
950 se_prinT0((T0**)(&((*o)->_main)));
951 fprintf(SE_ERR,"\n\t]");
952 }
953 T153 M153={153,NULL,0,0,0};
954
955 void se_prinT153(T153**o){
956 if(*o==NULL){
957 fprintf(SE_ERR,"Void");
958 return;
959 }
960 fprintf(SE_ERR,"ARRAY[CHARACTER]");
961 fprintf(SE_ERR,"#%p",*o);
962 fprintf(SE_ERR,"\n\t[ ");
963 fprintf(SE_ERR,"storage = ");
964 se_prinT9((&((*o)->_storage)));
965 fprintf(SE_ERR,"\n\t ");
966 fprintf(SE_ERR,"capacity = ");
967 se_prinT2((&((*o)->_capacity)));
968 fprintf(SE_ERR,"\n\t ");
969 fprintf(SE_ERR,"upper = ");
970 se_prinT2((&((*o)->_upper)));
971 fprintf(SE_ERR,"\n\t ");
972 fprintf(SE_ERR,"lower = ");
973 se_prinT2((&((*o)->_lower)));
974 fprintf(SE_ERR,"\n\t]");
975 }
976 T45 M45={45,NULL,0,0,0,NULL,0};
977
978 void se_prinT45(T45**o){
979 if(*o==NULL){
980 fprintf(SE_ERR,"Void");
981 return;
982 }
983 fprintf(SE_ERR,"DICTIONARY[COMMAND,INTEGER]");
984 fprintf(SE_ERR,"#%p",*o);
985 fprintf(SE_ERR,"\n\t[ ");
986 fprintf(SE_ERR,"buckets = ");
987 se_prinT49((&((*o)->_buckets)));
988 fprintf(SE_ERR,"\n\t ");
989 fprintf(SE_ERR,"capacity = ");
990 se_prinT2((&((*o)->_capacity)));
991 fprintf(SE_ERR,"\n\t ");
992 fprintf(SE_ERR,"count = ");
993 se_prinT2((&((*o)->_count)));
994 fprintf(SE_ERR,"\n\t ");
995 fprintf(SE_ERR,"cache_user = ");
996 se_prinT2((&((*o)->_cache_user)));
997 fprintf(SE_ERR,"\n\t ");
998 fprintf(SE_ERR,"cache_node = ");
999 se_prinT0((T0**)(&((*o)->_cache_node)));
1000 fprintf(SE_ERR,"\n\t ");
1001 fprintf(SE_ERR,"cache_buckets = ");
1002 se_prinT2((&((*o)->_cache_buckets)));
1003 fprintf(SE_ERR,"\n\t]");
1004 }
1005 T96 M96={96,NULL,0,0};
1006
1007 void se_prinT96(T96**o){
1008 if(*o==NULL){
1009 fprintf(SE_ERR,"Void");
1010 return;
1011 }
1012 fprintf(SE_ERR,"SCORE");
1013 fprintf(SE_ERR,"#%p",*o);
1014 fprintf(SE_ERR,"\n\t[ ");
1015 fprintf(SE_ERR,"name = ");
1016 se_prinT7((EIF_STRING*)(&((*o)->_name)));
1017 fprintf(SE_ERR,"\n\t ");
1018 fprintf(SE_ERR,"score = ");
1019 se_prinT2((&((*o)->_score)));
1020 fprintf(SE_ERR,"\n\t ");
1021 fprintf(SE_ERR,"time = ");
1022 se_prinT2((&((*o)->_time)));
1023 fprintf(SE_ERR,"\n\t]");
1024 }
1025 T7 M7={7,NULL,0,0};
1026 T39 M39={39,0,NULL,NULL,0,NULL};
1027
1028 void se_prinT39(T39**o){
1029 if(*o==NULL){
1030 fprintf(SE_ERR,"Void");
1031 return;
1032 }
1033 fprintf(SE_ERR,"LINKED_LIST[WIDGET]");
1034 fprintf(SE_ERR,"#%p",*o);
1035 fprintf(SE_ERR,"\n\t[ ");
1036 fprintf(SE_ERR,"upper = ");
1037 se_prinT2((&((*o)->_upper)));
1038 fprintf(SE_ERR,"\n\t ");
1039 fprintf(SE_ERR,"first_link = ");
1040 se_prinT0((T0**)(&((*o)->_first_link)));
1041 fprintf(SE_ERR,"\n\t ");
1042 fprintf(SE_ERR,"last_link = ");
1043 se_prinT0((T0**)(&((*o)->_last_link)));
1044 fprintf(SE_ERR,"\n\t ");
1045 fprintf(SE_ERR,"mem_idx = ");
1046 se_prinT2((&((*o)->_mem_idx)));
1047 fprintf(SE_ERR,"\n\t ");
1048 fprintf(SE_ERR,"mem_lnk = ");
1049 se_prinT0((T0**)(&((*o)->_mem_lnk)));
1050 fprintf(SE_ERR,"\n\t]");
1051 }
1052 T127 M127={127,NULL};
1053
1054 void se_prinT127(T127**o){
1055 if(*o==NULL){
1056 fprintf(SE_ERR,"Void");
1057 return;
1058 }
1059 fprintf(SE_ERR,"COMMAND_CUSTOM_CHANGE");
1060 fprintf(SE_ERR,"#%p",*o);
1061 fprintf(SE_ERR,"\n\t[ ");
1062 fprintf(SE_ERR,"main = ");
1063 se_prinT0((T0**)(&((*o)->_main)));
1064 fprintf(SE_ERR,"\n\t]");
1065 }
1066
1067 void se_prinT9(T9*o){
1068 fprintf(SE_ERR,"NATIVE_ARRAY[CHARACTER]");
1069 fprintf(SE_ERR,"#%p",*o);
1070 }
1071 T98 M98={98,0,NULL,0,0,0,0,0,0,NULL,0,NULL};
1072
1073 void se_prinT98(T98**o){
1074 if(*o==NULL){
1075 fprintf(SE_ERR,"Void");
1076 return;
1077 }
1078 fprintf(SE_ERR,"TEXTBOX");
1079 fprintf(SE_ERR,"#%p",*o);
1080 fprintf(SE_ERR,"\n\t[ ");
1081 fprintf(SE_ERR,"has_focus = ");
1082 se_prinT6((&((*o)->_has_focus)));
1083 fprintf(SE_ERR,"\n\t ");
1084 fprintf(SE_ERR,"signal_table = ");
1085 se_prinT0((T0**)(&((*o)->_signal_table)));
1086 fprintf(SE_ERR,"\n\t ");
1087 fprintf(SE_ERR,"offsetx = ");
1088 se_prinT2((&((*o)->_offsetx)));
1089 fprintf(SE_ERR,"\n\t ");
1090 fprintf(SE_ERR,"offsety = ");
1091 se_prinT2((&((*o)->_offsety)));
1092 fprintf(SE_ERR,"\n\t ");
1093 fprintf(SE_ERR,"width = ");
1094 se_prinT2((&((*o)->_width)));
1095 fprintf(SE_ERR,"\n\t ");
1096 fprintf(SE_ERR,"height = ");
1097 se_prinT2((&((*o)->_height)));
1098 fprintf(SE_ERR,"\n\t ");
1099 fprintf(SE_ERR,"text_width = ");
1100 se_prinT2((&((*o)->_text_width)));
1101 fprintf(SE_ERR,"\n\t ");
1102 fprintf(SE_ERR,"text_height = ");
1103 se_prinT2((&((*o)->_text_height)));
1104 fprintf(SE_ERR,"\n\t ");
1105 fprintf(SE_ERR,"string = ");
1106 se_prinT7((EIF_STRING*)(&((*o)->_string)));
1107 fprintf(SE_ERR,"\n\t ");
1108 fprintf(SE_ERR,"cursor = ");
1109 se_prinT2((&((*o)->_cursor)));
1110 fprintf(SE_ERR,"\n\t ");
1111 fprintf(SE_ERR,"textimg = ");
1112 se_prinT0((T0**)(&((*o)->_textimg)));
1113 fprintf(SE_ERR,"\n\t]");
1114 }
1115
1116 void se_prinT152(T152*o){
1117 fprintf(SE_ERR,"SAFE_EQUAL[STRING]");
1118 }
1119
1120 void se_prinT95(T95**o){
1121 if(*o==NULL){
1122 fprintf(SE_ERR,"Void");
1123 return;
1124 }
1125 fprintf(SE_ERR,"PROCEDURE[WIDGET,TUPLE[WIDGET]]");
1126 fprintf(SE_ERR,"#%p",*o);
1127 }
1128
1129 void se_prinT134(T134**o){
1130 if(*o==NULL){
1131 fprintf(SE_ERR,"Void");
1132 return;
1133 }
1134 fprintf(SE_ERR,"PROCEDURE[IO_SCORE,TUPLE[PRESET]]");
1135 fprintf(SE_ERR,"#%p",*o);
1136 }
1137
1138 void se_prinT109(T109**o){
1139 if(*o==NULL){
1140 fprintf(SE_ERR,"Void");
1141 return;
1142 }
1143 fprintf(SE_ERR,"PROCEDURE[HS_WINDOW,TUPLE[PRESET]]");
1144 fprintf(SE_ERR,"#%p",*o);
1145 }
1146
1147 void se_prinT155(T155*o){
1148 fprintf(SE_ERR,"SAFE_EQUAL[TILE]");
1149 }
1150 T104 M104={104,NULL,NULL,NULL,NULL,NULL};
1151
1152 void se_prinT104(T104**o){
1153 if(*o==NULL){
1154 fprintf(SE_ERR,"Void");
1155 return;
1156 }
1157 fprintf(SE_ERR,"SCORE_DISPLAY");
1158 fprintf(SE_ERR,"#%p",*o);
1159 fprintf(SE_ERR,"\n\t[ ");
1160 fprintf(SE_ERR,"name = ");
1161 se_prinT7((EIF_STRING*)(&((*o)->_name)));
1162 fprintf(SE_ERR,"\n\t ");
1163 fprintf(SE_ERR,"level_l = ");
1164 se_prinT0((T0**)(&((*o)->_level_l)));
1165 fprintf(SE_ERR,"\n\t ");
1166 fprintf(SE_ERR,"name_l = ");
1167 se_prinT0((T0**)(&((*o)->_name_l)));
1168 fprintf(SE_ERR,"\n\t ");
1169 fprintf(SE_ERR,"time_l = ");
1170 se_prinT0((T0**)(&((*o)->_time_l)));
1171 fprintf(SE_ERR,"\n\t ");
1172 fprintf(SE_ERR,"score_l = ");
1173 se_prinT0((T0**)(&((*o)->_score_l)));
1174 fprintf(SE_ERR,"\n\t]");
1175 }
1176 T131 M131={131,NULL,0,0,0,NULL,0};
1177
1178 void se_prinT131(T131**o){
1179 if(*o==NULL){
1180 fprintf(SE_ERR,"Void");
1181 return;
1182 }
1183 fprintf(SE_ERR,"DICTIONARY[SCORE,STRING]");
1184 fprintf(SE_ERR,"#%p",*o);
1185 fprintf(SE_ERR,"\n\t[ ");
1186 fprintf(SE_ERR,"buckets = ");
1187 se_prinT133((&((*o)->_buckets)));
1188 fprintf(SE_ERR,"\n\t ");
1189 fprintf(SE_ERR,"capacity = ");
1190 se_prinT2((&((*o)->_capacity)));
1191 fprintf(SE_ERR,"\n\t ");
1192 fprintf(SE_ERR,"count = ");
1193 se_prinT2((&((*o)->_count)));
1194 fprintf(SE_ERR,"\n\t ");
1195 fprintf(SE_ERR,"cache_user = ");
1196 se_prinT2((&((*o)->_cache_user)));
1197 fprintf(SE_ERR,"\n\t ");
1198 fprintf(SE_ERR,"cache_node = ");
1199 se_prinT0((T0**)(&((*o)->_cache_node)));
1200 fprintf(SE_ERR,"\n\t ");
1201 fprintf(SE_ERR,"cache_buckets = ");
1202 se_prinT2((&((*o)->_cache_buckets)));
1203 fprintf(SE_ERR,"\n\t]");
1204 }
1205 T28 M28={28,0,0,0,0,0};
1206
1207 void se_prinT28(T28**o){
1208 if(*o==NULL){
1209 fprintf(SE_ERR,"Void");
1210 return;
1211 }
1212 fprintf(SE_ERR,"EVENT");
1213 fprintf(SE_ERR,"#%p",*o);
1214 fprintf(SE_ERR,"\n\t[ ");
1215 fprintf(SE_ERR,"y = ");
1216 se_prinT2((&((*o)->_y)));
1217 fprintf(SE_ERR,"\n\t ");
1218 fprintf(SE_ERR,"x = ");
1219 se_prinT2((&((*o)->_x)));
1220 fprintf(SE_ERR,"\n\t ");
1221 fprintf(SE_ERR,"type = ");
1222 se_prinT2((&((*o)->_type)));
1223 fprintf(SE_ERR,"\n\t ");
1224 fprintf(SE_ERR,"i1 = ");
1225 se_prinT2((&((*o)->_i1)));
1226 fprintf(SE_ERR,"\n\t ");
1227 fprintf(SE_ERR,"kmod = ");
1228 se_prinT2((&((*o)->_kmod)));
1229 fprintf(SE_ERR,"\n\t]");
1230 }
1231 T112 M112={112,NULL};
1232
1233 void se_prinT112(T112**o){
1234 if(*o==NULL){
1235 fprintf(SE_ERR,"Void");
1236 return;
1237 }
1238 fprintf(SE_ERR,"COMMAND_CLOSE_CURRENT");
1239 fprintf(SE_ERR,"#%p",*o);
1240 fprintf(SE_ERR,"\n\t[ ");
1241 fprintf(SE_ERR,"main = ");
1242 se_prinT0((T0**)(&((*o)->_main)));
1243 fprintf(SE_ERR,"\n\t]");
1244 }
1245 T67 M67={67,NULL,NULL};
1246
1247 void se_prinT67(T67**o){
1248 if(*o==NULL){
1249 fprintf(SE_ERR,"Void");
1250 return;
1251 }
1252 fprintf(SE_ERR,"LINK[PRESET]");
1253 fprintf(SE_ERR,"#%p",*o);
1254 fprintf(SE_ERR,"\n\t[ ");
1255 fprintf(SE_ERR,"item = ");
1256 se_prinT0((T0**)(&((*o)->_item)));
1257 fprintf(SE_ERR,"\n\t ");
1258 fprintf(SE_ERR,"next = ");
1259 se_prinT0((T0**)(&((*o)->_next)));
1260 fprintf(SE_ERR,"\n\t]");
1261 }
1262 T137 M137={137,NULL};
1263
1264 void se_prinT137(T137**o){
1265 if(*o==NULL){
1266 fprintf(SE_ERR,"Void");
1267 return;
1268 }
1269 fprintf(SE_ERR,"COMMAND_OPTIONS");
1270 fprintf(SE_ERR,"#%p",*o);
1271 fprintf(SE_ERR,"\n\t[ ");
1272 fprintf(SE_ERR,"main = ");
1273 se_prinT0((T0**)(&((*o)->_main)));
1274 fprintf(SE_ERR,"\n\t]");
1275 }
1276
1277 void se_prinT115(T115**o){
1278 if(*o==NULL){
1279 fprintf(SE_ERR,"Void");
1280 return;
1281 }
1282 fprintf(SE_ERR,"PROCEDURE[NEWHS_WINDOW,TUPLE[WIDGET]]");
1283 fprintf(SE_ERR,"#%p",*o);
1284 }
1285 T22 M22={0};
1286
1287 void se_prinT22(T22*o){
1288 fprintf(SE_ERR,"TIME");
1289 fprintf(SE_ERR,"\n\t[ ");
1290 fprintf(SE_ERR,"time_memory = ");
1291 se_prinT5((&((*o)._time_memory)));
1292 fprintf(SE_ERR,"\n\t]");
1293 }
1294 T74 M74={74,0,NULL,0,0,0,0};
1295
1296 void se_prinT74(T74**o){
1297 if(*o==NULL){
1298 fprintf(SE_ERR,"Void");
1299 return;
1300 }
1301 fprintf(SE_ERR,"TILE");
1302 fprintf(SE_ERR,"#%p",*o);
1303 fprintf(SE_ERR,"\n\t[ ");
1304 fprintf(SE_ERR,"type = ");
1305 se_prinT2((&((*o)->_type)));
1306 fprintf(SE_ERR,"\n\t ");
1307 fprintf(SE_ERR,"neighbour = ");
1308 se_prinT0((T0**)(&((*o)->_neighbour)));
1309 fprintf(SE_ERR,"\n\t ");
1310 fprintf(SE_ERR,"y = ");
1311 se_prinT2((&((*o)->_y)));
1312 fprintf(SE_ERR,"\n\t ");
1313 fprintf(SE_ERR,"x = ");
1314 se_prinT2((&((*o)->_x)));
1315 fprintf(SE_ERR,"\n\t ");
1316 fprintf(SE_ERR,"is_connected = ");
1317 se_prinT6((&((*o)->_is_connected)));
1318 fprintf(SE_ERR,"\n\t ");
1319 fprintf(SE_ERR,"neighbour_count = ");
1320 se_prinT2((&((*o)->_neighbour_count)));
1321 fprintf(SE_ERR,"\n\t]");
1322 }
1323 T64 M64={64,NULL,0,0,0};
1324
1325 void se_prinT64(T64**o){
1326 if(*o==NULL){
1327 fprintf(SE_ERR,"Void");
1328 return;
1329 }
1330 fprintf(SE_ERR,"ARRAY[STRING]");
1331 fprintf(SE_ERR,"#%p",*o);
1332 fprintf(SE_ERR,"\n\t[ ");
1333 fprintf(SE_ERR,"storage = ");
1334 se_prinT69((&((*o)->_storage)));
1335 fprintf(SE_ERR,"\n\t ");
1336 fprintf(SE_ERR,"capacity = ");
1337 se_prinT2((&((*o)->_capacity)));
1338 fprintf(SE_ERR,"\n\t ");
1339 fprintf(SE_ERR,"upper = ");
1340 se_prinT2((&((*o)->_upper)));
1341 fprintf(SE_ERR,"\n\t ");
1342 fprintf(SE_ERR,"lower = ");
1343 se_prinT2((&((*o)->_lower)));
1344 fprintf(SE_ERR,"\n\t]");
1345 }
1346 T16 M16={16,NULL,NULL,NULL,NULL,0,0,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,0,0,0,0,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,NULL,0};
1347
1348 void se_prinT16(T16**o){
1349 if(*o==NULL){
1350 fprintf(SE_ERR,"Void");
1351 return;
1352 }
1353 fprintf(SE_ERR,"NETWALK");
1354 fprintf(SE_ERR,"#%p",*o);
1355 fprintf(SE_ERR,"\n\t[ ");
1356 fprintf(SE_ERR,"io_score = ");
1357 se_prinT0((T0**)(&((*o)->_io_score)));
1358 fprintf(SE_ERR,"\n\t ");
1359 fprintf(SE_ERR,"board = ");
1360 se_prinT0((T0**)(&((*o)->_board)));
1361 fprintf(SE_ERR,"\n\t ");
1362 fprintf(SE_ERR,"current_preset = ");
1363 se_prinT0((T0**)(&((*o)->_current_preset)));
1364 fprintf(SE_ERR,"\n\t ");
1365 fprintf(SE_ERR,"current_setting = ");
1366 se_prinT0((T0**)(&((*o)->_current_setting)));
1367 fprintf(SE_ERR,"\n\t ");
1368 fprintf(SE_ERR,"seed = ");
1369 se_prinT2((&((*o)->_seed)));
1370 fprintf(SE_ERR,"\n\t ");
1371 fprintf(SE_ERR,"move_count = ");
1372 se_prinT2((&((*o)->_move_count)));
1373 fprintf(SE_ERR,"\n\t ");
1374 fprintf(SE_ERR,"new_game_button = ");
1375 se_prinT0((T0**)(&((*o)->_new_game_button)));
1376 fprintf(SE_ERR,"\n\t ");
1377 fprintf(SE_ERR,"options_button = ");
1378 se_prinT0((T0**)(&((*o)->_options_button)));
1379 fprintf(SE_ERR,"\n\t ");
1380 fprintf(SE_ERR,"hs_button = ");
1381 se_prinT0((T0**)(&((*o)->_hs_button)));
1382 fprintf(SE_ERR,"\n\t ");
1383 fprintf(SE_ERR,"quit_button = ");
1384 se_prinT0((T0**)(&((*o)->_quit_button)));
1385 fprintf(SE_ERR,"\n\t ");
1386 fprintf(SE_ERR,"options_window = ");
1387 se_prinT0((T0**)(&((*o)->_options_window)));
1388 fprintf(SE_ERR,"\n\t ");
1389 fprintf(SE_ERR,"newhs_window = ");
1390 se_prinT0((T0**)(&((*o)->_newhs_window)));
1391 fprintf(SE_ERR,"\n\t ");
1392 fprintf(SE_ERR,"hs_window = ");
1393 se_prinT0((T0**)(&((*o)->_hs_window)));
1394 fprintf(SE_ERR,"\n\t ");
1395 fprintf(SE_ERR,"widget_list = ");
1396 se_prinT0((T0**)(&((*o)->_widget_list)));
1397 fprintf(SE_ERR,"\n\t ");
1398 fprintf(SE_ERR,"elapsed_seconds = ");
1399 se_prinT2((&((*o)->_elapsed_seconds)));
1400 fprintf(SE_ERR,"\n\t ");
1401 fprintf(SE_ERR,"elapsed_ticks = ");
1402 se_prinT2((&((*o)->_elapsed_ticks)));
1403 fprintf(SE_ERR,"\n\t ");
1404 fprintf(SE_ERR,"last_ticks = ");
1405 se_prinT2((&((*o)->_last_ticks)));
1406 fprintf(SE_ERR,"\n\t ");
1407 fprintf(SE_ERR,"game_state = ");
1408 se_prinT2((&((*o)->_game_state)));
1409 fprintf(SE_ERR,"\n\t ");
1410 fprintf(SE_ERR,"current_window = ");
1411 se_prinT0((T0**)(&((*o)->_current_window)));
1412 fprintf(SE_ERR,"\n\t ");
1413 fprintf(SE_ERR,"move_image = ");
1414 se_prinT0((T0**)(&((*o)->_move_image)));
1415 fprintf(SE_ERR,"\n\t ");
1416 fprintf(SE_ERR,"best_image = ");
1417 se_prinT0((T0**)(&((*o)->_best_image)));
1418 fprintf(SE_ERR,"\n\t ");
1419 fprintf(SE_ERR,"time_image = ");
1420 se_prinT0((T0**)(&((*o)->_time_image)));
1421 fprintf(SE_ERR,"\n\t ");
1422 fprintf(SE_ERR,"server_bottom = ");
1423 se_prinT0((T0**)(&((*o)->_server_bottom)));
1424 fprintf(SE_ERR,"\n\t ");
1425 fprintf(SE_ERR,"server_top = ");
1426 se_prinT0((T0**)(&((*o)->_server_top)));
1427 fprintf(SE_ERR,"\n\t ");
1428 fprintf(SE_ERR,"connected_pipe_color = ");
1429 se_prinT0((T0**)(&((*o)->_connected_pipe_color)));
1430 fprintf(SE_ERR,"\n\t ");
1431 fprintf(SE_ERR,"disconnected_pipe_color = ");
1432 se_prinT0((T0**)(&((*o)->_disconnected_pipe_color)));
1433 fprintf(SE_ERR,"\n\t ");
1434 fprintf(SE_ERR,"connected_terminal_color = ");
1435 se_prinT0((T0**)(&((*o)->_connected_terminal_color)));
1436 fprintf(SE_ERR,"\n\t ");
1437 fprintf(SE_ERR,"disconnected_terminal_color = ");
1438 se_prinT0((T0**)(&((*o)->_disconnected_terminal_color)));
1439 fprintf(SE_ERR,"\n\t ");
1440 fprintf(SE_ERR,"open_list = ");
1441 se_prinT0((T0**)(&((*o)->_open_list)));
1442 fprintf(SE_ERR,"\n\t ");
1443 fprintf(SE_ERR,"rand = ");
1444 se_prinT0((T0**)(&((*o)->_rand)));
1445 fprintf(SE_ERR,"\n\t ");
1446 fprintf(SE_ERR,"best = ");
1447 se_prinT2((&((*o)->_best)));
1448 fprintf(SE_ERR,"\n\t]");
1449 }
1450 T125 M125={125,NULL};
1451
1452 void se_prinT125(T125**o){
1453 if(*o==NULL){
1454 fprintf(SE_ERR,"Void");
1455 return;
1456 }
1457 fprintf(SE_ERR,"COMMAND_OPTIONS_OK");
1458 fprintf(SE_ERR,"#%p",*o);
1459 fprintf(SE_ERR,"\n\t[ ");
1460 fprintf(SE_ERR,"main = ");
1461 se_prinT0((T0**)(&((*o)->_main)));
1462 fprintf(SE_ERR,"\n\t]");
1463 }
1464 T86 M86={86,0,NULL,NULL,0,NULL};
1465
1466 void se_prinT86(T86**o){
1467 if(*o==NULL){
1468 fprintf(SE_ERR,"Void");
1469 return;
1470 }
1471 fprintf(SE_ERR,"LINKED_LIST[TILE]");
1472 fprintf(SE_ERR,"#%p",*o);
1473 fprintf(SE_ERR,"\n\t[ ");
1474 fprintf(SE_ERR,"upper = ");
1475 se_prinT2((&((*o)->_upper)));
1476 fprintf(SE_ERR,"\n\t ");
1477 fprintf(SE_ERR,"first_link = ");
1478 se_prinT0((T0**)(&((*o)->_first_link)));
1479 fprintf(SE_ERR,"\n\t ");
1480 fprintf(SE_ERR,"last_link = ");
1481 se_prinT0((T0**)(&((*o)->_last_link)));
1482 fprintf(SE_ERR,"\n\t ");
1483 fprintf(SE_ERR,"mem_idx = ");
1484 se_prinT2((&((*o)->_mem_idx)));
1485 fprintf(SE_ERR,"\n\t ");
1486 fprintf(SE_ERR,"mem_lnk = ");
1487 se_prinT0((T0**)(&((*o)->_mem_lnk)));
1488 fprintf(SE_ERR,"\n\t]");
1489 }
1490 T138 M138={138,NULL};
1491
1492 void se_prinT138(T138**o){
1493 if(*o==NULL){
1494 fprintf(SE_ERR,"Void");
1495 return;
1496 }
1497 fprintf(SE_ERR,"COMMAND_NEW_GAME");
1498 fprintf(SE_ERR,"#%p",*o);
1499 fprintf(SE_ERR,"\n\t[ ");
1500 fprintf(SE_ERR,"main = ");
1501 se_prinT0((T0**)(&((*o)->_main)));
1502 fprintf(SE_ERR,"\n\t]");
1503 }
1504
1505 void se_prinT85(T85*o){
1506 fprintf(SE_ERR,"NATIVE_ARRAY[INTEGER]");
1507 fprintf(SE_ERR,"#%p",*o);
1508 }
1509 T146 M146={146,NULL,NULL};
1510
1511 void se_prinT146(T146**o){
1512 if(*o==NULL){
1513 fprintf(SE_ERR,"Void");
1514 return;
1515 }
1516 fprintf(SE_ERR,"TEXT_FILE_WRITE");
1517 fprintf(SE_ERR,"#%p",*o);
1518 fprintf(SE_ERR,"\n\t[ ");
1519 fprintf(SE_ERR,"path = ");
1520 se_prinT7((EIF_STRING*)(&((*o)->_path)));
1521 fprintf(SE_ERR,"\n\t ");
1522 fprintf(SE_ERR,"output_stream = ");
1523 se_prinT8((&((*o)->_output_stream)));
1524 fprintf(SE_ERR,"\n\t]");
1525 }
1526 T106 M106={106,NULL,NULL};
1527
1528 void se_prinT106(T106**o){
1529 if(*o==NULL){
1530 fprintf(SE_ERR,"Void");
1531 return;
1532 }
1533 fprintf(SE_ERR,"LINK[SCORE_DISPLAY]");
1534 fprintf(SE_ERR,"#%p",*o);
1535 fprintf(SE_ERR,"\n\t[ ");
1536 fprintf(SE_ERR,"item = ");
1537 se_prinT0((T0**)(&((*o)->_item)));
1538 fprintf(SE_ERR,"\n\t ");
1539 fprintf(SE_ERR,"next = ");
1540 se_prinT0((T0**)(&((*o)->_next)));
1541 fprintf(SE_ERR,"\n\t]");
1542 }
1543 T66 M66={66,0,NULL,NULL,0,NULL};
1544
1545 void se_prinT66(T66**o){
1546 if(*o==NULL){
1547 fprintf(SE_ERR,"Void");
1548 return;
1549 }
1550 fprintf(SE_ERR,"LINKED_LIST[PRESET]");
1551 fprintf(SE_ERR,"#%p",*o);
1552 fprintf(SE_ERR,"\n\t[ ");
1553 fprintf(SE_ERR,"upper = ");
1554 se_prinT2((&((*o)->_upper)));
1555 fprintf(SE_ERR,"\n\t ");
1556 fprintf(SE_ERR,"first_link = ");
1557 se_prinT0((T0**)(&((*o)->_first_link)));
1558 fprintf(SE_ERR,"\n\t ");
1559 fprintf(SE_ERR,"last_link = ");
1560 se_prinT0((T0**)(&((*o)->_last_link)));
1561 fprintf(SE_ERR,"\n\t ");
1562 fprintf(SE_ERR,"mem_idx = ");
1563 se_prinT2((&((*o)->_mem_idx)));
1564 fprintf(SE_ERR,"\n\t ");
1565 fprintf(SE_ERR,"mem_lnk = ");
1566 se_prinT0((T0**)(&((*o)->_mem_lnk)));
1567 fprintf(SE_ERR,"\n\t]");
1568 }
1569 T116 M116={116,NULL};
1570
1571 void se_prinT116(T116**o){
1572 if(*o==NULL){
1573 fprintf(SE_ERR,"Void");
1574 return;
1575 }
1576 fprintf(SE_ERR,"COMMAND_NEWHS_OK");
1577 fprintf(SE_ERR,"#%p",*o);
1578 fprintf(SE_ERR,"\n\t[ ");
1579 fprintf(SE_ERR,"main = ");
1580 se_prinT0((T0**)(&((*o)->_main)));
1581 fprintf(SE_ERR,"\n\t]");
1582 }
1583 T132 M132={132,NULL,NULL,NULL};
1584
1585 void se_prinT132(T132**o){
1586 if(*o==NULL){
1587 fprintf(SE_ERR,"Void");
1588 return;
1589 }
1590 fprintf(SE_ERR,"DICTIONARY_NODE[SCORE,STRING]");
1591 fprintf(SE_ERR,"#%p",*o);
1592 fprintf(SE_ERR,"\n\t[ ");
1593 fprintf(SE_ERR,"item = ");
1594 se_prinT0((T0**)(&((*o)->_item)));
1595 fprintf(SE_ERR,"\n\t ");
1596 fprintf(SE_ERR,"key = ");
1597 se_prinT7((EIF_STRING*)(&((*o)->_key)));
1598 fprintf(SE_ERR,"\n\t ");
1599 fprintf(SE_ERR,"next = ");
1600 se_prinT0((T0**)(&((*o)->_next)));
1601 fprintf(SE_ERR,"\n\t]");
1602 }
1603 T136 M136={136,NULL};
1604
1605 void se_prinT136(T136**o){
1606 if(*o==NULL){
1607 fprintf(SE_ERR,"Void");
1608 return;
1609 }
1610 fprintf(SE_ERR,"COMMAND_SHOW_HS");
1611 fprintf(SE_ERR,"#%p",*o);
1612 fprintf(SE_ERR,"\n\t[ ");
1613 fprintf(SE_ERR,"main = ");
1614 se_prinT0((T0**)(&((*o)->_main)));
1615 fprintf(SE_ERR,"\n\t]");
1616 }
1617
1618 void se_prinT133(T133*o){
1619 fprintf(SE_ERR,"NATIVE_ARRAY[DICTIONARY_NODE[SCORE,STRING]]");
1620 fprintf(SE_ERR,"#%p",*o);
1621 }
1622 /*
1623 -- This file is free software, which comes along with SmallEiffel. This
1624 -- software is distributed in the hope that it will be useful, but WITHOUT
1625 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
1626 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
1627 -- this header is kept unaltered, and a notification of the changes is added.
1628 -- You are allowed to redistribute it and sell it, alone or as a part of
1629 -- another product.
1630 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
1631 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
1632 -- http://SmallEiffel.loria.fr
1633 --
1634 */
1635
1636 /*
1637 This file (SmallEiffel/sys/runtime/no_check.c) is automatically included
1638 when `run_control.no_check' is true (ie. all modes except -boost).
1639 */
1640
1641 /*
1642 To print object into the trace-stack :
1643 */
1644 void se_prinT0(T0** o) {
1645 if (*o == NULL) {
1646 fprintf(SE_ERR,"Void");
1647 }
1648 else {
1649 fprintf(SE_ERR,"#%p",(void*)*o);
1650 }
1651 }
1652
1653 void se_prinT2(EIF_INTEGER* o) {
1654 fprintf(SE_ERR,"%d",*o);
1655 }
1656
1657 static void se_print_character(char c) {
1658 /* Produce a visible output of `c' using an Eiffelish notation.
1659 */
1660 if ((' ' <= c) && (c <= '~') && (c != '\'') && (c != '\"') && (c != '%')) {
1661 fputc(c,SE_ERR);
1662 }
1663 else {
1664 switch (c) {
1665 case '\b': fprintf(SE_ERR,"%%B"); break;
1666 case '\f': fprintf(SE_ERR,"%%F"); break;
1667 case '\n': fprintf(SE_ERR,"%%N"); break;
1668 case '\r': fprintf(SE_ERR,"%%R"); break;
1669 case '\t': fprintf(SE_ERR,"%%T"); break;
1670 case '\0': fprintf(SE_ERR,"%%U"); break;
1671 case '\'': fprintf(SE_ERR,"%%\'"); break;
1672 case '\"': fprintf(SE_ERR,"%%\""); break;
1673 case '%': fprintf(SE_ERR,"%%%%"); break;
1674 default:
1675 fprintf(SE_ERR,"%%/%d/", (int) ((unsigned char) c));
1676 }
1677 }
1678 }
1679
1680 void se_prinT3(EIF_CHARACTER* o) {
1681 fputc('\'',SE_ERR);
1682 se_print_character(*o);
1683 fputc('\'',SE_ERR);
1684 }
1685
1686 void se_prinT4(EIF_REAL* o) {
1687 fprintf(SE_ERR,"%f",((double)*o));
1688 }
1689
1690 void se_prinT5(EIF_DOUBLE* o) {
1691 fprintf(SE_ERR,"%f",*o);
1692 }
1693
1694 void se_prinT6(EIF_BOOLEAN* o) {
1695 if (*o) {
1696 fprintf(SE_ERR,"true");
1697 }
1698 else {
1699 fprintf(SE_ERR,"false");
1700 }
1701 }
1702
1703 void se_prinT7(EIF_STRING* o) {
1704 if (*o == NULL) {
1705 fprintf(SE_ERR,"Void");
1706 }
1707 else {
1708 T3* storage = (*o)->_storage;
1709 int count = (*o)->_count;
1710 int i = 0;
1711 fprintf(SE_ERR,"\"");
1712 while (i < count) {
1713 se_print_character(storage[i++]);
1714 }
1715 fprintf(SE_ERR,"\"");
1716 }
1717 }
1718
1719 void se_prinT8(EIF_POINTER* o) {
1720 if (*o == NULL) {
1721 fprintf(SE_ERR,"NULL");
1722 }
1723 else {
1724 fprintf(SE_ERR,"POINTER#%p",(void*)*o);
1725 }
1726 }
1727
1728
1729 EIF_INTEGER se_position2line(se_position position) {
1730 /*
1731 Computes the line number using the given `position'.
1732 */
1733 if (position & 1) {
1734 return ((EIF_INTEGER)((position >> 1) & 0x7FFF));
1735 }
1736 else{
1737 return ((EIF_INTEGER)((position >> 8) & 0x1FFF));
1738 }
1739 }
1740
1741 EIF_INTEGER se_position2column(se_position position) {
1742 /*
1743 Computes the column number using the given `position'.
1744 */
1745 if (position & 1) {
1746 return 0; /* Not memorized. */
1747 }
1748 else{
1749 return ((EIF_INTEGER)((position >> 1) & 0x7F));
1750 }
1751 }
1752
1753 EIF_INTEGER se_position2path_id(se_position position) {
1754 /*
1755 Computes the file path id using the given `position'.
1756 */
1757 return ((EIF_INTEGER)((position & 1) ?
1758 (position >> 17) :
1759 (position >> 21)));
1760 }
1761
1762 /*
1763 The upper most context (SmallEiffel Dump stack Top) :
1764 */
1765 se_dump_stack* se_dst=NULL;
1766
1767
1768 int se_stack_size(se_dump_stack* ds) {
1769 int result = 0;
1770 while (ds != NULL) {
1771 ds = ds->caller;
1772 result ++;
1773 }
1774 return result;
1775 }
1776
1777 void se_print_run_time_stack(void) {
1778 /* GENERAL.print_run_time_stack */
1779 se_dump_stack* ds = NULL;
1780 se_dump_stack* ds2;
1781 int frame_count = 1;
1782
1783 ds = se_dst;
1784 if (ds == NULL) {
1785 fprintf(SE_ERR,"Empty stack.\n");
1786 return ;
1787 }
1788 else {
1789 while (ds->caller != NULL) {
1790 ds = ds->caller;
1791 frame_count++;
1792 }
1793 }
1794 fprintf(SE_ERR,"%d frames in current stack.\n",frame_count);
1795 fprintf(SE_ERR,"===== Bottom of run-time stack =====\n");
1796 while (ds != NULL) {
1797 se_print_one_frame(ds);
1798 /* Next frame : */
1799 if (ds == se_dst) {
1800 ds = NULL;
1801 }
1802 else {
1803 ds2 = se_dst;
1804 while (ds2->caller != ds) {
1805 ds2 = ds2->caller;
1806 }
1807 ds = ds2;
1808 }
1809 if (--frame_count) {
1810 fprintf(SE_ERR,"======================================\n");
1811 }
1812 }
1813 fprintf(SE_ERR,"===== Top of run-time stack =====\n");
1814 }
1815
1816 int se_print_one_frame(se_dump_stack* ds) {
1817 /* Return 1 for an ordinary frame (not a cecil frame or some dynamic
1818 dispatch extra frame). */
1819 se_frame_descriptor* fd = ds->fd;
1820 int i = 0;
1821 int local_count = 0;
1822 char* local_format;
1823 int expanded;
1824 int id;
1825 void** var;
1826
1827 if (fd == NULL) {
1828 fprintf(SE_ERR,"External CECIL call.\n");
1829 return 0;
1830 }
1831 fprintf(SE_ERR,"%s\n",fd->name);
1832 if (ds->p == 0) return 0;
1833 local_format = fd->local_format;
1834 if (fd->use_current) {
1835 fprintf(SE_ERR,"Current = ");
1836 i = 2;
1837 id = 0;
1838 while (local_format[i] != '%') {
1839 id = (id * 10) + (local_format[i] - '0');
1840 i++;
1841 }
1842 i++;
1843 (se_prinT[id])(ds->current);
1844 fprintf(SE_ERR,"\n");
1845 }
1846 while (local_count < fd->local_count) {
1847 while (local_format[i] != '%') {
1848 fprintf(SE_ERR,"%c",local_format[i]);
1849 i++;
1850 }
1851 i++;
1852 expanded = ((local_format[i++] == 'E')?1:0);
1853 fprintf(SE_ERR," = ");
1854 id = 0;
1855 while (local_format[i] != '%') {
1856 id = (id * 10) + (local_format[i] - '0');
1857 i++;
1858 }
1859 i++;
1860 var = (ds->locals)[local_count];
1861 if (expanded) {
1862 (se_prinT[id])((void**)(var));
1863 }
1864 else if (*var == NULL) {
1865 fprintf(SE_ERR,"Void");
1866 }
1867 else {
1868 (se_prinT[((T0*)(*var))->id])((void**)(var));
1869 }
1870 fprintf(SE_ERR,"\n");
1871 local_count++;
1872 }
1873 fprintf(SE_ERR,"line %d ",se_position2line(ds->p));
1874 fflush(SE_ERR);
1875 fprintf(SE_ERR,"column %d ",se_position2column(ds->p));
1876 fflush(SE_ERR);
1877 fprintf(SE_ERR,"file %s \n",p[se_position2path_id(ds->p)]);
1878 fflush(SE_ERR);
1879 return 1;
1880 }
1881
1882 int se_require_uppermost_flag;
1883
1884 /*
1885 Require Last Result :
1886 */
1887 int se_require_last_result;
1888
1889 int se_rci(se_dump_stack*caller,void*C) {
1890 /* Where `caller' is supposed to be reference type non Void Current
1891 object. This function return 1 if the class invariant must be
1892 checked for `C' before leaving the routine.
1893 */
1894 if (caller != NULL) {
1895 se_frame_descriptor* fd = caller->fd;
1896 if (fd == NULL) {
1897 /* As for example when coming via CECIL. */
1898 return 0;
1899 }
1900 else {
1901 if (fd->use_current) {
1902 if (fd->local_format[1] == 'R') {
1903 if (((void*)*(caller->current)) == C) {
1904 return 0;
1905 }
1906 }
1907 }
1908 }
1909 }
1910 return 1;
1911 }
1912
1913 void error0(char* m, char* vv) {
1914 /* When there is nothing more to do than to exit or to go back
1915 into the debugger.
1916 */
1917 static char*f="*** Error at Run Time ***: %s\n";
1918
1919 fprintf(SE_ERR,f,m);
1920 if (vv!=NULL) fprintf(SE_ERR,f,vv);
1921 #ifdef SE_EXCEPTIONS
1922 print_exception();
1923 #endif
1924 #ifdef SE_TRACE
1925 se_db_back(se_dst,0);
1926 #else
1927 se_print_run_time_stack();
1928 fprintf(SE_ERR,f,m);
1929 if (vv!=NULL)
1930 fprintf(SE_ERR,f,vv);
1931 exit(EXIT_FAILURE);
1932 #endif
1933 }
1934
1935 void error1(char*m,se_position position) {
1936 /* When there is nothing more to do than to exit or to go back
1937 into the debugger.
1938 */
1939 int l = se_position2line(position);
1940 int c = se_position2column(position);
1941 int f = se_position2path_id(position);
1942 char* f1 = "Line : %d column %d in %s.\n";
1943 char* f2 = "*** Error at Run Time ***: %s\n";
1944
1945 fprintf(SE_ERR,f1,l,c,p[f]);
1946 fprintf(SE_ERR,f2,m);
1947 #ifdef SE_EXCEPTIONS
1948 print_exception();
1949 #endif
1950 #ifdef SE_TRACE
1951 se_db_back(se_dst,position);
1952 #else
1953 se_print_run_time_stack();
1954 fprintf(SE_ERR,f1,l,c,p[f]);
1955 fprintf(SE_ERR,f2,m);
1956 exit(EXIT_FAILURE);
1957 #endif
1958 }
1959
1960 void se_print_string(FILE*stream, EIF_STRING s) {
1961 /* To print some Eiffel STRING. */
1962 if (s == NULL) {
1963 fprintf(stream,"Void");
1964 }
1965 else {
1966 int count = s->_count;
1967 EIF_CHARACTER* storage = s->_storage;
1968 int i = 0;
1969 fprintf(stream,"\"");
1970 while (count != 0) {
1971 fprintf(stream,"%c",storage[i]);
1972 i++;
1973 count--;
1974 }
1975 fprintf(stream,"\"");
1976 }
1977 }
1978
1979 void se_print_bad_target(FILE*stream, int id, T0* o, int l, int c, int f) {
1980 /* Print Bad Target Type Error Message. */
1981 if (l != 0) {
1982 fprintf(stream,"Line : %d column %d in %s.\n",l,c,p[f]);
1983 }
1984 fprintf(stream,"*** Error at Run Time *** :\n");
1985 fprintf(stream," Target is not valid (not the good type).\n");
1986 fprintf(stream," Expected: ");
1987 se_print_string(stream,t[id]);
1988 fprintf(stream,", Actual: ");
1989 se_print_string(stream,t[o->id]);
1990 fprintf(stream,".\n");
1991 }
1992
1993 void error2(T0*o, se_position position) {
1994 fprintf(SE_ERR,"Target Type ");
1995 se_print_string(SE_ERR,t[o->id]);
1996 fprintf(SE_ERR," is not valid.\n");
1997 error1("Bad target.",position);
1998 }
1999
2000 T0* vc(void*o,se_position position) {
2001 /*
2002 Void check for reference target.
2003 */
2004 if (o != NULL) {
2005 return ((T0*)o);
2006 }
2007 else {
2008 #ifdef SE_EXCEPTIONS
2009 internal_exception_handler(Void_call_target);
2010 #else
2011 error1("Call with a Void target.",position);
2012 #endif
2013 return NULL;
2014 }
2015 }
2016
2017 T0* ci(int id,void*o,se_position position) {
2018 /*
2019 Check Id for reference target.
2020 */
2021 if (vc(o,position) != NULL) {
2022 if (id == (((T0*)o)->id)) {
2023 return ((T0*)o);
2024 }
2025 else {
2026 #ifdef SE_EXCEPTIONS
2027 internal_exception_handler(System_level_type_error);
2028 #else
2029 int l = se_position2line(position);
2030 int c = se_position2column(position);
2031 int f = se_position2path_id(position);
2032
2033 se_print_bad_target(SE_ERR,id,(T0*)o,l,c,f);
2034 se_print_run_time_stack();
2035 se_print_bad_target(SE_ERR,id,(T0*)o,l,c,f);
2036 #ifdef SE_TRACE
2037 se_db_back(se_dst,0);
2038 #else
2039 exit(EXIT_FAILURE);
2040 #endif
2041 #endif
2042 }
2043 }
2044 return ((T0*)o);
2045 }
2046
2047 void ac_req(int v,char*vv) {
2048 if (!v && se_require_uppermost_flag) {
2049 #ifdef SE_EXCEPTIONS
2050 internal_exception_handler(Precondition);
2051 #else
2052 error0("Require Assertion Violated.",vv);
2053 #endif
2054 }
2055 se_require_last_result=se_require_last_result&&v;
2056 }
2057
2058 void ac_ens(int v,char*vv) {
2059 if (!v) {
2060 #ifdef SE_EXCEPTIONS
2061 internal_exception_handler(Postcondition);
2062 #else
2063 error0("Ensure Assertion Violated.",vv);
2064 #endif
2065 }
2066 }
2067
2068 void ac_inv(int v,char*vv) {
2069 if (!v) {
2070 #ifdef SE_EXCEPTIONS
2071 internal_exception_handler(Class_invariant);
2072 #else
2073 error0("Class Invariant Violation.",vv);
2074 #endif
2075 }
2076 }
2077
2078 void ac_liv(int v,char*vv) {
2079 /* Assertion Check : Loop Invariant check. */
2080 if (!v) {
2081 #ifdef SE_EXCEPTIONS
2082 internal_exception_handler(Loop_invariant);
2083 #else
2084 error0("Loop Invariant Violation.",vv);
2085 #endif
2086 }
2087 }
2088
2089 int ac_lvc(int lc,int lv1,int lv2) {
2090 /* Assertion Check : Loop Variant check. */
2091 if (lc == 0) {
2092 if (lv2 < 0) {
2093 #ifdef SE_EXCEPTIONS
2094 internal_exception_handler(Loop_variant);
2095 #else
2096 {
2097 char msg [64];
2098 sprintf(msg,"Bad First Variant Value = %d\n",lv2);
2099 error0(msg,NULL);
2100 }
2101 #endif
2102 }
2103 else {
2104 return lv2;
2105 }
2106 }
2107 else if ((lv2 < 0) || (lv2 >= lv1)) {
2108 #ifdef SE_EXCEPTIONS
2109 internal_exception_handler(Loop_variant);
2110 #else
2111 {
2112 char msg [512];
2113 sprintf(msg,
2114 "Bad loop variant.\nLoop body counter = %d (done)\n"
2115 "Previous Variant = %d\nNew Variant = %d\n",
2116 lc,lv1,lv2);
2117 error0(msg,NULL);
2118 }
2119 #endif
2120 }
2121 return lv2;
2122 }
2123
2124 void ac_civ(int v,char*vv) {
2125 if (!v) {
2126 #ifdef SE_EXCEPTIONS
2127 internal_exception_handler(Check_instruction);
2128 #else
2129 error0("Check Assertion Violated.",vv);
2130 #endif
2131 }
2132 }
2133
2134 void se_evobt(void*o,se_position position) {
2135 /*
2136 Error Void Or Bad Type.
2137 */
2138 if (!o) {
2139 #ifdef SE_EXCEPTIONS
2140 internal_exception_handler(Void_call_target);
2141 #else
2142 error1("Target is Void.",position);
2143 #endif
2144 }
2145 else {
2146 #ifdef SE_EXCEPTIONS
2147 internal_exception_handler(Void_call_target);
2148 #else
2149 error2(((T0*)o),position);
2150 #endif
2151 }
2152 }
2153
2154 void se_signal_handler(int sig) {
2155 printf("Received signal %d (man signal).\n",sig);
2156 #ifdef SE_TRACE
2157 signal(sig,se_signal_handler);
2158 se_db_signal_handler(sig);
2159 #else
2160 se_print_run_time_stack();
2161 exit(EXIT_FAILURE);
2162 #endif
2163 }
2164
2165 void se_gc_check_id(void*o,int id) {
2166 if (id != (((T0*)o)->id)) {
2167 #ifdef SE_EXCEPTIONS
2168 internal_exception_handler(Routine_failure);
2169 #else
2170 fprintf(SE_ERR,"System-validity error detected during GC cycle.\n");
2171 se_print_bad_target(SE_ERR,id,(T0*)o,0,0,0);
2172 se_print_run_time_stack();
2173 fprintf(SE_ERR,"System-validity error detected during GC cycle.\n");
2174 se_print_bad_target(SE_ERR,id,(T0*)o,0,0,0);
2175 exit(EXIT_FAILURE);
2176 #endif
2177 }
2178 }
2179 /*
2180 -- This file is free software, which comes along with SmallEiffel. This
2181 -- software is distributed in the hope that it will be useful, but WITHOUT
2182 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
2183 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
2184 -- this header is kept unaltered, and a notification of the changes is added.
2185 -- You are allowed to redistribute it and sell it, alone or as a part of
2186 -- another product.
2187 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
2188 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
2189 -- http://SmallEiffel.loria.fr
2190 --
2191 */
2192
2193 /*
2194 This file (SmallEiffel/sys/runtime/trace.c) is automatically included when
2195 `run_control.no_check' is true (i.e. in all modes except -boost).
2196 This file comes after no_check.[hc] to implement the -trace flag.
2197 */
2198
2199
2200 #ifdef SE_WEDIT
2201 /*
2202 Smooth interface with the Wedit debugger.
2203 */
2204 #define MAXBREAKPOINTS 256
2205 static int __BreakpointsList[MAXBREAKPOINTS];
2206 void SE_CallDebugger(void) {
2207 }
2208
2209 se_position se_trace(se_position p) {
2210 int l = se_position2line(p);
2211 int c = se_position2column(p);
2212 int f = se_position2path_id(p);
2213 int i,s;
2214
2215 s = (f <<16)|l;
2216 for (i=0; i< MAXBREAKPOINTS;i++) {
2217 if (__BreakpointsList[i] == s) {
2218 SE_CallDebugger();
2219 }
2220 else if (__BreakpointsList[i] == 0)
2221 break;
2222 }
2223 return p;
2224 }
2225 #elif SE_TRACE
2226 /*
2227 The SmallEiffel -trace is used, so the command line SmallEiffel
2228 debugger based on the `se_trace' function is defined.
2229 */
2230 static FILE* se_db_TraceFile = NULL; /* A non NULL value indicates that the user
2231 is doing some profiling.
2232 */
2233
2234 static char se_db_last_command[SE_DB_BUFMAX];
2235
2236 #define SE_DB_WaitingCommand 1
2237 #define SE_DB_NextCommand 2
2238 #define SE_DB_StepCommand 3
2239 #define SE_DB_UpCommand 4
2240 #define SE_DB_Running 5
2241 #define SE_DB_TraceFile 6
2242 #define SE_DB_NotInitialized 7
2243
2244 static int se_db_ModeFlag = SE_DB_NotInitialized;
2245
2246 static int se_db_SignalHandlerFlag = 0;
2247
2248 static int se_db_YesOrNo(char* question, int default_answer) {
2249 /* To ask some [yes/no] question interactively. */
2250 static char answer[SE_DB_BUFMAX];
2251 int i; char c;
2252 restart:
2253 i = 0;
2254 fprintf(SE_ERR,question);
2255 fprintf(SE_ERR," (yes/no)? [");
2256 fprintf(SE_ERR,(default_answer ? "yes" : "no"));
2257 fprintf(SE_ERR,"]");
2258 fflush(SE_ERR);
2259
2260 c = getc(stdin);
2261 while (c != '\n') {
2262 if (('A' <= c) && (c <= 'Z')) c = c + 32; /* c = tolower(c); */
2263 answer[i++] = c;
2264 c = getc(stdin);
2265 }
2266 answer[i] = '\0';
2267 if (i == 0) {
2268 return default_answer;
2269 }
2270 else if ((strcmp("yes",answer)==0) || (strcmp("y",answer)==0) ||
2271 (strcmp("oui",answer)==0) || (strcmp("o",answer)==0)) {
2272 return 1;
2273 }
2274 else if ((strcmp("no",answer)==0) || (strcmp("n",answer)==0) ||
2275 (strcmp("non",answer)==0)) {
2276 return 0;
2277 }
2278 else {
2279 fprintf(SE_ERR,"This answer is not clear.\n");
2280 goto restart;
2281 }
2282
2283 }
2284
2285 static void se_db_OnLineHelp(void) {
2286 fprintf(SE_ERR,
2287 "SmallEiffel debugger help (list of commands):\n"
2288 " ? : display this help message\n"
2289 " s : single step, stepping into routine calls\n"
2290 " n : single step, without stepping into routine calls\n"
2291 " f : continue execution until the current routine finishes\n"
2292 " . : display the current execution point\n"
2293 " u : display the caller point (go up in the stack)\n"
2294 " d : display the callee point (go down in the stack)\n"
2295 " S : display the entire stack (all frames)\n"
2296 " b : set a new breakpoint at the current execution point\n"
2297 " B : display the entire breakpoint list\n"
2298 " -[#] : delete a breakpoint\n"
2299 " c : continue execution until the next breakpoint\n"
2300 " G : run the garbage collector now\n"
2301 " T : switch to the \"trace.se\" file mode\n"
2302 " q : (or Q) quit the debugger\n"
2303 " H : display more help on using the debugger\n"
2304 " Enter: repeat the previous debugger command\n"
2305 "\n");
2306 }
2307
2308 static void se_db_OnLineMoreHelp(void) {
2309 if (se_db_YesOrNo("More help with the SmallEiffel debugger",1)) {
2310 /* ------------------------------------------------------------------------------- */
2311 fprintf(SE_ERR,
2312 "Yes, sedb is the SmallEiffel DeBugger. Keep in mind that you can trust sedb\n"
2313 "if and only if you are using a freshly compiled system. To take in account\n"
2314 "any modification of some Eiffel source file, you must leave sedb and\n"
2315 "recompile your system first.\n"
2316 "\n");
2317 }
2318 if (se_db_YesOrNo("More help with breakpoints",1)) {
2319 /* ------------------------------------------------------------------------------- */
2320 fprintf(SE_ERR,
2321 "A breakpoint is composed of four kinds of information/condition: (1) a routine\n"
2322 "name indication, (2) a file name indication, (3) a line range, and (4) a stack\n"
2323 "limit. Each kind of information may be separately selected or not. (You should\n"
2324 "select at least one information/condition.) When more than one condition is\n"
2325 "selected a logical \"and\" is performed to decide whether the breakpoint matches\n"
2326 "the current execution point or not.\n"
2327 "\n");
2328 }
2329 if (se_db_YesOrNo("More help with breakpoints - name indication",1)) {
2330 /* ------------------------------------------------------------------------------- */
2331 fprintf(SE_ERR,
2332 "The name information of the debugging stack contains information about the\n"
2333 "name of the routine called as well as the base class where this routine is\n"
2334 "defined. The name indication of the breakpoint can be any substring to be\n"
2335 "searched within the name information of the stack. For example, if the name\n"
2336 "indication is \"item\", the execution would stop in feature item of STRING\n"
2337 "but also in feature item of ARRAY, in feature item of DICTIONARY, etc.\n"
2338 "If the name indication is \"item STRING\", execution would stop only in\n"
2339 "routine item defined in class STRING. Also note that the name indication\n"
2340 "can be any substring. For example, if the name indication is \"is_\", the\n"
2341 "execution would stop in is_empty, is_integer, is_real, etc. As another\n"
2342 "example, if the name indication is \"STRI\", the execution would stop at\n"
2343 "any place in classes STRING, ARRAY[STRING], DICTIONARY[STRING,FOO], etc.\n"
2344 "Finally, also note that the \"invariant\" string is used when the execution\n"
2345 "is in the class invariant of some class, hence allowing you to spot all\n"
2346 "class invariant execution.\n"
2347 "\n");
2348 }
2349 if (se_db_YesOrNo("More help with breakpoints - file indication",1)) {
2350 /* ------------------------------------------------------------------------------- */
2351 fprintf(SE_ERR,
2352 "If you want to stop each time the execution reaches the string.e file class,\n"
2353 "it can be achieved easily by setting the file indication to \"string.e\".\n"
2354 "Because the file name indication is applied on the whole path of the file,\n"
2355 "the file indication allows you to filter more than a simple file name. For\n"
2356 "example, if the file indication is \"lib/kernel\", the execution would stop each\n"
2357 "time execution reaches some code in the kernel library of SmallEiffel.\n"
2358 "\n");
2359 }
2360 if (se_db_YesOrNo("More help with breakpoints - line range",1)) {
2361 /* ------------------------------------------------------------------------------- */
2362 fprintf(SE_ERR,
2363 "The line range information allows you to select the line range to be\n"
2364 "considered. For example, to stop each time execution reaches line 12 or 13\n"
2365 "in some file, just enter [12,13] as a line range.\n"
2366 "\n");
2367 }
2368 if (se_db_YesOrNo("More help with breakpoints - stack limit",1)) {
2369 /* ------------------------------------------------------------------------------- */
2370 fprintf(SE_ERR,
2371 "The stack limit condition allows you to watch the stack size during\n"
2372 "execution. (This is useful to debug bad recursive calls.) For example, a stack\n"
2373 "limit of 10 would stop the execution as soon as the stack size reaches this\n"
2374 "10 limit. The automatic incrementation option causes the stack-limit to be\n"
2375 "incremented each time the corresponding breakpoint matches. For example, a\n"
2376 "breakpoint composed only of a single stack limit condition is a perfect\n"
2377 "watch dog of stack memory consumption.\n"
2378 "\n");
2379 }
2380 if (se_db_YesOrNo("More help about GENERAL.sedb_breakpoint",1)) {
2381 /* ------------------------------------------------------------------------------- */
2382 fprintf(SE_ERR,
2383 "The feature `sedb_breakpoint' defined in class GENERAL can be used to set a\n"
2384 "breakpoint directly in your Eiffel source file. Keep in mind that you have\n"
2385 "to recompile your system each time some Eiffel source file is modified. Thus\n"
2386 "each time you add a \"sedb_breakpoint;\" call to some Eiffel source file\n"
2387 "you must recompile your code first. Also note that a \"sedb_breakpoint\" is\n"
2388 "always enabled even when the corresponding source file is not traced (see ACE\n"
2389 "file mode).\n"
2390 "\n");
2391 }
2392 if (se_db_YesOrNo("More help about granularity of debugging",1)) {
2393 /* ------------------------------------------------------------------------------- */
2394 fprintf(SE_ERR,
2395 "When using the traditional command line mode (i.e. no ACE files) the debugger\n"
2396 "examines all traced points in the Eiffel source code. Thus, all possible points\n"
2397 "of your Eiffel system are examined (even points of the BOOLEAN class itself!).\n"
2398 "This is great for learning Eiffel but it may slow down debugging especially for\n"
2399 "large systems. Thanks to the ACE files facility (see examples in directory\n"
2400 "SmallEiffel/lib_show/ace), you can decide which clusters/files are to be traced.\n"
2401 "(You have to use the trace clauses of the ACE file to select the debugging\n"
2402 "granularity.) This is good to know. Also keep in mind that you can still use\n"
2403 "the GENERAL.trace_switch feature to switch the granularity of the\n"
2404 "debugging dynamically.\n"
2405 "\n");
2406 }
2407 if (se_db_YesOrNo("More help about CTRL-C keyboard interruption",1)) {
2408 /* ------------------------------------------------------------------------------- */
2409 fprintf(SE_ERR,
2410 "While running a program under sedb, you can hit CTRL-C at any time\n"
2411 "in order to view what the program is doing right now.\n"
2412 "\n");
2413 }
2414 if (se_db_YesOrNo("More help with garbage collector information",1)) {
2415 /* ------------------------------------------------------------------------------- */
2416 fprintf(SE_ERR,
2417 "The 'G' command of sedb allows you to run the garbage collector at any time\n"
2418 "while debugging. You can get more information about the number of objects\n"
2419 "used for each Eiffel reference type. This is achieved in traditional command\n"
2420 "line mode with the -gc_info flag. In ACE file mode, you have to switch on the\n"
2421 "\"gc_info\" option in the \"generate\" section to achieve the same behaviour.\n"
2422 "\n");
2423 }
2424 if (se_db_YesOrNo("More help with \"trace.se\" file mode",1)) {
2425 /* ------------------------------------------------------------------------------- */
2426 fprintf(SE_ERR,
2427 "The 'T' command of sedb allows you to switch to the \"trace.se\" file mode.\n"
2428 "The goal of this mode is to collect profiling information into the \"trace.se\"\n"
2429 "file. The profiling information indicates which line, which column, in which\n"
2430 "Eiffel source file execution goes. In traditional command line mode, because\n"
2431 "all classes are traced, the \"trace.se\" file is usually a huge file even for a\n"
2432 "small program. Thanks to the ACE file facility, you can decide to trace or not\n"
2433 "to trace each class separately (see \"More help about granularity of debugging\").\n"
2434 "Feature GENERAL.trace_switch allows trace generation to be turned on/off\n"
2435 "dynamically. At run time, if the argument of feature trace_switch is true, trace\n"
2436 "printing is switched on. (Conversely, false means switch off trace printing.)\n"
2437 "When the -trace option is not specified, calls to trace_switch are ignored by\n"
2438 "compile_to_c (no C code is produced).\n"
2439 "\n");
2440 }
2441 if (se_db_YesOrNo("More help about sedb itself",1)) {
2442 /* ------------------------------------------------------------------------------- */
2443 fprintf(SE_ERR,
2444 "This debugger is written in C (sorry :-). The complete source code of this\n"
2445 "debugger is in the file ${SmallEiffel}/sys/runtime/trace.c\". Please, feel\n"
2446 "free to debug or to complete this debugger. Any problem should be reported to\n"
2447 "the SmallEiffel mailing list at \"SmallEiffel@loria.fr\". (Do not forget to\n"
2448 "visit our WEB pages at \"http://SmallEiffel.loria.fr\" too.)\n"
2449 "\n");
2450 }
2451 }
2452
2453 static void se_db_ShowPoint(se_dump_stack*ds, int l, int c, int f) {
2454 /* Try to printf information about the Current point. */
2455 char* path; FILE *file; int line = 1; char cc; int after;
2456
2457 fprintf(SE_ERR,"---- Stack-frame: %d ---- inside ",se_stack_size(ds));
2458 fflush(SE_ERR);
2459 if (!se_print_one_frame(ds)) {
2460 fflush(SE_ERR);
2461 return ;
2462 }
2463 fflush(SE_ERR);
2464 path = p[f];
2465 if (path == NULL) {
2466 fprintf(SE_ERR,"line %d column %d of some unknown file.\n",l,c);
2467 return ;
2468 }
2469 file = fopen(path,"r");
2470 if (file == NULL) {
2471 fprintf(SE_ERR,"Unable to access source file \"%s\".\n",path);
2472 fprintf(SE_ERR,"\t(Are you sure you're debugging a freshly compiled program?)\n");
2473 fprintf(SE_ERR,"\t(Debugging should be done in the compilation directory.)\n");
2474 fprintf(SE_ERR,"line %d column %d of \"%s\".\n",l,c,path);
2475 return ;
2476 }
2477 fprintf(SE_ERR,"------------------------------------------------------------------------\n");
2478 while (line < (l - 5)) {
2479 cc = fgetc(file);
2480 if (cc == '\n') {
2481 line++;
2482 }
2483 }
2484 fprintf(SE_ERR," %d\t",line);
2485 while (line < l) { /* To show lines before the point. */
2486 cc = fgetc(file);
2487 if (cc == '\n') {
2488 line++;
2489 if (line != l) fprintf(SE_ERR,"\n %d\t",line);
2490 }
2491 else {
2492 fprintf(SE_ERR,"%c",cc);
2493 }
2494 }
2495 fprintf(SE_ERR,"\n>%d++\t",line);
2496 while (line == l) { /* To show the point. */
2497 cc = fgetc(file);
2498 if (cc == '\n') {
2499 line++;
2500 fprintf(SE_ERR,"\n %d\t",line);
2501 }
2502 else {
2503 fprintf(SE_ERR,"%c",cc);
2504 }
2505 }
2506 after = l + 3;
2507 while (line < after) {
2508 /* To show some lines after the point. */
2509 cc = fgetc(file);
2510 if (cc == EOF) break;
2511 if (cc == '\n') {
2512 line++;
2513 if (line != after) {
2514 fprintf(SE_ERR,"\n %d\t",line);
2515 }
2516 }
2517 else {
2518 fprintf(SE_ERR,"%c",cc);
2519 }
2520 }
2521 fprintf(SE_ERR,"\n");
2522 fclose(file);
2523 return ;
2524 }
2525
2526 static void se_db_ShowPointFrame(se_dump_stack*ds) {
2527 se_position position = ds->p;
2528 int li = se_position2line(position);
2529 int co = se_position2column(position);
2530 int fi = se_position2path_id(position);
2531
2532 se_db_ShowPoint(ds,li,co,fi);
2533 }
2534
2535 static int se_db_ViewBreakPoint(se_breakpoint* bp) {
2536 /* A 0 result means that this is really a stupid breakpoint. */
2537 int result = 0;
2538
2539 if (bp->name_flag) {
2540 result = 1;
2541 fprintf(SE_ERR," name indication = \"%s\".\n",bp->name);
2542 }
2543 if (bp->file_flag) {
2544 result = 1;
2545 fprintf(SE_ERR," file indication = \"%s\".\n",bp->file);
2546 }
2547 if (bp->line_flag) {
2548 result = 1;
2549 fprintf(SE_ERR," line range [%d,%d].\n",bp->line_minimum,bp->line_maximum);
2550 }
2551 if (bp->stack_flag) {
2552 result = 1;
2553 fprintf(SE_ERR," stack limit = %d automatic: %s\n",
2554 bp->stack_limit,
2555 (bp->stack_automatic?"yes":"no"));
2556 }
2557 return result;
2558 }
2559
2560 static int se_db_GetInt(char* value_name, int default_value) {
2561 /* To get some integer value. The `default_value' is considered only
2562 when greater than 0.
2563 */
2564 static char answer[SE_DB_BUFMAX];
2565 int i; char c; int result;
2566 restart:
2567 result = 0; i = 0;
2568 fprintf(SE_ERR,value_name);
2569 fprintf(SE_ERR," = ");
2570 if (default_value > 0) {
2571 fprintf(SE_ERR,"[%d] ",default_value);
2572 }
2573 fflush(SE_ERR);
2574 c = getc(stdin);
2575 while (c != '\n') {
2576 answer[i++] = c;
2577 c = getc(stdin);
2578 }
2579 answer[i] = '\0';
2580 if (i == 0) {
2581 return default_value;
2582 }
2583 i = 0;
2584 while (answer[i] != '\0') {
2585 c = answer[i++];
2586 if (('0' <= c) && (c <= '9')) {
2587 result = (result * 10) + (c - '0');
2588 }
2589 else {
2590 fprintf(SE_ERR,"Bad integer natural value: \"%s\".\n",answer);
2591 goto restart;
2592 }
2593 }
2594 return result;
2595 }
2596
2597 void se_db_GetString(char*name, char* buffer) {
2598 int i; char c;
2599 restart: {
2600 i = 0;
2601 fprintf(SE_ERR,"%s: ",name);
2602 fflush(SE_ERR);
2603 c = getc(stdin);
2604 while (c != '\n') {
2605 buffer[i++] = c;
2606 c = getc(stdin);
2607 }
2608 buffer[i] = '\0';
2609 }
2610 if (i == 0) {
2611 fprintf(SE_ERR,"The empty string is not allowed.\n");
2612 goto restart;
2613 }
2614 fprintf(SE_ERR,"%s = \"%s\"",name,buffer);
2615 if (!se_db_YesOrNo(" confirm",1)) goto restart;
2616 return ;
2617 }
2618
2619 static se_breakpoint* se_db_GetNewBreakPoint(void) {
2620 se_breakpoint* bp = se_malloc(sizeof(se_breakpoint));
2621 char* question; int default_answer = 1;
2622 question = "name indication";
2623 if (se_db_YesOrNo(question,default_answer)) {
2624 bp->name_flag = 1;
2625 se_db_GetString(question,bp->name);
2626 default_answer = 0;
2627 }
2628 else {
2629 bp->name_flag = 0;
2630 }
2631 question = "file indication";
2632 if (se_db_YesOrNo(question,default_answer)) {
2633 bp->file_flag = 1;
2634 se_db_GetString(question,bp->file);
2635 default_answer = 0;
2636 }
2637 else {
2638 bp->file_flag = 0;
2639 }
2640 if (se_db_YesOrNo("line range",default_answer)) {
2641 restart_line_range:
2642 bp->line_flag = 1;
2643 bp->line_minimum = se_db_GetInt("line minimum",0);
2644 bp->line_maximum = se_db_GetInt("line maximum",bp->line_minimum);
2645 if (bp->line_maximum < bp->line_minimum) {
2646 fprintf(SE_ERR,"Bad line range [%d,%d].(Try again.)\n",
2647 bp->line_minimum,bp->line_maximum);
2648 goto restart_line_range;
2649 }
2650 default_answer = 0;
2651 }
2652 else {
2653 bp->line_flag = 0;
2654 }
2655 question = "stack limit";
2656 if (se_db_YesOrNo(question,default_answer)) {
2657 bp->stack_flag = 1;
2658 bp->stack_limit = se_db_GetInt(question,10);
2659 bp->stack_automatic = se_db_YesOrNo("automatic incrementation of the limit",1);
2660 default_answer = 0;
2661 }
2662 else {
2663 bp->stack_flag = 0;
2664 }
2665 bp->next = NULL;
2666 fprintf(SE_ERR,"Here is the breakpoint you have just defined:\n");
2667 if (0 == se_db_ViewBreakPoint(bp)) {
2668 fprintf(SE_ERR,"\tNot a breakpoint (no condition selected).\n");
2669 return NULL;
2670 }
2671 if (se_db_YesOrNo("Confirm this breakpoint",1)) {
2672 return bp;
2673 }
2674 else {
2675 return NULL;
2676 }
2677 }
2678
2679 static int se_db_MatchString(char* indication, char* frame) {
2680 int i1 = 0; int i2 = 0; int r; char c1, c2;
2681 while (1) {
2682 c1 = indication[i1];
2683 c2 = frame[i2];
2684 if (c1 == '\0') {r = 1; break;}
2685 if (c2 == '\0') {r = 0; break;}
2686 if (c1 != c2) {
2687 i2 = i2 - i1 + 1;
2688 i1 = 0;
2689 }
2690 else {
2691 i1++; i2++;
2692 }
2693 }
2694 return r;
2695 }
2696
2697 static int se_db_BreakPointMatch(se_dump_stack*ds, int l, int f,
2698 int breakpointNumber, se_breakpoint* bp) {
2699 /* Does this `bp' match the current point. */
2700 int StackSize;
2701 int stack_automatic = 0;
2702
2703 if (bp->stack_flag) {
2704 StackSize = se_stack_size(ds);
2705 if (StackSize < bp->stack_limit) return 0;
2706 stack_automatic = bp->stack_automatic;
2707 }
2708 if (bp->line_flag) {
2709 if (l < bp->line_minimum) return 0;
2710 if (l > bp->line_maximum) return 0;
2711 }
2712 if (bp->name_flag) {
2713 se_frame_descriptor* fd = ds->fd;
2714 if (fd == NULL) return 0;
2715 if (fd->name == NULL) return 0;
2716 if (!se_db_MatchString(bp->name,fd->name)) return 0;
2717 }
2718 if (bp->file_flag) {
2719 if (p[f] == NULL) return 0;
2720 if (!se_db_MatchString(bp->file,p[f])) return 0;
2721 }
2722 fprintf(SE_ERR,"Breakpoint #%d match.\n",breakpointNumber);
2723 se_db_ViewBreakPoint(bp);
2724 if (stack_automatic)
2725 bp->stack_limit = StackSize+1;
2726 return 1;
2727 }
2728
2729 static void se_db_CompactViewOfTheStack(se_dump_stack* top) {
2730 se_dump_stack* ds = NULL;
2731 int frame_count = 1;
2732
2733 ds = top;
2734 if (ds == NULL) {
2735 fprintf(SE_ERR,"Empty stack.\n");
2736 return ;
2737 }
2738 else {
2739 while (ds->caller != NULL) {
2740 ds = ds->caller;
2741 frame_count++;
2742 }
2743 }
2744 fprintf(SE_ERR,"===== %d frames in current stack:\n",frame_count);
2745 while (ds != NULL) {
2746 se_frame_descriptor* fd = ds->fd;
2747 if (fd == NULL) {
2748 fprintf(SE_ERR,"External CECIL call.\n");
2749 }
2750 else {
2751 fprintf(SE_ERR,"%s\n",fd->name);
2752 }
2753 /* Next frame : */
2754 if (ds == top) {
2755 ds = NULL;
2756 }
2757 else {
2758 se_dump_stack* ds2;
2759 ds2 = top;
2760 while (ds2->caller != ds) {
2761 ds2 = ds2->caller;
2762 }
2763 ds = ds2;
2764 }
2765 }
2766 }
2767
2768 void se_trace(se_dump_stack*ds, se_position position) {
2769 static char line [SE_DB_BUFMAX];
2770 int i, cc, nb;
2771 int li = se_position2line(position);
2772 int co = se_position2column(position);
2773 int fi = se_position2path_id(position);
2774 static int previous_ss;
2775 static se_dump_stack*previous_ds;
2776 static se_breakpoint* breakpoints;
2777 se_dump_stack* plus_minus = ds;
2778
2779 ds->p = position; /* To update the stack information. */
2780 if (!se_trace_flag) return ;
2781 if (se_db_ModeFlag == SE_DB_TraceFile) {
2782 fprintf(se_db_TraceFile,"line %d column %d in %s\n",li,co,p[fi]);
2783 fflush(se_db_TraceFile);
2784 return ;
2785 }
2786 else if (se_db_ModeFlag == SE_DB_Running) {
2787 se_breakpoint* bpl= breakpoints;
2788 nb = 1;
2789 while (bpl != NULL) {
2790 if (se_db_BreakPointMatch(ds,li,fi,nb,bpl)) {
2791 se_db_ShowPoint(ds,li,co,fi);
2792 se_db_ModeFlag = SE_DB_WaitingCommand;
2793 goto loop1;
2794 }
2795 nb ++;
2796 bpl = bpl->next;
2797 }
2798 return ;
2799 }
2800 else if (se_db_ModeFlag == SE_DB_WaitingCommand) {
2801 loop1: /* Really get a new line from keyboard: */
2802 se_db_SignalHandlerFlag = 0;
2803 fprintf(SE_ERR,"(sedb) ");
2804 fflush(SE_ERR);
2805 i = 0; cc = '\0';
2806 while (cc != '\n') {
2807 cc = getc(stdin);
2808 if (se_db_SignalHandlerFlag) {
2809 se_db_SignalHandlerFlag = 0;
2810 strcpy(se_db_last_command,".");
2811 goto loop1;
2812 }
2813 line[i++] = cc;
2814 }
2815 line[--i] = '\0';
2816 if (i != 0) strcpy(se_db_last_command,line);
2817 goto loop3;
2818 loop2: /* Replay from scratch analysis of the `line': */
2819 fprintf(SE_ERR,"(sedb) %s\n",line);
2820 loop3:
2821 cc = line[0];
2822 if (cc == '\0') { /* Empty command line. */
2823 strcpy(line,se_db_last_command);
2824 goto loop2;
2825 }
2826 else if ((cc == ' ') || (cc == '\t')) {
2827 for (i = 0; line[i] != '\0' ; i++) {
2828 line[i] = line[i + 1];
2829 }
2830 goto loop2;
2831 }
2832 else if ((cc == '?') || (cc == 'h')) {
2833 se_db_OnLineHelp();
2834 goto loop1;
2835 }
2836 else if (cc == 'S') {
2837 if (se_db_YesOrNo("Compact view of the stack",1))
2838 se_db_CompactViewOfTheStack(ds);
2839 else
2840 se_print_run_time_stack();
2841 goto loop1;
2842 }
2843 else if (cc == 'u') {
2844 if (plus_minus->caller == NULL) {
2845 se_db_ShowPointFrame(plus_minus);
2846 fprintf(SE_ERR,"Top of the stack reached.\n");
2847 goto loop1;
2848 }
2849 plus_minus = plus_minus->caller;
2850 se_db_ShowPointFrame(plus_minus);
2851 goto loop1;
2852 }
2853 else if (cc == 'd') {
2854 se_dump_stack* plus = ds;
2855 if (plus_minus == ds) {
2856 se_db_ShowPointFrame(plus_minus);
2857 fprintf(SE_ERR,"This is the current point (bottom of the stack).\n");
2858 goto loop1;
2859 }
2860 while (plus->caller != plus_minus) {
2861 plus = plus->caller;
2862 }
2863 plus_minus = plus;
2864 se_db_ShowPointFrame(plus_minus);
2865 goto loop1;
2866 }
2867 else if (cc == 's') {
2868 se_db_ModeFlag = SE_DB_StepCommand;
2869 return ;
2870 }
2871 else if (cc == 'n') {
2872 previous_ds = ds;
2873 previous_ss = se_stack_size(ds);
2874 se_db_ModeFlag = SE_DB_NextCommand;
2875 return ;
2876 }
2877 else if (cc == 'f') {
2878 previous_ds = ds;
2879 previous_ss = se_stack_size(ds);
2880 se_db_ModeFlag = SE_DB_UpCommand;
2881 return ;
2882 }
2883 else if (cc == 'Q') {
2884 exit(EXIT_SUCCESS);
2885 }
2886 else if (cc == 'q') {
2887 if (se_db_YesOrNo("Really quit",0)) {
2888 fprintf(SE_ERR,"Bye.\n");
2889 exit(EXIT_SUCCESS);
2890 }
2891 else {
2892 goto loop1;
2893 }
2894 }
2895 else if (cc == '.') {
2896 se_db_ShowPoint(ds,li,co,fi);
2897 goto loop1;
2898 }
2899 else if (cc == 'G') {
2900 #ifdef SE_GC_LIB
2901 fprintf(SE_ERR,"GC is running...\n");
2902 gc_start();
2903 fprintf(SE_ERR,"GC done.\n");
2904 #else
2905 fprintf(SE_ERR,"This system is not equipped with the SmallEiffel garbage collector.\n");
2906 #endif
2907 goto loop1;
2908 }
2909 else if (cc == 'c') {
2910 fprintf(SE_ERR,"running...\n");
2911 se_db_ModeFlag = SE_DB_Running;
2912 return ;
2913 }
2914 else if (cc == 'b') {
2915 se_breakpoint* bpl= breakpoints;
2916 se_breakpoint* bp = se_db_GetNewBreakPoint();
2917 if (bp != NULL) {
2918 if (bpl == NULL) {
2919 breakpoints = bp;
2920 }
2921 else {
2922 while (bpl->next != NULL) {
2923 bpl = bpl->next;
2924 }
2925 bpl->next = bp;
2926 }
2927 }
2928 strcpy(se_db_last_command,"B");
2929 goto loop1;
2930 }
2931 else if (cc == 'B') {
2932 se_breakpoint* bpl= breakpoints;
2933 if (bpl == NULL) {
2934 fprintf(SE_ERR,"No breakpoints defined.\n");
2935 goto loop1;
2936 }
2937 nb = 1;
2938 while (bpl != NULL) {
2939 fprintf(SE_ERR,"breakpoint #%d:\n",nb);
2940 se_db_ViewBreakPoint(bpl);
2941 bpl = bpl-> next;
2942 nb ++;
2943 }
2944 goto loop1;
2945 }
2946 else if (cc == '-') {
2947 se_breakpoint* bpl= breakpoints;
2948 if (bpl == NULL) {
2949 fprintf(SE_ERR,"No breakpoint to delete.\n");
2950 goto loop1;
2951 }
2952 nb = 0;
2953 for (i = 1; line[i] == ' ' ; i++){};
2954 while (line[i] != '\0') {
2955 cc = line[i++];
2956 if (('0' <= cc) && (cc <= '9'))
2957 nb = (nb * 10) + (cc - '0');
2958 else { nb =0; break; }
2959 }
2960 if (nb == 1) {
2961 breakpoints = breakpoints->next;
2962 strcpy(se_db_last_command,"B");
2963 goto loop1;
2964 }
2965 else if (nb > 1) {
2966 i = 2;
2967 while ((bpl->next != NULL) && (i < nb)) {
2968 bpl = bpl->next;
2969 i++;
2970 }
2971 if (i != nb) {
2972 fprintf(SE_ERR,"No breakpoint #%d to delete.\n",nb);
2973 goto loop1;
2974 }
2975 bpl->next = bpl->next->next;
2976 strcpy(se_db_last_command,"B");
2977 goto loop1;
2978 }
2979 else {
2980 while (breakpoints != NULL) {
2981 se_db_ViewBreakPoint(breakpoints);
2982 if (se_db_YesOrNo("delete this one",0))
2983 breakpoints = breakpoints->next;
2984 else break;
2985 }
2986 if ((bpl = breakpoints) != NULL) {
2987 while (bpl->next != NULL) {
2988 se_db_ViewBreakPoint(bpl->next);
2989 if (se_db_YesOrNo("delete this one",0))
2990 bpl->next = bpl->next->next;
2991 else {
2992 bpl = bpl->next;
2993 }
2994 }
2995 }
2996 }
2997 strcpy(se_db_last_command,"B");
2998 goto loop1;
2999 }
3000 else if (cc == 'H') {
3001 se_db_OnLineMoreHelp();
3002 strcpy(se_db_last_command,"?");
3003 goto loop1;
3004 }
3005 else if (cc == 'T') {
3006 fprintf(SE_ERR,"Switching to trace mode may create a huge \"trace.se\" file.\n");
3007 if (breakpoints != NULL) {
3008 fprintf(SE_ERR,"Switching to the file trace mode disables breakpoints.\n");
3009 }
3010 if (se_db_YesOrNo("Write the execution trace in \"trace.se\" file",0)) {
3011 se_db_ModeFlag = SE_DB_TraceFile;
3012 if (se_db_TraceFile == NULL) {
3013 se_db_TraceFile = fopen("trace.se","w");
3014 }
3015 }
3016 }
3017 else {
3018 fprintf(SE_ERR,"sedb: \"%s\": unknown command. Type ? for help.\n",line);
3019 goto loop1;
3020 }
3021 }
3022 else if (se_db_ModeFlag == SE_DB_StepCommand) {
3023 se_db_ShowPoint(ds,li,co,fi);
3024 strcpy(se_db_last_command,"s");
3025 se_db_ModeFlag = SE_DB_WaitingCommand;
3026 goto loop1;
3027 }
3028 else if (se_db_ModeFlag == SE_DB_NextCommand) {
3029 if ((ds == previous_ds) || (previous_ss > se_stack_size(ds))) {
3030 se_db_ShowPoint(ds,li,co,fi);
3031 strcpy(se_db_last_command,"n");
3032 se_db_ModeFlag = SE_DB_WaitingCommand;
3033 goto loop1;
3034 }
3035 else {
3036 return ;
3037 }
3038 }
3039 else if (se_db_ModeFlag == SE_DB_UpCommand) {
3040 if (previous_ss > se_stack_size(ds)) {
3041 se_db_ShowPoint(ds,li,co,fi);
3042 strcpy(se_db_last_command,"f");
3043 se_db_ModeFlag = SE_DB_WaitingCommand;
3044 goto loop1;
3045 }
3046 else {
3047 return ;
3048 }
3049 }
3050 else if (se_db_ModeFlag == SE_DB_NotInitialized) {
3051 se_db_ModeFlag = SE_DB_WaitingCommand;
3052 strcpy(se_db_last_command,"?");
3053 se_db_OnLineHelp();
3054 se_trace(ds,position);
3055 return ;
3056 }
3057 else {
3058 fprintf(SE_ERR,"Internal error#2 in (sedb).\n");
3059 fprintf(SE_ERR,"Unknown se_db_ModeFlag: %d.\n",se_db_ModeFlag);
3060 exit (EXIT_FAILURE);
3061 }
3062 }
3063 void se_db_signal_handler(int sig) {
3064 if (se_db_YesOrNo("Really exit",0)) {
3065 if (se_db_TraceFile != NULL) {
3066 fclose(se_db_TraceFile);
3067 }
3068 exit(EXIT_SUCCESS);
3069 }
3070 else {
3071 se_db_SignalHandlerFlag = 1;
3072 se_db_ModeFlag = SE_DB_WaitingCommand;
3073 fprintf(SE_ERR,"Back to sedb.\n");
3074 fflush(SE_ERR);
3075 }
3076 }
3077
3078 void se_db_back(se_dump_stack*ds,se_position p) {
3079 fprintf(SE_ERR,"Back to sedb (stopped at the error point).\n");
3080 if (ds == NULL) {
3081 fprintf(SE_ERR,"Internal error #1 in (sedb).\n");
3082 se_print_run_time_stack();
3083 exit(EXIT_FAILURE);
3084 }
3085 if (p == 0) p = ds->p;
3086 se_db_ModeFlag = SE_DB_WaitingCommand;
3087 strcpy(se_db_last_command,".");
3088 se_trace(ds,p);
3089 }
3090
3091 void sedb_breakpoint(se_dump_stack*ds) {
3092 se_db_ShowPointFrame(ds);
3093 fprintf(SE_ERR,"*** sedb_breakpoint encountered.\n");
3094 se_db_ModeFlag = SE_DB_WaitingCommand;
3095 strcpy(se_db_last_command,".");
3096 se_trace(ds,ds->p);
3097 }
3098
3099 #endif
3100 /*
3101 -- This file is free software, which comes along with SmallEiffel. This
3102 -- software is distributed in the hope that it will be useful, but WITHOUT
3103 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
3104 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
3105 -- this header is kept unaltered, and a notification of the changes is added.
3106 -- You are allowed to redistribute it and sell it, alone or as a part of
3107 -- another product.
3108 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
3109 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
3110 -- http://SmallEiffel.loria.fr
3111 --
3112 */
3113
3114 /*
3115 This file (SmallEiffel/sys/runtime/gc_lib.c) is automatically included
3116 when the Garbage Collector is used (default, unless option -no_gc has been
3117 selected).
3118 */
3119
3120 int se_gc_strategy = SE_GC_DEFAULT_MEMORY_STRATEGY;
3121
3122 int collector_counter = 0;
3123
3124 static void gcna_align_mark(rsoc*c,void*o);
3125 static rsoc*rsocfl=NULL; /* ReSizable Object Chunk Free List. */
3126
3127 void**stack_bottom;
3128 mch**gcmt=NULL; /* Garbage Collector Main Table. */
3129 int gcmt_max=2048;
3130 int gcmt_used=0;
3131 fsoc*fsocfl=NULL; /* Fixed Size Object Chunk Free List. */
3132 int gc_is_off=1;
3133 unsigned int fsoc_count=0;
3134 unsigned int rsoc_count=0;
3135 void*gcmt_tail_addr=NULL;
3136
3137 static int chunk_rounded(int size) {
3138 int rounded_size = size;
3139 int diff = rounded_size%RSOC_SIZE;
3140
3141 if (diff != 0) rounded_size += (RSOC_SIZE-diff);
3142 return rounded_size;
3143 }
3144
3145 static void free_and_remove_from_gcmt(mch* c) {
3146 /* Remove and free the chunk `c' from the
3147 * gcmt (Garbage Collector Main Table).
3148 */
3149 mch**p=(gcmt+gcmt_used-1);
3150 mch*save=*p;
3151 mch*save2;
3152 p--;
3153 while(save != c) {
3154 save2 = save;
3155 save = *p;
3156 *p = save2;
3157 p--;
3158 }
3159 free(c);
3160 gcmt_used--;
3161 }
3162
3163 static void may_free_rsocfl(void) {
3164 /* May free all chunks of `rsocfl' (ReSizable Object Chunk Free List)
3165 in some circumstances.
3166 */
3167 rsoc* next, *current;
3168 int count = rsocfl_count();
3169 if ((count > 50) && (count > (rsoc_count >> 1))) {
3170 current=rsocfl;
3171 rsocfl=NULL;
3172 while (current != NULL) {
3173 next=current->next;
3174 if (current->isize == current->header.size) {
3175 free_and_remove_from_gcmt(((mch*)current));
3176 rsoc_count--;
3177 }
3178 else {
3179 current->next=rsocfl;
3180 rsocfl=current;
3181 }
3182 current = next;
3183 }
3184 }
3185 }
3186
3187 void gc_sweep(void) {
3188 mch** p2 = gcmt;
3189 mch** p1 = gcmt+1;
3190 mch**eogcmt=gcmt+gcmt_used;
3191 if (FREE_CHUNK((*p2)->state_type)) {
3192 if (RSO_FREE_CHUNK == ((*p2)->state_type)) {
3193 ((rsoc*)(*p2))->next=NULL;
3194 rsocfl=((rsoc*)(*p2));
3195 }
3196 else {
3197 rsocfl=NULL;
3198 }
3199 }
3200 else {
3201 ((*gcmt)->swfp)(*p2);
3202 if (RSO_FREE_CHUNK==((*p2)->state_type)) {
3203 ((rsoc*)(*p2))->next=NULL;
3204 rsocfl=((rsoc*)(*p2));
3205 }
3206 else {
3207 rsocfl=NULL;
3208 }
3209 }
3210 while (p1 < eogcmt) {
3211 if (FREE_CHUNK((*p1)->state_type)) {
3212 if (RSO_FREE_CHUNK == ((*p1)->state_type)) {
3213 if (RSO_FREE_CHUNK == ((*p2)->state_type)) {
3214 if (((char*)(*p2))+(*p2)->size == ((char*)(*p1))) {
3215 ((*p2)->size)+=((*p1)->size);
3216 p1++;
3217 }
3218 else {
3219 ((rsoc*)(*p1))->next=rsocfl;
3220 rsocfl=((rsoc*)(*p1));
3221 *(p2+1)=*p1; p2++; p1++;
3222 }
3223 }
3224 else {
3225 ((rsoc*)(*p1))->next=rsocfl;
3226 rsocfl=((rsoc*)(*p1));
3227 *(p2+1)=*p1; p2++; p1++;
3228 }
3229 }
3230 else {
3231 *(p2+1)=*p1; p2++; p1++;
3232 }
3233 }
3234 else {
3235 ((*p1)->swfp)(*p1);
3236 if (RSO_FREE_CHUNK == ((*p1)->state_type)) {
3237 if (RSO_FREE_CHUNK == ((*p2)->state_type)) {
3238 if (((char*)(*p2))+(*p2)->size == ((char*)(*p1))) {
3239 ((*p2)->size)+=((*p1)->size);
3240 p1++;
3241 }
3242 else {
3243 ((rsoc*)(*p1))->next=rsocfl;
3244 rsocfl=((rsoc*)(*p1));
3245 *(p2+1)=*p1; p2++; p1++;
3246 }
3247 }
3248 else {
3249 ((rsoc*)(*p1))->next=rsocfl;
3250 rsocfl=((rsoc*)(*p1));
3251 *(p2+1)=*p1; p2++; p1++;
3252 }
3253 }
3254 else {
3255 *(p2+1)=*p1; p2++; p1++;
3256 }
3257 }
3258 }
3259 gcmt_used=(p2-gcmt)+1;
3260 may_free_rsocfl();
3261 }
3262
3263 void gc_mark(void*p) {
3264 if ((p>((void*)*gcmt))&&(p<=gcmt_tail_addr)) {
3265 int i1=0;
3266 int i2=gcmt_used-1;
3267 int m=i2>>1;
3268 mch*c;
3269 for (;i2>i1;m=((i1+i2)>>1)) {
3270 if (p<=((void*)gcmt[m+1])) {
3271 i2=m;
3272 }
3273 else {
3274 i1=m+1;
3275 }
3276 }
3277 c=gcmt[i2];
3278 if (!(FREE_CHUNK(c->state_type))) {
3279 (c->amfp)(c,p);
3280 }
3281 }
3282 }
3283
3284 int gc_stack_size(void) {
3285 void*stack_top[2]={NULL,NULL};
3286 if (stack_top > stack_bottom) {
3287 return ((void**)stack_top)-((void**)stack_bottom);
3288 }
3289 else {
3290 return ((void**)stack_bottom)-((void**)stack_top);
3291 }
3292 }
3293
3294 /*
3295 To delay Garbage Collection when the stack is too large.
3296 To allow fast increase of ceils.
3297 */
3298 #define FSOC_LIMIT (10240/((FSOC_SIZE)>>10))
3299 #define RSOC_LIMIT (10240/((RSOC_SIZE)>>10))
3300
3301 /*
3302 When stack is too large, collection may be delayed.
3303 */
3304 #define GCLARGESTACK 50000
3305
3306 int garbage_delayed(void) {
3307 /*
3308 To delay the first GC call.
3309 */
3310 if (gc_stack_size() > GCLARGESTACK) {
3311 if (fsoc_count_ceil <= fsoc_count) {
3312 if (rsoc_count_ceil <= rsoc_count) {
3313 if ((fsoc_count<FSOC_LIMIT)&&(rsoc_count<RSOC_LIMIT)) {
3314 fsoc_count_ceil++;
3315 rsoc_count_ceil++;
3316 return 1;
3317 }
3318 else return 0;
3319 }
3320 else {
3321 if (fsoc_count<FSOC_LIMIT) {
3322 fsoc_count_ceil++;
3323 return 1;
3324 }
3325 else return 0;
3326 }
3327 }
3328 else {
3329 if (rsoc_count_ceil <= rsoc_count) {
3330 if (rsoc_count<RSOC_LIMIT) {
3331 rsoc_count_ceil++;
3332 return 1;
3333 }
3334 else return 0;
3335 }
3336 else return 0;
3337 }
3338 }
3339 else {
3340 return 0;
3341 }
3342 }
3343
3344 void gc_update_ceils(void) {
3345 /* This function is automatically called after each collection
3346 cycle.
3347 */
3348 if (se_gc_strategy == SE_GC_LOW_MEMORY_STRATEGY) {
3349 fsoc_count_ceil = fsoc_count;
3350 rsoc_count_ceil = rsoc_count;
3351 /* Todo: we should also consider to free unused chunks here. */
3352 return;
3353 }
3354 if (se_gc_strategy == SE_GC_HIGH_MEMORY_STRATEGY) {
3355 fsoc_count_ceil = (256 + fsoc_count) << 2;
3356 rsoc_count_ceil = (256 + rsoc_count) << 2;
3357 return;
3358 }
3359 /* The SE_GC_DEFAULT_MEMORY_STRATEGY. */
3360 /* Compute fsoc_count_ceil: */
3361 if (fsocfl == NULL) {
3362 if (fsoc_count >= fsoc_count_ceil) {
3363 if (fsoc_count_ceil < FSOC_LIMIT) {
3364 fsoc_count_ceil <<= 1;
3365 }
3366 else {
3367 int c = fsoc_count + (fsoc_count/3);
3368 if (fsoc_count_ceil < c)
3369 fsoc_count_ceil = c;
3370 }
3371 }
3372 }
3373 else {
3374 if (fsoc_count_ceil < fsoc_count) {
3375 fsoc_count_ceil = fsoc_count;
3376 }
3377 }
3378 /* Compute rsoc_count_ceil: */
3379 if (rsocfl == NULL) {
3380 if (rsoc_count >= rsoc_count_ceil) {
3381 if (rsoc_count_ceil < RSOC_LIMIT) {
3382 rsoc_count_ceil <<= 1;
3383 }
3384 else {
3385 int c = rsoc_count + (rsoc_count / 3);
3386 if (rsoc_count_ceil < c) {
3387 rsoc_count_ceil = c;
3388 }
3389 }
3390 }
3391 }
3392 else {
3393 if (rsoc_count_ceil < rsoc_count) {
3394 rsoc_count_ceil = rsoc_count;
3395 }
3396 }
3397 }
3398
3399 static void gc_add_into_gcmt(mch*c) {
3400 /* Update the `gcmt' (Garbage Collector Main Table) by adding the
3401 new `mch' (Memory Chunk Header).
3402 */
3403 mch** p;
3404 if (gcmt_used == gcmt_max) {
3405 gcmt_max <<= 1;
3406 gcmt = ((mch**)(realloc(gcmt,(gcmt_max+1)*sizeof(void*))));
3407 }
3408 for (p=gcmt+(gcmt_used++ -1) ; (p>=gcmt)&&(*p>c) ; p--) {
3409 *(p+1) = *p;
3410 }
3411 *(p+1) = c;
3412 }
3413
3414 static char*rso_from_store(na_env*nae,int size) {
3415 rsoh*r=(nae->store);
3416 nae->store_left-=size;
3417 if ((nae->store_left) > sizeof(rsoh)) {
3418 r->header.size=size;
3419 nae->store=((rsoh*)(((char*)(nae->store))+size));
3420 }
3421 else {
3422 r->header.size=size+nae->store_left;
3423 nae->store_left=0;
3424 }
3425 (r->header.magic_flag)=RSOH_UNMARKED;
3426 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
3427 return (char*)(r+1);
3428 }
3429
3430 static void rsoc_sweep(rsoc*c) {
3431 na_env*nae=c->nae;
3432 rsoh*gp=(rsoh*)&(c->first_header);
3433 rsoh*pp;
3434 rsoh*eoc=((rsoh*)(((char*)c)+c->header.size));
3435 c->free_list_of_large=NULL;
3436 if (c->header.size > RSOC_SIZE) {
3437 if (gp->header.magic_flag == RSOH_MARKED) {
3438 gp->header.magic_flag=RSOH_UNMARKED;
3439 c->next=nae->chunk_list;
3440 nae->chunk_list=c;
3441 }
3442 else {
3443 c->header.state_type=RSO_FREE_CHUNK;
3444 }
3445 return;
3446 }
3447 while (gp<eoc) {
3448 while (gp->header.magic_flag == RSOH_MARKED) {
3449 gp->header.magic_flag=RSOH_UNMARKED;
3450 gp=((rsoh*)(((char*)gp)+gp->header.size));
3451 if(gp>=eoc) {
3452 c->next=nae->chunk_list;
3453 nae->chunk_list=c;
3454 return;
3455 }
3456 }
3457 gp->header.magic_flag=RSOH_FREE;
3458 pp=(rsoh*)(((char*)gp)+gp->header.size);
3459 while ((pp<eoc)&&(pp->header.magic_flag != RSOH_MARKED)) {
3460 pp->header.magic_flag=RSOH_FREE;
3461 gp->header.size+=pp->header.size;
3462 pp=((rsoh*)(((char*)pp)+pp->header.size));
3463 }
3464 if (gp->header.size >= RSOC_MIN_STORE) {
3465 if (nae->store_left==0) {
3466 nae->store_left=gp->header.size;
3467 nae->store=gp;
3468 nae->store_chunk=c;
3469 }
3470 else if (nae->store->header.size < gp->header.size) {
3471 ((fll_rsoh*)nae->store)->nextflol=nae->store_chunk->free_list_of_large;
3472 nae->store_chunk->free_list_of_large=((fll_rsoh*)nae->store);
3473 nae->store_left=gp->header.size;
3474 nae->store=gp;
3475 nae->store_chunk=c;
3476 }
3477 else {
3478 ((fll_rsoh*)gp)->nextflol=c->free_list_of_large;
3479 c->free_list_of_large=((fll_rsoh*)gp);
3480 }
3481 }
3482 gp=pp;
3483 }
3484 if (((rsoh*)(&c->first_header))->header.size >=
3485 (c->header.size-sizeof(rsoc)+sizeof(rsoh))){
3486 c->header.state_type=RSO_FREE_CHUNK;
3487 nae->store_chunk=NULL;
3488 nae->store_left=0;
3489 }
3490 else{
3491 c->next=nae->chunk_list;
3492 nae->chunk_list=c;
3493 }
3494 }
3495
3496 static const rsoc MRSOC = {
3497 {
3498 RSOC_SIZE,
3499 RSO_USED_CHUNK,
3500 ((void(*)(mch*,void*))gcna_align_mark),
3501 ((void(*)(mch*))rsoc_sweep)
3502 },
3503 0,
3504 NULL,
3505 NULL,
3506 NULL,
3507 {
3508 {
3509 0,
3510 RSOH_MARKED
3511 }
3512 }
3513 };
3514
3515 static void rsoc_malloc(na_env*nae) {
3516 rsoc* r = ((rsoc*)(se_malloc(RSOC_SIZE)));
3517 rsoc_count++;
3518 *r=MRSOC;
3519 r->nae=nae;
3520 r->isize=RSOC_SIZE;
3521 nae->store=(&(r->first_header));
3522 nae->store_left=RSOC_SIZE-sizeof(rsoc)+sizeof(rsoh);
3523 nae->store_chunk=r;
3524 r->next=nae->chunk_list;
3525 nae->chunk_list=r;
3526 gc_add_into_gcmt((mch*)r);
3527 }
3528
3529 static rsoc* rsocfl_best_fit(int size) {
3530 int best_size = 0;
3531 rsoc *pc,*best_pc,*best_c, *c;
3532 if (rsocfl==NULL)
3533 return NULL;
3534 pc=NULL;
3535 best_pc=NULL;
3536 best_c=NULL;
3537 c=rsocfl;
3538 while ((NULL!=c)&&(NULL==best_c)){
3539 if (c->header.size>=size){
3540 best_c=c;
3541 best_pc=pc;
3542 best_size=c->header.size;
3543 }
3544 pc=c;
3545 c=c->next;
3546 }
3547 if (NULL==c){
3548 if (best_pc != NULL)
3549 best_pc->next=best_c->next;
3550 else if (best_c==rsocfl)
3551 rsocfl=best_c->next;
3552 return best_c;
3553 }
3554 do {
3555 if ((c->header.size >= size) && (c->header.size < best_size)) {
3556 best_c = c;
3557 best_pc = pc;
3558 best_size = c->header.size;
3559 }
3560 pc=c;
3561 c=c->next;
3562 }
3563 while(c!=NULL);
3564 if (NULL==best_pc) {
3565 rsocfl = best_c->next;
3566 }
3567 else {
3568 best_pc->next=best_c->next;
3569 }
3570 return best_c;
3571 }
3572
3573 static int get_store_in(rsoc*c,int size) {
3574 na_env*nae=c->nae;
3575 fll_rsoh*pf=NULL;
3576 fll_rsoh*f=c->free_list_of_large;
3577 while (f != NULL) {
3578 if (f->rsoh_field.size >= size) {
3579 nae->store_left=f->rsoh_field.size;
3580 nae->store=(rsoh*)f;
3581 nae->store_chunk=c;
3582 if (pf == NULL) {
3583 c->free_list_of_large=f->nextflol;
3584 }
3585 else {
3586 pf->nextflol=f->nextflol;
3587 }
3588 return 1;
3589 }
3590 pf = f;
3591 f = f->nextflol;
3592 }
3593 return 0;
3594 }
3595
3596 char*new_na_from_chunk_list(na_env*nae,int size) {
3597 rsoc*c=nae->chunk_list;
3598 int csize;
3599 while (c != NULL) {
3600 if (get_store_in(c,size)) {
3601 return rso_from_store(nae,size);
3602 }
3603 c = c->next;
3604 }
3605 csize=size+(sizeof(rsoc)-sizeof(rsoh));
3606 c=rsocfl_best_fit(csize);
3607 if (c != NULL){
3608 if ((c->header.size > RSOC_SIZE)
3609 &&
3610 (c->header.size-csize > RSOC_MIN_STORE*4)) {
3611 int csize_left=c->header.size-csize;
3612 if ((csize_left%sizeof(double))!=0) {
3613 csize_left-=(csize_left%sizeof(double));
3614 csize=c->header.size-csize_left;
3615 }
3616 c->header.size=csize_left;
3617 c->next=rsocfl;
3618 rsocfl=c;
3619 c=(rsoc*)(((char*)c)+csize_left);
3620 gc_add_into_gcmt((mch*)c);
3621 c->header.amfp=(void(*)(mch*,void*))gcna_align_mark;
3622 c->header.swfp=(void(*)(mch*))rsoc_sweep;
3623 }
3624 else {
3625 csize=c->header.size;
3626 }
3627 c->header.size=csize;
3628 c->header.state_type=RSO_USED_CHUNK;
3629 c->free_list_of_large=NULL;
3630 c->nae=nae;
3631 nae->store=(&(c->first_header));
3632 nae->store_left=csize-sizeof(rsoc)+sizeof(rsoh);
3633 nae->store_chunk=c;
3634 c->next=nae->chunk_list;
3635 nae->chunk_list=c;
3636 return rso_from_store(nae,size);
3637 }
3638 return NULL;
3639 }
3640
3641 char*new_na(na_env*nae,int size) {
3642 if (nae->store_left>0) {
3643 nae->store->header.size=nae->store_left;
3644 nae->store->header.magic_flag=RSOH_FREE;
3645 if (nae->store_left >= RSOC_MIN_STORE) {
3646 ((fll_rsoh*)(nae->store))->nextflol=nae->store_chunk->free_list_of_large;
3647 nae->store_chunk->free_list_of_large=((fll_rsoh*)nae->store);
3648 }
3649 nae->store_left=0;
3650 }
3651 if ((nae->store_chunk!=NULL)&&(get_store_in(nae->store_chunk,size))) {
3652 return rso_from_store(nae,size);
3653 }
3654 {
3655 char*r=new_na_from_chunk_list(nae,size);
3656 if (r!=NULL)
3657 return r;
3658 }
3659 if (rsoc_count<rsoc_count_ceil) {
3660 if((size+sizeof(rsoc)-sizeof(rsoh))>RSOC_SIZE){
3661 rsoc*c;
3662 rsoh*r;
3663 int rounded_size = chunk_rounded(size+sizeof(rsoc)-sizeof(rsoh));
3664 c=((rsoc*)(se_malloc(rounded_size)));
3665 r=(&(c->first_header));
3666 rsoc_count++;
3667 *c=MRSOC;
3668 c->isize = rounded_size;
3669 c->header.size=rounded_size;
3670 c->nae=nae;
3671 c->next=nae->chunk_list;
3672 nae->chunk_list=c;
3673 gc_add_into_gcmt((mch*)c);
3674 r->header.size=size;
3675 (r->header.magic_flag)=RSOH_UNMARKED;
3676 ((void)memset((r+1),0,size-sizeof(rsoh)));
3677 return (char*)(r+1);
3678 }
3679 else {
3680 rsoc_malloc(nae);
3681 return rso_from_store(nae,size);
3682 }
3683 }
3684 gc_start();
3685 if (size<=(nae->store_left)) {
3686 return rso_from_store(nae,size);
3687 }
3688 {
3689 char*r=new_na_from_chunk_list(nae,size);
3690 if (r!=NULL) {
3691 return r;
3692 }
3693 }
3694 if((size+sizeof(rsoc)-sizeof(rsoh))>RSOC_SIZE){
3695 rsoc*c;
3696 rsoh*r;
3697 int rounded_size = chunk_rounded(size+sizeof(rsoc)-sizeof(rsoh));
3698 c=((rsoc*)(se_malloc(rounded_size)));
3699 r=(&(c->first_header));
3700 rsoc_count++;
3701 *c=MRSOC;
3702 c->isize = rounded_size;
3703 c->header.size=rounded_size;
3704 c->nae=nae;
3705 c->next=nae->chunk_list;
3706 nae->chunk_list=c;
3707 gc_add_into_gcmt((mch*)c);
3708 r->header.size=size;
3709 (r->header.magic_flag)=RSOH_UNMARKED;
3710 ((void)memset((r+1),0,size-sizeof(rsoh)));
3711 gc_update_ceils();
3712 return (char*)(r+1);
3713 }
3714 else {
3715 rsoc_malloc(nae);
3716 gc_update_ceils();
3717 return rso_from_store(nae,size);
3718 }
3719 }
3720
3721 static void gcna_align_mark(rsoc*c,void*o) {
3722 na_env* nae = c->nae;
3723 fll_rsoh* f;
3724 fll_rsoh* pf;
3725 char* b = (char*)&(c->first_header);
3726 /* out of the chunck 'c' ? */
3727 if (((char*)o) > (((char*)c)+c->header.size)) {
3728 return;
3729 }
3730 /* properly aligned ? */
3731 if (((((char*)o)-((char*)c))%sizeof(int)) != 0) {
3732 return;
3733 }
3734 /* already marked ? */
3735 if ((((rsoh*)o)-1)->header.magic_flag != RSOH_UNMARKED) {
3736 return;
3737 }
3738 if (((char*)o) < ((char*)(c+1))) {
3739 return;
3740 }
3741 /* a large chunck ? */
3742 if (c->header.size > RSOC_SIZE) {
3743 if (o == (c+1)) {
3744 nae->gc_mark((T0*)o);
3745 }
3746 return;
3747 }
3748 pf=NULL;
3749 f=c->free_list_of_large;
3750 while ((f != NULL) && (f < ((fll_rsoh*)o))) {
3751 pf=f;
3752 f=f->nextflol;
3753 }
3754 if (pf == NULL) {
3755 pf=(fll_rsoh*)b;
3756 }
3757 while ((((rsoh*)pf)+1) < (rsoh*)o) {
3758 pf = ((fll_rsoh*)(((char*)pf)+pf->rsoh_field.size));
3759 }
3760 if (o == (((rsoh*)pf)+1)) {
3761 nae->gc_mark((T0*)o);
3762 }
3763 }
3764
3765 int rsocfl_count(void) {
3766 /* Returns the number of items in the ReSizable Object Free List.
3767 */
3768 int r=0;
3769 rsoc*p=rsocfl;
3770 while (p!=NULL) {
3771 r++;
3772 p=p->next;
3773 }
3774 return r;
3775 }
3776
3777 int fsocfl_count(void) {
3778 int r=0;
3779 fsoc*p=fsocfl;
3780 while (p!=NULL) {
3781 r++;
3782 p=p->next;
3783 }
3784 return r;
3785 }
3786
3787 void gc_dispose_before_exit(void) {
3788 mch** p = gcmt;
3789 mch**eogcmt=gcmt+gcmt_used;
3790
3791 while (p < eogcmt) {
3792 if (((*p)->state_type == FSO_STORE_CHUNK) ||
3793 ((*p)->state_type == FSO_USED_CHUNK)) {
3794 ((*p)->swfp)(*p);
3795 }
3796 p++;
3797 }
3798 }
3799
3800 fsoc* gc_fsoc_get1(void) {
3801 /* Get a `fsoc' (Fixed Size Object Chunk) from the free fsoc list or
3802 allocate a new one (using `se_malloc') only when the ceil is not
3803 yet reached. Otherwise, call the `gc_start()' function and
3804 return NULL.
3805 */
3806 fsoc* result;
3807 if (fsocfl != NULL) {
3808 result = fsocfl;
3809 fsocfl = fsocfl->next;
3810 return result;
3811 }
3812 else if (fsoc_count_ceil > fsoc_count) {
3813 result = ((fsoc*)se_malloc(FSOC_SIZE));
3814 fsoc_count++;
3815 gc_add_into_gcmt((mch*)result);
3816 return result;
3817 }
3818 else {
3819 gc_start();
3820 return NULL;
3821 }
3822 }
3823
3824 fsoc* gc_fsoc_get2(void) {
3825 /* Get a `fsoc' (Fixed Size Object Chunk) or force the allocation of a
3826 new `fsoc' (using the `se_malloc' function). Update various ceils
3827 accordingly.
3828 */
3829 fsoc* result;
3830 if (fsocfl != NULL) {
3831 result = fsocfl;
3832 fsocfl=fsocfl->next;
3833 return result;
3834 }
3835 else {
3836 result = ((fsoc*)(se_malloc(FSOC_SIZE)));
3837 gc_update_ceils();
3838 fsoc_count++;
3839 gc_add_into_gcmt((mch*)result);
3840 return result;
3841 }
3842 }
3843 /*
3844 -- This file is free software, which comes along with SmallEiffel. This
3845 -- software is distributed in the hope that it will be useful, but WITHOUT
3846 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
3847 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
3848 -- this header is kept unaltered, and a notification of the changes is added.
3849 -- You are allowed to redistribute it and sell it, alone or as a part of
3850 -- another product.
3851 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
3852 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
3853 -- http://SmallEiffel.loria.fr
3854 --
3855 */
3856 /*
3857 This file (SmallEiffel/sys/runtime/agents.c) is automatically included
3858 when agent support is used in the live code.
3859 */
3860
3861 #ifdef SE_GC_LIB
3862 gc_agent *store_agent = NULL;
3863 gc_agent *gc_free_agent = NULL;
3864 int store_left_agent = 0;
3865 int count_agent=0;
3866 int gc_info_nb_agent = 0;
3867 fsoc *store_chunk_agent = NULL;
3868 fsoc H_agent =
3869 {
3870 {
3871 FSOC_SIZE, FSO_STORE_CHUNK,
3872 (void (*)(mch *, void *)) gc_align_mark_agent,
3873 (void (*)(mch *)) gc_sweep_agent
3874 },
3875 NULL,
3876 (((FSOC_SIZE - sizeof (fsoc) + sizeof (double)) / sizeof (gc_agent)) - 1)
3877 };
3878
3879 #endif
3880
3881 #ifdef SE_NO_CHECK
3882 se_agent*
3883 new_agent(Tid id)
3884 #else /* SE_NO_CHECK */
3885 se_agent*
3886 new_agent(void)
3887 #endif
3888 {
3889 #ifdef SE_GC_LIB
3890 int i;
3891 gc_agent *agent;
3892 fsoc *c;
3893 if (store_left_agent > 1)
3894 {
3895 store_left_agent--;
3896 agent = store_agent++;
3897 }
3898 else if (gc_free_agent != NULL)
3899 {
3900 agent = gc_free_agent;
3901 gc_free_agent = agent->header.next;
3902 }
3903 else if (store_left_agent == 1)
3904 {
3905 store_left_agent = 0;
3906 store_chunk_agent->header.state_type = FSO_USED_CHUNK;
3907 agent = store_agent++;
3908 }
3909 else
3910 {
3911 c = gc_fsoc_get1 ();
3912 if (gc_free_agent != NULL)
3913 {
3914 agent = gc_free_agent;
3915 gc_free_agent = agent->header.next;
3916 }
3917 else
3918 {
3919 if (c == NULL)
3920 c = gc_fsoc_get2 ();
3921 store_chunk_agent = c;
3922 *store_chunk_agent = H_agent;
3923 store_agent = ((gc_agent *) (&(store_chunk_agent->first_object)));
3924 store_left_agent = H_agent.count_minus_one;
3925 agent = store_agent++;
3926 }
3927 }
3928 agent->header.flag = FSOH_UNMARKED;
3929 for(i=0;i<(sizeof(se_agent)/4);i++)
3930 ((int*) (agent))[i] = 0;
3931
3932 #else /* SE_GC_LIB */
3933 se_agent* agent = se_calloc(1,sizeof(se_agent));
3934
3935 #endif /* SE_GC_LIB */
3936
3937 #ifdef SE_NO_CHECK
3938 ((se_agent*) agent)->u0.id = id;
3939
3940 #endif /* SE_NO_CHECK */
3941 #ifdef SE_GC_LIB
3942 gc_info_nb_agent++;
3943 #endif /* SE_GC_LIB */
3944 return (se_agent *) agent;
3945 }
3946
3947
3948 #ifdef SE_GC_LIB
3949 void gc_sweep_agent (fsoc * c) {
3950 gc_agent *a1, *a2, *flt, flh;
3951 a1 = ((gc_agent *) (&(c->first_object)));
3952 if (c->header.state_type == FSO_STORE_CHUNK)
3953 {
3954 for (; a1 < store_agent; a1++)
3955 {
3956 if ((a1->header.flag) == FSOH_MARKED)
3957 {
3958 a1->header.flag = FSOH_UNMARKED;
3959 }
3960 else
3961 {
3962 a1->header.next = gc_free_agent;
3963 gc_free_agent = a1;
3964 }
3965 }
3966 }
3967 else
3968 {
3969 int dead = 1;
3970 flh.header.next = NULL;
3971 flt = &flh;
3972 a2 = a1 + c->count_minus_one;
3973 for (; a1 <= a2; a2--)
3974 {
3975 if ((a2->header.flag) == FSOH_MARKED)
3976 {
3977 a2->header.flag = FSOH_UNMARKED;
3978 dead = 0;
3979 }
3980 else
3981 {
3982 flt->header.next = a2;
3983 flt = a2;
3984 }
3985 }
3986 if (dead)
3987 {
3988 c->next = fsocfl;
3989 fsocfl = c;
3990 c->header.state_type = FSO_FREE_CHUNK;
3991 }
3992 else if (flh.header.next != NULL)
3993 {
3994 flt->header.next = gc_free_agent;
3995 gc_free_agent = flh.header.next;
3996 }
3997 }
3998 }
3999
4000 static void agent_recur_gc_mark(void *p) {
4001 int i;
4002
4003 for(i=0;i<(sizeof(se_agent)/4+1);i++)
4004 gc_mark(((char*) p) + i);
4005 }
4006
4007 void gc_mark_agent (/*agent*/T0* o) {
4008 if (((gc_agent *) o)->header.flag == FSOH_UNMARKED)
4009 {
4010
4011 ((gc_agent *) o)->header.flag = FSOH_MARKED;
4012 agent_recur_gc_mark( o);
4013 }
4014 }
4015
4016 void gc_align_mark_agent (fsoc * c, gc_agent * p) {
4017 gc_agent *b = ((gc_agent *) (&(c->first_object)));
4018 if ((c->header.state_type == FSO_STORE_CHUNK)
4019 && (((char *) p) >= ((char *) store_agent)))
4020 return;
4021
4022 if (((char *) p) > ((char *) (b + (c->count_minus_one))))
4023 return;
4024
4025 if (((char *) p) < ((char *) b))
4026 return;
4027 if (((((char *) p) - ((char *) b)) % sizeof (*p)) == 0)
4028 {
4029 if (p->header.flag == FSOH_UNMARKED)
4030 {
4031 se_agent *ta = (&(p->object));
4032 ((gc_agent *) ta)->header.flag = FSOH_MARKED;
4033 agent_recur_gc_mark( ta);
4034 }
4035 }
4036 }
4037
4038 #endif /* SE_GC_LIB */
4039
4040 static void _agent12(se_dump_stack*caller,se_agent12*u,T0* a1){
4041 T0* C=u->C;
4042 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4043 se_dump_stack ds;
4044 ds.fd=&fd;
4045 ds.p=0;
4046 ds.caller=caller;
4047 r130import_score(&ds,((T130*)ci(130,C,0)),a1);
4048 }
4049 /*agent*/T0*agent12(se_dump_stack*caller,T0* C){
4050 se_agent12*u=(void*)new_agent(134);
4051 u->afp=_agent12;
4052 u->C=C;
4053 return ((T0*)u);}
4054
4055 static void _agent11(se_dump_stack*caller,se_agent11*u,T0* a1,T0* a2){
4056 T0* C=u->C;
4057 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4058 se_dump_stack ds;
4059 ds.fd=&fd;
4060 ds.p=0;
4061 ds.caller=caller;
4062 r130write_score(&ds,((T130*)ci(130,C,0)),a1,a2);
4063 }
4064 /*agent*/T0*agent11(se_dump_stack*caller,T0* C){
4065 se_agent11*u=(void*)new_agent(149);
4066 u->afp=_agent11;
4067 u->C=C;
4068 return ((T0*)u);}
4069
4070 static void _agent10(se_dump_stack*caller,se_agent10*u,T0* C){
4071 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4072 se_dump_stack ds;
4073 ds.fd=&fd;
4074 ds.p=0;
4075 ds.caller=caller;
4076 X30update(&ds,0,C);
4077 }
4078 /*agent*/T0*agent10(se_dump_stack*caller){
4079 se_agent10*u=(void*)new_agent(95);
4080 u->afp=_agent10;
4081 return ((T0*)u);}
4082
4083 static void _agent9(se_dump_stack*caller,se_agent9*u,T0* C){
4084 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4085 se_dump_stack ds;
4086 ds.fd=&fd;
4087 ds.p=0;
4088 ds.caller=caller;
4089 X30update(&ds,0,C);
4090 }
4091 /*agent*/T0*agent9(se_dump_stack*caller){
4092 se_agent9*u=(void*)new_agent(95);
4093 u->afp=_agent9;
4094 return ((T0*)u);}
4095
4096 static void _agent8(se_dump_stack*caller,se_agent8*u,T0* C){
4097 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4098 se_dump_stack ds;
4099 ds.fd=&fd;
4100 ds.p=0;
4101 ds.caller=caller;
4102 X30update(&ds,0,C);
4103 }
4104 /*agent*/T0*agent8(se_dump_stack*caller){
4105 se_agent8*u=(void*)new_agent(95);
4106 u->afp=_agent8;
4107 return ((T0*)u);}
4108
4109 static void _agent7(se_dump_stack*caller,se_agent7*u,T0* a1){
4110 T0* C=u->C;
4111 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4112 se_dump_stack ds;
4113 ds.fd=&fd;
4114 ds.p=0;
4115 ds.caller=caller;
4116 r130export_score(&ds,((T130*)ci(130,C,0)),a1);
4117 }
4118 /*agent*/T0*agent7(se_dump_stack*caller,T0* C){
4119 se_agent7*u=(void*)new_agent(134);
4120 u->afp=_agent7;
4121 u->C=C;
4122 return ((T0*)u);}
4123
4124 static void _agent6(se_dump_stack*caller,se_agent6*u,T0* a1){
4125 T0* C=u->C;
4126 T2 a2=u->a2;
4127 T2 a3=u->a3;
4128 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4129 se_dump_stack ds;
4130 ds.fd=&fd;
4131 ds.p=0;
4132 ds.caller=caller;
4133 r117move_widget(&ds,((T117*)ci(117,C,0)),a1,a2,a3);
4134 }
4135 /*agent*/T0*agent6(se_dump_stack*caller,T0* C,T2 a2,T2 a3){
4136 se_agent6*u=(void*)new_agent(124);
4137 u->afp=_agent6;
4138 u->C=C;
4139 u->a2=a2;
4140 u->a3=a3;
4141 return ((T0*)u);}
4142
4143 static void _agent5(se_dump_stack*caller,se_agent5*u,T0* a1){
4144 T0* C=u->C;
4145 T2 a2=u->a2;
4146 T2 a3=u->a3;
4147 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4148 se_dump_stack ds;
4149 ds.fd=&fd;
4150 ds.p=0;
4151 ds.caller=caller;
4152 r97move_widget(&ds,((T97*)ci(97,C,0)),a1,a2,a3);
4153 }
4154 /*agent*/T0*agent5(se_dump_stack*caller,T0* C,T2 a2,T2 a3){
4155 se_agent5*u=(void*)new_agent(115);
4156 u->afp=_agent5;
4157 u->C=C;
4158 u->a2=a2;
4159 u->a3=a3;
4160 return ((T0*)u);}
4161
4162 static void _agent4(se_dump_stack*caller,se_agent4*u,T0* a1){
4163 T0* C=u->C;
4164 T2 a2=u->a2;
4165 T2 a3=u->a3;
4166 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4167 se_dump_stack ds;
4168 ds.fd=&fd;
4169 ds.p=0;
4170 ds.caller=caller;
4171 r99move_widget(&ds,((T99*)ci(99,C,0)),a1,a2,a3);
4172 }
4173 /*agent*/T0*agent4(se_dump_stack*caller,T0* C,T2 a2,T2 a3){
4174 se_agent4*u=(void*)new_agent(111);
4175 u->afp=_agent4;
4176 u->C=C;
4177 u->a2=a2;
4178 u->a3=a3;
4179 return ((T0*)u);}
4180
4181 static void _agent3(se_dump_stack*caller,se_agent3*u,T0* a1){
4182 T0* C=u->C;
4183 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4184 se_dump_stack ds;
4185 ds.fd=&fd;
4186 ds.p=0;
4187 ds.caller=caller;
4188 r99add_new_score(&ds,((T99*)ci(99,C,0)),a1);
4189 }
4190 /*agent*/T0*agent3(se_dump_stack*caller,T0* C){
4191 se_agent3*u=(void*)new_agent(109);
4192 u->afp=_agent3;
4193 u->C=C;
4194 return ((T0*)u);}
4195
4196 static void _agent2(se_dump_stack*caller,se_agent2*u,T0* C){
4197 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4198 se_dump_stack ds;
4199 ds.fd=&fd;
4200 ds.p=0;
4201 ds.caller=caller;
4202 X30update(&ds,0,C);
4203 }
4204 /*agent*/T0*agent2(se_dump_stack*caller){
4205 se_agent2*u=(void*)new_agent(95);
4206 u->afp=_agent2;
4207 return ((T0*)u);}
4208
4209 static void _agent1(se_dump_stack*caller,se_agent1*u,T0* C){
4210 se_frame_descriptor fd={"agent call wrapper 2",0,0,"",1};
4211 se_dump_stack ds;
4212 ds.fd=&fd;
4213 ds.p=0;
4214 ds.caller=caller;
4215 X30update(&ds,0,C);
4216 }
4217 /*agent*/T0*agent1(se_dump_stack*caller){
4218 se_agent1*u=(void*)new_agent(95);
4219 u->afp=_agent1;
4220 return ((T0*)u);}
4221
4222 void call_r0v(se_dump_stack*caller,/*agent*/T0*a,T0* a1){
4223 void(*afp)(se_dump_stack*,se_agent*,T0*);
4224 se_frame_descriptor fd={"agent call wrapper 1",0,0,"",1};
4225 se_dump_stack ds;
4226 ds.fd=&fd;
4227 ds.p=0;
4228 ds.caller=caller;
4229 afp=((void*)(((se_agent*)a)->u0.afp));
4230 afp(&ds,((se_agent*)a),a1);
4231 }
4232
4233 void call_r0r0v(se_dump_stack*caller,/*agent*/T0*a,T0* a1,T0* a2){
4234 void(*afp)(se_dump_stack*,se_agent*,T0*,T0*);
4235 se_frame_descriptor fd={"agent call wrapper 1",0,0,"",1};
4236 se_dump_stack ds;
4237 ds.fd=&fd;
4238 ds.p=0;
4239 ds.caller=caller;
4240 afp=((void*)(((se_agent*)a)->u0.afp));
4241 afp(&ds,((se_agent*)a),a1,a2);
4242 }
4243 /*
4244 -- This file is free software, which comes along with SmallEiffel. This
4245 -- software is distributed in the hope that it will be useful, but WITHOUT
4246 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
4247 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
4248 -- this header is kept unaltered, and a notification of the changes is added.
4249 -- You are allowed to redistribute it and sell it, alone or as a part of
4250 -- another product.
4251 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
4252 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
4253 -- http://SmallEiffel.loria.fr
4254 --
4255 */
4256 /*
4257 This file (SmallEiffel/sys/runtime/basic_time.c) is automatically
4258 included when some external "SmallEiffel" basic_time_* feature is
4259 used (i.e. in live code).
4260 */
4261
4262 /* To switch from (or to) C to (from) Eiffel. */
4263 #ifndef TIME_DOUBLE_UNION
4264 #define TIME_DOUBLE_UNION 1
4265 typedef union _time_double_union time_double_union;
4266 union _time_double_union {
4267 time_t c_mapping;
4268 EIF_DOUBLE eiffel_mapping;
4269 };
4270 #endif
4271
4272 EIF_DOUBLE _basic_time_time(void) {
4273 time_double_union tdu;
4274 tdu.c_mapping = time(NULL);
4275 return tdu.eiffel_mapping;
4276 }
4277
4278 EIF_DOUBLE basic_time_difftime(EIF_DOUBLE t2, EIF_DOUBLE t1) {
4279 time_double_union tdu2;
4280 time_double_union tdu1;
4281 tdu2.eiffel_mapping = t2;
4282 tdu1.eiffel_mapping = t1;
4283
4284 return difftime(tdu2.c_mapping, tdu1.c_mapping);
4285 }
4286
4287 EIF_INTEGER basic_time_getyear(EIF_DOUBLE t, EIF_INTEGER m) {
4288 time_double_union tdu;
4289 tdu.eiffel_mapping = t;
4290 if (m == 1) {
4291 return (((gmtime(&tdu.c_mapping))->tm_year) + 1900);
4292 }
4293 else {
4294 return (((localtime(&(tdu.c_mapping)))->tm_year) + 1900);
4295 }
4296 }
4297
4298 EIF_INTEGER basic_time_getmonth(EIF_DOUBLE t, EIF_INTEGER m) {
4299 time_double_union tdu;
4300 tdu.eiffel_mapping = t;
4301 if (m == 1) {
4302 return (((gmtime(&(tdu.c_mapping)))->tm_mon) + 1);
4303 }
4304 else {
4305 return (((localtime(&(tdu.c_mapping)))->tm_mon) + 1);
4306 }
4307 }
4308
4309 EIF_INTEGER basic_time_getday(EIF_DOUBLE t, EIF_INTEGER m) {
4310 time_double_union tdu;
4311 tdu.eiffel_mapping = t;
4312 if (m == 1) {
4313 return (gmtime(&(tdu.c_mapping)))->tm_mday;
4314 }
4315 else {
4316 return (localtime(&(tdu.c_mapping)))->tm_mday;
4317 }
4318 }
4319
4320 EIF_INTEGER basic_time_gethour(EIF_DOUBLE t, EIF_INTEGER m) {
4321 time_double_union tdu;
4322 tdu.eiffel_mapping = t;
4323 if (m == 1) {
4324 return (gmtime(&(tdu.c_mapping)))->tm_hour;
4325 }
4326 else {
4327 return (localtime(&(tdu.c_mapping)))->tm_hour;
4328 }
4329 }
4330
4331 EIF_INTEGER basic_time_getminute(EIF_DOUBLE t, EIF_INTEGER m) {
4332 time_double_union tdu;
4333 tdu.eiffel_mapping = t;
4334 if (m == 1) {
4335 return (gmtime(&(tdu.c_mapping)))->tm_min;
4336 }
4337 else {
4338 return (localtime(&(tdu.c_mapping)))->tm_min;
4339 }
4340 }
4341
4342 EIF_INTEGER basic_time_getsecond(EIF_DOUBLE t, EIF_INTEGER m) {
4343 time_double_union tdu;
4344 tdu.eiffel_mapping = t;
4345 if (m == 1) {
4346 return (gmtime(&(tdu.c_mapping)))->tm_sec;
4347 }
4348 else {
4349 return (localtime(&(tdu.c_mapping)))->tm_sec;
4350 }
4351 }
4352
4353 EIF_INTEGER basic_time_getwday(EIF_DOUBLE t, EIF_INTEGER m) {
4354 time_double_union tdu;
4355 tdu.eiffel_mapping = t;
4356 if (m == 1) {
4357 return (gmtime(&(tdu.c_mapping)))->tm_wday;
4358 }
4359 else {
4360 return (localtime(&(tdu.c_mapping)))->tm_wday;
4361 }
4362 }
4363
4364 EIF_INTEGER basic_time_getyday(EIF_DOUBLE t, EIF_INTEGER m) {
4365 time_double_union tdu;
4366 tdu.eiffel_mapping = t;
4367 if (m == 1) {
4368 return (gmtime(&(tdu.c_mapping)))->tm_yday;
4369 }
4370 else {
4371 return (localtime(&(tdu.c_mapping)))->tm_yday;
4372 }
4373 }
4374
4375 EIF_BOOLEAN basic_time_is_summer_time_used(EIF_DOUBLE t) {
4376 time_double_union tdu;
4377 tdu.eiffel_mapping = t;
4378 return (((localtime(&(tdu.c_mapping)))->tm_isdst) != 0);
4379 }
4380
4381 EIF_DOUBLE basic_time_mktime(EIF_INTEGER year,
4382 EIF_INTEGER mon,
4383 EIF_INTEGER mday,
4384 EIF_INTEGER hour,
4385 EIF_INTEGER min,
4386 EIF_INTEGER sec) {
4387 time_double_union tdu;
4388 static struct tm tm_buf;
4389
4390 tm_buf.tm_year = (year - 1900);
4391 tm_buf.tm_mon = (mon - 1);
4392 tm_buf.tm_mday = mday;
4393 tm_buf.tm_hour = hour;
4394 tm_buf.tm_min = min;
4395 tm_buf.tm_sec = sec;
4396 tm_buf.tm_isdst = -1;
4397
4398 tdu.c_mapping = ((time_t)mktime(&tm_buf));
4399 if (tdu.c_mapping == ((time_t)(-1))) {
4400 tdu.eiffel_mapping = ((EIF_DOUBLE)(-1));
4401 }
4402 return tdu.eiffel_mapping;
4403 }
4404
4405 void basic_time_add_second(EIF_DOUBLE *t, int s) {
4406 (((time_double_union*)t)->c_mapping) += s;
4407 }
4408 unsigned int fsoc_count_ceil=308;
4409 unsigned int rsoc_count_ceil=21;
4410
4411 T6 r6_ix_not(se_dump_stack*caller,T6 C){
4412 T6 R=0;
4413 void**locals[1];
4414 static se_frame_descriptor fd={"prefix not BOOLEAN",1,1,"%E6%Result%E6%",1};
4415 se_dump_stack ds;
4416 ds.fd=&fd;
4417 ds.current=((void**)&C);
4418 ds.p=12603928;
4419 ds.caller=caller;
4420 ds.locals=locals;
4421 locals[0]=(void**)&R;
4422 se_dst=&ds;/*link*/
4423 /*[IF*/
4424 if(C){
4425 }
4426 else{
4427 (ds.p=12605210);
4428 R=1;
4429 }
4430 /*FI]*/
4431 se_dst=caller;/*unlink*/
4432 return R;
4433 }
4434
4435 T6 r6_px_or(se_dump_stack*caller,T6 C,T6 a1){
4436 T6 R=0;
4437 void**locals[2];
4438 static se_frame_descriptor fd={"infix or BOOLEAN",1,2,"%E6%other%E6%Result%E6%",1};
4439 se_dump_stack ds;
4440 ds.fd=&fd;
4441 ds.current=((void**)&C);
4442 ds.p=12594952;
4443 ds.caller=caller;
4444 ds.locals=locals;
4445 locals[0]=(void**)&a1;
4446 locals[1]=(void**)&R;
4447 se_dst=&ds;/*link*/
4448 se_require_uppermost_flag=1;
4449 (ds.p=12596756);
4450 R=(C)||(a1);
4451 se_dst=caller;/*unlink*/
4452 return R;
4453 }
4454
4455 T6 r6_px_and(se_dump_stack*caller,T6 C,T6 a1){
4456 T6 R=0;
4457 void**locals[2];
4458 static se_frame_descriptor fd={"infix and BOOLEAN",1,2,"%E6%other%E6%Result%E6%",1};
4459 se_dump_stack ds;
4460 ds.fd=&fd;
4461 ds.current=((void**)&C);
4462 ds.p=12589832;
4463 ds.caller=caller;
4464 ds.locals=locals;
4465 locals[0]=(void**)&a1;
4466 locals[1]=(void**)&R;
4467 se_dst=&ds;/*link*/
4468 se_require_uppermost_flag=1;
4469 (ds.p=12591636);
4470 R=(C)&&(a1);
4471 se_dst=caller;/*unlink*/
4472 return R;
4473 }
4474
4475 T6 r6_px_xor(se_dump_stack*caller,T6 C,T6 a1){
4476 T6 R=0;
4477 void**locals[2];
4478 static se_frame_descriptor fd={"infix xor BOOLEAN",1,2,"%E6%other%E6%Result%E6%",1};
4479 se_dump_stack ds;
4480 ds.fd=&fd;
4481 ds.current=((void**)&C);
4482 ds.p=12598792;
4483 ds.caller=caller;
4484 ds.locals=locals;
4485 locals[0]=(void**)&a1;
4486 locals[1]=(void**)&R;
4487 se_dst=&ds;/*link*/
4488 se_require_uppermost_flag=1;
4489 /*[IF*/
4490 if(C){
4491 (ds.p=12599834);
4492 R=r6_ix_not(&ds,a1);
4493 }
4494 else{
4495 (ds.p=12600346);
4496 R=a1;
4497 }
4498 /*FI]*/
4499 se_dst=caller;/*unlink*/
4500 return R;
4501 }
4502
4503 T6 r3_px_6061(se_dump_stack*caller,T3 C,T3 a1){
4504 T6 R=0;
4505 void**locals[2];
4506 static se_frame_descriptor fd={"infix <= CHARACTER",1,2,"%E3%other%E3%Result%E6%",1};
4507 se_dump_stack ds;
4508 ds.fd=&fd;
4509 ds.current=((void**)&C);
4510 ds.p=6303752;
4511 ds.caller=caller;
4512 ds.locals=locals;
4513 locals[0]=(void**)&a1;
4514 locals[1]=(void**)&R;
4515 se_dst=&ds;/*link*/
4516 se_require_uppermost_flag=1;
4517 (ds.p=6304532);
4518 R=(T3code(C))<=(T3code(a1));
4519 if(fd.assertion_flag){
4520 fd.assertion_flag=0;
4521 (ds.p=48246074);
4522 ac_ens((R)==(r6_px_or(&ds,r3_px_60(&ds,C,a1),r3is_equal(&ds,C,a1))),"definition");
4523 fd.assertion_flag=1;
4524 }
4525 se_dst=caller;/*unlink*/
4526 return R;
4527 }
4528
4529 T6 r3is_equal(se_dump_stack*caller,T3 C,T3 a1){
4530 T6 R=0;
4531 void**locals[2];
4532 static se_frame_descriptor fd={"is_equal COMPARABLE",1,2,"%E3%other%E3%Result%E6%",1};
4533 se_dump_stack ds;
4534 ds.fd=&fd;
4535 ds.current=((void**)&C);
4536 ds.p=48240136;
4537 ds.caller=caller;
4538 ds.locals=locals;
4539 locals[0]=(void**)&a1;
4540 locals[1]=(void**)&R;
4541 se_dst=&ds;/*link*/
4542 se_require_uppermost_flag=1;
4543 (ds.p=48240646);
4544 R=(r6_ix_not(&ds,r3_px_60(&ds,C,a1)))&&(r6_ix_not(&ds,r3_px_60(&ds,a1,C)));
4545 if(fd.assertion_flag){
4546 fd.assertion_flag=0;
4547 (ds.p=48241196);
4548 ac_ens((R)==(r6_px_and(&ds,r6_ix_not(&ds,r3_px_60(&ds,C,a1)),r6_ix_not(&ds,r3_px_60(&ds,a1,C)))),"trichotomy");
4549 (ds.p=2122846);
4550 ac_ens((!((C)==(a1)))||(R),"consistent");
4551 (ds.p=2123064);
4552 ac_ens((!(R))||(r3is_equal(&ds,a1,C)),"symmetric");
4553 fd.assertion_flag=1;
4554 }
4555 se_dst=caller;/*unlink*/
4556 return R;
4557 }
4558
4559 T6 r3is_digit(se_dump_stack*caller,T3 C){
4560 T6 R=0;
4561 void**locals[1];
4562 static se_frame_descriptor fd={"is_digit CHARACTER",1,1,"%E3%Result%E6%",1};
4563 se_dump_stack ds;
4564 ds.fd=&fd;
4565 ds.current=((void**)&C);
4566 ds.p=6334472;
4567 ds.caller=caller;
4568 ds.locals=locals;
4569 locals[0]=(void**)&R;
4570 se_dst=&ds;/*link*/
4571 /*[IF*/
4572 if(((ds.p=6335274),r3_px_6261(&ds,C,((T3)'0')))){
4573 (ds.p=6335514);
4574 R=r3_px_6061(&ds,C,((T3)'9'));
4575 }
4576 /*FI]*/
4577 if(fd.assertion_flag){
4578 fd.assertion_flag=0;
4579 (ds.p=6336288);
4580 ac_ens((R)==(r3in_range(&ds,C,((T3)'0'),((T3)'9'))),NULL);
4581 fd.assertion_flag=1;
4582 }
4583 se_dst=caller;/*unlink*/
4584 return R;
4585 }
4586
4587 T6 r3is_separator(se_dump_stack*caller,T3 C){
4588 T6 R=0;
4589 void**locals[1];
4590 static se_frame_descriptor fd={"is_separator CHARACTER",1,1,"%E3%Result%E6%",1};
4591 se_dump_stack ds;
4592 ds.fd=&fd;
4593 ds.current=((void**)&C);
4594 ds.p=6351368;
4595 ds.caller=caller;
4596 ds.locals=locals;
4597 locals[0]=(void**)&R;
4598 se_dst=&ds;/*link*/
4599 /*[INSPECT*/
4600 {int z1=((ds.p=6352410),C);
4601 switch(z1){
4602 case 0:
4603 case 9:
4604 case 10:
4605 case 12:
4606 case 13:
4607 case 32:
4608 (ds.p=6352922);
4609 R=1;
4610 break;
4611 }
4612 }/*INSPECT]*/
4613 se_dst=caller;/*unlink*/
4614 return R;
4615 }
4616
4617 T6 r3in_range(se_dump_stack*caller,T3 C,T3 a1,T3 a2){
4618 T6 R=0;
4619 void**locals[3];
4620 static se_frame_descriptor fd={"in_range COMPARABLE",1,3,"%E3%lower%E3%upper%E3%Result%E6%",1};
4621 se_dump_stack ds;
4622 ds.fd=&fd;
4623 ds.current=((void**)&C);
4624 ds.p=48251912;
4625 ds.caller=caller;
4626 ds.locals=locals;
4627 locals[0]=(void**)&a1;
4628 locals[1]=(void**)&a2;
4629 locals[2]=(void**)&R;
4630 se_dst=&ds;/*link*/
4631 (ds.p=48252692);
4632 R=(r3_px_6261(&ds,C,a1))&&(r3_px_6061(&ds,C,a2));
4633 if(fd.assertion_flag){
4634 fd.assertion_flag=0;
4635 (ds.p=48253218);
4636 ac_ens((R)==(r6_px_and(&ds,r3_px_6261(&ds,C,a1),r3_px_6061(&ds,C,a2))),NULL);
4637 fd.assertion_flag=1;
4638 }
4639 se_dst=caller;/*unlink*/
4640 return R;
4641 }
4642
4643 T6 r3_px_6261(se_dump_stack*caller,T3 C,T3 a1){
4644 T6 R=0;
4645 void**locals[2];
4646 static se_frame_descriptor fd={"infix >= CHARACTER",1,2,"%E3%other%E3%Result%E6%",1};
4647 se_dump_stack ds;
4648 ds.fd=&fd;
4649 ds.current=((void**)&C);
4650 ds.p=6306824;
4651 ds.caller=caller;
4652 ds.locals=locals;
4653 locals[0]=(void**)&a1;
4654 locals[1]=(void**)&R;
4655 se_dst=&ds;/*link*/
4656 se_require_uppermost_flag=1;
4657 (ds.p=6307604);
4658 R=(T3code(C))>=(T3code(a1));
4659 if(fd.assertion_flag){
4660 fd.assertion_flag=0;
4661 (ds.p=48251194);
4662 ac_ens((R)==(r3_px_6061(&ds,a1,C)),"definition");
4663 fd.assertion_flag=1;
4664 }
4665 se_dst=caller;/*unlink*/
4666 return R;
4667 }
4668
4669 T2 r3value(se_dump_stack*caller,T3 C){
4670 T2 R=0;
4671 void**locals[1];
4672 static se_frame_descriptor fd={"value CHARACTER",1,1,"%E3%Result%E2%",1};
4673 se_dump_stack ds;
4674 ds.fd=&fd;
4675 ds.current=((void**)&C);
4676 ds.p=6308360;
4677 ds.caller=caller;
4678 ds.locals=locals;
4679 locals[0]=(void**)&R;
4680 se_dst=&ds;/*link*/
4681 se_require_uppermost_flag=1;
4682 if(fd.assertion_flag){
4683 fd.assertion_flag=0;
4684 (ds.p=6309140);
4685 ac_req(r3is_digit(&ds,C),NULL);
4686 fd.assertion_flag=1;
4687 }
4688 (ds.p=6309652);
4689 R=(T3code(C))-(48);
4690 if(fd.assertion_flag){
4691 fd.assertion_flag=0;
4692 (ds.p=6310178);
4693 ac_ens(r2in_range(&ds,R,0,9),NULL);
4694 fd.assertion_flag=1;
4695 }
4696 se_dst=caller;/*unlink*/
4697 return R;
4698 }
4699
4700 T6 r3_px_60(se_dump_stack*caller,T3 C,T3 a1){
4701 T6 R=0;
4702 void**locals[2];
4703 static se_frame_descriptor fd={"infix < CHARACTER",1,2,"%E3%other%E3%Result%E6%",1};
4704 se_dump_stack ds;
4705 ds.fd=&fd;
4706 ds.current=((void**)&C);
4707 ds.p=6302216;
4708 ds.caller=caller;
4709 ds.locals=locals;
4710 locals[0]=(void**)&a1;
4711 locals[1]=(void**)&R;
4712 se_dst=&ds;/*link*/
4713 se_require_uppermost_flag=1;
4714 (ds.p=6302996);
4715 R=(T3code(C))<(T3code(a1));
4716 if(fd.assertion_flag){
4717 fd.assertion_flag=0;
4718 (ds.p=48243514);
4719 ac_ens((!(R))||(r6_ix_not(&ds,r3_px_60(&ds,a1,C))),"asymmetric");
4720 fd.assertion_flag=1;
4721 }
4722 se_dst=caller;/*unlink*/
4723 return R;
4724 }
4725
4726 T2 r3decimal_value(se_dump_stack*caller,T3 C){
4727 T2 R=0;
4728 void**locals[1];
4729 static se_frame_descriptor fd={"decimal_value (value CHARACTER)",1,1,"%E3%Result%E2%",1};
4730 se_dump_stack ds;
4731 ds.fd=&fd;
4732 ds.current=((void**)&C);
4733 ds.p=6308360;
4734 ds.caller=caller;
4735 ds.locals=locals;
4736 locals[0]=(void**)&R;
4737 se_dst=&ds;/*link*/
4738 se_require_uppermost_flag=1;
4739 if(fd.assertion_flag){
4740 fd.assertion_flag=0;
4741 (ds.p=6309140);
4742 ac_req(r3is_digit(&ds,C),NULL);
4743 fd.assertion_flag=1;
4744 }
4745 (ds.p=6309652);
4746 R=(T3code(C))-(48);
4747 if(fd.assertion_flag){
4748 fd.assertion_flag=0;
4749 (ds.p=6310178);
4750 ac_ens(r2in_range(&ds,R,0,9),NULL);
4751 fd.assertion_flag=1;
4752 }
4753 se_dst=caller;/*unlink*/
4754 return R;
4755 }
4756
4757 T6 r2is_equal(se_dump_stack*caller,T2 C,T2 a1){
4758 T6 R=0;
4759 void**locals[2];
4760 static se_frame_descriptor fd={"is_equal COMPARABLE",1,2,"%E2%other%E2%Result%E6%",1};
4761 se_dump_stack ds;
4762 ds.fd=&fd;
4763 ds.current=((void**)&C);
4764 ds.p=48240136;
4765 ds.caller=caller;
4766 ds.locals=locals;
4767 locals[0]=(void**)&a1;
4768 locals[1]=(void**)&R;
4769 se_dst=&ds;/*link*/
4770 se_require_uppermost_flag=1;
4771 (ds.p=48240646);
4772 R=(r6_ix_not(&ds,(C)<(a1)))&&(r6_ix_not(&ds,(a1)<(C)));
4773 if(fd.assertion_flag){
4774 fd.assertion_flag=0;
4775 (ds.p=48241196);
4776 ac_ens((R)==(r6_px_and(&ds,r6_ix_not(&ds,(C)<(a1)),r6_ix_not(&ds,(a1)<(C)))),"trichotomy");
4777 (ds.p=2122846);
4778 ac_ens((!((C)==(a1)))||(R),"consistent");
4779 (ds.p=2123064);
4780 ac_ens((!(R))||(r2is_equal(&ds,a1,C)),"symmetric");
4781 fd.assertion_flag=1;
4782 }
4783 se_dst=caller;/*unlink*/
4784 return R;
4785 }
4786
4787 T6 r2divisible(se_dump_stack*caller,T2 a1){
4788 T6 R=0;
4789 void**locals[2];
4790 static se_frame_descriptor fd={"divisible INTEGER_REF",0,2,"other%E2%Result%E6%",1};
4791 se_dump_stack ds;
4792 ds.fd=&fd;
4793 ds.current=NULL;
4794 ds.p=54549256;
4795 ds.caller=caller;
4796 ds.locals=locals;
4797 locals[0]=(void**)&a1;
4798 locals[1]=(void**)&R;
4799 se_dst=&ds;/*link*/
4800 se_require_uppermost_flag=1;
4801 (ds.p=54549780);
4802 R=((/*RF2*/a1))!=(0);
4803 se_dst=caller;/*unlink*/
4804 return R;
4805 }
4806
4807 T6 r2in_range(se_dump_stack*caller,T2 C,T2 a1,T2 a2){
4808 T6 R=0;
4809 void**locals[3];
4810 static se_frame_descriptor fd={"in_range COMPARABLE",1,3,"%E2%lower%E2%upper%E2%Result%E6%",1};
4811 se_dump_stack ds;
4812 ds.fd=&fd;
4813 ds.current=((void**)&C);
4814 ds.p=48251912;
4815 ds.caller=caller;
4816 ds.locals=locals;
4817 locals[0]=(void**)&a1;
4818 locals[1]=(void**)&a2;
4819 locals[2]=(void**)&R;
4820 se_dst=&ds;/*link*/
4821 (ds.p=48252692);
4822 R=((C)>=(a1))&&((C)<=(a2));
4823 if(fd.assertion_flag){
4824 fd.assertion_flag=0;
4825 (ds.p=48253218);
4826 ac_ens((R)==(r6_px_and(&ds,(C)>=(a1),(C)<=(a2))),NULL);
4827 fd.assertion_flag=1;
4828 }
4829 se_dst=caller;/*unlink*/
4830 return R;
4831 }
4832
4833 T0* r2to_string(se_dump_stack*caller,T2 C){
4834 T0* R=NULL;
4835 void**locals[1];
4836 static se_frame_descriptor fd={"to_string INTEGER",1,1,"%E2%Result%R7%",1};
4837 se_dump_stack ds;
4838 ds.fd=&fd;
4839 ds.current=((void**)&C);
4840 ds.p=4235016;
4841 ds.caller=caller;
4842 ds.locals=locals;
4843 locals[0]=(void**)&R;
4844 se_dst=&ds;/*link*/
4845 (ds.p=4236316);
4846 r7clear(&ds,se_i7(&ds,((T7*)ci(7,r2tmp_string(&ds),4236294))));
4847 (ds.p=4236564);
4848 r2append_in(&ds,C,r2tmp_string(&ds));
4849 (ds.p=4236820);
4850 R=r7twin(&ds,se_i7(&ds,((T7*)ci(7,r2tmp_string(&ds),4236840))));
4851 se_dst=caller;/*unlink*/
4852 return R;
4853 }
4854 T0*oBC2tmp_string=NULL;
4855 int fBC2tmp_string=0;
4856
4857 T0* r2tmp_string(se_dump_stack*caller){
4858 if(fBC2tmp_string==0){fBC2tmp_string=1;{
4859 void**locals[1];
4860 static se_frame_descriptor fd={"tmp_string INTEGER",0,1,"Result%R7%",1};
4861 se_dump_stack ds;
4862 ds.fd=&fd;
4863 ds.current=NULL;
4864 ds.p=4295688;
4865 ds.caller=caller;
4866 ds.locals=locals;
4867 locals[0]=(void**)&oBC2tmp_string;
4868 se_dst=&ds;/*link*/
4869 (ds.p=4296212);
4870 {T7*n=new7();
4871 oBC2tmp_string=((T0*)n);
4872 r7make(&ds,n,128);
4873 se_i7(&ds,n);}
4874 se_dst=caller;/*unlink*/
4875 }}
4876 return oBC2tmp_string;
4877 }
4878
4879 T3 r2digit(se_dump_stack*caller,T2 C){
4880 T3 R=0;
4881 void**locals[1];
4882 static se_frame_descriptor fd={"digit (decimal_digit INTEGER)",1,1,"%E2%Result%E3%",1};
4883 se_dump_stack ds;
4884 ds.fd=&fd;
4885 ds.current=((void**)&C);
4886 ds.p=4267272;
4887 ds.caller=caller;
4888 ds.locals=locals;
4889 locals[0]=(void**)&R;
4890 se_dst=&ds;/*link*/
4891 se_require_uppermost_flag=1;
4892 if(fd.assertion_flag){
4893 fd.assertion_flag=0;
4894 (ds.p=4268052);
4895 ac_req(r2in_range(&ds,C,0,9),NULL);
4896 fd.assertion_flag=1;
4897 }
4898 (ds.p=4268564);
4899 R=((T3)((C)+(T3code(((T3)'0')))));
4900 if(fd.assertion_flag){
4901 fd.assertion_flag=0;
4902 (ds.p=4269116);
4903 ac_ens(r7has(&ds,ms2_117797837,R),NULL);
4904 (ds.p=4269358);
4905 ac_ens((r3value(&ds,R))==(C),NULL);
4906 fd.assertion_flag=1;
4907 }
4908 se_dst=caller;/*unlink*/
4909 return R;
4910 }
4911
4912 T2 r2hash_code(se_dump_stack*caller,T2 C){
4913 T2 R=0;
4914 void**locals[1];
4915 static se_frame_descriptor fd={"hash_code INTEGER",1,1,"%E2%Result%E2%",1};
4916 se_dump_stack ds;
4917 ds.fd=&fd;
4918 ds.current=((void**)&C);
4919 ds.p=4292872;
4920 ds.caller=caller;
4921 ds.locals=locals;
4922 locals[0]=(void**)&R;
4923 se_dst=&ds;/*link*/
4924 /*[IF*/
4925 if(((ds.p=4293418),(C)<(0))){
4926 (ds.p=4293658);
4927 R=-((C)+(1));
4928 }
4929 else{
4930 (ds.p=4294170);
4931 R=C;
4932 }
4933 /*FI]*/
4934 if(fd.assertion_flag){
4935 fd.assertion_flag=0;
4936 (ds.p=50336836);
4937 ac_ens((R)>=(0),"good_hash_value");
4938 fd.assertion_flag=1;
4939 }
4940 se_dst=caller;/*unlink*/
4941 return R;
4942 }
4943
4944 void r2append_in(se_dump_stack*caller,T2 C,T0* a1){
4945 T2 _val=0;
4946 T2 _i=0;
4947 void**locals[3];
4948 static se_frame_descriptor fd={"append_in INTEGER",1,3,"%E2%buffer%R7%val%E2%i%E2%",1};
4949 se_dump_stack ds;
4950 ds.fd=&fd;
4951 ds.current=((void**)&C);
4952 ds.p=4243208;
4953 ds.caller=caller;
4954 ds.locals=locals;
4955 locals[0]=(void**)&a1;
4956 locals[1]=(void**)&_val;
4957 locals[2]=(void**)&_i;
4958 se_dst=&ds;/*link*/
4959 se_require_uppermost_flag=1;
4960 if(fd.assertion_flag){
4961 fd.assertion_flag=0;
4962 (ds.p=4244258);
4963 ac_req((a1)!=((void*)(NULL)),NULL);
4964 fd.assertion_flag=1;
4965 }
4966 /*[IF*/
4967 if(((ds.p=4245290),(C)==(0))){
4968 (ds.p=4245544);
4969 r7extend(&ds,se_i7(&ds,((T7*)ci(7,a1,4245530))),((T3)'0'));
4970 }
4971 else{
4972 /*[IF*/
4973 if(((ds.p=4246064),(C)>(0))){
4974 (ds.p=4246566);
4975 _i=((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,4246576))))->_count/*8*/))+(1);
4976 (ds.p=4246822);
4977 _val=C;
4978 while (!(((ds.p=4247342),(_val)==(0))))
4979 {
4980 (ds.p=4247860);
4981 r7extend(&ds,se_i7(&ds,((T7*)ci(7,a1,4247846))),r2digit(&ds,(_val)%(10)));
4982 (ds.p=4248102);
4983 _val=(_val)/(10);
4984 }
4985 }
4986 else{
4987 (ds.p=4248878);
4988 r7extend(&ds,se_i7(&ds,((T7*)ci(7,a1,4248864))),((T3)'\55'));
4989 (ds.p=4249382);
4990 _i=((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,4249392))))->_count/*8*/))+(1);
4991 (ds.p=4249638);
4992 _val=C;
4993 while (!(((ds.p=4250158),(_val)==(0))))
4994 {
4995 (ds.p=4250676);
4996 r7extend(&ds,se_i7(&ds,((T7*)ci(7,a1,4250662))),r2digit(&ds,-((_val)%(10))));
4997 (ds.p=4250918);
4998 _val=(_val)/(10);
4999 }
5000 }
5001 /*FI]*/
5002 (ds.p=4251936);
5003 _val=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,4251950))))->_count/*8*/);
5004 while (!(((ds.p=4252452),(_i)>=(_val))))
5005 {
5006 (ds.p=4252974);
5007 r7swap(&ds,se_i7(&ds,((T7*)ci(7,a1,4252960))),_i,_val);
5008 (ds.p=4253216);
5009 _val=(_val)-(1);
5010 (ds.p=4253472);
5011 _i=(_i)+(1);
5012 }
5013 }
5014 /*FI]*/
5015 se_dst=caller;/*unlink*/
5016 }
5017
5018 T6 r82fast_memcmp(se_dump_stack*caller,T82 C,T82 a1,T2 a2){
5019 T6 R=0;
5020 T2 _i=0;
5021 void**locals[4];
5022 static se_frame_descriptor fd={"fast_memcmp NATIVE_ARRAY",1,4,"%E82%other%E82%capacity%E2%Result%E6%i%E2%",1};
5023 se_dump_stack ds;
5024 ds.fd=&fd;
5025 ds.current=((void**)&C);
5026 ds.p=100687112;
5027 ds.caller=caller;
5028 ds.locals=locals;
5029 locals[0]=(void**)&a1;
5030 locals[1]=(void**)&a2;
5031 locals[2]=(void**)&R;
5032 locals[3]=(void**)&_i;
5033 se_dst=&ds;/*link*/
5034 se_require_uppermost_flag=1;
5035 if(fd.assertion_flag){
5036 fd.assertion_flag=0;
5037 (ds.p=100687918);
5038 ac_req((!((a2)>(0)))||(r82is_not_null(&ds,a1)),NULL);
5039 fd.assertion_flag=1;
5040 }
5041 (ds.p=100689178);
5042 _i=(a2)-(1);
5043 while (!(((ds.p=100689702),((_i)<(0))||(((C)[_i])!=((a1)[_i])))))
5044 {
5045 (ds.p=100690202);
5046 _i=(_i)-(1);
5047 }
5048 (ds.p=100690708);
5049 R=(_i)<(0);
5050 se_dst=caller;/*unlink*/
5051 return R;
5052 }
5053
5054 void r82set_all_with(se_dump_stack*caller,T82 C,T6 a1,T2 a2){
5055 T2 _i=0;
5056 void**locals[3];
5057 static se_frame_descriptor fd={"set_all_with NATIVE_ARRAY",1,3,"%E82%v%E6%upper%E2%i%E2%",1};
5058 se_dump_stack ds;
5059 ds.fd=&fd;
5060 ds.current=((void**)&C);
5061 ds.p=100746248;
5062 ds.caller=caller;
5063 ds.locals=locals;
5064 locals[0]=(void**)&a1;
5065 locals[1]=(void**)&a2;
5066 locals[2]=(void**)&_i;
5067 se_dst=&ds;/*link*/
5068 (ds.p=100747806);
5069 _i=a2;
5070 while (!(((ds.p=100747844),(_i)<(0))))
5071 {
5072 (ds.p=100748314);
5073 (C)[_i]=(a1);
5074 (ds.p=100748570);
5075 _i=(_i)-(1);
5076 }
5077 se_dst=caller;/*unlink*/
5078 }
5079
5080 T6 r82is_not_null(se_dump_stack*caller,T82 C){
5081 T6 R=0;
5082 void**locals[1];
5083 static se_frame_descriptor fd={"is_not_null NATIVE_ARRAY",1,1,"%E82%Result%E6%",1};
5084 se_dump_stack ds;
5085 ds.fd=&fd;
5086 ds.current=((void**)&C);
5087 ds.p=100794888;
5088 ds.caller=caller;
5089 ds.locals=locals;
5090 locals[0]=(void**)&R;
5091 se_dst=&ds;/*link*/
5092 (ds.p=100795412);
5093 R=(NULL!=((void*)(C)));
5094 se_dst=caller;/*unlink*/
5095 return R;
5096 }
5097
5098 T6 r82all_default(se_dump_stack*caller,T82 C,T2 a1){
5099 T6 R=0;
5100 T2 _i=0;
5101 T6 _model=0;
5102 void**locals[4];
5103 static se_frame_descriptor fd={"all_default NATIVE_ARRAY",1,4,"%E82%upper%E2%Result%E6%i%E2%model%E6%",1};
5104 se_dump_stack ds;
5105 ds.fd=&fd;
5106 ds.current=((void**)&C);
5107 ds.p=100784904;
5108 ds.caller=caller;
5109 ds.locals=locals;
5110 locals[0]=(void**)&a1;
5111 locals[1]=(void**)&R;
5112 locals[2]=(void**)&_i;
5113 locals[3]=(void**)&_model;
5114 se_dst=&ds;/*link*/
5115 se_require_uppermost_flag=1;
5116 if(fd.assertion_flag){
5117 fd.assertion_flag=0;
5118 (ds.p=100785952);
5119 ac_req((a1)>=(-(1)),NULL);
5120 fd.assertion_flag=1;
5121 }
5122 (ds.p=100787482);
5123 R=1;
5124 (ds.p=100787738);
5125 _i=a1;
5126 while (!(((ds.p=100788262),((_i)<(0))||(r6_ix_not(&ds,R)))))
5127 {
5128 (ds.p=100788762);
5129 R=(_model)==((C)[_i]);
5130 (ds.p=100789018);
5131 _i=(_i)-(1);
5132 }
5133 se_dst=caller;/*unlink*/
5134 return R;
5135 }
5136
5137 void r82copy_from(se_dump_stack*caller,T82 C,T82 a1,T2 a2){
5138 T2 _i=0;
5139 void**locals[3];
5140 static se_frame_descriptor fd={"copy_from NATIVE_ARRAY",1,3,"%E82%model%E82%upper%E2%i%E2%",1};
5141 se_dump_stack ds;
5142 ds.fd=&fd;
5143 ds.current=((void**)&C);
5144 ds.p=100757000;
5145 ds.caller=caller;
5146 ds.locals=locals;
5147 locals[0]=(void**)&a1;
5148 locals[1]=(void**)&a2;
5149 locals[2]=(void**)&_i;
5150 se_dst=&ds;/*link*/
5151 (ds.p=100758302);
5152 _i=a2;
5153 while (!(((ds.p=100758340),(_i)<(0))))
5154 {
5155 (ds.p=100758810);
5156 (C)[_i]=((a1)[_i]);
5157 (ds.p=100759066);
5158 _i=(_i)-(1);
5159 }
5160 se_dst=caller;/*unlink*/
5161 }
5162
5163 void r49set_all_with(se_dump_stack*caller,T49 C,T0* a1,T2 a2){
5164 T2 _i=0;
5165 void**locals[3];
5166 static se_frame_descriptor fd={"set_all_with NATIVE_ARRAY",1,3,"%E49%v%R47%upper%E2%i%E2%",1};
5167 se_dump_stack ds;
5168 ds.fd=&fd;
5169 ds.current=((void**)&C);
5170 ds.p=100746248;
5171 ds.caller=caller;
5172 ds.locals=locals;
5173 locals[0]=(void**)&a1;
5174 locals[1]=(void**)&a2;
5175 locals[2]=(void**)&_i;
5176 se_dst=&ds;/*link*/
5177 (ds.p=100747806);
5178 _i=a2;
5179 while (!(((ds.p=100747844),(_i)<(0))))
5180 {
5181 (ds.p=100748314);
5182 (C)[_i]=(a1);
5183 (ds.p=100748570);
5184 _i=(_i)-(1);
5185 }
5186 se_dst=caller;/*unlink*/
5187 }
5188
5189 T6 r76safe_equal(se_dump_stack*caller,T0* a1,T0* a2){
5190 T6 R=0;
5191 void**locals[3];
5192 static se_frame_descriptor fd={"safe_equal SAFE_EQUAL",0,3,"e1%R74%e2%R74%Result%E6%",1};
5193 se_dump_stack ds;
5194 ds.fd=&fd;
5195 ds.current=NULL;
5196 ds.p=79697160;
5197 ds.caller=caller;
5198 ds.locals=locals;
5199 locals[0]=(void**)&a1;
5200 locals[1]=(void**)&a2;
5201 locals[2]=(void**)&R;
5202 se_dst=&ds;/*link*/
5203 /*[IF*/
5204 /*AF*//*AF*/if(((ds.p=79700008),(a1)==((void*)(a2)))){
5205 (ds.p=79700250);
5206 R=1;
5207 }
5208 else if(((ds.p=79700534),((a1)==((void*)(NULL)))||((a2)==((void*)(NULL))))){
5209 }
5210 else if(((ds.p=79700794),((T0*)(t[((T74*)a1)->id]))==((void*)((T0*)(t[((T74*)a2)->id]))))){
5211 (ds.p=79701018);
5212 R=r74is_equal(&ds,((T74*)ci(74,a1,79701038)),a2);
5213 }
5214 /*FI]*/
5215 se_dst=caller;/*unlink*/
5216 return R;
5217 }
5218
5219 void r76clear_all(se_dump_stack*caller,T76 C,T2 a1){
5220 T0* _v=NULL;
5221 T2 _i=0;
5222 void**locals[3];
5223 static se_frame_descriptor fd={"clear_all NATIVE_ARRAY",1,3,"%E76%upper%E2%v%R74%i%E2%",1};
5224 se_dump_stack ds;
5225 ds.fd=&fd;
5226 ds.current=((void**)&C);
5227 ds.p=100749576;
5228 ds.caller=caller;
5229 ds.locals=locals;
5230 locals[0]=(void**)&a1;
5231 locals[1]=(void**)&_v;
5232 locals[2]=(void**)&_i;
5233 se_dst=&ds;/*link*/
5234 (ds.p=100751134);
5235 _i=a1;
5236 while (!(((ds.p=100751172),(_i)<(0))))
5237 {
5238 (ds.p=100751642);
5239 (C)[_i]=(_v);
5240 (ds.p=100751898);
5241 _i=(_i)-(1);
5242 }
5243 se_dst=caller;/*unlink*/
5244 }
5245
5246 T6 r76is_not_null(se_dump_stack*caller,T76 C){
5247 T6 R=0;
5248 void**locals[1];
5249 static se_frame_descriptor fd={"is_not_null NATIVE_ARRAY",1,1,"%E76%Result%E6%",1};
5250 se_dump_stack ds;
5251 ds.fd=&fd;
5252 ds.current=((void**)&C);
5253 ds.p=100794888;
5254 ds.caller=caller;
5255 ds.locals=locals;
5256 locals[0]=(void**)&R;
5257 se_dst=&ds;/*link*/
5258 (ds.p=100795412);
5259 R=(NULL!=((void*)(C)));
5260 se_dst=caller;/*unlink*/
5261 return R;
5262 }
5263
5264 T6 r76memcmp(se_dump_stack*caller,T76 C,T76 a1,T2 a2){
5265 T6 R=0;
5266 T2 _i=0;
5267 void**locals[4];
5268 static se_frame_descriptor fd={"memcmp NATIVE_ARRAY",1,4,"%E76%other%E76%capacity%E2%Result%E6%i%E2%",1};
5269 se_dump_stack ds;
5270 ds.fd=&fd;
5271 ds.current=((void**)&C);
5272 ds.p=100681992;
5273 ds.caller=caller;
5274 ds.locals=locals;
5275 locals[0]=(void**)&a1;
5276 locals[1]=(void**)&a2;
5277 locals[2]=(void**)&R;
5278 locals[3]=(void**)&_i;
5279 se_dst=&ds;/*link*/
5280 se_require_uppermost_flag=1;
5281 if(fd.assertion_flag){
5282 fd.assertion_flag=0;
5283 (ds.p=100683566);
5284 ac_req((!((a2)>(0)))||(r76is_not_null(&ds,a1)),NULL);
5285 fd.assertion_flag=1;
5286 }
5287 (ds.p=100684826);
5288 _i=(a2)-(1);
5289 while (!(((ds.p=100685350),((_i)<(0))||(r6_ix_not(&ds,r76safe_equal(&ds,(C)[_i],(a1)[_i]))))))
5290 {
5291 (ds.p=100685850);
5292 _i=(_i)-(1);
5293 }
5294 (ds.p=100686356);
5295 R=(_i)<(0);
5296 se_dst=caller;/*unlink*/
5297 return R;
5298 }
5299
5300 void r76copy_from(se_dump_stack*caller,T76 C,T76 a1,T2 a2){
5301 T2 _i=0;
5302 void**locals[3];
5303 static se_frame_descriptor fd={"copy_from NATIVE_ARRAY",1,3,"%E76%model%E76%upper%E2%i%E2%",1};
5304 se_dump_stack ds;
5305 ds.fd=&fd;
5306 ds.current=((void**)&C);
5307 ds.p=100757000;
5308 ds.caller=caller;
5309 ds.locals=locals;
5310 locals[0]=(void**)&a1;
5311 locals[1]=(void**)&a2;
5312 locals[2]=(void**)&_i;
5313 se_dst=&ds;/*link*/
5314 (ds.p=100758302);
5315 _i=a2;
5316 while (!(((ds.p=100758340),(_i)<(0))))
5317 {
5318 (ds.p=100758810);
5319 (C)[_i]=((a1)[_i]);
5320 (ds.p=100759066);
5321 _i=(_i)-(1);
5322 }
5323 se_dst=caller;/*unlink*/
5324 }
5325
5326 T69 r69realloc(se_dump_stack*caller,T69 C,T2 a1,T2 a2){
5327 T69 R=NULL;
5328 void**locals[3];
5329 static se_frame_descriptor fd={"realloc NATIVE_ARRAY",1,3,"%E69%old_nb_elts%E2%new_nb_elts%E2%Result%E69%",1};
5330 se_dump_stack ds;
5331 ds.fd=&fd;
5332 ds.current=((void**)&C);
5333 ds.p=100677640;
5334 ds.caller=caller;
5335 ds.locals=locals;
5336 locals[0]=(void**)&a1;
5337 locals[1]=(void**)&a2;
5338 locals[2]=(void**)&R;
5339 se_dst=&ds;/*link*/
5340 se_require_uppermost_flag=1;
5341 if(fd.assertion_flag){
5342 fd.assertion_flag=0;
5343 (ds.p=100679444);
5344 ac_req(r69is_not_null(&ds,C),NULL);
5345 (ds.p=100679724);
5346 ac_req((a1)>(0),NULL);
5347 (ds.p=100679980);
5348 ac_req((a1)<(a2),NULL);
5349 fd.assertion_flag=1;
5350 }
5351 (ds.p=100680468);
5352 R=new69(a2);
5353 (ds.p=100680738);
5354 r69copy_from(&ds,R,C,(a1)-(1));
5355 se_dst=caller;/*unlink*/
5356 return R;
5357 }
5358
5359 T6 r69fast_memcmp(se_dump_stack*caller,T69 C,T69 a1,T2 a2){
5360 T6 R=0;
5361 T2 _i=0;
5362 void**locals[4];
5363 static se_frame_descriptor fd={"fast_memcmp NATIVE_ARRAY",1,4,"%E69%other%E69%capacity%E2%Result%E6%i%E2%",1};
5364 se_dump_stack ds;
5365 ds.fd=&fd;
5366 ds.current=((void**)&C);
5367 ds.p=100687112;
5368 ds.caller=caller;
5369 ds.locals=locals;
5370 locals[0]=(void**)&a1;
5371 locals[1]=(void**)&a2;
5372 locals[2]=(void**)&R;
5373 locals[3]=(void**)&_i;
5374 se_dst=&ds;/*link*/
5375 se_require_uppermost_flag=1;
5376 if(fd.assertion_flag){
5377 fd.assertion_flag=0;
5378 (ds.p=100687918);
5379 ac_req((!((a2)>(0)))||(r69is_not_null(&ds,a1)),NULL);
5380 fd.assertion_flag=1;
5381 }
5382 (ds.p=100689178);
5383 _i=(a2)-(1);
5384 while (!(((ds.p=100689702),((_i)<(0))||(((C)[_i])!=((void*)((a1)[_i]))))))
5385 {
5386 (ds.p=100690202);
5387 _i=(_i)-(1);
5388 }
5389 (ds.p=100690708);
5390 R=(_i)<(0);
5391 se_dst=caller;/*unlink*/
5392 return R;
5393 }
5394
5395 T6 r69is_not_null(se_dump_stack*caller,T69 C){
5396 T6 R=0;
5397 void**locals[1];
5398 static se_frame_descriptor fd={"is_not_null NATIVE_ARRAY",1,1,"%E69%Result%E6%",1};
5399 se_dump_stack ds;
5400 ds.fd=&fd;
5401 ds.current=((void**)&C);
5402 ds.p=100794888;
5403 ds.caller=caller;
5404 ds.locals=locals;
5405 locals[0]=(void**)&R;
5406 se_dst=&ds;/*link*/
5407 (ds.p=100795412);
5408 R=(NULL!=((void*)(C)));
5409 se_dst=caller;/*unlink*/
5410 return R;
5411 }
5412
5413 void r69copy_from(se_dump_stack*caller,T69 C,T69 a1,T2 a2){
5414 T2 _i=0;
5415 void**locals[3];
5416 static se_frame_descriptor fd={"copy_from NATIVE_ARRAY",1,3,"%E69%model%E69%upper%E2%i%E2%",1};
5417 se_dump_stack ds;
5418 ds.fd=&fd;
5419 ds.current=((void**)&C);
5420 ds.p=100757000;
5421 ds.caller=caller;
5422 ds.locals=locals;
5423 locals[0]=(void**)&a1;
5424 locals[1]=(void**)&a2;
5425 locals[2]=(void**)&_i;
5426 se_dst=&ds;/*link*/
5427 (ds.p=100758302);
5428 _i=a2;
5429 while (!(((ds.p=100758340),(_i)<(0))))
5430 {
5431 (ds.p=100758810);
5432 (C)[_i]=((a1)[_i]);
5433 (ds.p=100759066);
5434 _i=(_i)-(1);
5435 }
5436 se_dst=caller;/*unlink*/
5437 }
5438
5439 void r9copy_slice(se_dump_stack*caller,T9 C,T2 a1,T9 a2,T2 a3,T2 a4){
5440 T2 _i1=0;
5441 T2 _i2=0;
5442 void**locals[6];
5443 static se_frame_descriptor fd={"copy_slice NATIVE_ARRAY",1,6,"%E9%at%E2%src%E9%src_min%E2%src_max%E2%i1%E2%i2%E2%",1};
5444 se_dump_stack ds;
5445 ds.fd=&fd;
5446 ds.current=((void**)&C);
5447 ds.p=100740104;
5448 ds.caller=caller;
5449 ds.locals=locals;
5450 locals[0]=(void**)&a1;
5451 locals[1]=(void**)&a2;
5452 locals[2]=(void**)&a3;
5453 locals[3]=(void**)&a4;
5454 locals[4]=(void**)&_i1;
5455 locals[5]=(void**)&_i2;
5456 se_dst=&ds;/*link*/
5457 se_require_uppermost_flag=1;
5458 if(fd.assertion_flag){
5459 fd.assertion_flag=0;
5460 (ds.p=100741402);
5461 ac_req((a1)>=(0),NULL);
5462 (ds.p=100741668);
5463 ac_req((a3)<=((a4)+(1)),NULL);
5464 fd.assertion_flag=1;
5465 }
5466 (ds.p=100742938);
5467 _i1=a1;
5468 (ds.p=100743180);
5469 _i2=a3;
5470 while (!(((ds.p=100743712),(_i2)>(a4))))
5471 {
5472 (ds.p=100744218);
5473 (C)[_i1]=((a2)[_i2]);
5474 (ds.p=100744474);
5475 _i2=(_i2)+(1);
5476 (ds.p=100744730);
5477 _i1=(_i1)+(1);
5478 }
5479 se_dst=caller;/*unlink*/
5480 }
5481
5482 T9 r9realloc(se_dump_stack*caller,T9 C,T2 a1,T2 a2){
5483 T9 R=NULL;
5484 void**locals[3];
5485 static se_frame_descriptor fd={"realloc NATIVE_ARRAY",1,3,"%E9%old_nb_elts%E2%new_nb_elts%E2%Result%E9%",1};
5486 se_dump_stack ds;
5487 ds.fd=&fd;
5488 ds.current=((void**)&C);
5489 ds.p=100677640;
5490 ds.caller=caller;
5491 ds.locals=locals;
5492 locals[0]=(void**)&a1;
5493 locals[1]=(void**)&a2;
5494 locals[2]=(void**)&R;
5495 se_dst=&ds;/*link*/
5496 se_require_uppermost_flag=1;
5497 if(fd.assertion_flag){
5498 fd.assertion_flag=0;
5499 (ds.p=100679444);
5500 ac_req(r9is_not_null(&ds,C),NULL);
5501 (ds.p=100679724);
5502 ac_req((a1)>(0),NULL);
5503 (ds.p=100679980);
5504 ac_req((a1)<(a2),NULL);
5505 fd.assertion_flag=1;
5506 }
5507 (ds.p=100680468);
5508 R=new9(a2);
5509 (ds.p=100680738);
5510 r9copy_from(&ds,R,C,(a1)-(1));
5511 se_dst=caller;/*unlink*/
5512 return R;
5513 }
5514
5515 void r9set_all_with(se_dump_stack*caller,T9 C,T3 a1,T2 a2){
5516 T2 _i=0;
5517 void**locals[3];
5518 static se_frame_descriptor fd={"set_all_with NATIVE_ARRAY",1,3,"%E9%v%E3%upper%E2%i%E2%",1};
5519 se_dump_stack ds;
5520 ds.fd=&fd;
5521 ds.current=((void**)&C);
5522 ds.p=100746248;
5523 ds.caller=caller;
5524 ds.locals=locals;
5525 locals[0]=(void**)&a1;
5526 locals[1]=(void**)&a2;
5527 locals[2]=(void**)&_i;
5528 se_dst=&ds;/*link*/
5529 (ds.p=100747806);
5530 _i=a2;
5531 while (!(((ds.p=100747844),(_i)<(0))))
5532 {
5533 (ds.p=100748314);
5534 (C)[_i]=(a1);
5535 (ds.p=100748570);
5536 _i=(_i)-(1);
5537 }
5538 se_dst=caller;/*unlink*/
5539 }
5540
5541 T6 r9fast_memcmp(se_dump_stack*caller,T9 C,T9 a1,T2 a2){
5542 T6 R=0;
5543 T2 _i=0;
5544 void**locals[4];
5545 static se_frame_descriptor fd={"fast_memcmp NATIVE_ARRAY",1,4,"%E9%other%E9%capacity%E2%Result%E6%i%E2%",1};
5546 se_dump_stack ds;
5547 ds.fd=&fd;
5548 ds.current=((void**)&C);
5549 ds.p=100687112;
5550 ds.caller=caller;
5551 ds.locals=locals;
5552 locals[0]=(void**)&a1;
5553 locals[1]=(void**)&a2;
5554 locals[2]=(void**)&R;
5555 locals[3]=(void**)&_i;
5556 se_dst=&ds;/*link*/
5557 se_require_uppermost_flag=1;
5558 if(fd.assertion_flag){
5559 fd.assertion_flag=0;
5560 (ds.p=100687918);
5561 ac_req((!((a2)>(0)))||(r9is_not_null(&ds,a1)),NULL);
5562 fd.assertion_flag=1;
5563 }
5564 (ds.p=100689178);
5565 _i=(a2)-(1);
5566 while (!(((ds.p=100689702),((_i)<(0))||(((C)[_i])!=((a1)[_i])))))
5567 {
5568 (ds.p=100690202);
5569 _i=(_i)-(1);
5570 }
5571 (ds.p=100690708);
5572 R=(_i)<(0);
5573 se_dst=caller;/*unlink*/
5574 return R;
5575 }
5576
5577 T6 r9fast_has(se_dump_stack*caller,T9 C,T3 a1,T2 a2){
5578 T6 R=0;
5579 T2 _i=0;
5580 void**locals[4];
5581 static se_frame_descriptor fd={"fast_has NATIVE_ARRAY",1,4,"%E9%element%E3%upper%E2%Result%E6%i%E2%",1};
5582 se_dump_stack ds;
5583 ds.fd=&fd;
5584 ds.current=((void**)&C);
5585 ds.p=100710920;
5586 ds.caller=caller;
5587 ds.locals=locals;
5588 locals[0]=(void**)&a1;
5589 locals[1]=(void**)&a2;
5590 locals[2]=(void**)&R;
5591 locals[3]=(void**)&_i;
5592 se_dst=&ds;/*link*/
5593 se_require_uppermost_flag=1;
5594 if(fd.assertion_flag){
5595 fd.assertion_flag=0;
5596 (ds.p=100711968);
5597 ac_req((a2)>=(-(1)),NULL);
5598 fd.assertion_flag=1;
5599 }
5600 (ds.p=100713242);
5601 _i=a2;
5602 while (!(((ds.p=100713766),((_i)<(0))||((a1)==((C)[_i])))))
5603 {
5604 (ds.p=100714266);
5605 _i=(_i)-(1);
5606 }
5607 (ds.p=100714772);
5608 R=(_i)>=(0);
5609 se_dst=caller;/*unlink*/
5610 return R;
5611 }
5612
5613 void r9copy_at(se_dump_stack*caller,T9 C,T2 a1,T9 a2,T2 a3){
5614 T2 _at_idx=0;
5615 T2 _src_idx=0;
5616 void**locals[5];
5617 static se_frame_descriptor fd={"copy_at NATIVE_ARRAY",1,5,"%E9%at%E2%src%E9%src_capacity%E2%at_idx%E2%src_idx%E2%",1};
5618 se_dump_stack ds;
5619 ds.fd=&fd;
5620 ds.current=((void**)&C);
5621 ds.p=100734728;
5622 ds.caller=caller;
5623 ds.locals=locals;
5624 locals[0]=(void**)&a1;
5625 locals[1]=(void**)&a2;
5626 locals[2]=(void**)&a3;
5627 locals[3]=(void**)&_at_idx;
5628 locals[4]=(void**)&_src_idx;
5629 se_dst=&ds;/*link*/
5630 se_require_uppermost_flag=1;
5631 if(fd.assertion_flag){
5632 fd.assertion_flag=0;
5633 (ds.p=100736026);
5634 ac_req((a1)>=(0),NULL);
5635 (ds.p=100736064);
5636 ac_req((a3)>=(0),NULL);
5637 fd.assertion_flag=1;
5638 }
5639 (ds.p=100737306);
5640 _src_idx=(a3)-(1);
5641 (ds.p=100737562);
5642 _at_idx=(a1)+(_src_idx);
5643 while (!(((ds.p=100738090),(_src_idx)<(0))))
5644 {
5645 (ds.p=100738586);
5646 (C)[_at_idx]=((a2)[_src_idx]);
5647 (ds.p=100738842);
5648 _src_idx=(_src_idx)-(1);
5649 (ds.p=100739098);
5650 _at_idx=(_at_idx)-(1);
5651 }
5652 se_dst=caller;/*unlink*/
5653 }
5654
5655 T6 r9is_not_null(se_dump_stack*caller,T9 C){
5656 T6 R=0;
5657 void**locals[1];
5658 static se_frame_descriptor fd={"is_not_null NATIVE_ARRAY",1,1,"%E9%Result%E6%",1};
5659 se_dump_stack ds;
5660 ds.fd=&fd;
5661 ds.current=((void**)&C);
5662 ds.p=100794888;
5663 ds.caller=caller;
5664 ds.locals=locals;
5665 locals[0]=(void**)&R;
5666 se_dst=&ds;/*link*/
5667 (ds.p=100795412);
5668 R=(NULL!=((void*)(C)));
5669 se_dst=caller;/*unlink*/
5670 return R;
5671 }
5672
5673 T6 r9all_default(se_dump_stack*caller,T9 C,T2 a1){
5674 T6 R=0;
5675 T2 _i=0;
5676 T3 _model=0;
5677 void**locals[4];
5678 static se_frame_descriptor fd={"all_default NATIVE_ARRAY",1,4,"%E9%upper%E2%Result%E6%i%E2%model%E3%",1};
5679 se_dump_stack ds;
5680 ds.fd=&fd;
5681 ds.current=((void**)&C);
5682 ds.p=100784904;
5683 ds.caller=caller;
5684 ds.locals=locals;
5685 locals[0]=(void**)&a1;
5686 locals[1]=(void**)&R;
5687 locals[2]=(void**)&_i;
5688 locals[3]=(void**)&_model;
5689 se_dst=&ds;/*link*/
5690 se_require_uppermost_flag=1;
5691 if(fd.assertion_flag){
5692 fd.assertion_flag=0;
5693 (ds.p=100785952);
5694 ac_req((a1)>=(-(1)),NULL);
5695 fd.assertion_flag=1;
5696 }
5697 (ds.p=100787482);
5698 R=1;
5699 (ds.p=100787738);
5700 _i=a1;
5701 while (!(((ds.p=100788262),((_i)<(0))||(r6_ix_not(&ds,R)))))
5702 {
5703 (ds.p=100788762);
5704 R=(_model)==((C)[_i]);
5705 (ds.p=100789018);
5706 _i=(_i)-(1);
5707 }
5708 se_dst=caller;/*unlink*/
5709 return R;
5710 }
5711
5712 void r9copy_from(se_dump_stack*caller,T9 C,T9 a1,T2 a2){
5713 T2 _i=0;
5714 void**locals[3];
5715 static se_frame_descriptor fd={"copy_from NATIVE_ARRAY",1,3,"%E9%model%E9%upper%E2%i%E2%",1};
5716 se_dump_stack ds;
5717 ds.fd=&fd;
5718 ds.current=((void**)&C);
5719 ds.p=100757000;
5720 ds.caller=caller;
5721 ds.locals=locals;
5722 locals[0]=(void**)&a1;
5723 locals[1]=(void**)&a2;
5724 locals[2]=(void**)&_i;
5725 se_dst=&ds;/*link*/
5726 (ds.p=100758302);
5727 _i=a2;
5728 while (!(((ds.p=100758340),(_i)<(0))))
5729 {
5730 (ds.p=100758810);
5731 (C)[_i]=((a1)[_i]);
5732 (ds.p=100759066);
5733 _i=(_i)-(1);
5734 }
5735 se_dst=caller;/*unlink*/
5736 }
5737
5738 T6 r85fast_memcmp(se_dump_stack*caller,T85 C,T85 a1,T2 a2){
5739 T6 R=0;
5740 T2 _i=0;
5741 void**locals[4];
5742 static se_frame_descriptor fd={"fast_memcmp NATIVE_ARRAY",1,4,"%E85%other%E85%capacity%E2%Result%E6%i%E2%",1};
5743 se_dump_stack ds;
5744 ds.fd=&fd;
5745 ds.current=((void**)&C);
5746 ds.p=100687112;
5747 ds.caller=caller;
5748 ds.locals=locals;
5749 locals[0]=(void**)&a1;
5750 locals[1]=(void**)&a2;
5751 locals[2]=(void**)&R;
5752 locals[3]=(void**)&_i;
5753 se_dst=&ds;/*link*/
5754 se_require_uppermost_flag=1;
5755 if(fd.assertion_flag){
5756 fd.assertion_flag=0;
5757 (ds.p=100687918);
5758 ac_req((!((a2)>(0)))||(r85is_not_null(&ds,a1)),NULL);
5759 fd.assertion_flag=1;
5760 }
5761 (ds.p=100689178);
5762 _i=(a2)-(1);
5763 while (!(((ds.p=100689702),((_i)<(0))||(((C)[_i])!=((a1)[_i])))))
5764 {
5765 (ds.p=100690202);
5766 _i=(_i)-(1);
5767 }
5768 (ds.p=100690708);
5769 R=(_i)<(0);
5770 se_dst=caller;/*unlink*/
5771 return R;
5772 }
5773
5774 void r85set_all_with(se_dump_stack*caller,T85 C,T2 a1,T2 a2){
5775 T2 _i=0;
5776 void**locals[3];
5777 static se_frame_descriptor fd={"set_all_with NATIVE_ARRAY",1,3,"%E85%v%E2%upper%E2%i%E2%",1};
5778 se_dump_stack ds;
5779 ds.fd=&fd;
5780 ds.current=((void**)&C);
5781 ds.p=100746248;
5782 ds.caller=caller;
5783 ds.locals=locals;
5784 locals[0]=(void**)&a1;
5785 locals[1]=(void**)&a2;
5786 locals[2]=(void**)&_i;
5787 se_dst=&ds;/*link*/
5788 (ds.p=100747806);
5789 _i=a2;
5790 while (!(((ds.p=100747844),(_i)<(0))))
5791 {
5792 (ds.p=100748314);
5793 (C)[_i]=(a1);
5794 (ds.p=100748570);
5795 _i=(_i)-(1);
5796 }
5797 se_dst=caller;/*unlink*/
5798 }
5799
5800 T6 r85is_not_null(se_dump_stack*caller,T85 C){
5801 T6 R=0;
5802 void**locals[1];
5803 static se_frame_descriptor fd={"is_not_null NATIVE_ARRAY",1,1,"%E85%Result%E6%",1};
5804 se_dump_stack ds;
5805 ds.fd=&fd;
5806 ds.current=((void**)&C);
5807 ds.p=100794888;
5808 ds.caller=caller;
5809 ds.locals=locals;
5810 locals[0]=(void**)&R;
5811 se_dst=&ds;/*link*/
5812 (ds.p=100795412);
5813 R=(NULL!=((void*)(C)));
5814 se_dst=caller;/*unlink*/
5815 return R;
5816 }
5817
5818 T6 r85all_default(se_dump_stack*caller,T85 C,T2 a1){
5819 T6 R=0;
5820 T2 _i=0;
5821 T2 _model=0;
5822 void**locals[4];
5823 static se_frame_descriptor fd={"all_default NATIVE_ARRAY",1,4,"%E85%upper%E2%Result%E6%i%E2%model%E2%",1};
5824 se_dump_stack ds;
5825 ds.fd=&fd;
5826 ds.current=((void**)&C);
5827 ds.p=100784904;
5828 ds.caller=caller;
5829 ds.locals=locals;
5830 locals[0]=(void**)&a1;
5831 locals[1]=(void**)&R;
5832 locals[2]=(void**)&_i;
5833 locals[3]=(void**)&_model;
5834 se_dst=&ds;/*link*/
5835 se_require_uppermost_flag=1;
5836 if(fd.assertion_flag){
5837 fd.assertion_flag=0;
5838 (ds.p=100785952);
5839 ac_req((a1)>=(-(1)),NULL);
5840 fd.assertion_flag=1;
5841 }
5842 (ds.p=100787482);
5843 R=1;
5844 (ds.p=100787738);
5845 _i=a1;
5846 while (!(((ds.p=100788262),((_i)<(0))||(r6_ix_not(&ds,R)))))
5847 {
5848 (ds.p=100788762);
5849 R=(_model)==((C)[_i]);
5850 (ds.p=100789018);
5851 _i=(_i)-(1);
5852 }
5853 se_dst=caller;/*unlink*/
5854 return R;
5855 }
5856
5857 void r85copy_from(se_dump_stack*caller,T85 C,T85 a1,T2 a2){
5858 T2 _i=0;
5859 void**locals[3];
5860 static se_frame_descriptor fd={"copy_from NATIVE_ARRAY",1,3,"%E85%model%E85%upper%E2%i%E2%",1};
5861 se_dump_stack ds;
5862 ds.fd=&fd;
5863 ds.current=((void**)&C);
5864 ds.p=100757000;
5865 ds.caller=caller;
5866 ds.locals=locals;
5867 locals[0]=(void**)&a1;
5868 locals[1]=(void**)&a2;
5869 locals[2]=(void**)&_i;
5870 se_dst=&ds;/*link*/
5871 (ds.p=100758302);
5872 _i=a2;
5873 while (!(((ds.p=100758340),(_i)<(0))))
5874 {
5875 (ds.p=100758810);
5876 (C)[_i]=((a1)[_i]);
5877 (ds.p=100759066);
5878 _i=(_i)-(1);
5879 }
5880 se_dst=caller;/*unlink*/
5881 }
5882
5883 void r133set_all_with(se_dump_stack*caller,T133 C,T0* a1,T2 a2){
5884 T2 _i=0;
5885 void**locals[3];
5886 static se_frame_descriptor fd={"set_all_with NATIVE_ARRAY",1,3,"%E133%v%R132%upper%E2%i%E2%",1};
5887 se_dump_stack ds;
5888 ds.fd=&fd;
5889 ds.current=((void**)&C);
5890 ds.p=100746248;
5891 ds.caller=caller;
5892 ds.locals=locals;
5893 locals[0]=(void**)&a1;
5894 locals[1]=(void**)&a2;
5895 locals[2]=(void**)&_i;
5896 se_dst=&ds;/*link*/
5897 (ds.p=100747806);
5898 _i=a2;
5899 while (!(((ds.p=100747844),(_i)<(0))))
5900 {
5901 (ds.p=100748314);
5902 (C)[_i]=(a1);
5903 (ds.p=100748570);
5904 _i=(_i)-(1);
5905 }
5906 se_dst=caller;/*unlink*/
5907 }
5908
5909 void r7copy(se_dump_stack*caller,T7* C,T0* a1){
5910 T2 _c=0;
5911 void**locals[2];
5912 static se_frame_descriptor fd={"copy STRING",1,2,"%R7%other%R7%c%E2%",1};
5913 se_dump_stack ds;
5914 ds.fd=&fd;
5915 ds.current=((void**)&C);
5916 ds.p=14927880;
5917 ds.caller=caller;
5918 ds.locals=locals;
5919 locals[0]=(void**)&a1;
5920 locals[1]=(void**)&_c;
5921 se_dst=&ds;/*link*/
5922 se_require_uppermost_flag=1;
5923 if(fd.assertion_flag){
5924 fd.assertion_flag=0;
5925 (ds.p=2144064);
5926 ac_req((a1)!=((void*)(NULL)),"other_not_void");
5927 fd.assertion_flag=1;
5928 }
5929 (ds.p=14929158);
5930 _c=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14929168))))->_count/*8*/);
5931 /*[IF*/
5932 if(((ds.p=14929438),(_c)>(0))){
5933 /*[IF*/
5934 if(((ds.p=14929714),((/*RF2*/(C)->_capacity/*12*/))<(_c))){
5935 (ds.p=14929952);
5936 (/*SFN*/C->_storage/*4*/)=new9(_c);
5937 (ds.p=14930208);
5938 (/*SFN*/C->_capacity/*12*/)=_c;
5939 }
5940 /*FI]*/
5941 (ds.p=14930730);
5942 r9copy_from(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14930750))))->_storage/*4*/),(_c)-(1));
5943 }
5944 /*FI]*/
5945 (ds.p=14931220);
5946 (/*SFN*/C->_count/*8*/)=_c;
5947 if(fd.assertion_flag){
5948 fd.assertion_flag=0;
5949 (ds.p=14931744);
5950 ac_ens(((/*RF2*/(C)->_count/*8*/))==((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14931748))))->_count/*8*/)),NULL);
5951 (ds.p=2144808);
5952 ac_ens(r7is_equal(&ds,C,a1),"is_equal");
5953 fd.assertion_flag=1;
5954 }
5955 if(se_rci(caller,C))se_i7(&ds,C);
5956 se_dst=caller;/*unlink*/
5957 }
5958
5959 T0* r7substring(se_dump_stack*caller,T7* C,T2 a1,T2 a2){
5960 T0* R=NULL;
5961 T2 _c=0;
5962 void**locals[4];
5963 static se_frame_descriptor fd={"substring STRING",1,4,"%R7%start_index%E2%end_index%E2%Result%R7%c%E2%",1};
5964 se_dump_stack ds;
5965 ds.fd=&fd;
5966 ds.current=((void**)&C);
5967 ds.p=15056136;
5968 ds.caller=caller;
5969 ds.locals=locals;
5970 locals[0]=(void**)&a1;
5971 locals[1]=(void**)&a2;
5972 locals[2]=(void**)&R;
5973 locals[3]=(void**)&_c;
5974 se_dst=&ds;/*link*/
5975 se_require_uppermost_flag=1;
5976 if(fd.assertion_flag){
5977 fd.assertion_flag=0;
5978 (ds.p=15056958);
5979 ac_req((1)<=(a1),"valid_start_index");
5980 (ds.p=15057226);
5981 ac_req((a2)<=((/*RF2*/(C)->_count/*8*/)),"valid_end_index");
5982 (ds.p=15057494);
5983 ac_req((a1)<=((a2)+(1)),"meaningful_interval");
5984 fd.assertion_flag=1;
5985 }
5986 (ds.p=15058438);
5987 _c=((a2)-(a1))+(1);
5988 (ds.p=15058694);
5989 {T7*n=new7();
5990 r7make(&ds,n,_c);
5991 R=((T0*)n);
5992 se_i7(&ds,n);}
5993 (ds.p=15058964);
5994 r7set_count(&ds,se_i7(&ds,((T7*)ci(7,R,15058950))),_c);
5995 (ds.p=15059250);
5996 r9copy_slice(&ds,(/*RF2*/(se_i7(&ds,((T7*)ci(7,R,15059220))))->_storage/*4*/),0,(/*RF2*/(C)->_storage/*4*/),(a1)-(1),(a2)-(1));
5997 if(fd.assertion_flag){
5998 fd.assertion_flag=0;
5999 (ds.p=15059792);
6000 ac_ens(((/*RF2*/(se_i7(&ds,((T7*)ci(7,R,15059766))))->_count/*8*/))==(((a2)-(a1))+(1)),"substring_count");
6001 fd.assertion_flag=1;
6002 }
6003 if(se_rci(caller,C))se_i7(&ds,C);
6004 se_dst=caller;/*unlink*/
6005 return R;
6006 }
6007
6008 T2 r7upper(se_dump_stack*caller,T7* C){
6009 T2 R=0;
6010 void**locals[1];
6011 static se_frame_descriptor fd={"upper STRING",1,1,"%R7%Result%E2%",1};
6012 se_dump_stack ds;
6013 ds.fd=&fd;
6014 ds.current=((void**)&C);
6015 ds.p=14692360;
6016 ds.caller=caller;
6017 ds.locals=locals;
6018 locals[0]=(void**)&R;
6019 se_dst=&ds;/*link*/
6020 (ds.p=14693382);
6021 R=(/*RF2*/(C)->_count/*8*/);
6022 if(fd.assertion_flag){
6023 fd.assertion_flag=0;
6024 (ds.p=14693908);
6025 ac_ens((R)==((/*RF2*/(C)->_count/*8*/)),NULL);
6026 fd.assertion_flag=1;
6027 }
6028 if(se_rci(caller,C))se_i7(&ds,C);
6029 se_dst=caller;/*unlink*/
6030 return R;
6031 }
6032
6033 void r7put(se_dump_stack*caller,T7* C,T3 a1,T2 a2){
6034 void**locals[2];
6035 static se_frame_descriptor fd={"put STRING",1,2,"%R7%c%E3%i%E2%",1};
6036 se_dump_stack ds;
6037 ds.fd=&fd;
6038 ds.current=((void**)&C);
6039 ds.p=14968584;
6040 ds.caller=caller;
6041 ds.locals=locals;
6042 locals[0]=(void**)&a1;
6043 locals[1]=(void**)&a2;
6044 se_dst=&ds;/*link*/
6045 se_require_uppermost_flag=1;
6046 if(fd.assertion_flag){
6047 fd.assertion_flag=0;
6048 (ds.p=14969390);
6049 ac_req(r7valid_index(&ds,C,a2),"valid_index");
6050 fd.assertion_flag=1;
6051 }
6052 (ds.p=14969892);
6053 ((/*RF2*/(C)->_storage/*4*/))[(a2)-(1)]=(a1);
6054 if(fd.assertion_flag){
6055 fd.assertion_flag=0;
6056 (ds.p=14970406);
6057 ac_ens((r7item(&ds,C,a2))==(a1),NULL);
6058 fd.assertion_flag=1;
6059 }
6060 if(se_rci(caller,C))se_i7(&ds,C);
6061 se_dst=caller;/*unlink*/
6062 }
6063
6064 void r7remove_between(se_dump_stack*caller,T7* C,T2 a1,T2 a2){
6065 T2 _i=0;
6066 T2 _len=0;
6067 T2 o7_1377_23=0;
6068 void**locals[5];
6069 static se_frame_descriptor fd={"remove_between (remove_substring STRING)",1,5,"%R7%start_index%E2%end_index%E2%i%E2%len%E2%old value%E2%",1};
6070 se_dump_stack ds;
6071 ds.fd=&fd;
6072 ds.current=((void**)&C);
6073 ds.p=15026952;
6074 ds.caller=caller;
6075 ds.locals=locals;
6076 locals[0]=(void**)&a1;
6077 locals[1]=(void**)&a2;
6078 locals[2]=(void**)&_i;
6079 locals[3]=(void**)&_len;
6080 locals[4]=(void**)&o7_1377_23;
6081 se_dst=&ds;/*link*/
6082 o7_1377_23=(/*RF2*/(C)->_count/*8*/);
6083 se_require_uppermost_flag=1;
6084 if(fd.assertion_flag){
6085 fd.assertion_flag=0;
6086 (ds.p=15027774);
6087 ac_req((1)<=(a1),"valid_start_index");
6088 (ds.p=15028042);
6089 ac_req((a2)<=((/*RF2*/(C)->_count/*8*/)),"valid_end_index");
6090 (ds.p=15028310);
6091 ac_req((a1)<=((a2)+(1)),"meaningful_interval");
6092 fd.assertion_flag=1;
6093 }
6094 (ds.p=15029268);
6095 _len=((a2)-(a1))+(1);
6096 /*[IF*/
6097 if(((ds.p=15029540),(_len)>(0))){
6098 (ds.p=15030048);
6099 _i=(a2)+(1);
6100 while (!(((ds.p=15030564),(_i)>((/*RF2*/(C)->_count/*8*/)))))
6101 {
6102 (ds.p=15031072);
6103 r7put(&ds,C,r7item(&ds,C,_i),(_i)-(_len));
6104 (ds.p=15031328);
6105 _i=(_i)+(1);
6106 }
6107 (ds.p=15031834);
6108 (/*SFN*/C->_count/*8*/)=((/*RF2*/(C)->_count/*8*/))-(_len);
6109 }
6110 /*FI]*/
6111 if(fd.assertion_flag){
6112 fd.assertion_flag=0;
6113 (ds.p=15032608);
6114 ac_ens(((/*RF2*/(C)->_count/*8*/))==((o7_1377_23)-(((a2)-(a1))+(1))),NULL);
6115 fd.assertion_flag=1;
6116 }
6117 if(se_rci(caller,C))se_i7(&ds,C);
6118 se_dst=caller;/*unlink*/
6119 }
6120
6121 T6 r7is_equal(se_dump_stack*caller,T7* C,T0* a1){
6122 T6 R=0;
6123 void**locals[2];
6124 static se_frame_descriptor fd={"is_equal STRING",1,2,"%R7%other%R7%Result%E6%",1};
6125 se_dump_stack ds;
6126 ds.fd=&fd;
6127 ds.current=((void**)&C);
6128 ds.p=14731016;
6129 ds.caller=caller;
6130 ds.locals=locals;
6131 locals[0]=(void**)&a1;
6132 locals[1]=(void**)&R;
6133 se_dst=&ds;/*link*/
6134 se_require_uppermost_flag=1;
6135 if(fd.assertion_flag){
6136 fd.assertion_flag=0;
6137 (ds.p=2122048);
6138 ac_req((a1)!=((void*)(NULL)),"other_not_void");
6139 fd.assertion_flag=1;
6140 }
6141 /*[IF*/
6142 if(((ds.p=14732070),((/*RF2*/(C)->_count/*8*/))==((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14732074))))->_count/*8*/)))){
6143 (ds.p=14732314);
6144 R=r9fast_memcmp(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14732374))))->_storage/*4*/),(/*RF2*/(C)->_count/*8*/));
6145 }
6146 /*FI]*/
6147 if(fd.assertion_flag){
6148 fd.assertion_flag=0;
6149 (ds.p=48241196);
6150 ac_ens((R)==(r6_px_and(&ds,r6_ix_not(&ds,r7_px_60(&ds,se_i7(&ds,C),a1)),r6_ix_not(&ds,r7_px_60(&ds,se_i7(&ds,((T7*)ci(7,a1,48241264))),(T0*)C)))),"trichotomy");
6151 (ds.p=2122846);
6152 ac_ens((!(r7standard_is_equal(&ds,C,a1)))||(R),"consistent");
6153 (ds.p=2123064);
6154 ac_ens((!(R))||(r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,a1,2123080))),(T0*)C)),"symmetric");
6155 fd.assertion_flag=1;
6156 }
6157 if(se_rci(caller,C))se_i7(&ds,C);
6158 se_dst=caller;/*unlink*/
6159 return R;
6160 }
6161
6162 void r7insert_character(se_dump_stack*caller,T7* C,T3 a1,T2 a2){
6163 T2 _j=0;
6164 void**locals[3];
6165 static se_frame_descriptor fd={"insert_character STRING",1,3,"%R7%c%E3%i%E2%j%E2%",1};
6166 se_dump_stack ds;
6167 ds.fd=&fd;
6168 ds.current=((void**)&C);
6169 ds.p=14976776;
6170 ds.caller=caller;
6171 ds.locals=locals;
6172 locals[0]=(void**)&a1;
6173 locals[1]=(void**)&a2;
6174 locals[2]=(void**)&_j;
6175 se_dst=&ds;/*link*/
6176 se_require_uppermost_flag=1;
6177 if(fd.assertion_flag){
6178 fd.assertion_flag=0;
6179 (ds.p=14977872);
6180 ac_req(r6_px_and(&ds,(1)<=(a2),(a2)<=(((/*RF2*/(C)->_count/*8*/))+(1))),"valid_insertion_index");
6181 fd.assertion_flag=1;
6182 }
6183 (ds.p=14979098);
6184 _j=(/*RF2*/(C)->_count/*8*/);
6185 (ds.p=14979354);
6186 r7append_character(&ds,C,((T3)'\40'));
6187 while (!(((ds.p=14979870),(_j)==((a2)-(1)))))
6188 {
6189 (ds.p=14980378);
6190 r7put(&ds,C,r7item(&ds,C,_j),(_j)+(1));
6191 (ds.p=14980634);
6192 _j=(_j)-(1);
6193 }
6194 (ds.p=14981140);
6195 r7put(&ds,C,a1,a2);
6196 if(fd.assertion_flag){
6197 fd.assertion_flag=0;
6198 (ds.p=14981670);
6199 ac_ens((r7item(&ds,C,a2))==(a1),NULL);
6200 fd.assertion_flag=1;
6201 }
6202 if(se_rci(caller,C))se_i7(&ds,C);
6203 se_dst=caller;/*unlink*/
6204 }
6205
6206 T3 r7item(se_dump_stack*caller,T7* C,T2 a1){
6207 T3 R=0;
6208 void**locals[2];
6209 static se_frame_descriptor fd={"item STRING",1,2,"%R7%i%E2%Result%E3%",1};
6210 se_dump_stack ds;
6211 ds.fd=&fd;
6212 ds.current=((void**)&C);
6213 ds.p=14709768;
6214 ds.caller=caller;
6215 ds.locals=locals;
6216 locals[0]=(void**)&a1;
6217 locals[1]=(void**)&R;
6218 se_dst=&ds;/*link*/
6219 se_require_uppermost_flag=1;
6220 if(fd.assertion_flag){
6221 fd.assertion_flag=0;
6222 (ds.p=14710574);
6223 ac_req(r7valid_index(&ds,C,a1),"valid_index");
6224 fd.assertion_flag=1;
6225 }
6226 (ds.p=14711060);
6227 R=((/*RF2*/(C)->_storage/*4*/))[(a1)-(1)];
6228 if(se_rci(caller,C))se_i7(&ds,C);
6229 se_dst=caller;/*unlink*/
6230 return R;
6231 }
6232 T0*oBC7string_buffer=NULL;
6233 int fBC7string_buffer=0;
6234
6235 T0* r7string_buffer(se_dump_stack*caller){
6236 if(fBC7string_buffer==0){fBC7string_buffer=1;{
6237 void**locals[1];
6238 static se_frame_descriptor fd={"string_buffer STRING",0,1,"Result%R7%",1};
6239 se_dump_stack ds;
6240 ds.fd=&fd;
6241 ds.current=NULL;
6242 ds.p=15154952;
6243 ds.caller=caller;
6244 ds.locals=locals;
6245 locals[0]=(void**)&oBC7string_buffer;
6246 se_dst=&ds;/*link*/
6247 (ds.p=15155732);
6248 {T7*n=new7();
6249 oBC7string_buffer=((T0*)n);
6250 r7make(&ds,n,256);
6251 se_i7(&ds,n);}
6252 se_dst=caller;/*unlink*/
6253 }}
6254 return oBC7string_buffer;
6255 }
6256 T0*oBC7split_buffer=NULL;
6257 int fBC7split_buffer=0;
6258
6259 T0* r7split_buffer(se_dump_stack*caller){
6260 if(fBC7split_buffer==0){fBC7split_buffer=1;{
6261 void**locals[1];
6262 static se_frame_descriptor fd={"split_buffer STRING",0,1,"Result%R64%",1};
6263 se_dump_stack ds;
6264 ds.fd=&fd;
6265 ds.current=NULL;
6266 ds.p=15156488;
6267 ds.caller=caller;
6268 ds.locals=locals;
6269 locals[0]=(void**)&oBC7split_buffer;
6270 se_dst=&ds;/*link*/
6271 (ds.p=15157012);
6272 {T64*n=new64();
6273 oBC7split_buffer=((T0*)n);
6274 r64with_capacity(&ds,n,4,1);
6275 se_i64(&ds,n);}
6276 se_dst=caller;/*unlink*/
6277 }}
6278 return oBC7split_buffer;
6279 }
6280
6281 T0* r7split(se_dump_stack*caller,T7* C){
6282 T0* R=NULL;
6283 void**locals[1];
6284 static se_frame_descriptor fd={"split STRING",1,1,"%R7%Result%R64%",1};
6285 se_dump_stack ds;
6286 ds.fd=&fd;
6287 ds.current=((void**)&C);
6288 ds.p=15101960;
6289 ds.caller=caller;
6290 ds.locals=locals;
6291 locals[0]=(void**)&R;
6292 se_dst=&ds;/*link*/
6293 /*[IF*/
6294 if(((ds.p=15103014),((/*RF2*/(C)->_count/*8*/))>(0))){
6295 (ds.p=15103284);
6296 r64clear(&ds,se_i64(&ds,((T64*)ci(64,r7split_buffer(&ds),15103258))));
6297 (ds.p=15103514);
6298 r7split_in(&ds,C,r7split_buffer(&ds));
6299 /*[IF*/
6300 if(((ds.p=15103776),r6_ix_not(&ds,r64is_empty(&ds,se_i64(&ds,((T64*)ci(64,r7split_buffer(&ds),15103784))))))){
6301 (ds.p=15104032);
6302 R=r64twin(&ds,se_i64(&ds,((T64*)ci(64,r7split_buffer(&ds),15104052))));
6303 }
6304 /*FI]*/
6305 }
6306 /*FI]*/
6307 if(fd.assertion_flag){
6308 fd.assertion_flag=0;
6309 (ds.p=15105074);
6310 ac_ens((!((R)!=((void*)(NULL))))||(r6_ix_not(&ds,r64is_empty(&ds,se_i64(&ds,((T64*)ci(64,R,15105098)))))),NULL);
6311 fd.assertion_flag=1;
6312 }
6313 if(se_rci(caller,C))se_i7(&ds,C);
6314 se_dst=caller;/*unlink*/
6315 return R;
6316 }
6317
6318 T6 r7valid_index(se_dump_stack*caller,T7* C,T2 a1){
6319 T6 R=0;
6320 void**locals[2];
6321 static se_frame_descriptor fd={"valid_index STRING",1,2,"%R7%i%E2%Result%E6%",1};
6322 se_dump_stack ds;
6323 ds.fd=&fd;
6324 ds.current=((void**)&C);
6325 ds.p=14711816;
6326 ds.caller=caller;
6327 ds.locals=locals;
6328 locals[0]=(void**)&a1;
6329 locals[1]=(void**)&R;
6330 se_dst=&ds;/*link*/
6331 (ds.p=14712596);
6332 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_count/*8*/)));
6333 if(fd.assertion_flag){
6334 fd.assertion_flag=0;
6335 (ds.p=14713146);
6336 ac_ens((R)==(r6_px_and(&ds,(1)<=(a1),(a1)<=((/*RF2*/(C)->_count/*8*/)))),"definition");
6337 fd.assertion_flag=1;
6338 }
6339 if(se_rci(caller,C))se_i7(&ds,C);
6340 se_dst=caller;/*unlink*/
6341 return R;
6342 }
6343
6344 void r7append(se_dump_stack*caller,T7* C,T0* a1){
6345 T2 _s_count=0;
6346 T2 _needed_capacity=0;
6347 T2 _new_capacity=0;
6348 void**locals[4];
6349 static se_frame_descriptor fd={"append STRING",1,4,"%R7%s%R7%s_count%E2%needed_capacity%E2%new_capacity%E2%",1};
6350 se_dump_stack ds;
6351 ds.fd=&fd;
6352 ds.current=((void**)&C);
6353 ds.p=14941192;
6354 ds.caller=caller;
6355 ds.locals=locals;
6356 locals[0]=(void**)&a1;
6357 locals[1]=(void**)&_s_count;
6358 locals[2]=(void**)&_needed_capacity;
6359 locals[3]=(void**)&_new_capacity;
6360 se_dst=&ds;/*link*/
6361 se_require_uppermost_flag=1;
6362 if(fd.assertion_flag){
6363 fd.assertion_flag=0;
6364 (ds.p=14942000);
6365 ac_req((a1)!=((void*)(NULL)),"s_not_void");
6366 fd.assertion_flag=1;
6367 }
6368 (ds.p=14943238);
6369 _s_count=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14943260))))->_count/*8*/);
6370 (ds.p=14943508);
6371 _needed_capacity=((/*RF2*/(C)->_count/*8*/))+(_s_count);
6372 /*[IF*/
6373 if(((ds.p=14943802),(_needed_capacity)>((/*RF2*/(C)->_capacity/*12*/)))){
6374 /*[IF*/
6375 if(((ds.p=14944050),((/*RF2*/(C)->_capacity/*12*/))==(0))){
6376 (ds.p=14944288);
6377 (/*SFN*/C->_storage/*4*/)=new9(_needed_capacity);
6378 (ds.p=14944544);
6379 (/*SFN*/C->_capacity/*12*/)=_needed_capacity;
6380 }
6381 else{
6382 (ds.p=14945056);
6383 _new_capacity=(2)*((/*RF2*/(C)->_capacity/*12*/));
6384 /*[IF*/
6385 if(((ds.p=14945350),(_needed_capacity)>(_new_capacity))){
6386 (ds.p=14945574);
6387 (/*SFN*/C->_storage/*4*/)=r9realloc(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(C)->_capacity/*12*/),_needed_capacity);
6388 (ds.p=14945830);
6389 (/*SFN*/C->_capacity/*12*/)=_needed_capacity;
6390 }
6391 else{
6392 (ds.p=14946342);
6393 (/*SFN*/C->_storage/*4*/)=r9realloc(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(C)->_capacity/*12*/),_new_capacity);
6394 (ds.p=14946598);
6395 (/*SFN*/C->_capacity/*12*/)=_new_capacity;
6396 }
6397 /*FI]*/
6398 }
6399 /*FI]*/
6400 }
6401 /*FI]*/
6402 (ds.p=14947620);
6403 r9copy_at(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(C)->_count/*8*/),(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14947648))))->_storage/*4*/),_s_count);
6404 (ds.p=14947860);
6405 (/*SFN*/C->_count/*8*/)=_needed_capacity;
6406 if(se_rci(caller,C))se_i7(&ds,C);
6407 se_dst=caller;/*unlink*/
6408 }
6409
6410 void r7set_count(se_dump_stack*caller,T7* C,T2 a1){
6411 void**locals[1];
6412 static se_frame_descriptor fd={"set_count STRING",1,1,"%R7%new_count%E2%",1};
6413 se_dump_stack ds;
6414 ds.fd=&fd;
6415 ds.current=((void**)&C);
6416 ds.p=15152648;
6417 ds.caller=caller;
6418 ds.locals=locals;
6419 locals[0]=(void**)&a1;
6420 se_dst=&ds;/*link*/
6421 se_require_uppermost_flag=1;
6422 if(fd.assertion_flag){
6423 fd.assertion_flag=0;
6424 (ds.p=15153178);
6425 ac_req((a1)<=((/*RF2*/(C)->_capacity/*12*/)),NULL);
6426 fd.assertion_flag=1;
6427 }
6428 (ds.p=15153670);
6429 (/*SFN*/C->_count/*8*/)=a1;
6430 if(se_rci(caller,C))se_i7(&ds,C);
6431 se_dst=caller;/*unlink*/
6432 }
6433
6434 T6 r7is_integer(se_dump_stack*caller,T7* C){
6435 T6 R=0;
6436 T2 _i=0;
6437 T2 _state=0;
6438 T2 _value=0;
6439 T6 _negative=0;
6440 T3 _cc=0;
6441 void**locals[6];
6442 static se_frame_descriptor fd={"is_integer STRING",1,6,"%R7%Result%E6%i%E2%state%E2%value%E2%negative%E6%cc%E3%",1};
6443 se_dump_stack ds;
6444 ds.fd=&fd;
6445 ds.current=((void**)&C);
6446 ds.p=14780168;
6447 ds.caller=caller;
6448 ds.locals=locals;
6449 locals[0]=(void**)&R;
6450 locals[1]=(void**)&_i;
6451 locals[2]=(void**)&_state;
6452 locals[3]=(void**)&_value;
6453 locals[4]=(void**)&_negative;
6454 locals[5]=(void**)&_cc;
6455 se_dst=&ds;/*link*/
6456 {int c=0;int v=0;
6457 (ds.p=14786330);
6458 _i=1;
6459 while (!(((ds.p=14787374),((_state)==(4))||((_i)>((/*RF2*/(C)->_count/*8*/))))))
6460 {
6461 (ds.p=14786840);
6462 v=ac_lvc(c++,v,((/*RF2*/(C)->_count/*8*/))-(_i));
6463 (ds.p=14787866);
6464 _cc=r7item(&ds,C,_i);
6465 /*[INSPECT*/
6466 {int z1=((ds.p=14788384),_state);
6467 switch(z1){
6468 case 0:
6469 /*[IF*/
6470 if(((ds.p=14788908),r3is_separator(&ds,_cc))){
6471 }
6472 else if(((ds.p=14789172),(_cc)==(((T3)'\53')))){
6473 (ds.p=14789414);
6474 _state=1;
6475 }
6476 else if(((ds.p=14789684),(_cc)==(((T3)'\55')))){
6477 (ds.p=14789926);
6478 _negative=1;
6479 (ds.p=14790182);
6480 _state=1;
6481 }
6482 else if(((ds.p=14790452),r3is_digit(&ds,_cc))){
6483 (ds.p=14790694);
6484 _value=r3decimal_value(&ds,_cc);
6485 (ds.p=14790950);
6486 _state=2;
6487 }
6488 else{
6489 (ds.p=14791462);
6490 _state=4;
6491 }
6492 /*FI]*/
6493 break;
6494 case 1:
6495 /*[IF*/
6496 if(((ds.p=14792236),r3is_digit(&ds,_cc))){
6497 (ds.p=14792486);
6498 _value=r3decimal_value(&ds,_cc);
6499 /*[IF*/
6500 if(_negative){
6501 (ds.p=14793004);
6502 _value=(-(1))*(_value);
6503 }
6504 /*FI]*/
6505 (ds.p=14793510);
6506 _state=2;
6507 }
6508 else{
6509 (ds.p=14794022);
6510 _state=4;
6511 }
6512 /*FI]*/
6513 break;
6514 case 2:
6515 /*[IF*/
6516 if(((ds.p=14794796),r3is_digit(&ds,_cc))){
6517 /*[IF*/
6518 if(_negative){
6519 (ds.p=14795308);
6520 _value=((10)*(_value))-(r3decimal_value(&ds,_cc));
6521 }
6522 else{
6523 (ds.p=14795820);
6524 _value=((10)*(_value))+(r3decimal_value(&ds,_cc));
6525 }
6526 /*FI]*/
6527 /*[IF*/
6528 if(((ds.p=14796844),((_negative)&&((_value)>(0)))||((r6_ix_not(&ds,_negative))&&((_value)<(0))))){
6529 (ds.p=14797100);
6530 _state=4;
6531 }
6532 /*FI]*/
6533 }
6534 else if(((ds.p=14797620),r3is_separator(&ds,_cc))){
6535 (ds.p=14797862);
6536 _state=3;
6537 }
6538 else{
6539 (ds.p=14798374);
6540 _state=4;
6541 }
6542 /*FI]*/
6543 break;
6544 case 3:
6545 /*[IF*/
6546 if(((ds.p=14799148),r3is_separator(&ds,_cc))){
6547 }
6548 else{
6549 (ds.p=14799654);
6550 _state=4;
6551 }
6552 /*FI]*/
6553 break;
6554 default:;
6555 error1("Invalid inspect (nothing selected).",14788122);
6556 }
6557 }/*INSPECT]*/
6558 (ds.p=14800410);
6559 _i=(_i)+(1);
6560 }
6561 }
6562 /*[IF*/
6563 if(((ds.p=14800930),((_state)!=(0))&&((_state)!=(4)))){
6564 (ds.p=14801178);
6565 R=1;
6566 }
6567 /*FI]*/
6568 if(se_rci(caller,C))se_i7(&ds,C);
6569 se_dst=caller;/*unlink*/
6570 return R;
6571 }
6572
6573 void r7make(se_dump_stack*caller,T7* C,T2 a1){
6574 void**locals[1];
6575 static se_frame_descriptor fd={"make STRING",1,1,"%R7%needed_capacity%E2%",1};
6576 se_dump_stack ds;
6577 ds.fd=&fd;
6578 ds.current=((void**)&C);
6579 ds.p=14695176;
6580 ds.caller=caller;
6581 ds.locals=locals;
6582 locals[0]=(void**)&a1;
6583 se_dst=&ds;/*link*/
6584 se_require_uppermost_flag=1;
6585 if(fd.assertion_flag){
6586 fd.assertion_flag=0;
6587 (ds.p=14696284);
6588 ac_req((a1)>=(0),"non_negative_size");
6589 fd.assertion_flag=1;
6590 }
6591 /*[IF*/
6592 if(((ds.p=14696762),(a1)>(0))){
6593 /*[IF*/
6594 if(((ds.p=14697010),((/*RF2*/(C)->_capacity/*12*/))<(a1))){
6595 (ds.p=14697248);
6596 (/*SFN*/C->_storage/*4*/)=new9(a1);
6597 (ds.p=14697504);
6598 (/*SFN*/C->_capacity/*12*/)=a1;
6599 }
6600 /*FI]*/
6601 }
6602 /*FI]*/
6603 (ds.p=14698260);
6604 (/*SFN*/C->_count/*8*/)=0;
6605 if(fd.assertion_flag){
6606 fd.assertion_flag=0;
6607 (ds.p=14698804);
6608 ac_ens((a1)<=((/*RF2*/(C)->_capacity/*12*/)),NULL);
6609 (ds.p=14699068);
6610 ac_ens(((/*RF2*/(C)->_count/*8*/))==(0),"empty_string");
6611 fd.assertion_flag=1;
6612 }
6613 if(se_rci(caller,C))se_i7(&ds,C);
6614 se_dst=caller;/*unlink*/
6615 }
6616
6617 void r7remove(se_dump_stack*caller,T7* C,T2 a1){
6618 T2 o7_1208_23=0;
6619 void**locals[2];
6620 static se_frame_descriptor fd={"remove STRING",1,2,"%R7%i%E2%old value%E2%",1};
6621 se_dump_stack ds;
6622 ds.fd=&fd;
6623 ds.current=((void**)&C);
6624 ds.p=14987528;
6625 ds.caller=caller;
6626 ds.locals=locals;
6627 locals[0]=(void**)&a1;
6628 locals[1]=(void**)&o7_1208_23;
6629 se_dst=&ds;/*link*/
6630 o7_1208_23=(/*RF2*/(C)->_count/*8*/);
6631 se_require_uppermost_flag=1;
6632 if(fd.assertion_flag){
6633 fd.assertion_flag=0;
6634 (ds.p=14988350);
6635 ac_req(r7valid_index(&ds,C,a1),"valid_removal_index");
6636 fd.assertion_flag=1;
6637 }
6638 (ds.p=14988820);
6639 r7remove_between(&ds,C,a1,a1);
6640 if(fd.assertion_flag){
6641 fd.assertion_flag=0;
6642 (ds.p=14989344);
6643 ac_ens(((/*RF2*/(C)->_count/*8*/))==((o7_1208_23)-(1)),NULL);
6644 fd.assertion_flag=1;
6645 }
6646 if(se_rci(caller,C))se_i7(&ds,C);
6647 se_dst=caller;/*unlink*/
6648 }
6649
6650 T6 r7is_empty(se_dump_stack*caller,T7* C){
6651 T6 R=0;
6652 void**locals[1];
6653 static se_frame_descriptor fd={"is_empty STRING",1,1,"%R7%Result%E6%",1};
6654 se_dump_stack ds;
6655 ds.fd=&fd;
6656 ds.current=((void**)&C);
6657 ds.p=14706696;
6658 ds.caller=caller;
6659 ds.locals=locals;
6660 locals[0]=(void**)&R;
6661 se_dst=&ds;/*link*/
6662 (ds.p=14707476);
6663 R=((/*RF2*/(C)->_count/*8*/))==(0);
6664 if(se_rci(caller,C))se_i7(&ds,C);
6665 se_dst=caller;/*unlink*/
6666 return R;
6667 }
6668
6669 void r7extend(se_dump_stack*caller,T7* C,T3 a1){
6670 T2 _new_capacity=0;
6671 T2 o7_1249_26=0;
6672 void**locals[3];
6673 static se_frame_descriptor fd={"extend (add_last STRING)",1,3,"%R7%c%E3%new_capacity%E2%old value%E2%",1};
6674 se_dump_stack ds;
6675 ds.fd=&fd;
6676 ds.current=((void**)&C);
6677 ds.p=14995208;
6678 ds.caller=caller;
6679 ds.locals=locals;
6680 locals[0]=(void**)&a1;
6681 locals[1]=(void**)&_new_capacity;
6682 locals[2]=(void**)&o7_1249_26;
6683 se_dst=&ds;/*link*/
6684 o7_1249_26=(/*RF2*/(C)->_count/*8*/);
6685 /*[IF*/
6686 if(((ds.p=14996524),((/*RF2*/(C)->_capacity/*12*/))>((/*RF2*/(C)->_count/*8*/)))){
6687 }
6688 else if(((ds.p=14996788),((/*RF2*/(C)->_capacity/*12*/))==(0))){
6689 (ds.p=14997004);
6690 _new_capacity=32;
6691 (ds.p=14997274);
6692 (/*SFN*/C->_storage/*4*/)=new9(_new_capacity);
6693 (ds.p=14997530);
6694 (/*SFN*/C->_capacity/*12*/)=_new_capacity;
6695 }
6696 else{
6697 (ds.p=14998042);
6698 _new_capacity=(2)*((/*RF2*/(C)->_capacity/*12*/));
6699 (ds.p=14998298);
6700 (/*SFN*/C->_storage/*4*/)=r9realloc(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(C)->_capacity/*12*/),_new_capacity);
6701 (ds.p=14998554);
6702 (/*SFN*/C->_capacity/*12*/)=_new_capacity;
6703 }
6704 /*FI]*/
6705 (ds.p=14999076);
6706 ((/*RF2*/(C)->_storage/*4*/))[(/*RF2*/(C)->_count/*8*/)]=(a1);
6707 (ds.p=14999316);
6708 (/*SFN*/C->_count/*8*/)=((/*RF2*/(C)->_count/*8*/))+(1);
6709 if(fd.assertion_flag){
6710 fd.assertion_flag=0;
6711 (ds.p=14999840);
6712 ac_ens(((/*RF2*/(C)->_count/*8*/))==((1)+(o7_1249_26)),NULL);
6713 (ds.p=15000110);
6714 ac_ens((r7item(&ds,C,(/*RF2*/(C)->_count/*8*/)))==(a1),NULL);
6715 fd.assertion_flag=1;
6716 }
6717 if(se_rci(caller,C))se_i7(&ds,C);
6718 se_dst=caller;/*unlink*/
6719 }
6720
6721 T0* r7_px_43(se_dump_stack*caller,T7* C,T0* a1){
6722 T0* R=NULL;
6723 void**locals[2];
6724 static se_frame_descriptor fd={"infix + STRING",1,2,"%R7%other%R7%Result%R7%",1};
6725 se_dump_stack ds;
6726 ds.fd=&fd;
6727 ds.current=((void**)&C);
6728 ds.p=14965256;
6729 ds.caller=caller;
6730 ds.locals=locals;
6731 locals[0]=(void**)&a1;
6732 locals[1]=(void**)&R;
6733 se_dst=&ds;/*link*/
6734 se_require_uppermost_flag=1;
6735 if(fd.assertion_flag){
6736 fd.assertion_flag=0;
6737 (ds.p=14966332);
6738 ac_req((a1)!=((void*)(NULL)),"other_exists");
6739 fd.assertion_flag=1;
6740 }
6741 (ds.p=14966804);
6742 {T7*n=new7();
6743 r7make(&ds,n,((/*RF2*/(C)->_count/*8*/))+((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14966848))))->_count/*8*/)));
6744 R=((T0*)n);
6745 se_i7(&ds,n);}
6746 (ds.p=14967074);
6747 r7append(&ds,se_i7(&ds,((T7*)ci(7,R,14967060))),(T0*)C);
6748 (ds.p=14967330);
6749 r7append(&ds,se_i7(&ds,((T7*)ci(7,R,14967316))),a1);
6750 if(fd.assertion_flag){
6751 fd.assertion_flag=0;
6752 (ds.p=14967882);
6753 ac_ens(((/*RF2*/(se_i7(&ds,((T7*)ci(7,R,14967856))))->_count/*8*/))==(((/*RF2*/(C)->_count/*8*/))+((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14967902))))->_count/*8*/))),"result_count");
6754 fd.assertion_flag=1;
6755 }
6756 if(se_rci(caller,C))se_i7(&ds,C);
6757 se_dst=caller;/*unlink*/
6758 return R;
6759 }
6760
6761 T2 r7hash_code(se_dump_stack*caller,T7* C){
6762 T2 R=0;
6763 T2 _i=0;
6764 T2 _j=0;
6765 void**locals[3];
6766 static se_frame_descriptor fd={"hash_code STRING",1,3,"%R7%Result%E2%i%E2%j%E2%",1};
6767 se_dump_stack ds;
6768 ds.fd=&fd;
6769 ds.current=((void**)&C);
6770 ds.p=14713864;
6771 ds.caller=caller;
6772 ds.locals=locals;
6773 locals[0]=(void**)&R;
6774 locals[1]=(void**)&_i;
6775 locals[2]=(void**)&_j;
6776 se_dst=&ds;/*link*/
6777 (ds.p=14715148);
6778 _j=(/*RF2*/(C)->_count/*8*/);
6779 (ds.p=14715404);
6780 _i=1;
6781 while (!(((ds.p=14715920),(_j)<=(0))))
6782 {
6783 (ds.p=14716442);
6784 R=((5)*(R))+(T3code(r7item(&ds,C,_i)));
6785 (ds.p=14716698);
6786 _i=(_i)+(1);
6787 (ds.p=14716940);
6788 _j=(_j)-(1);
6789 }
6790 /*[IF*/
6791 if(((ds.p=14717480),(R)<(0))){
6792 (ds.p=14717722);
6793 R=-((R)+(1));
6794 }
6795 /*FI]*/
6796 if(fd.assertion_flag){
6797 fd.assertion_flag=0;
6798 (ds.p=50336836);
6799 ac_ens((R)>=(0),"good_hash_value");
6800 fd.assertion_flag=1;
6801 }
6802 if(se_rci(caller,C))se_i7(&ds,C);
6803 se_dst=caller;/*unlink*/
6804 return R;
6805 }
6806
6807 T6 r7has(se_dump_stack*caller,T7* C,T3 a1){
6808 T6 R=0;
6809 void**locals[2];
6810 static se_frame_descriptor fd={"has STRING",1,2,"%R7%c%E3%Result%E6%",1};
6811 se_dump_stack ds;
6812 ds.fd=&fd;
6813 ds.current=((void**)&C);
6814 ds.p=14755848;
6815 ds.caller=caller;
6816 ds.locals=locals;
6817 locals[0]=(void**)&a1;
6818 locals[1]=(void**)&R;
6819 se_dst=&ds;/*link*/
6820 (ds.p=14756628);
6821 R=r9fast_has(&ds,(/*RF2*/(C)->_storage/*4*/),a1,((/*RF2*/(C)->_count/*8*/))-(1));
6822 if(se_rci(caller,C))se_i7(&ds,C);
6823 se_dst=caller;/*unlink*/
6824 return R;
6825 }
6826
6827 T6 r7_px_60(se_dump_stack*caller,T7* C,T0* a1){
6828 T6 R=0;
6829 T2 _i=0;
6830 void**locals[3];
6831 static se_frame_descriptor fd={"infix < STRING",1,3,"%R7%other%R7%Result%E6%i%E2%",1};
6832 se_dump_stack ds;
6833 ds.fd=&fd;
6834 ds.current=((void**)&C);
6835 ds.p=14718728;
6836 ds.caller=caller;
6837 ds.locals=locals;
6838 locals[0]=(void**)&a1;
6839 locals[1]=(void**)&R;
6840 locals[2]=(void**)&_i;
6841 se_dst=&ds;/*link*/
6842 se_require_uppermost_flag=1;
6843 if(fd.assertion_flag){
6844 fd.assertion_flag=0;
6845 (ds.p=48242748);
6846 ac_req((a1)!=((void*)(NULL)),"other_exists");
6847 fd.assertion_flag=1;
6848 }
6849 (ds.p=14720282);
6850 _i=1;
6851 while (!(((ds.p=14721050),((((/*RF2*/(C)->_count/*8*/))<(_i))||(((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14720830))))->_count/*8*/))<(_i)))||((r7item(&ds,C,_i))!=(r7item(&ds,se_i7(&ds,((T7*)ci(7,a1,14721088))),_i))))))
6852 {
6853 (ds.p=14721562);
6854 _i=(_i)+(1);
6855 }
6856 /*[IF*/
6857 if(((ds.p=14722086),((/*RF2*/(C)->_count/*8*/))<(_i))){
6858 (ds.p=14722330);
6859 R=((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14722350))))->_count/*8*/))>=(_i);
6860 }
6861 else if(((ds.p=14722618),((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,14722594))))->_count/*8*/))<(_i))){
6862 (ds.p=14722842);
6863 R=0;
6864 }
6865 else{
6866 (ds.p=14723354);
6867 R=r3_px_60(&ds,r7item(&ds,C,_i),r7item(&ds,se_i7(&ds,((T7*)ci(7,a1,14723394))),_i));
6868 }
6869 /*FI]*/
6870 if(fd.assertion_flag){
6871 fd.assertion_flag=0;
6872 (ds.p=48243514);
6873 ac_ens((!(R))||(r6_ix_not(&ds,r7_px_60(&ds,se_i7(&ds,((T7*)ci(7,a1,48243540))),(T0*)C))),"asymmetric");
6874 fd.assertion_flag=1;
6875 }
6876 if(se_rci(caller,C))se_i7(&ds,C);
6877 se_dst=caller;/*unlink*/
6878 return R;
6879 }
6880
6881 T6 r7standard_is_equal(se_dump_stack*caller,T7* C,T0* a1){
6882 T6 R=0;
6883 void**locals[2];
6884 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R7%other%R7%Result%E6%",1};
6885 se_dump_stack ds;
6886 ds.fd=&fd;
6887 ds.current=((void**)&C);
6888 ds.p=2128406;
6889 ds.caller=caller;
6890 ds.locals=locals;
6891 locals[0]=(void**)&a1;
6892 locals[1]=(void**)&R;
6893 se_dst=&ds;/*link*/
6894 se_require_uppermost_flag=1;
6895 if(fd.assertion_flag){
6896 fd.assertion_flag=0;
6897 (ds.p=2129184);
6898 ac_req((a1)!=((void*)(NULL)),NULL);
6899 fd.assertion_flag=1;
6900 }
6901 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
6902 fd.assertion_flag=0;
6903 (ds.p=2129976);
6904 ac_ens((!(R))||(r7standard_is_equal(&ds,se_i7(&ds,((T7*)ci(7,a1,2129992))),(T0*)C)),"symmetric");
6905 fd.assertion_flag=1;
6906 }
6907 if(se_rci(caller,C))se_i7(&ds,C);
6908 se_dst=caller;/*unlink*/
6909 return R;
6910 }
6911
6912 T2 r7to_integer(se_dump_stack*caller,T7* C){
6913 T2 R=0;
6914 T2 _i=0;
6915 T2 _state=0;
6916 T3 _cc=0;
6917 T6 _negative=0;
6918 void**locals[5];
6919 static se_frame_descriptor fd={"to_integer STRING",1,5,"%R7%Result%E2%i%E2%state%E2%cc%E3%negative%E6%",1};
6920 se_dump_stack ds;
6921 ds.fd=&fd;
6922 ds.current=((void**)&C);
6923 ds.p=14802184;
6924 ds.caller=caller;
6925 ds.locals=locals;
6926 locals[0]=(void**)&R;
6927 locals[1]=(void**)&_i;
6928 locals[2]=(void**)&_state;
6929 locals[3]=(void**)&_cc;
6930 locals[4]=(void**)&_negative;
6931 se_dst=&ds;/*link*/
6932 se_require_uppermost_flag=1;
6933 if(fd.assertion_flag){
6934 fd.assertion_flag=0;
6935 (ds.p=14802964);
6936 ac_req(r7is_integer(&ds,C),NULL);
6937 fd.assertion_flag=1;
6938 }
6939 {int c=0;int v=0;
6940 (ds.p=14805274);
6941 _i=1;
6942 while (!(((ds.p=14806302),(_i)>((/*RF2*/(C)->_count/*8*/)))))
6943 {
6944 (ds.p=14805784);
6945 v=ac_lvc(c++,v,((/*RF2*/(C)->_count/*8*/))-(_i));
6946 (ds.p=14806810);
6947 _cc=r7item(&ds,C,_i);
6948 /*[INSPECT*/
6949 {int z1=((ds.p=14807328),_state);
6950 switch(z1){
6951 case 0:
6952 /*[IF*/
6953 if(((ds.p=14807852),r3is_separator(&ds,_cc))){
6954 }
6955 else if(((ds.p=14808116),(_cc)==(((T3)'\53')))){
6956 (ds.p=14808358);
6957 _state=1;
6958 }
6959 else if(((ds.p=14808628),(_cc)==(((T3)'\55')))){
6960 (ds.p=14808870);
6961 _negative=1;
6962 (ds.p=14809126);
6963 _state=1;
6964 }
6965 else{
6966 (ds.p=14809638);
6967 R=r3value(&ds,_cc);
6968 (ds.p=14809894);
6969 _state=2;
6970 }
6971 /*FI]*/
6972 break;
6973 case 1:
6974 (ds.p=14810912);
6975 R=r3value(&ds,_cc);
6976 /*[IF*/
6977 if(_negative){
6978 (ds.p=14811436);
6979 R=(-(1))*(R);
6980 }
6981 /*FI]*/
6982 (ds.p=14811936);
6983 _state=2;
6984 break;
6985 case 2:
6986 /*[IF*/
6987 if(((ds.p=14812460),r3is_digit(&ds,_cc))){
6988 /*[IF*/
6989 if(_negative){
6990 (ds.p=14812972);
6991 R=((10)*(R))-(r3decimal_value(&ds,_cc));
6992 }
6993 else{
6994 (ds.p=14813484);
6995 R=((10)*(R))+(r3decimal_value(&ds,_cc));
6996 }
6997 /*FI]*/
6998 }
6999 else{
7000 (ds.p=14814246);
7001 _state=3;
7002 }
7003 /*FI]*/
7004 break;
7005 case 3:
7006 (ds.p=14815264);
7007 _i=(/*RF2*/(C)->_count/*8*/);
7008 break;
7009 default:;
7010 error1("Invalid inspect (nothing selected).",14807066);
7011 }
7012 }/*INSPECT]*/
7013 (ds.p=14815770);
7014 _i=(_i)+(1);
7015 }
7016 }
7017 if(se_rci(caller,C))se_i7(&ds,C);
7018 se_dst=caller;/*unlink*/
7019 return R;
7020 }
7021
7022 void r7append_character(se_dump_stack*caller,T7* C,T3 a1){
7023 T2 _new_capacity=0;
7024 T2 o7_1249_26=0;
7025 void**locals[3];
7026 static se_frame_descriptor fd={"append_character (add_last STRING)",1,3,"%R7%c%E3%new_capacity%E2%old value%E2%",1};
7027 se_dump_stack ds;
7028 ds.fd=&fd;
7029 ds.current=((void**)&C);
7030 ds.p=14995208;
7031 ds.caller=caller;
7032 ds.locals=locals;
7033 locals[0]=(void**)&a1;
7034 locals[1]=(void**)&_new_capacity;
7035 locals[2]=(void**)&o7_1249_26;
7036 se_dst=&ds;/*link*/
7037 o7_1249_26=(/*RF2*/(C)->_count/*8*/);
7038 /*[IF*/
7039 if(((ds.p=14996524),((/*RF2*/(C)->_capacity/*12*/))>((/*RF2*/(C)->_count/*8*/)))){
7040 }
7041 else if(((ds.p=14996788),((/*RF2*/(C)->_capacity/*12*/))==(0))){
7042 (ds.p=14997004);
7043 _new_capacity=32;
7044 (ds.p=14997274);
7045 (/*SFN*/C->_storage/*4*/)=new9(_new_capacity);
7046 (ds.p=14997530);
7047 (/*SFN*/C->_capacity/*12*/)=_new_capacity;
7048 }
7049 else{
7050 (ds.p=14998042);
7051 _new_capacity=(2)*((/*RF2*/(C)->_capacity/*12*/));
7052 (ds.p=14998298);
7053 (/*SFN*/C->_storage/*4*/)=r9realloc(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(C)->_capacity/*12*/),_new_capacity);
7054 (ds.p=14998554);
7055 (/*SFN*/C->_capacity/*12*/)=_new_capacity;
7056 }
7057 /*FI]*/
7058 (ds.p=14999076);
7059 ((/*RF2*/(C)->_storage/*4*/))[(/*RF2*/(C)->_count/*8*/)]=(a1);
7060 (ds.p=14999316);
7061 (/*SFN*/C->_count/*8*/)=((/*RF2*/(C)->_count/*8*/))+(1);
7062 if(fd.assertion_flag){
7063 fd.assertion_flag=0;
7064 (ds.p=14999840);
7065 ac_ens(((/*RF2*/(C)->_count/*8*/))==((1)+(o7_1249_26)),NULL);
7066 (ds.p=15000110);
7067 ac_ens((r7item(&ds,C,(/*RF2*/(C)->_count/*8*/)))==(a1),NULL);
7068 fd.assertion_flag=1;
7069 }
7070 if(se_rci(caller,C))se_i7(&ds,C);
7071 se_dst=caller;/*unlink*/
7072 }
7073
7074 T3 r7first(se_dump_stack*caller,T7* C){
7075 T3 R=0;
7076 void**locals[1];
7077 static se_frame_descriptor fd={"first STRING",1,1,"%R7%Result%E3%",1};
7078 se_dump_stack ds;
7079 ds.fd=&fd;
7080 ds.current=((void**)&C);
7081 ds.p=15051016;
7082 ds.caller=caller;
7083 ds.locals=locals;
7084 locals[0]=(void**)&R;
7085 se_dst=&ds;/*link*/
7086 se_require_uppermost_flag=1;
7087 if(fd.assertion_flag){
7088 fd.assertion_flag=0;
7089 (ds.p=15051796);
7090 ac_req(r6_ix_not(&ds,r7is_empty(&ds,C)),NULL);
7091 fd.assertion_flag=1;
7092 }
7093 (ds.p=15052308);
7094 R=((/*RF2*/(C)->_storage/*4*/))[0];
7095 if(fd.assertion_flag){
7096 fd.assertion_flag=0;
7097 (ds.p=15052844);
7098 ac_ens((R)==(r7item(&ds,C,1)),"definition");
7099 fd.assertion_flag=1;
7100 }
7101 if(se_rci(caller,C))se_i7(&ds,C);
7102 se_dst=caller;/*unlink*/
7103 return R;
7104 }
7105
7106 void r7clear(se_dump_stack*caller,T7* C){
7107 static se_frame_descriptor fd={"clear STRING",1,0,"%R7%",1};
7108 se_dump_stack ds;
7109 ds.fd=&fd;
7110 ds.current=((void**)&C);
7111 ds.p=14925576;
7112 ds.caller=caller;
7113 ds.locals=NULL;
7114 se_dst=&ds;/*link*/
7115 (ds.p=14926612);
7116 (/*SFN*/C->_count/*8*/)=0;
7117 if(fd.assertion_flag){
7118 fd.assertion_flag=0;
7119 (ds.p=14927136);
7120 ac_ens(((/*RF2*/(C)->_count/*8*/))==(0),NULL);
7121 fd.assertion_flag=1;
7122 }
7123 if(se_rci(caller,C))se_i7(&ds,C);
7124 se_dst=caller;/*unlink*/
7125 }
7126
7127 T8 r7to_external(se_dump_stack*caller,T7* C){
7128 T8 R=NULL;
7129 T2 o7_1742_22=0;
7130 void**locals[2];
7131 static se_frame_descriptor fd={"to_external STRING",1,2,"%R7%Result%E8%old value%E2%",1};
7132 se_dump_stack ds;
7133 ds.fd=&fd;
7134 ds.current=((void**)&C);
7135 ds.p=15121672;
7136 ds.caller=caller;
7137 ds.locals=locals;
7138 locals[0]=(void**)&R;
7139 locals[1]=(void**)&o7_1742_22;
7140 se_dst=&ds;/*link*/
7141 o7_1742_22=(/*RF2*/(C)->_count/*8*/);
7142 /*[IF*/
7143 if(((ds.p=15123244),((/*RF2*/(C)->_capacity/*12*/))>((/*RF2*/(C)->_count/*8*/)))){
7144 (ds.p=15123482);
7145 (/*SFN*/C->_count/*8*/)=((/*RF2*/(C)->_count/*8*/))+(1);
7146 /*[IF*/
7147 if(((ds.p=15123768),(r7item(&ds,C,(/*RF2*/(C)->_count/*8*/)))!=(((T3)'\0')))){
7148 (ds.p=15124000);
7149 r7put(&ds,C,((T3)'\0'),(/*RF2*/(C)->_count/*8*/));
7150 }
7151 /*FI]*/
7152 }
7153 else{
7154 (ds.p=15124762);
7155 r7append_character(&ds,C,((T3)'\0'));
7156 }
7157 /*FI]*/
7158 (ds.p=15125268);
7159 (/*SFN*/C->_count/*8*/)=((/*RF2*/(C)->_count/*8*/))-(1);
7160 (ds.p=15125524);
7161 R=((void*)((/*RF2*/(C)->_storage/*4*/)));
7162 if(fd.assertion_flag){
7163 fd.assertion_flag=0;
7164 (ds.p=15126048);
7165 ac_ens(((/*RF2*/(C)->_count/*8*/))==(o7_1742_22),NULL);
7166 (ds.p=15126306);
7167 ac_ens((NULL!=R),NULL);
7168 fd.assertion_flag=1;
7169 }
7170 if(se_rci(caller,C))se_i7(&ds,C);
7171 se_dst=caller;/*unlink*/
7172 return R;
7173 }
7174
7175 T0* r7twin(se_dump_stack*caller,T7* C){
7176 T0* R=NULL;
7177 void**locals[1];
7178 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R7%Result%R7%",1};
7179 se_dump_stack ds;
7180 ds.fd=&fd;
7181 ds.current=((void**)&C);
7182 ds.p=2140182;
7183 ds.caller=caller;
7184 ds.locals=locals;
7185 locals[0]=(void**)&R;
7186 se_dst=&ds;/*link*/
7187 R=((void*)new7());
7188 r7copy(&ds,((T7*)R),((T0*)C));
7189 if(fd.assertion_flag){
7190 fd.assertion_flag=0;
7191 (ds.p=2142256);
7192 ac_ens(r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,R,2142242))),(T0*)C),"equal");
7193 fd.assertion_flag=1;
7194 }
7195 if(se_rci(caller,C))se_i7(&ds,C);
7196 se_dst=caller;/*unlink*/
7197 return R;
7198 }
7199
7200 void r7split_in(se_dump_stack*caller,T7* C,T0* a1){
7201 T2 _state=0;
7202 T2 _i=0;
7203 T3 _c=0;
7204 T2 o7_1701_36=0;
7205 void**locals[5];
7206 static se_frame_descriptor fd={"split_in STRING",1,5,"%R7%words%R70%state%E2%i%E2%c%E3%old value%E2%",1};
7207 se_dump_stack ds;
7208 ds.fd=&fd;
7209 ds.current=((void**)&C);
7210 ds.p=15105800;
7211 ds.caller=caller;
7212 ds.locals=locals;
7213 locals[0]=(void**)&a1;
7214 locals[1]=(void**)&_state;
7215 locals[2]=(void**)&_i;
7216 locals[3]=(void**)&_c;
7217 locals[4]=(void**)&o7_1701_36;
7218 se_dst=&ds;/*link*/
7219 o7_1701_36=X70count(&ds,15115580,a1);
7220 se_require_uppermost_flag=1;
7221 if(fd.assertion_flag){
7222 fd.assertion_flag=0;
7223 (ds.p=15106592);
7224 ac_req((a1)!=((void*)(NULL)),NULL);
7225 fd.assertion_flag=1;
7226 }
7227 /*[IF*/
7228 if(((ds.p=15108390),((/*RF2*/(C)->_count/*8*/))>(0))){
7229 (ds.p=15108896);
7230 _i=1;
7231 while (!(((ds.p=15109412),(_i)>((/*RF2*/(C)->_count/*8*/)))))
7232 {
7233 (ds.p=15109920);
7234 _c=r7item(&ds,C,_i);
7235 /*[IF*/
7236 if(((ds.p=15110194),(_state)==(0))){
7237 /*[IF*/
7238 if(((ds.p=15110444),r6_ix_not(&ds,r3is_separator(&ds,_c)))){
7239 (ds.p=15110728);
7240 r7clear(&ds,se_i7(&ds,((T7*)ci(7,r7string_buffer(&ds),15110700))));
7241 (ds.p=15110984);
7242 r7append_character(&ds,se_i7(&ds,((T7*)ci(7,r7string_buffer(&ds),15110956))),_c);
7243 (ds.p=15111212);
7244 _state=1;
7245 }
7246 /*FI]*/
7247 }
7248 else{
7249 /*[IF*/
7250 if(((ds.p=15111980),r6_ix_not(&ds,r3is_separator(&ds,_c)))){
7251 (ds.p=15112264);
7252 r7append_character(&ds,se_i7(&ds,((T7*)ci(7,r7string_buffer(&ds),15112236))),_c);
7253 }
7254 else{
7255 (ds.p=15112760);
7256 X70add_last(&ds,15112748,a1,r7twin(&ds,se_i7(&ds,((T7*)ci(7,r7string_buffer(&ds),15112778)))));
7257 (ds.p=15113004);
7258 _state=0;
7259 }
7260 /*FI]*/
7261 }
7262 /*FI]*/
7263 (ds.p=15113760);
7264 _i=(_i)+(1);
7265 }
7266 /*[IF*/
7267 if(((ds.p=15114284),(_state)==(1))){
7268 (ds.p=15114540);
7269 X70add_last(&ds,15114528,a1,r7twin(&ds,se_i7(&ds,((T7*)ci(7,r7string_buffer(&ds),15114558)))));
7270 }
7271 /*FI]*/
7272 }
7273 /*FI]*/
7274 if(fd.assertion_flag){
7275 fd.assertion_flag=0;
7276 (ds.p=15115564);
7277 ac_ens((X70count(&ds,15115540,a1))>=(o7_1701_36),NULL);
7278 fd.assertion_flag=1;
7279 }
7280 if(se_rci(caller,C))se_i7(&ds,C);
7281 se_dst=caller;/*unlink*/
7282 }
7283
7284 void r7swap(se_dump_stack*caller,T7* C,T2 a1,T2 a2){
7285 T3 _tmp=0;
7286 T3 o7_1148_25=0;
7287 T3 o7_1149_25=0;
7288 void**locals[5];
7289 static se_frame_descriptor fd={"swap STRING",1,5,"%R7%i1%E2%i2%E2%tmp%E3%old value%E3%old value%E3%",1};
7290 se_dump_stack ds;
7291 ds.fd=&fd;
7292 ds.current=((void**)&C);
7293 ds.p=14971144;
7294 ds.caller=caller;
7295 ds.locals=locals;
7296 locals[0]=(void**)&a1;
7297 locals[1]=(void**)&a2;
7298 locals[2]=(void**)&_tmp;
7299 locals[3]=(void**)&o7_1148_25;
7300 locals[4]=(void**)&o7_1149_25;
7301 se_dst=&ds;/*link*/
7302 o7_1148_25=r7item(&ds,C,a2);
7303 o7_1149_25=r7item(&ds,C,a1);
7304 se_require_uppermost_flag=1;
7305 if(fd.assertion_flag){
7306 fd.assertion_flag=0;
7307 (ds.p=14971668);
7308 ac_req(r7valid_index(&ds,C,a1),NULL);
7309 (ds.p=14971924);
7310 ac_req(r7valid_index(&ds,C,a2),NULL);
7311 fd.assertion_flag=1;
7312 }
7313 (ds.p=14972948);
7314 _tmp=r7item(&ds,C,a1);
7315 (ds.p=14973204);
7316 r7put(&ds,C,r7item(&ds,C,a2),a1);
7317 (ds.p=14973460);
7318 r7put(&ds,C,_tmp,a2);
7319 if(fd.assertion_flag){
7320 fd.assertion_flag=0;
7321 (ds.p=14973990);
7322 ac_ens((r7item(&ds,C,a1))==(o7_1148_25),NULL);
7323 (ds.p=14974246);
7324 ac_ens((r7item(&ds,C,a2))==(o7_1149_25),NULL);
7325 fd.assertion_flag=1;
7326 }
7327 if(se_rci(caller,C))se_i7(&ds,C);
7328 se_dst=caller;/*unlink*/
7329 }
7330 se_frame_descriptor se_ifd7={"invariant once STRING",1,0,"%R7%",1};
7331
7332 T7*se_i7(se_dump_stack*caller,T7*C){
7333 se_dump_stack ds;
7334 ds.fd=&se_ifd7;
7335 ds.current=((void**)&C);
7336 ds.p=14683150;
7337 ds.caller=caller;
7338 se_dst=&ds;
7339 if(ds.fd->assertion_flag){
7340 ds.fd->assertion_flag=0;
7341 (ds.p=15158284);
7342 ac_inv((0)<=((/*RF2*/(C)->_count/*8*/)),NULL);
7343 (ds.p=15158804);
7344 ac_inv(((/*RF2*/(C)->_count/*8*/))<=((/*RF2*/(C)->_capacity/*12*/)),NULL);
7345 (ds.p=15159330);
7346 ac_inv((!(((/*RF2*/(C)->_capacity/*12*/))>(0)))||(r9is_not_null(&ds,(/*RF2*/(C)->_storage/*4*/))),NULL);
7347 ds.fd->assertion_flag=1;
7348 }
7349 se_dst=caller;
7350 return C;
7351 }
7352
7353 void r83copy(se_dump_stack*caller,T83* C,T0* a1){
7354 T2 _needed_capacity=0;
7355 void**locals[2];
7356 static se_frame_descriptor fd={"copy ARRAY",1,2,"%R83%other%R83%needed_capacity%E2%",1};
7357 se_dump_stack ds;
7358 ds.fd=&fd;
7359 ds.current=((void**)&C);
7360 ds.p=130072328;
7361 ds.caller=caller;
7362 ds.locals=locals;
7363 locals[0]=(void**)&a1;
7364 locals[1]=(void**)&_needed_capacity;
7365 se_dst=&ds;/*link*/
7366 se_require_uppermost_flag=1;
7367 if(fd.assertion_flag){
7368 fd.assertion_flag=0;
7369 (ds.p=2144064);
7370 ac_req((a1)!=((void*)(NULL)),"other_not_void");
7371 fd.assertion_flag=1;
7372 }
7373 (ds.p=130073364);
7374 (/*SFN*/C->_lower/*16*/)=(/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,130073382))))->_lower/*16*/);
7375 (ds.p=130073620);
7376 (/*SFN*/C->_upper/*12*/)=(/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,130073638))))->_upper/*12*/);
7377 (ds.p=130073876);
7378 _needed_capacity=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
7379 /*[IF*/
7380 if(((ds.p=130074156),((/*RF2*/(C)->_capacity/*8*/))<(_needed_capacity))){
7381 (ds.p=130074394);
7382 (/*SFN*/C->_storage/*4*/)=new85(_needed_capacity);
7383 (ds.p=130074650);
7384 (/*SFN*/C->_capacity/*8*/)=_needed_capacity;
7385 }
7386 /*FI]*/
7387 /*[IF*/
7388 if(((ds.p=130075194),(_needed_capacity)>(0))){
7389 (ds.p=130075434);
7390 r85copy_from(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,130075454))))->_storage/*4*/),(_needed_capacity)-(1));
7391 }
7392 /*FI]*/
7393 if(fd.assertion_flag){
7394 fd.assertion_flag=0;
7395 (ds.p=2144808);
7396 ac_ens(r83is_equal(&ds,C,a1),"is_equal");
7397 fd.assertion_flag=1;
7398 }
7399 if(se_rci(caller,C))se_i83(&ds,C);
7400 se_dst=caller;/*unlink*/
7401 }
7402
7403 void r83clear_all(se_dump_stack*caller,T83* C){
7404 T2 _value=0;
7405 T2 o36_162_29=0;
7406 T2 o36_163_29=0;
7407 void**locals[3];
7408 static se_frame_descriptor fd={"clear_all COLLECTION",1,3,"%R83%value%E2%old value%E2%old value%E2%",1};
7409 se_dump_stack ds;
7410 ds.fd=&fd;
7411 ds.current=((void**)&C);
7412 ds.p=75536904;
7413 ds.caller=caller;
7414 ds.locals=locals;
7415 locals[0]=(void**)&_value;
7416 locals[1]=(void**)&o36_162_29;
7417 locals[2]=(void**)&o36_163_29;
7418 se_dst=&ds;/*link*/
7419 o36_162_29=(/*RF2*/(C)->_upper/*12*/);
7420 o36_163_29=(/*RF2*/(C)->_lower/*16*/);
7421 (ds.p=75538452);
7422 r83set_all_with(&ds,C,_value);
7423 if(fd.assertion_flag){
7424 fd.assertion_flag=0;
7425 (ds.p=75538990);
7426 ac_ens(((/*RF2*/(C)->_upper/*12*/))==(o36_162_29),"stable_upper");
7427 (ds.p=75539246);
7428 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(o36_163_29),"stable_lower");
7429 (ds.p=75539476);
7430 ac_ens(r83all_default(&ds,C),NULL);
7431 fd.assertion_flag=1;
7432 }
7433 if(se_rci(caller,C))se_i83(&ds,C);
7434 se_dst=caller;/*unlink*/
7435 }
7436
7437 T2 r83count(se_dump_stack*caller,T83* C){
7438 T2 R=0;
7439 void**locals[1];
7440 static se_frame_descriptor fd={"count ARRAY",1,1,"%R83%Result%E2%",1};
7441 se_dump_stack ds;
7442 ds.fd=&fd;
7443 ds.current=((void**)&C);
7444 ds.p=130063112;
7445 ds.caller=caller;
7446 ds.locals=locals;
7447 locals[0]=(void**)&R;
7448 se_dst=&ds;/*link*/
7449 (ds.p=130063636);
7450 R=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
7451 if(fd.assertion_flag){
7452 fd.assertion_flag=0;
7453 (ds.p=75511330);
7454 ac_ens((R)==((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
7455 fd.assertion_flag=1;
7456 }
7457 if(se_rci(caller,C))se_i83(&ds,C);
7458 se_dst=caller;/*unlink*/
7459 return R;
7460 }
7461
7462 void r83put(se_dump_stack*caller,T83* C,T2 a1,T2 a2){
7463 T2 o36_106_22=0;
7464 void**locals[3];
7465 static se_frame_descriptor fd={"put ARRAY",1,3,"%R83%element%E2%i%E2%old value%E2%",1};
7466 se_dump_stack ds;
7467 ds.fd=&fd;
7468 ds.current=((void**)&C);
7469 ds.p=130065672;
7470 ds.caller=caller;
7471 ds.locals=locals;
7472 locals[0]=(void**)&a1;
7473 locals[1]=(void**)&a2;
7474 locals[2]=(void**)&o36_106_22;
7475 se_dst=&ds;/*link*/
7476 o36_106_22=r83count(&ds,C);
7477 se_require_uppermost_flag=1;
7478 if(fd.assertion_flag){
7479 fd.assertion_flag=0;
7480 (ds.p=75523604);
7481 ac_req(r83valid_index(&ds,C,a2),NULL);
7482 fd.assertion_flag=1;
7483 }
7484 (ds.p=130066212);
7485 ((/*RF2*/(C)->_storage/*4*/))[(a2)-((/*RF2*/(C)->_lower/*16*/))]=(a1);
7486 if(fd.assertion_flag){
7487 fd.assertion_flag=0;
7488 (ds.p=75524388);
7489 ac_ens((r83item(&ds,C,a2))==(a1),NULL);
7490 (ds.p=75524640);
7491 ac_ens((r83count(&ds,C))==(o36_106_22),NULL);
7492 fd.assertion_flag=1;
7493 }
7494 if(se_rci(caller,C))se_i83(&ds,C);
7495 se_dst=caller;/*unlink*/
7496 }
7497
7498 T6 r83is_equal(se_dump_stack*caller,T83* C,T0* a1){
7499 T6 R=0;
7500 void**locals[2];
7501 static se_frame_descriptor fd={"is_equal ARRAY",1,2,"%R83%other%R83%Result%E6%",1};
7502 se_dump_stack ds;
7503 ds.fd=&fd;
7504 ds.current=((void**)&C);
7505 ds.p=130102280;
7506 ds.caller=caller;
7507 ds.locals=locals;
7508 locals[0]=(void**)&a1;
7509 locals[1]=(void**)&R;
7510 se_dst=&ds;/*link*/
7511 se_require_uppermost_flag=1;
7512 if(fd.assertion_flag){
7513 fd.assertion_flag=0;
7514 (ds.p=2122048);
7515 ac_req((a1)!=((void*)(NULL)),"other_not_void");
7516 fd.assertion_flag=1;
7517 }
7518 /*[IF*/
7519 if(((ds.p=130102826),(C)==((void*)(a1)))){
7520 (ds.p=130103066);
7521 R=1;
7522 }
7523 else if(((ds.p=130103370),(((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,130103346))))->_lower/*16*/)))&&(((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,130103404))))->_upper/*12*/))))){
7524 (ds.p=130103578);
7525 R=r85fast_memcmp(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,130103638))))->_storage/*4*/),r83count(&ds,C));
7526 }
7527 /*FI]*/
7528 if(fd.assertion_flag){
7529 fd.assertion_flag=0;
7530 (ds.p=75585556);
7531 ac_ens((!(R))||(r6_px_and(&ds,((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,75585590))))->_lower/*16*/)),((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i83(&ds,((T83*)ci(83,a1,75585638))))->_upper/*12*/)))),NULL);
7532 (ds.p=2122846);
7533 ac_ens((!(r83standard_is_equal(&ds,C,a1)))||(R),"consistent");
7534 (ds.p=2123064);
7535 ac_ens((!(R))||(r83is_equal(&ds,se_i83(&ds,((T83*)ci(83,a1,2123080))),(T0*)C)),"symmetric");
7536 fd.assertion_flag=1;
7537 }
7538 if(se_rci(caller,C))se_i83(&ds,C);
7539 se_dst=caller;/*unlink*/
7540 return R;
7541 }
7542
7543 T2 r83item(se_dump_stack*caller,T83* C,T2 a1){
7544 T2 R=0;
7545 void**locals[2];
7546 static se_frame_descriptor fd={"item ARRAY",1,2,"%R83%i%E2%Result%E2%",1};
7547 se_dump_stack ds;
7548 ds.fd=&fd;
7549 ds.current=((void**)&C);
7550 ds.p=130064392;
7551 ds.caller=caller;
7552 ds.locals=locals;
7553 locals[0]=(void**)&a1;
7554 locals[1]=(void**)&R;
7555 se_dst=&ds;/*link*/
7556 se_require_uppermost_flag=1;
7557 if(fd.assertion_flag){
7558 fd.assertion_flag=0;
7559 (ds.p=75516692);
7560 ac_req(r83valid_index(&ds,C,a1),NULL);
7561 fd.assertion_flag=1;
7562 }
7563 (ds.p=130064916);
7564 R=((/*RF2*/(C)->_storage/*4*/))[(a1)-((/*RF2*/(C)->_lower/*16*/))];
7565 if(se_rci(caller,C))se_i83(&ds,C);
7566 se_dst=caller;/*unlink*/
7567 return R;
7568 }
7569
7570 T6 r83valid_index(se_dump_stack*caller,T83* C,T2 a1){
7571 T6 R=0;
7572 void**locals[2];
7573 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R83%index%E2%Result%E6%",1};
7574 se_dump_stack ds;
7575 ds.fd=&fd;
7576 ds.current=((void**)&C);
7577 ds.p=75507478;
7578 ds.caller=caller;
7579 ds.locals=locals;
7580 locals[0]=(void**)&a1;
7581 locals[1]=(void**)&R;
7582 se_dst=&ds;/*link*/
7583 (ds.p=75508500);
7584 R=(((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)));
7585 if(fd.assertion_flag){
7586 fd.assertion_flag=0;
7587 (ds.p=75509026);
7588 ac_ens((R)==((((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)))),NULL);
7589 fd.assertion_flag=1;
7590 }
7591 if(se_rci(caller,C))se_i83(&ds,C);
7592 se_dst=caller;/*unlink*/
7593 return R;
7594 }
7595
7596 void r83make(se_dump_stack*caller,T83* C,T2 a1,T2 a2){
7597 T2 _needed=0;
7598 void**locals[3];
7599 static se_frame_descriptor fd={"make ARRAY",1,3,"%R83%min_index%E2%max_index%E2%needed%E2%",1};
7600 se_dump_stack ds;
7601 ds.fd=&fd;
7602 ds.current=((void**)&C);
7603 ds.p=130030600;
7604 ds.caller=caller;
7605 ds.locals=locals;
7606 locals[0]=(void**)&a1;
7607 locals[1]=(void**)&a2;
7608 locals[2]=(void**)&_needed;
7609 se_dst=&ds;/*link*/
7610 se_require_uppermost_flag=1;
7611 if(fd.assertion_flag){
7612 fd.assertion_flag=0;
7613 (ds.p=130031940);
7614 ac_req((a1)<=((a2)+(1)),"valid_bounds");
7615 fd.assertion_flag=1;
7616 }
7617 (ds.p=130032916);
7618 (/*SFN*/C->_lower/*16*/)=a1;
7619 (ds.p=130033172);
7620 (/*SFN*/C->_upper/*12*/)=a2;
7621 (ds.p=130033428);
7622 _needed=((a2)-(a1))+(1);
7623 /*[IF*/
7624 if(((ds.p=130033704),(_needed)>(0))){
7625 /*[IF*/
7626 if(((ds.p=130033970),((/*RF2*/(C)->_capacity/*8*/))<(_needed))){
7627 (ds.p=130034208);
7628 (/*SFN*/C->_storage/*4*/)=new85(_needed);
7629 (ds.p=130034464);
7630 (/*SFN*/C->_capacity/*8*/)=_needed;
7631 }
7632 else{
7633 (ds.p=130034976);
7634 r83clear_all(&ds,C);
7635 }
7636 /*FI]*/
7637 }
7638 /*FI]*/
7639 if(fd.assertion_flag){
7640 fd.assertion_flag=0;
7641 (ds.p=130036022);
7642 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(a1),"lower_set");
7643 (ds.p=130036278);
7644 ac_ens(((/*RF2*/(C)->_upper/*12*/))==(a2),"upper_set");
7645 (ds.p=130036522);
7646 ac_ens(r83all_default(&ds,C),"items_set");
7647 fd.assertion_flag=1;
7648 }
7649 if(se_rci(caller,C))se_i83(&ds,C);
7650 se_dst=caller;/*unlink*/
7651 }
7652
7653 void r83set_all_with(se_dump_stack*caller,T83* C,T2 a1){
7654 T2 o36_130_22=0;
7655 void**locals[2];
7656 static se_frame_descriptor fd={"set_all_with ARRAY",1,2,"%R83%v%E2%old value%E2%",1};
7657 se_dump_stack ds;
7658 ds.fd=&fd;
7659 ds.current=((void**)&C);
7660 ds.p=130076424;
7661 ds.caller=caller;
7662 ds.locals=locals;
7663 locals[0]=(void**)&a1;
7664 locals[1]=(void**)&o36_130_22;
7665 se_dst=&ds;/*link*/
7666 o36_130_22=r83count(&ds,C);
7667 (ds.p=130076964);
7668 r85set_all_with(&ds,(/*RF2*/(C)->_storage/*4*/),a1,((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)));
7669 if(fd.assertion_flag){
7670 fd.assertion_flag=0;
7671 (ds.p=75530784);
7672 ac_ens((r83count(&ds,C))==(o36_130_22),NULL);
7673 fd.assertion_flag=1;
7674 }
7675 if(se_rci(caller,C))se_i83(&ds,C);
7676 se_dst=caller;/*unlink*/
7677 }
7678
7679 T6 r83standard_is_equal(se_dump_stack*caller,T83* C,T0* a1){
7680 T6 R=0;
7681 void**locals[2];
7682 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R83%other%R83%Result%E6%",1};
7683 se_dump_stack ds;
7684 ds.fd=&fd;
7685 ds.current=((void**)&C);
7686 ds.p=2128406;
7687 ds.caller=caller;
7688 ds.locals=locals;
7689 locals[0]=(void**)&a1;
7690 locals[1]=(void**)&R;
7691 se_dst=&ds;/*link*/
7692 se_require_uppermost_flag=1;
7693 if(fd.assertion_flag){
7694 fd.assertion_flag=0;
7695 (ds.p=2129184);
7696 ac_req((a1)!=((void*)(NULL)),NULL);
7697 fd.assertion_flag=1;
7698 }
7699 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
7700 fd.assertion_flag=0;
7701 (ds.p=2129976);
7702 ac_ens((!(R))||(r83standard_is_equal(&ds,se_i83(&ds,((T83*)ci(83,a1,2129992))),(T0*)C)),"symmetric");
7703 fd.assertion_flag=1;
7704 }
7705 if(se_rci(caller,C))se_i83(&ds,C);
7706 se_dst=caller;/*unlink*/
7707 return R;
7708 }
7709
7710 T6 r83all_default(se_dump_stack*caller,T83* C){
7711 T6 R=0;
7712 void**locals[1];
7713 static se_frame_descriptor fd={"all_default ARRAY",1,1,"%R83%Result%E6%",1};
7714 se_dump_stack ds;
7715 ds.fd=&fd;
7716 ds.current=((void**)&C);
7717 ds.p=130095880;
7718 ds.caller=caller;
7719 ds.locals=locals;
7720 locals[0]=(void**)&R;
7721 se_dst=&ds;/*link*/
7722 (ds.p=130096404);
7723 R=r85all_default(&ds,(/*RF2*/(C)->_storage/*4*/),((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)));
7724 if(se_rci(caller,C))se_i83(&ds,C);
7725 se_dst=caller;/*unlink*/
7726 return R;
7727 }
7728
7729 T0* r83twin(se_dump_stack*caller,T83* C){
7730 T0* R=NULL;
7731 void**locals[1];
7732 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R83%Result%R83%",1};
7733 se_dump_stack ds;
7734 ds.fd=&fd;
7735 ds.current=((void**)&C);
7736 ds.p=2140182;
7737 ds.caller=caller;
7738 ds.locals=locals;
7739 locals[0]=(void**)&R;
7740 se_dst=&ds;/*link*/
7741 R=((void*)new83());
7742 r83copy(&ds,((T83*)R),((T0*)C));
7743 if(fd.assertion_flag){
7744 fd.assertion_flag=0;
7745 (ds.p=2142256);
7746 ac_ens(r83is_equal(&ds,se_i83(&ds,((T83*)ci(83,R,2142242))),(T0*)C),"equal");
7747 fd.assertion_flag=1;
7748 }
7749 if(se_rci(caller,C))se_i83(&ds,C);
7750 se_dst=caller;/*unlink*/
7751 return R;
7752 }
7753 se_frame_descriptor se_ifd83={"invariant once ARRAY[INTEGER]",1,0,"%R83%",1};
7754
7755 T83*se_i83(se_dump_stack*caller,T83*C){
7756 se_dump_stack ds;
7757 ds.fd=&se_ifd83;
7758 ds.current=((void**)&C);
7759 ds.p=130026510;
7760 ds.caller=caller;
7761 se_dst=&ds;
7762 if(ds.fd->assertion_flag){
7763 ds.fd->assertion_flag=0;
7764 (ds.p=75651888);
7765 ac_inv(((/*RF2*/(C)->_lower/*16*/))<=(((/*RF2*/(C)->_upper/*12*/))+(1)),"valid_bounds");
7766 (ds.p=132150298);
7767 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>=((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
7768 (ds.p=132150818);
7769 ac_inv((!(((/*RF2*/(C)->_capacity/*8*/))>(0)))||(r85is_not_null(&ds,(/*RF2*/(C)->_storage/*4*/))),NULL);
7770 ds.fd->assertion_flag=1;
7771 }
7772 se_dst=caller;
7773 return C;
7774 }
7775
7776 void r80copy(se_dump_stack*caller,T80* C,T0* a1){
7777 T2 _needed_capacity=0;
7778 void**locals[2];
7779 static se_frame_descriptor fd={"copy ARRAY",1,2,"%R80%other%R80%needed_capacity%E2%",1};
7780 se_dump_stack ds;
7781 ds.fd=&fd;
7782 ds.current=((void**)&C);
7783 ds.p=130072328;
7784 ds.caller=caller;
7785 ds.locals=locals;
7786 locals[0]=(void**)&a1;
7787 locals[1]=(void**)&_needed_capacity;
7788 se_dst=&ds;/*link*/
7789 se_require_uppermost_flag=1;
7790 if(fd.assertion_flag){
7791 fd.assertion_flag=0;
7792 (ds.p=2144064);
7793 ac_req((a1)!=((void*)(NULL)),"other_not_void");
7794 fd.assertion_flag=1;
7795 }
7796 (ds.p=130073364);
7797 (/*SFN*/C->_lower/*16*/)=(/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,130073382))))->_lower/*16*/);
7798 (ds.p=130073620);
7799 (/*SFN*/C->_upper/*12*/)=(/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,130073638))))->_upper/*12*/);
7800 (ds.p=130073876);
7801 _needed_capacity=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
7802 /*[IF*/
7803 if(((ds.p=130074156),((/*RF2*/(C)->_capacity/*8*/))<(_needed_capacity))){
7804 (ds.p=130074394);
7805 (/*SFN*/C->_storage/*4*/)=new82(_needed_capacity);
7806 (ds.p=130074650);
7807 (/*SFN*/C->_capacity/*8*/)=_needed_capacity;
7808 }
7809 /*FI]*/
7810 /*[IF*/
7811 if(((ds.p=130075194),(_needed_capacity)>(0))){
7812 (ds.p=130075434);
7813 r82copy_from(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,130075454))))->_storage/*4*/),(_needed_capacity)-(1));
7814 }
7815 /*FI]*/
7816 if(fd.assertion_flag){
7817 fd.assertion_flag=0;
7818 (ds.p=2144808);
7819 ac_ens(r80is_equal(&ds,C,a1),"is_equal");
7820 fd.assertion_flag=1;
7821 }
7822 if(se_rci(caller,C))se_i80(&ds,C);
7823 se_dst=caller;/*unlink*/
7824 }
7825
7826 void r80clear_all(se_dump_stack*caller,T80* C){
7827 T6 _value=0;
7828 T2 o36_162_29=0;
7829 T2 o36_163_29=0;
7830 void**locals[3];
7831 static se_frame_descriptor fd={"clear_all COLLECTION",1,3,"%R80%value%E6%old value%E2%old value%E2%",1};
7832 se_dump_stack ds;
7833 ds.fd=&fd;
7834 ds.current=((void**)&C);
7835 ds.p=75536904;
7836 ds.caller=caller;
7837 ds.locals=locals;
7838 locals[0]=(void**)&_value;
7839 locals[1]=(void**)&o36_162_29;
7840 locals[2]=(void**)&o36_163_29;
7841 se_dst=&ds;/*link*/
7842 o36_162_29=(/*RF2*/(C)->_upper/*12*/);
7843 o36_163_29=(/*RF2*/(C)->_lower/*16*/);
7844 (ds.p=75538452);
7845 r80set_all_with(&ds,C,_value);
7846 if(fd.assertion_flag){
7847 fd.assertion_flag=0;
7848 (ds.p=75538990);
7849 ac_ens(((/*RF2*/(C)->_upper/*12*/))==(o36_162_29),"stable_upper");
7850 (ds.p=75539246);
7851 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(o36_163_29),"stable_lower");
7852 (ds.p=75539476);
7853 ac_ens(r80all_default(&ds,C),NULL);
7854 fd.assertion_flag=1;
7855 }
7856 if(se_rci(caller,C))se_i80(&ds,C);
7857 se_dst=caller;/*unlink*/
7858 }
7859
7860 T2 r80count(se_dump_stack*caller,T80* C){
7861 T2 R=0;
7862 void**locals[1];
7863 static se_frame_descriptor fd={"count ARRAY",1,1,"%R80%Result%E2%",1};
7864 se_dump_stack ds;
7865 ds.fd=&fd;
7866 ds.current=((void**)&C);
7867 ds.p=130063112;
7868 ds.caller=caller;
7869 ds.locals=locals;
7870 locals[0]=(void**)&R;
7871 se_dst=&ds;/*link*/
7872 (ds.p=130063636);
7873 R=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
7874 if(fd.assertion_flag){
7875 fd.assertion_flag=0;
7876 (ds.p=75511330);
7877 ac_ens((R)==((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
7878 fd.assertion_flag=1;
7879 }
7880 if(se_rci(caller,C))se_i80(&ds,C);
7881 se_dst=caller;/*unlink*/
7882 return R;
7883 }
7884
7885 void r80put(se_dump_stack*caller,T80* C,T6 a1,T2 a2){
7886 T2 o36_106_22=0;
7887 void**locals[3];
7888 static se_frame_descriptor fd={"put ARRAY",1,3,"%R80%element%E6%i%E2%old value%E2%",1};
7889 se_dump_stack ds;
7890 ds.fd=&fd;
7891 ds.current=((void**)&C);
7892 ds.p=130065672;
7893 ds.caller=caller;
7894 ds.locals=locals;
7895 locals[0]=(void**)&a1;
7896 locals[1]=(void**)&a2;
7897 locals[2]=(void**)&o36_106_22;
7898 se_dst=&ds;/*link*/
7899 o36_106_22=r80count(&ds,C);
7900 se_require_uppermost_flag=1;
7901 if(fd.assertion_flag){
7902 fd.assertion_flag=0;
7903 (ds.p=75523604);
7904 ac_req(r80valid_index(&ds,C,a2),NULL);
7905 fd.assertion_flag=1;
7906 }
7907 (ds.p=130066212);
7908 ((/*RF2*/(C)->_storage/*4*/))[(a2)-((/*RF2*/(C)->_lower/*16*/))]=(a1);
7909 if(fd.assertion_flag){
7910 fd.assertion_flag=0;
7911 (ds.p=75524388);
7912 ac_ens((r80item(&ds,C,a2))==(a1),NULL);
7913 (ds.p=75524640);
7914 ac_ens((r80count(&ds,C))==(o36_106_22),NULL);
7915 fd.assertion_flag=1;
7916 }
7917 if(se_rci(caller,C))se_i80(&ds,C);
7918 se_dst=caller;/*unlink*/
7919 }
7920
7921 T6 r80is_equal(se_dump_stack*caller,T80* C,T0* a1){
7922 T6 R=0;
7923 void**locals[2];
7924 static se_frame_descriptor fd={"is_equal ARRAY",1,2,"%R80%other%R80%Result%E6%",1};
7925 se_dump_stack ds;
7926 ds.fd=&fd;
7927 ds.current=((void**)&C);
7928 ds.p=130102280;
7929 ds.caller=caller;
7930 ds.locals=locals;
7931 locals[0]=(void**)&a1;
7932 locals[1]=(void**)&R;
7933 se_dst=&ds;/*link*/
7934 se_require_uppermost_flag=1;
7935 if(fd.assertion_flag){
7936 fd.assertion_flag=0;
7937 (ds.p=2122048);
7938 ac_req((a1)!=((void*)(NULL)),"other_not_void");
7939 fd.assertion_flag=1;
7940 }
7941 /*[IF*/
7942 if(((ds.p=130102826),(C)==((void*)(a1)))){
7943 (ds.p=130103066);
7944 R=1;
7945 }
7946 else if(((ds.p=130103370),(((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,130103346))))->_lower/*16*/)))&&(((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,130103404))))->_upper/*12*/))))){
7947 (ds.p=130103578);
7948 R=r82fast_memcmp(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,130103638))))->_storage/*4*/),r80count(&ds,C));
7949 }
7950 /*FI]*/
7951 if(fd.assertion_flag){
7952 fd.assertion_flag=0;
7953 (ds.p=75585556);
7954 ac_ens((!(R))||(r6_px_and(&ds,((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,75585590))))->_lower/*16*/)),((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i80(&ds,((T80*)ci(80,a1,75585638))))->_upper/*12*/)))),NULL);
7955 (ds.p=2122846);
7956 ac_ens((!(r80standard_is_equal(&ds,C,a1)))||(R),"consistent");
7957 (ds.p=2123064);
7958 ac_ens((!(R))||(r80is_equal(&ds,se_i80(&ds,((T80*)ci(80,a1,2123080))),(T0*)C)),"symmetric");
7959 fd.assertion_flag=1;
7960 }
7961 if(se_rci(caller,C))se_i80(&ds,C);
7962 se_dst=caller;/*unlink*/
7963 return R;
7964 }
7965
7966 T6 r80item(se_dump_stack*caller,T80* C,T2 a1){
7967 T6 R=0;
7968 void**locals[2];
7969 static se_frame_descriptor fd={"item ARRAY",1,2,"%R80%i%E2%Result%E6%",1};
7970 se_dump_stack ds;
7971 ds.fd=&fd;
7972 ds.current=((void**)&C);
7973 ds.p=130064392;
7974 ds.caller=caller;
7975 ds.locals=locals;
7976 locals[0]=(void**)&a1;
7977 locals[1]=(void**)&R;
7978 se_dst=&ds;/*link*/
7979 se_require_uppermost_flag=1;
7980 if(fd.assertion_flag){
7981 fd.assertion_flag=0;
7982 (ds.p=75516692);
7983 ac_req(r80valid_index(&ds,C,a1),NULL);
7984 fd.assertion_flag=1;
7985 }
7986 (ds.p=130064916);
7987 R=((/*RF2*/(C)->_storage/*4*/))[(a1)-((/*RF2*/(C)->_lower/*16*/))];
7988 if(se_rci(caller,C))se_i80(&ds,C);
7989 se_dst=caller;/*unlink*/
7990 return R;
7991 }
7992
7993 T6 r80valid_index(se_dump_stack*caller,T80* C,T2 a1){
7994 T6 R=0;
7995 void**locals[2];
7996 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R80%index%E2%Result%E6%",1};
7997 se_dump_stack ds;
7998 ds.fd=&fd;
7999 ds.current=((void**)&C);
8000 ds.p=75507478;
8001 ds.caller=caller;
8002 ds.locals=locals;
8003 locals[0]=(void**)&a1;
8004 locals[1]=(void**)&R;
8005 se_dst=&ds;/*link*/
8006 (ds.p=75508500);
8007 R=(((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)));
8008 if(fd.assertion_flag){
8009 fd.assertion_flag=0;
8010 (ds.p=75509026);
8011 ac_ens((R)==((((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)))),NULL);
8012 fd.assertion_flag=1;
8013 }
8014 if(se_rci(caller,C))se_i80(&ds,C);
8015 se_dst=caller;/*unlink*/
8016 return R;
8017 }
8018
8019 void r80make(se_dump_stack*caller,T80* C,T2 a1,T2 a2){
8020 T2 _needed=0;
8021 void**locals[3];
8022 static se_frame_descriptor fd={"make ARRAY",1,3,"%R80%min_index%E2%max_index%E2%needed%E2%",1};
8023 se_dump_stack ds;
8024 ds.fd=&fd;
8025 ds.current=((void**)&C);
8026 ds.p=130030600;
8027 ds.caller=caller;
8028 ds.locals=locals;
8029 locals[0]=(void**)&a1;
8030 locals[1]=(void**)&a2;
8031 locals[2]=(void**)&_needed;
8032 se_dst=&ds;/*link*/
8033 se_require_uppermost_flag=1;
8034 if(fd.assertion_flag){
8035 fd.assertion_flag=0;
8036 (ds.p=130031940);
8037 ac_req((a1)<=((a2)+(1)),"valid_bounds");
8038 fd.assertion_flag=1;
8039 }
8040 (ds.p=130032916);
8041 (/*SFN*/C->_lower/*16*/)=a1;
8042 (ds.p=130033172);
8043 (/*SFN*/C->_upper/*12*/)=a2;
8044 (ds.p=130033428);
8045 _needed=((a2)-(a1))+(1);
8046 /*[IF*/
8047 if(((ds.p=130033704),(_needed)>(0))){
8048 /*[IF*/
8049 if(((ds.p=130033970),((/*RF2*/(C)->_capacity/*8*/))<(_needed))){
8050 (ds.p=130034208);
8051 (/*SFN*/C->_storage/*4*/)=new82(_needed);
8052 (ds.p=130034464);
8053 (/*SFN*/C->_capacity/*8*/)=_needed;
8054 }
8055 else{
8056 (ds.p=130034976);
8057 r80clear_all(&ds,C);
8058 }
8059 /*FI]*/
8060 }
8061 /*FI]*/
8062 if(fd.assertion_flag){
8063 fd.assertion_flag=0;
8064 (ds.p=130036022);
8065 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(a1),"lower_set");
8066 (ds.p=130036278);
8067 ac_ens(((/*RF2*/(C)->_upper/*12*/))==(a2),"upper_set");
8068 (ds.p=130036522);
8069 ac_ens(r80all_default(&ds,C),"items_set");
8070 fd.assertion_flag=1;
8071 }
8072 if(se_rci(caller,C))se_i80(&ds,C);
8073 se_dst=caller;/*unlink*/
8074 }
8075
8076 void r80set_all_with(se_dump_stack*caller,T80* C,T6 a1){
8077 T2 o36_130_22=0;
8078 void**locals[2];
8079 static se_frame_descriptor fd={"set_all_with ARRAY",1,2,"%R80%v%E6%old value%E2%",1};
8080 se_dump_stack ds;
8081 ds.fd=&fd;
8082 ds.current=((void**)&C);
8083 ds.p=130076424;
8084 ds.caller=caller;
8085 ds.locals=locals;
8086 locals[0]=(void**)&a1;
8087 locals[1]=(void**)&o36_130_22;
8088 se_dst=&ds;/*link*/
8089 o36_130_22=r80count(&ds,C);
8090 (ds.p=130076964);
8091 r82set_all_with(&ds,(/*RF2*/(C)->_storage/*4*/),a1,((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)));
8092 if(fd.assertion_flag){
8093 fd.assertion_flag=0;
8094 (ds.p=75530784);
8095 ac_ens((r80count(&ds,C))==(o36_130_22),NULL);
8096 fd.assertion_flag=1;
8097 }
8098 if(se_rci(caller,C))se_i80(&ds,C);
8099 se_dst=caller;/*unlink*/
8100 }
8101
8102 T6 r80standard_is_equal(se_dump_stack*caller,T80* C,T0* a1){
8103 T6 R=0;
8104 void**locals[2];
8105 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R80%other%R80%Result%E6%",1};
8106 se_dump_stack ds;
8107 ds.fd=&fd;
8108 ds.current=((void**)&C);
8109 ds.p=2128406;
8110 ds.caller=caller;
8111 ds.locals=locals;
8112 locals[0]=(void**)&a1;
8113 locals[1]=(void**)&R;
8114 se_dst=&ds;/*link*/
8115 se_require_uppermost_flag=1;
8116 if(fd.assertion_flag){
8117 fd.assertion_flag=0;
8118 (ds.p=2129184);
8119 ac_req((a1)!=((void*)(NULL)),NULL);
8120 fd.assertion_flag=1;
8121 }
8122 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
8123 fd.assertion_flag=0;
8124 (ds.p=2129976);
8125 ac_ens((!(R))||(r80standard_is_equal(&ds,se_i80(&ds,((T80*)ci(80,a1,2129992))),(T0*)C)),"symmetric");
8126 fd.assertion_flag=1;
8127 }
8128 if(se_rci(caller,C))se_i80(&ds,C);
8129 se_dst=caller;/*unlink*/
8130 return R;
8131 }
8132
8133 T6 r80all_default(se_dump_stack*caller,T80* C){
8134 T6 R=0;
8135 void**locals[1];
8136 static se_frame_descriptor fd={"all_default ARRAY",1,1,"%R80%Result%E6%",1};
8137 se_dump_stack ds;
8138 ds.fd=&fd;
8139 ds.current=((void**)&C);
8140 ds.p=130095880;
8141 ds.caller=caller;
8142 ds.locals=locals;
8143 locals[0]=(void**)&R;
8144 se_dst=&ds;/*link*/
8145 (ds.p=130096404);
8146 R=r82all_default(&ds,(/*RF2*/(C)->_storage/*4*/),((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)));
8147 if(se_rci(caller,C))se_i80(&ds,C);
8148 se_dst=caller;/*unlink*/
8149 return R;
8150 }
8151
8152 T0* r80twin(se_dump_stack*caller,T80* C){
8153 T0* R=NULL;
8154 void**locals[1];
8155 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R80%Result%R80%",1};
8156 se_dump_stack ds;
8157 ds.fd=&fd;
8158 ds.current=((void**)&C);
8159 ds.p=2140182;
8160 ds.caller=caller;
8161 ds.locals=locals;
8162 locals[0]=(void**)&R;
8163 se_dst=&ds;/*link*/
8164 R=((void*)new80());
8165 r80copy(&ds,((T80*)R),((T0*)C));
8166 if(fd.assertion_flag){
8167 fd.assertion_flag=0;
8168 (ds.p=2142256);
8169 ac_ens(r80is_equal(&ds,se_i80(&ds,((T80*)ci(80,R,2142242))),(T0*)C),"equal");
8170 fd.assertion_flag=1;
8171 }
8172 if(se_rci(caller,C))se_i80(&ds,C);
8173 se_dst=caller;/*unlink*/
8174 return R;
8175 }
8176 se_frame_descriptor se_ifd80={"invariant once ARRAY[BOOLEAN]",1,0,"%R80%",1};
8177
8178 T80*se_i80(se_dump_stack*caller,T80*C){
8179 se_dump_stack ds;
8180 ds.fd=&se_ifd80;
8181 ds.current=((void**)&C);
8182 ds.p=130026510;
8183 ds.caller=caller;
8184 se_dst=&ds;
8185 if(ds.fd->assertion_flag){
8186 ds.fd->assertion_flag=0;
8187 (ds.p=75651888);
8188 ac_inv(((/*RF2*/(C)->_lower/*16*/))<=(((/*RF2*/(C)->_upper/*12*/))+(1)),"valid_bounds");
8189 (ds.p=132150298);
8190 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>=((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
8191 (ds.p=132150818);
8192 ac_inv((!(((/*RF2*/(C)->_capacity/*8*/))>(0)))||(r82is_not_null(&ds,(/*RF2*/(C)->_storage/*4*/))),NULL);
8193 ds.fd->assertion_flag=1;
8194 }
8195 se_dst=caller;
8196 return C;
8197 }
8198
8199 void r153copy(se_dump_stack*caller,T153* C,T0* a1){
8200 T2 _needed_capacity=0;
8201 void**locals[2];
8202 static se_frame_descriptor fd={"copy ARRAY",1,2,"%R153%other%R153%needed_capacity%E2%",1};
8203 se_dump_stack ds;
8204 ds.fd=&fd;
8205 ds.current=((void**)&C);
8206 ds.p=130072328;
8207 ds.caller=caller;
8208 ds.locals=locals;
8209 locals[0]=(void**)&a1;
8210 locals[1]=(void**)&_needed_capacity;
8211 se_dst=&ds;/*link*/
8212 se_require_uppermost_flag=1;
8213 if(fd.assertion_flag){
8214 fd.assertion_flag=0;
8215 (ds.p=2144064);
8216 ac_req((a1)!=((void*)(NULL)),"other_not_void");
8217 fd.assertion_flag=1;
8218 }
8219 (ds.p=130073364);
8220 (/*SFN*/C->_lower/*16*/)=(/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,130073382))))->_lower/*16*/);
8221 (ds.p=130073620);
8222 (/*SFN*/C->_upper/*12*/)=(/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,130073638))))->_upper/*12*/);
8223 (ds.p=130073876);
8224 _needed_capacity=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
8225 /*[IF*/
8226 if(((ds.p=130074156),((/*RF2*/(C)->_capacity/*8*/))<(_needed_capacity))){
8227 (ds.p=130074394);
8228 (/*SFN*/C->_storage/*4*/)=new9(_needed_capacity);
8229 (ds.p=130074650);
8230 (/*SFN*/C->_capacity/*8*/)=_needed_capacity;
8231 }
8232 /*FI]*/
8233 /*[IF*/
8234 if(((ds.p=130075194),(_needed_capacity)>(0))){
8235 (ds.p=130075434);
8236 r9copy_from(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,130075454))))->_storage/*4*/),(_needed_capacity)-(1));
8237 }
8238 /*FI]*/
8239 if(fd.assertion_flag){
8240 fd.assertion_flag=0;
8241 (ds.p=2144808);
8242 ac_ens(r153is_equal(&ds,C,a1),"is_equal");
8243 fd.assertion_flag=1;
8244 }
8245 if(se_rci(caller,C))se_i153(&ds,C);
8246 se_dst=caller;/*unlink*/
8247 }
8248
8249 void r153clear_all(se_dump_stack*caller,T153* C){
8250 T3 _value=0;
8251 T2 o36_162_29=0;
8252 T2 o36_163_29=0;
8253 void**locals[3];
8254 static se_frame_descriptor fd={"clear_all COLLECTION",1,3,"%R153%value%E3%old value%E2%old value%E2%",1};
8255 se_dump_stack ds;
8256 ds.fd=&fd;
8257 ds.current=((void**)&C);
8258 ds.p=75536904;
8259 ds.caller=caller;
8260 ds.locals=locals;
8261 locals[0]=(void**)&_value;
8262 locals[1]=(void**)&o36_162_29;
8263 locals[2]=(void**)&o36_163_29;
8264 se_dst=&ds;/*link*/
8265 o36_162_29=(/*RF2*/(C)->_upper/*12*/);
8266 o36_163_29=(/*RF2*/(C)->_lower/*16*/);
8267 (ds.p=75538452);
8268 r153set_all_with(&ds,C,_value);
8269 if(fd.assertion_flag){
8270 fd.assertion_flag=0;
8271 (ds.p=75538990);
8272 ac_ens(((/*RF2*/(C)->_upper/*12*/))==(o36_162_29),"stable_upper");
8273 (ds.p=75539246);
8274 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(o36_163_29),"stable_lower");
8275 (ds.p=75539476);
8276 ac_ens(r153all_default(&ds,C),NULL);
8277 fd.assertion_flag=1;
8278 }
8279 if(se_rci(caller,C))se_i153(&ds,C);
8280 se_dst=caller;/*unlink*/
8281 }
8282
8283 T2 r153count(se_dump_stack*caller,T153* C){
8284 T2 R=0;
8285 void**locals[1];
8286 static se_frame_descriptor fd={"count ARRAY",1,1,"%R153%Result%E2%",1};
8287 se_dump_stack ds;
8288 ds.fd=&fd;
8289 ds.current=((void**)&C);
8290 ds.p=130063112;
8291 ds.caller=caller;
8292 ds.locals=locals;
8293 locals[0]=(void**)&R;
8294 se_dst=&ds;/*link*/
8295 (ds.p=130063636);
8296 R=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
8297 if(fd.assertion_flag){
8298 fd.assertion_flag=0;
8299 (ds.p=75511330);
8300 ac_ens((R)==((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
8301 fd.assertion_flag=1;
8302 }
8303 if(se_rci(caller,C))se_i153(&ds,C);
8304 se_dst=caller;/*unlink*/
8305 return R;
8306 }
8307
8308 void r153put(se_dump_stack*caller,T153* C,T3 a1,T2 a2){
8309 T2 o36_106_22=0;
8310 void**locals[3];
8311 static se_frame_descriptor fd={"put ARRAY",1,3,"%R153%element%E3%i%E2%old value%E2%",1};
8312 se_dump_stack ds;
8313 ds.fd=&fd;
8314 ds.current=((void**)&C);
8315 ds.p=130065672;
8316 ds.caller=caller;
8317 ds.locals=locals;
8318 locals[0]=(void**)&a1;
8319 locals[1]=(void**)&a2;
8320 locals[2]=(void**)&o36_106_22;
8321 se_dst=&ds;/*link*/
8322 o36_106_22=r153count(&ds,C);
8323 se_require_uppermost_flag=1;
8324 if(fd.assertion_flag){
8325 fd.assertion_flag=0;
8326 (ds.p=75523604);
8327 ac_req(r153valid_index(&ds,C,a2),NULL);
8328 fd.assertion_flag=1;
8329 }
8330 (ds.p=130066212);
8331 ((/*RF2*/(C)->_storage/*4*/))[(a2)-((/*RF2*/(C)->_lower/*16*/))]=(a1);
8332 if(fd.assertion_flag){
8333 fd.assertion_flag=0;
8334 (ds.p=75524388);
8335 ac_ens((r153item(&ds,C,a2))==(a1),NULL);
8336 (ds.p=75524640);
8337 ac_ens((r153count(&ds,C))==(o36_106_22),NULL);
8338 fd.assertion_flag=1;
8339 }
8340 if(se_rci(caller,C))se_i153(&ds,C);
8341 se_dst=caller;/*unlink*/
8342 }
8343
8344 T6 r153is_equal(se_dump_stack*caller,T153* C,T0* a1){
8345 T6 R=0;
8346 void**locals[2];
8347 static se_frame_descriptor fd={"is_equal ARRAY",1,2,"%R153%other%R153%Result%E6%",1};
8348 se_dump_stack ds;
8349 ds.fd=&fd;
8350 ds.current=((void**)&C);
8351 ds.p=130102280;
8352 ds.caller=caller;
8353 ds.locals=locals;
8354 locals[0]=(void**)&a1;
8355 locals[1]=(void**)&R;
8356 se_dst=&ds;/*link*/
8357 se_require_uppermost_flag=1;
8358 if(fd.assertion_flag){
8359 fd.assertion_flag=0;
8360 (ds.p=2122048);
8361 ac_req((a1)!=((void*)(NULL)),"other_not_void");
8362 fd.assertion_flag=1;
8363 }
8364 /*[IF*/
8365 if(((ds.p=130102826),(C)==((void*)(a1)))){
8366 (ds.p=130103066);
8367 R=1;
8368 }
8369 else if(((ds.p=130103370),(((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,130103346))))->_lower/*16*/)))&&(((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,130103404))))->_upper/*12*/))))){
8370 (ds.p=130103578);
8371 R=r9fast_memcmp(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,130103638))))->_storage/*4*/),r153count(&ds,C));
8372 }
8373 /*FI]*/
8374 if(fd.assertion_flag){
8375 fd.assertion_flag=0;
8376 (ds.p=75585556);
8377 ac_ens((!(R))||(r6_px_and(&ds,((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,75585590))))->_lower/*16*/)),((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i153(&ds,((T153*)ci(153,a1,75585638))))->_upper/*12*/)))),NULL);
8378 (ds.p=2122846);
8379 ac_ens((!(r153standard_is_equal(&ds,C,a1)))||(R),"consistent");
8380 (ds.p=2123064);
8381 ac_ens((!(R))||(r153is_equal(&ds,se_i153(&ds,((T153*)ci(153,a1,2123080))),(T0*)C)),"symmetric");
8382 fd.assertion_flag=1;
8383 }
8384 if(se_rci(caller,C))se_i153(&ds,C);
8385 se_dst=caller;/*unlink*/
8386 return R;
8387 }
8388
8389 T3 r153item(se_dump_stack*caller,T153* C,T2 a1){
8390 T3 R=0;
8391 void**locals[2];
8392 static se_frame_descriptor fd={"item ARRAY",1,2,"%R153%i%E2%Result%E3%",1};
8393 se_dump_stack ds;
8394 ds.fd=&fd;
8395 ds.current=((void**)&C);
8396 ds.p=130064392;
8397 ds.caller=caller;
8398 ds.locals=locals;
8399 locals[0]=(void**)&a1;
8400 locals[1]=(void**)&R;
8401 se_dst=&ds;/*link*/
8402 se_require_uppermost_flag=1;
8403 if(fd.assertion_flag){
8404 fd.assertion_flag=0;
8405 (ds.p=75516692);
8406 ac_req(r153valid_index(&ds,C,a1),NULL);
8407 fd.assertion_flag=1;
8408 }
8409 (ds.p=130064916);
8410 R=((/*RF2*/(C)->_storage/*4*/))[(a1)-((/*RF2*/(C)->_lower/*16*/))];
8411 if(se_rci(caller,C))se_i153(&ds,C);
8412 se_dst=caller;/*unlink*/
8413 return R;
8414 }
8415
8416 T6 r153valid_index(se_dump_stack*caller,T153* C,T2 a1){
8417 T6 R=0;
8418 void**locals[2];
8419 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R153%index%E2%Result%E6%",1};
8420 se_dump_stack ds;
8421 ds.fd=&fd;
8422 ds.current=((void**)&C);
8423 ds.p=75507478;
8424 ds.caller=caller;
8425 ds.locals=locals;
8426 locals[0]=(void**)&a1;
8427 locals[1]=(void**)&R;
8428 se_dst=&ds;/*link*/
8429 (ds.p=75508500);
8430 R=(((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)));
8431 if(fd.assertion_flag){
8432 fd.assertion_flag=0;
8433 (ds.p=75509026);
8434 ac_ens((R)==((((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)))),NULL);
8435 fd.assertion_flag=1;
8436 }
8437 if(se_rci(caller,C))se_i153(&ds,C);
8438 se_dst=caller;/*unlink*/
8439 return R;
8440 }
8441
8442 void r153make(se_dump_stack*caller,T153* C,T2 a1,T2 a2){
8443 T2 _needed=0;
8444 void**locals[3];
8445 static se_frame_descriptor fd={"make ARRAY",1,3,"%R153%min_index%E2%max_index%E2%needed%E2%",1};
8446 se_dump_stack ds;
8447 ds.fd=&fd;
8448 ds.current=((void**)&C);
8449 ds.p=130030600;
8450 ds.caller=caller;
8451 ds.locals=locals;
8452 locals[0]=(void**)&a1;
8453 locals[1]=(void**)&a2;
8454 locals[2]=(void**)&_needed;
8455 se_dst=&ds;/*link*/
8456 se_require_uppermost_flag=1;
8457 if(fd.assertion_flag){
8458 fd.assertion_flag=0;
8459 (ds.p=130031940);
8460 ac_req((a1)<=((a2)+(1)),"valid_bounds");
8461 fd.assertion_flag=1;
8462 }
8463 (ds.p=130032916);
8464 (/*SFN*/C->_lower/*16*/)=a1;
8465 (ds.p=130033172);
8466 (/*SFN*/C->_upper/*12*/)=a2;
8467 (ds.p=130033428);
8468 _needed=((a2)-(a1))+(1);
8469 /*[IF*/
8470 if(((ds.p=130033704),(_needed)>(0))){
8471 /*[IF*/
8472 if(((ds.p=130033970),((/*RF2*/(C)->_capacity/*8*/))<(_needed))){
8473 (ds.p=130034208);
8474 (/*SFN*/C->_storage/*4*/)=new9(_needed);
8475 (ds.p=130034464);
8476 (/*SFN*/C->_capacity/*8*/)=_needed;
8477 }
8478 else{
8479 (ds.p=130034976);
8480 r153clear_all(&ds,C);
8481 }
8482 /*FI]*/
8483 }
8484 /*FI]*/
8485 if(fd.assertion_flag){
8486 fd.assertion_flag=0;
8487 (ds.p=130036022);
8488 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(a1),"lower_set");
8489 (ds.p=130036278);
8490 ac_ens(((/*RF2*/(C)->_upper/*12*/))==(a2),"upper_set");
8491 (ds.p=130036522);
8492 ac_ens(r153all_default(&ds,C),"items_set");
8493 fd.assertion_flag=1;
8494 }
8495 if(se_rci(caller,C))se_i153(&ds,C);
8496 se_dst=caller;/*unlink*/
8497 }
8498
8499 void r153set_all_with(se_dump_stack*caller,T153* C,T3 a1){
8500 T2 o36_130_22=0;
8501 void**locals[2];
8502 static se_frame_descriptor fd={"set_all_with ARRAY",1,2,"%R153%v%E3%old value%E2%",1};
8503 se_dump_stack ds;
8504 ds.fd=&fd;
8505 ds.current=((void**)&C);
8506 ds.p=130076424;
8507 ds.caller=caller;
8508 ds.locals=locals;
8509 locals[0]=(void**)&a1;
8510 locals[1]=(void**)&o36_130_22;
8511 se_dst=&ds;/*link*/
8512 o36_130_22=r153count(&ds,C);
8513 (ds.p=130076964);
8514 r9set_all_with(&ds,(/*RF2*/(C)->_storage/*4*/),a1,((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)));
8515 if(fd.assertion_flag){
8516 fd.assertion_flag=0;
8517 (ds.p=75530784);
8518 ac_ens((r153count(&ds,C))==(o36_130_22),NULL);
8519 fd.assertion_flag=1;
8520 }
8521 if(se_rci(caller,C))se_i153(&ds,C);
8522 se_dst=caller;/*unlink*/
8523 }
8524
8525 T6 r153standard_is_equal(se_dump_stack*caller,T153* C,T0* a1){
8526 T6 R=0;
8527 void**locals[2];
8528 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R153%other%R153%Result%E6%",1};
8529 se_dump_stack ds;
8530 ds.fd=&fd;
8531 ds.current=((void**)&C);
8532 ds.p=2128406;
8533 ds.caller=caller;
8534 ds.locals=locals;
8535 locals[0]=(void**)&a1;
8536 locals[1]=(void**)&R;
8537 se_dst=&ds;/*link*/
8538 se_require_uppermost_flag=1;
8539 if(fd.assertion_flag){
8540 fd.assertion_flag=0;
8541 (ds.p=2129184);
8542 ac_req((a1)!=((void*)(NULL)),NULL);
8543 fd.assertion_flag=1;
8544 }
8545 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
8546 fd.assertion_flag=0;
8547 (ds.p=2129976);
8548 ac_ens((!(R))||(r153standard_is_equal(&ds,se_i153(&ds,((T153*)ci(153,a1,2129992))),(T0*)C)),"symmetric");
8549 fd.assertion_flag=1;
8550 }
8551 if(se_rci(caller,C))se_i153(&ds,C);
8552 se_dst=caller;/*unlink*/
8553 return R;
8554 }
8555
8556 T6 r153all_default(se_dump_stack*caller,T153* C){
8557 T6 R=0;
8558 void**locals[1];
8559 static se_frame_descriptor fd={"all_default ARRAY",1,1,"%R153%Result%E6%",1};
8560 se_dump_stack ds;
8561 ds.fd=&fd;
8562 ds.current=((void**)&C);
8563 ds.p=130095880;
8564 ds.caller=caller;
8565 ds.locals=locals;
8566 locals[0]=(void**)&R;
8567 se_dst=&ds;/*link*/
8568 (ds.p=130096404);
8569 R=r9all_default(&ds,(/*RF2*/(C)->_storage/*4*/),((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)));
8570 if(se_rci(caller,C))se_i153(&ds,C);
8571 se_dst=caller;/*unlink*/
8572 return R;
8573 }
8574
8575 T0* r153twin(se_dump_stack*caller,T153* C){
8576 T0* R=NULL;
8577 void**locals[1];
8578 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R153%Result%R153%",1};
8579 se_dump_stack ds;
8580 ds.fd=&fd;
8581 ds.current=((void**)&C);
8582 ds.p=2140182;
8583 ds.caller=caller;
8584 ds.locals=locals;
8585 locals[0]=(void**)&R;
8586 se_dst=&ds;/*link*/
8587 R=((void*)new153());
8588 r153copy(&ds,((T153*)R),((T0*)C));
8589 if(fd.assertion_flag){
8590 fd.assertion_flag=0;
8591 (ds.p=2142256);
8592 ac_ens(r153is_equal(&ds,se_i153(&ds,((T153*)ci(153,R,2142242))),(T0*)C),"equal");
8593 fd.assertion_flag=1;
8594 }
8595 if(se_rci(caller,C))se_i153(&ds,C);
8596 se_dst=caller;/*unlink*/
8597 return R;
8598 }
8599 se_frame_descriptor se_ifd153={"invariant once ARRAY[CHARACTER]",1,0,"%R153%",1};
8600
8601 T153*se_i153(se_dump_stack*caller,T153*C){
8602 se_dump_stack ds;
8603 ds.fd=&se_ifd153;
8604 ds.current=((void**)&C);
8605 ds.p=130026510;
8606 ds.caller=caller;
8607 se_dst=&ds;
8608 if(ds.fd->assertion_flag){
8609 ds.fd->assertion_flag=0;
8610 (ds.p=75651888);
8611 ac_inv(((/*RF2*/(C)->_lower/*16*/))<=(((/*RF2*/(C)->_upper/*12*/))+(1)),"valid_bounds");
8612 (ds.p=132150298);
8613 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>=((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
8614 (ds.p=132150818);
8615 ac_inv((!(((/*RF2*/(C)->_capacity/*8*/))>(0)))||(r9is_not_null(&ds,(/*RF2*/(C)->_storage/*4*/))),NULL);
8616 ds.fd->assertion_flag=1;
8617 }
8618 se_dst=caller;
8619 return C;
8620 }
8621
8622 void r64copy(se_dump_stack*caller,T64* C,T0* a1){
8623 T2 _needed_capacity=0;
8624 void**locals[2];
8625 static se_frame_descriptor fd={"copy ARRAY",1,2,"%R64%other%R64%needed_capacity%E2%",1};
8626 se_dump_stack ds;
8627 ds.fd=&fd;
8628 ds.current=((void**)&C);
8629 ds.p=130072328;
8630 ds.caller=caller;
8631 ds.locals=locals;
8632 locals[0]=(void**)&a1;
8633 locals[1]=(void**)&_needed_capacity;
8634 se_dst=&ds;/*link*/
8635 se_require_uppermost_flag=1;
8636 if(fd.assertion_flag){
8637 fd.assertion_flag=0;
8638 (ds.p=2144064);
8639 ac_req((a1)!=((void*)(NULL)),"other_not_void");
8640 fd.assertion_flag=1;
8641 }
8642 (ds.p=130073364);
8643 (/*SFN*/C->_lower/*16*/)=(/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,130073382))))->_lower/*16*/);
8644 (ds.p=130073620);
8645 (/*SFN*/C->_upper/*12*/)=(/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,130073638))))->_upper/*12*/);
8646 (ds.p=130073876);
8647 _needed_capacity=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
8648 /*[IF*/
8649 if(((ds.p=130074156),((/*RF2*/(C)->_capacity/*8*/))<(_needed_capacity))){
8650 (ds.p=130074394);
8651 (/*SFN*/C->_storage/*4*/)=new69(_needed_capacity);
8652 (ds.p=130074650);
8653 (/*SFN*/C->_capacity/*8*/)=_needed_capacity;
8654 }
8655 /*FI]*/
8656 /*[IF*/
8657 if(((ds.p=130075194),(_needed_capacity)>(0))){
8658 (ds.p=130075434);
8659 r69copy_from(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,130075454))))->_storage/*4*/),(_needed_capacity)-(1));
8660 }
8661 /*FI]*/
8662 if(fd.assertion_flag){
8663 fd.assertion_flag=0;
8664 (ds.p=2144808);
8665 ac_ens(r64is_equal(&ds,C,a1),"is_equal");
8666 fd.assertion_flag=1;
8667 }
8668 if(se_rci(caller,C))se_i64(&ds,C);
8669 se_dst=caller;/*unlink*/
8670 }
8671
8672 T0* r64last(se_dump_stack*caller,T64* C){
8673 T0* R=NULL;
8674 void**locals[1];
8675 static se_frame_descriptor fd={"last ARRAYED_COLLECTION",1,1,"%R64%Result%R7%",1};
8676 se_dump_stack ds;
8677 ds.fd=&fd;
8678 ds.current=((void**)&C);
8679 ds.p=132135944;
8680 ds.caller=caller;
8681 ds.locals=locals;
8682 locals[0]=(void**)&R;
8683 se_dst=&ds;/*link*/
8684 se_require_uppermost_flag=1;
8685 if(fd.assertion_flag){
8686 fd.assertion_flag=0;
8687 (ds.p=75520788);
8688 ac_req(r6_ix_not(&ds,r64is_empty(&ds,C)),NULL);
8689 fd.assertion_flag=1;
8690 }
8691 (ds.p=132136468);
8692 R=r64item(&ds,C,(/*RF2*/(C)->_upper/*12*/));
8693 if(fd.assertion_flag){
8694 fd.assertion_flag=0;
8695 (ds.p=75521570);
8696 ac_ens((R)==((void*)(r64item(&ds,C,(/*RF2*/(C)->_upper/*12*/)))),NULL);
8697 fd.assertion_flag=1;
8698 }
8699 if(se_rci(caller,C))se_i64(&ds,C);
8700 se_dst=caller;/*unlink*/
8701 return R;
8702 }
8703
8704 T2 r64count(se_dump_stack*caller,T64* C){
8705 T2 R=0;
8706 void**locals[1];
8707 static se_frame_descriptor fd={"count ARRAY",1,1,"%R64%Result%E2%",1};
8708 se_dump_stack ds;
8709 ds.fd=&fd;
8710 ds.current=((void**)&C);
8711 ds.p=130063112;
8712 ds.caller=caller;
8713 ds.locals=locals;
8714 locals[0]=(void**)&R;
8715 se_dst=&ds;/*link*/
8716 (ds.p=130063636);
8717 R=(((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1);
8718 if(fd.assertion_flag){
8719 fd.assertion_flag=0;
8720 (ds.p=75511330);
8721 ac_ens((R)==((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
8722 fd.assertion_flag=1;
8723 }
8724 if(se_rci(caller,C))se_i64(&ds,C);
8725 se_dst=caller;/*unlink*/
8726 return R;
8727 }
8728
8729 void r64put(se_dump_stack*caller,T64* C,T0* a1,T2 a2){
8730 T2 o36_106_22=0;
8731 void**locals[3];
8732 static se_frame_descriptor fd={"put ARRAY",1,3,"%R64%element%R7%i%E2%old value%E2%",1};
8733 se_dump_stack ds;
8734 ds.fd=&fd;
8735 ds.current=((void**)&C);
8736 ds.p=130065672;
8737 ds.caller=caller;
8738 ds.locals=locals;
8739 locals[0]=(void**)&a1;
8740 locals[1]=(void**)&a2;
8741 locals[2]=(void**)&o36_106_22;
8742 se_dst=&ds;/*link*/
8743 o36_106_22=r64count(&ds,C);
8744 se_require_uppermost_flag=1;
8745 if(fd.assertion_flag){
8746 fd.assertion_flag=0;
8747 (ds.p=75523604);
8748 ac_req(r64valid_index(&ds,C,a2),NULL);
8749 fd.assertion_flag=1;
8750 }
8751 (ds.p=130066212);
8752 ((/*RF2*/(C)->_storage/*4*/))[(a2)-((/*RF2*/(C)->_lower/*16*/))]=(a1);
8753 if(fd.assertion_flag){
8754 fd.assertion_flag=0;
8755 (ds.p=75524388);
8756 ac_ens((r64item(&ds,C,a2))==((void*)(a1)),NULL);
8757 (ds.p=75524640);
8758 ac_ens((r64count(&ds,C))==(o36_106_22),NULL);
8759 fd.assertion_flag=1;
8760 }
8761 if(se_rci(caller,C))se_i64(&ds,C);
8762 se_dst=caller;/*unlink*/
8763 }
8764
8765 T6 r64is_equal(se_dump_stack*caller,T64* C,T0* a1){
8766 T6 R=0;
8767 void**locals[2];
8768 static se_frame_descriptor fd={"is_equal ARRAY",1,2,"%R64%other%R64%Result%E6%",1};
8769 se_dump_stack ds;
8770 ds.fd=&fd;
8771 ds.current=((void**)&C);
8772 ds.p=130102280;
8773 ds.caller=caller;
8774 ds.locals=locals;
8775 locals[0]=(void**)&a1;
8776 locals[1]=(void**)&R;
8777 se_dst=&ds;/*link*/
8778 se_require_uppermost_flag=1;
8779 if(fd.assertion_flag){
8780 fd.assertion_flag=0;
8781 (ds.p=2122048);
8782 ac_req((a1)!=((void*)(NULL)),"other_not_void");
8783 fd.assertion_flag=1;
8784 }
8785 /*[IF*/
8786 if(((ds.p=130102826),(C)==((void*)(a1)))){
8787 (ds.p=130103066);
8788 R=1;
8789 }
8790 else if(((ds.p=130103370),(((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,130103346))))->_lower/*16*/)))&&(((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,130103404))))->_upper/*12*/))))){
8791 (ds.p=130103578);
8792 R=r69fast_memcmp(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,130103638))))->_storage/*4*/),r64count(&ds,C));
8793 }
8794 /*FI]*/
8795 if(fd.assertion_flag){
8796 fd.assertion_flag=0;
8797 (ds.p=75585556);
8798 ac_ens((!(R))||(r6_px_and(&ds,((/*RF2*/(C)->_lower/*16*/))==((/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,75585590))))->_lower/*16*/)),((/*RF2*/(C)->_upper/*12*/))==((/*RF2*/(se_i64(&ds,((T64*)ci(64,a1,75585638))))->_upper/*12*/)))),NULL);
8799 (ds.p=2122846);
8800 ac_ens((!(r64standard_is_equal(&ds,C,a1)))||(R),"consistent");
8801 (ds.p=2123064);
8802 ac_ens((!(R))||(r64is_equal(&ds,se_i64(&ds,((T64*)ci(64,a1,2123080))),(T0*)C)),"symmetric");
8803 fd.assertion_flag=1;
8804 }
8805 if(se_rci(caller,C))se_i64(&ds,C);
8806 se_dst=caller;/*unlink*/
8807 return R;
8808 }
8809
8810 T0* r64item(se_dump_stack*caller,T64* C,T2 a1){
8811 T0* R=NULL;
8812 void**locals[2];
8813 static se_frame_descriptor fd={"item ARRAY",1,2,"%R64%i%E2%Result%R7%",1};
8814 se_dump_stack ds;
8815 ds.fd=&fd;
8816 ds.current=((void**)&C);
8817 ds.p=130064392;
8818 ds.caller=caller;
8819 ds.locals=locals;
8820 locals[0]=(void**)&a1;
8821 locals[1]=(void**)&R;
8822 se_dst=&ds;/*link*/
8823 se_require_uppermost_flag=1;
8824 if(fd.assertion_flag){
8825 fd.assertion_flag=0;
8826 (ds.p=75516692);
8827 ac_req(r64valid_index(&ds,C,a1),NULL);
8828 fd.assertion_flag=1;
8829 }
8830 (ds.p=130064916);
8831 R=((/*RF2*/(C)->_storage/*4*/))[(a1)-((/*RF2*/(C)->_lower/*16*/))];
8832 if(se_rci(caller,C))se_i64(&ds,C);
8833 se_dst=caller;/*unlink*/
8834 return R;
8835 }
8836
8837 T6 r64valid_index(se_dump_stack*caller,T64* C,T2 a1){
8838 T6 R=0;
8839 void**locals[2];
8840 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R64%index%E2%Result%E6%",1};
8841 se_dump_stack ds;
8842 ds.fd=&fd;
8843 ds.current=((void**)&C);
8844 ds.p=75507478;
8845 ds.caller=caller;
8846 ds.locals=locals;
8847 locals[0]=(void**)&a1;
8848 locals[1]=(void**)&R;
8849 se_dst=&ds;/*link*/
8850 (ds.p=75508500);
8851 R=(((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)));
8852 if(fd.assertion_flag){
8853 fd.assertion_flag=0;
8854 (ds.p=75509026);
8855 ac_ens((R)==((((/*RF2*/(C)->_lower/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*12*/)))),NULL);
8856 fd.assertion_flag=1;
8857 }
8858 if(se_rci(caller,C))se_i64(&ds,C);
8859 se_dst=caller;/*unlink*/
8860 return R;
8861 }
8862
8863 T6 r64is_empty(se_dump_stack*caller,T64* C){
8864 T6 R=0;
8865 void**locals[1];
8866 static se_frame_descriptor fd={"is_empty ARRAY",1,1,"%R64%Result%E6%",1};
8867 se_dump_stack ds;
8868 ds.fd=&fd;
8869 ds.current=((void**)&C);
8870 ds.p=130061832;
8871 ds.caller=caller;
8872 ds.locals=locals;
8873 locals[0]=(void**)&R;
8874 se_dst=&ds;/*link*/
8875 (ds.p=130062356);
8876 R=((/*RF2*/(C)->_upper/*12*/))<((/*RF2*/(C)->_lower/*16*/));
8877 if(fd.assertion_flag){
8878 fd.assertion_flag=0;
8879 (ds.p=75513108);
8880 ac_ens((R)==((r64count(&ds,C))==(0)),NULL);
8881 fd.assertion_flag=1;
8882 }
8883 if(se_rci(caller,C))se_i64(&ds,C);
8884 se_dst=caller;/*unlink*/
8885 return R;
8886 }
8887
8888 T6 r64standard_is_equal(se_dump_stack*caller,T64* C,T0* a1){
8889 T6 R=0;
8890 void**locals[2];
8891 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R64%other%R64%Result%E6%",1};
8892 se_dump_stack ds;
8893 ds.fd=&fd;
8894 ds.current=((void**)&C);
8895 ds.p=2128406;
8896 ds.caller=caller;
8897 ds.locals=locals;
8898 locals[0]=(void**)&a1;
8899 locals[1]=(void**)&R;
8900 se_dst=&ds;/*link*/
8901 se_require_uppermost_flag=1;
8902 if(fd.assertion_flag){
8903 fd.assertion_flag=0;
8904 (ds.p=2129184);
8905 ac_req((a1)!=((void*)(NULL)),NULL);
8906 fd.assertion_flag=1;
8907 }
8908 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
8909 fd.assertion_flag=0;
8910 (ds.p=2129976);
8911 ac_ens((!(R))||(r64standard_is_equal(&ds,se_i64(&ds,((T64*)ci(64,a1,2129992))),(T0*)C)),"symmetric");
8912 fd.assertion_flag=1;
8913 }
8914 if(se_rci(caller,C))se_i64(&ds,C);
8915 se_dst=caller;/*unlink*/
8916 return R;
8917 }
8918
8919 void r64add_last(se_dump_stack*caller,T64* C,T0* a1){
8920 T2 _new_capacity=0;
8921 T2 o36_185_26=0;
8922 T2 o36_186_22=0;
8923 T2 o36_187_26=0;
8924 void**locals[5];
8925 static se_frame_descriptor fd={"add_last ARRAY",1,5,"%R64%element%R7%new_capacity%E2%old value%E2%old value%E2%old value%E2%",1};
8926 se_dump_stack ds;
8927 ds.fd=&fd;
8928 ds.current=((void**)&C);
8929 ds.p=130085896;
8930 ds.caller=caller;
8931 ds.locals=locals;
8932 locals[0]=(void**)&a1;
8933 locals[1]=(void**)&_new_capacity;
8934 locals[2]=(void**)&o36_185_26;
8935 locals[3]=(void**)&o36_186_22;
8936 locals[4]=(void**)&o36_187_26;
8937 se_dst=&ds;/*link*/
8938 o36_185_26=r64count(&ds,C);
8939 o36_186_22=(/*RF2*/(C)->_lower/*16*/);
8940 o36_187_26=(/*RF2*/(C)->_upper/*12*/);
8941 /*[IF*/
8942 if(((ds.p=130086956),((/*RF2*/(C)->_capacity/*8*/))<((r64count(&ds,C))+(1)))){
8943 /*[IF*/
8944 if(((ds.p=130087218),((/*RF2*/(C)->_capacity/*8*/))==(0))){
8945 (ds.p=130087456);
8946 _new_capacity=16;
8947 (ds.p=130087712);
8948 (/*SFN*/C->_storage/*4*/)=new69(_new_capacity);
8949 (ds.p=130087968);
8950 (/*SFN*/C->_capacity/*8*/)=_new_capacity;
8951 }
8952 else{
8953 (ds.p=130088480);
8954 _new_capacity=(2)*((/*RF2*/(C)->_capacity/*8*/));
8955 (ds.p=130088736);
8956 (/*SFN*/C->_storage/*4*/)=r69realloc(&ds,(/*RF2*/(C)->_storage/*4*/),(/*RF2*/(C)->_capacity/*8*/),_new_capacity);
8957 (ds.p=130088992);
8958 (/*SFN*/C->_capacity/*8*/)=_new_capacity;
8959 }
8960 /*FI]*/
8961 }
8962 /*FI]*/
8963 (ds.p=130089748);
8964 (/*SFN*/C->_upper/*12*/)=((/*RF2*/(C)->_upper/*12*/))+(1);
8965 (ds.p=130090004);
8966 r64put(&ds,C,a1,(/*RF2*/(C)->_upper/*12*/));
8967 if(fd.assertion_flag){
8968 fd.assertion_flag=0;
8969 (ds.p=75544606);
8970 ac_ens((r64last(&ds,C))==((void*)(a1)),NULL);
8971 (ds.p=75544864);
8972 ac_ens((r64count(&ds,C))==((1)+(o36_185_26)),NULL);
8973 (ds.p=75545120);
8974 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(o36_186_22),NULL);
8975 (ds.p=75545376);
8976 ac_ens(((/*RF2*/(C)->_upper/*12*/))==((1)+(o36_187_26)),NULL);
8977 fd.assertion_flag=1;
8978 }
8979 if(se_rci(caller,C))se_i64(&ds,C);
8980 se_dst=caller;/*unlink*/
8981 }
8982
8983 void r64clear(se_dump_stack*caller,T64* C){
8984 T2 o62_230_25=0;
8985 void**locals[1];
8986 static se_frame_descriptor fd={"clear ARRAY",1,1,"%R64%old value%E2%",1};
8987 se_dump_stack ds;
8988 ds.fd=&fd;
8989 ds.current=((void**)&C);
8990 ds.p=130081288;
8991 ds.caller=caller;
8992 ds.locals=locals;
8993 locals[0]=(void**)&o62_230_25;
8994 se_dst=&ds;/*link*/
8995 o62_230_25=(/*RF2*/(C)->_capacity/*8*/);
8996 (ds.p=130081812);
8997 (/*SFN*/C->_upper/*12*/)=((/*RF2*/(C)->_lower/*16*/))-(1);
8998 if(fd.assertion_flag){
8999 fd.assertion_flag=0;
9000 (ds.p=130082342);
9001 ac_ens(((/*RF2*/(C)->_capacity/*8*/))==(o62_230_25),NULL);
9002 (ds.p=75571220);
9003 ac_ens(r64is_empty(&ds,C),NULL);
9004 fd.assertion_flag=1;
9005 }
9006 if(se_rci(caller,C))se_i64(&ds,C);
9007 se_dst=caller;/*unlink*/
9008 }
9009
9010 T0* r64twin(se_dump_stack*caller,T64* C){
9011 T0* R=NULL;
9012 void**locals[1];
9013 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R64%Result%R64%",1};
9014 se_dump_stack ds;
9015 ds.fd=&fd;
9016 ds.current=((void**)&C);
9017 ds.p=2140182;
9018 ds.caller=caller;
9019 ds.locals=locals;
9020 locals[0]=(void**)&R;
9021 se_dst=&ds;/*link*/
9022 R=((void*)new64());
9023 r64copy(&ds,((T64*)R),((T0*)C));
9024 if(fd.assertion_flag){
9025 fd.assertion_flag=0;
9026 (ds.p=2142256);
9027 ac_ens(r64is_equal(&ds,se_i64(&ds,((T64*)ci(64,R,2142242))),(T0*)C),"equal");
9028 fd.assertion_flag=1;
9029 }
9030 if(se_rci(caller,C))se_i64(&ds,C);
9031 se_dst=caller;/*unlink*/
9032 return R;
9033 }
9034
9035 void r64with_capacity(se_dump_stack*caller,T64* C,T2 a1,T2 a2){
9036 void**locals[2];
9037 static se_frame_descriptor fd={"with_capacity ARRAY",1,2,"%R64%needed_capacity%E2%low%E2%",1};
9038 se_dump_stack ds;
9039 ds.fd=&fd;
9040 ds.current=((void**)&C);
9041 ds.p=130037256;
9042 ds.caller=caller;
9043 ds.locals=locals;
9044 locals[0]=(void**)&a1;
9045 locals[1]=(void**)&a2;
9046 se_dst=&ds;/*link*/
9047 se_require_uppermost_flag=1;
9048 if(fd.assertion_flag){
9049 fd.assertion_flag=0;
9050 (ds.p=130038324);
9051 ac_req((a1)>=(0),NULL);
9052 fd.assertion_flag=1;
9053 }
9054 /*[IF*/
9055 if(((ds.p=130038828),((/*RF2*/(C)->_capacity/*8*/))<(a1))){
9056 (ds.p=130039066);
9057 (/*SFN*/C->_storage/*4*/)=new69(a1);
9058 (ds.p=130039322);
9059 (/*SFN*/C->_capacity/*8*/)=a1;
9060 }
9061 /*FI]*/
9062 (ds.p=130039828);
9063 (/*SFN*/C->_lower/*16*/)=a2;
9064 (ds.p=130040084);
9065 (/*SFN*/C->_upper/*12*/)=(a2)-(1);
9066 if(fd.assertion_flag){
9067 fd.assertion_flag=0;
9068 (ds.p=130040596);
9069 ac_ens(r64is_empty(&ds,C),NULL);
9070 (ds.p=130040884);
9071 ac_ens((a1)<=((/*RF2*/(C)->_capacity/*8*/)),NULL);
9072 (ds.p=130041120);
9073 ac_ens(((/*RF2*/(C)->_lower/*16*/))==(a2),NULL);
9074 fd.assertion_flag=1;
9075 }
9076 if(se_rci(caller,C))se_i64(&ds,C);
9077 se_dst=caller;/*unlink*/
9078 }
9079 se_frame_descriptor se_ifd64={"invariant once ARRAY[STRING]",1,0,"%R64%",1};
9080
9081 T64*se_i64(se_dump_stack*caller,T64*C){
9082 se_dump_stack ds;
9083 ds.fd=&se_ifd64;
9084 ds.current=((void**)&C);
9085 ds.p=130026510;
9086 ds.caller=caller;
9087 se_dst=&ds;
9088 if(ds.fd->assertion_flag){
9089 ds.fd->assertion_flag=0;
9090 (ds.p=75651888);
9091 ac_inv(((/*RF2*/(C)->_lower/*16*/))<=(((/*RF2*/(C)->_upper/*12*/))+(1)),"valid_bounds");
9092 (ds.p=132150298);
9093 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>=((((/*RF2*/(C)->_upper/*12*/))-((/*RF2*/(C)->_lower/*16*/)))+(1)),NULL);
9094 (ds.p=132150818);
9095 ac_inv((!(((/*RF2*/(C)->_capacity/*8*/))>(0)))||(r69is_not_null(&ds,(/*RF2*/(C)->_storage/*4*/))),NULL);
9096 ds.fd->assertion_flag=1;
9097 }
9098 se_dst=caller;
9099 return C;
9100 }
9101
9102 void r47set_item(se_dump_stack*caller,T47* C,T0* a1){
9103 void**locals[1];
9104 static se_frame_descriptor fd={"set_item DICTIONARY_NODE",1,1,"%R47%i%R25%",1};
9105 se_dump_stack ds;
9106 ds.fd=&fd;
9107 ds.current=((void**)&C);
9108 ds.p=96476168;
9109 ds.caller=caller;
9110 ds.locals=locals;
9111 locals[0]=(void**)&a1;
9112 se_dst=&ds;/*link*/
9113 (ds.p=96476692);
9114 (/*SFN*/C->_item/*4*/)=a1;
9115 if(fd.assertion_flag){
9116 fd.assertion_flag=0;
9117 (ds.p=96477216);
9118 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
9119 fd.assertion_flag=1;
9120 }
9121 se_dst=caller;/*unlink*/
9122 }
9123
9124 T6 r47is_equal(se_dump_stack*caller,T47* C,T0* a1){
9125 T6 R=0;
9126 void**locals[2];
9127 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R47%other%R47%Result%E6%",1};
9128 se_dump_stack ds;
9129 ds.fd=&fd;
9130 ds.current=((void**)&C);
9131 ds.p=2120968;
9132 ds.caller=caller;
9133 ds.locals=locals;
9134 locals[0]=(void**)&a1;
9135 locals[1]=(void**)&R;
9136 se_dst=&ds;/*link*/
9137 se_require_uppermost_flag=1;
9138 if(fd.assertion_flag){
9139 fd.assertion_flag=0;
9140 (ds.p=2122048);
9141 ac_req((a1)!=((void*)(NULL)),"other_not_void");
9142 fd.assertion_flag=1;
9143 }
9144 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
9145 fd.assertion_flag=0;
9146 (ds.p=2122846);
9147 ac_ens((!(r47standard_is_equal(&ds,C,a1)))||(R),"consistent");
9148 (ds.p=2123064);
9149 ac_ens((!(R))||(r47is_equal(&ds,((T47*)ci(47,a1,2123080)),(T0*)C)),"symmetric");
9150 fd.assertion_flag=1;
9151 }
9152 se_dst=caller;/*unlink*/
9153 return R;
9154 }
9155
9156 void r47make(se_dump_stack*caller,T47* C,T0* a1,T2 a2,T0* a3){
9157 void**locals[3];
9158 static se_frame_descriptor fd={"make DICTIONARY_NODE",1,3,"%R47%i%R25%k%E2%n%R47%",1};
9159 se_dump_stack ds;
9160 ds.fd=&fd;
9161 ds.current=((void**)&C);
9162 ds.p=96480264;
9163 ds.caller=caller;
9164 ds.locals=locals;
9165 locals[0]=(void**)&a1;
9166 locals[1]=(void**)&a2;
9167 locals[2]=(void**)&a3;
9168 se_dst=&ds;/*link*/
9169 (ds.p=96480788);
9170 (/*SFN*/C->_item/*4*/)=a1;
9171 (ds.p=96481044);
9172 (/*SFN*/C->_key/*8*/)=a2;
9173 (ds.p=96481300);
9174 (/*SFN*/C->_next/*12*/)=a3;
9175 if(fd.assertion_flag){
9176 fd.assertion_flag=0;
9177 (ds.p=96481822);
9178 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
9179 (ds.p=96482076);
9180 ac_ens(((/*RF2*/(C)->_key/*8*/))==(a2),NULL);
9181 (ds.p=96482334);
9182 ac_ens(((/*RF2*/(C)->_next/*12*/))==((void*)(a3)),NULL);
9183 fd.assertion_flag=1;
9184 }
9185 se_dst=caller;/*unlink*/
9186 }
9187
9188 T6 r47standard_is_equal(se_dump_stack*caller,T47* C,T0* a1){
9189 T6 R=0;
9190 void**locals[2];
9191 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R47%other%R47%Result%E6%",1};
9192 se_dump_stack ds;
9193 ds.fd=&fd;
9194 ds.current=((void**)&C);
9195 ds.p=2128406;
9196 ds.caller=caller;
9197 ds.locals=locals;
9198 locals[0]=(void**)&a1;
9199 locals[1]=(void**)&R;
9200 se_dst=&ds;/*link*/
9201 se_require_uppermost_flag=1;
9202 if(fd.assertion_flag){
9203 fd.assertion_flag=0;
9204 (ds.p=2129184);
9205 ac_req((a1)!=((void*)(NULL)),NULL);
9206 fd.assertion_flag=1;
9207 }
9208 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
9209 fd.assertion_flag=0;
9210 (ds.p=2129976);
9211 ac_ens((!(R))||(r47standard_is_equal(&ds,((T47*)ci(47,a1,2129992)),(T0*)C)),"symmetric");
9212 fd.assertion_flag=1;
9213 }
9214 se_dst=caller;/*unlink*/
9215 return R;
9216 }
9217
9218 T0* r47twin(se_dump_stack*caller,T47* C){
9219 T0* R=NULL;
9220 void**locals[1];
9221 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R47%Result%R47%",1};
9222 se_dump_stack ds;
9223 ds.fd=&fd;
9224 ds.current=((void**)&C);
9225 ds.p=2140182;
9226 ds.caller=caller;
9227 ds.locals=locals;
9228 locals[0]=(void**)&R;
9229 se_dst=&ds;/*link*/
9230 R=((void*)new47());
9231 *((T47*)R)=*C;
9232 if(fd.assertion_flag){
9233 fd.assertion_flag=0;
9234 (ds.p=2142256);
9235 ac_ens(r47is_equal(&ds,((T47*)ci(47,R,2142242)),(T0*)C),"equal");
9236 fd.assertion_flag=1;
9237 }
9238 se_dst=caller;/*unlink*/
9239 return R;
9240 }
9241
9242 void r47set_next(se_dump_stack*caller,T47* C,T0* a1){
9243 void**locals[1];
9244 static se_frame_descriptor fd={"set_next DICTIONARY_NODE",1,1,"%R47%n%R47%",1};
9245 se_dump_stack ds;
9246 ds.fd=&fd;
9247 ds.current=((void**)&C);
9248 ds.p=96477960;
9249 ds.caller=caller;
9250 ds.locals=locals;
9251 locals[0]=(void**)&a1;
9252 se_dst=&ds;/*link*/
9253 (ds.p=96478484);
9254 (/*SFN*/C->_next/*12*/)=a1;
9255 if(fd.assertion_flag){
9256 fd.assertion_flag=0;
9257 (ds.p=96479008);
9258 ac_ens(((/*RF2*/(C)->_next/*12*/))==((void*)(a1)),NULL);
9259 fd.assertion_flag=1;
9260 }
9261 se_dst=caller;/*unlink*/
9262 }
9263
9264 void r75copy(se_dump_stack*caller,T75* C,T0* a1){
9265 void**locals[1];
9266 static se_frame_descriptor fd={"copy ARRAY2",1,1,"%R75%other%R75%",1};
9267 se_dump_stack ds;
9268 ds.fd=&fd;
9269 ds.current=((void**)&C);
9270 ds.p=151077640;
9271 ds.caller=caller;
9272 ds.locals=locals;
9273 locals[0]=(void**)&a1;
9274 se_dst=&ds;/*link*/
9275 se_require_uppermost_flag=1;
9276 if(fd.assertion_flag){
9277 fd.assertion_flag=0;
9278 (ds.p=2144064);
9279 ac_req((a1)!=((void*)(NULL)),"other_not_void");
9280 fd.assertion_flag=1;
9281 }
9282 (ds.p=151078164);
9283 (/*SFN*/C->_lower1/*16*/)=(/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151078184))))->_lower1/*16*/);
9284 (ds.p=151078420);
9285 (/*SFN*/C->_upper1/*8*/)=(/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151078440))))->_upper1/*8*/);
9286 (ds.p=151078676);
9287 (/*SFN*/C->_lower2/*12*/)=(/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151078696))))->_lower2/*12*/);
9288 (ds.p=151078932);
9289 (/*SFN*/C->_upper2/*4*/)=(/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151078952))))->_upper2/*4*/);
9290 /*[IF*/
9291 if(((ds.p=151079212),((/*RF2*/(C)->_capacity/*24*/))<(r75count(&ds,C)))){
9292 (ds.p=151079450);
9293 (/*SFN*/C->_capacity/*24*/)=r75count(&ds,C);
9294 (ds.p=151079706);
9295 (/*SFN*/C->_storage/*20*/)=new76(r75count(&ds,C));
9296 }
9297 /*FI]*/
9298 (ds.p=151080228);
9299 r76copy_from(&ds,(/*RF2*/(C)->_storage/*20*/),(/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151080248))))->_storage/*20*/),(r75count(&ds,C))-(1));
9300 if(fd.assertion_flag){
9301 fd.assertion_flag=0;
9302 (ds.p=2144808);
9303 ac_ens(r75is_equal(&ds,C,a1),"is_equal");
9304 fd.assertion_flag=1;
9305 }
9306 if(se_rci(caller,C))se_i75(&ds,C);
9307 se_dst=caller;/*unlink*/
9308 }
9309
9310 T2 r75column_maximum(se_dump_stack*caller,T75* C){
9311 T2 R=0;
9312 void**locals[1];
9313 static se_frame_descriptor fd={"column_maximum COLLECTION2",1,1,"%R75%Result%E2%",1};
9314 se_dump_stack ds;
9315 ds.fd=&fd;
9316 ds.current=((void**)&C);
9317 ds.p=153107478;
9318 ds.caller=caller;
9319 ds.locals=locals;
9320 locals[0]=(void**)&R;
9321 se_dst=&ds;/*link*/
9322 (ds.p=153108244);
9323 R=(/*RF2*/(C)->_upper2/*4*/);
9324 if(se_rci(caller,C))se_i75(&ds,C);
9325 se_dst=caller;/*unlink*/
9326 return R;
9327 }
9328
9329 T6 r75valid_line(se_dump_stack*caller,T75* C,T2 a1){
9330 T6 R=0;
9331 void**locals[2];
9332 static se_frame_descriptor fd={"valid_line COLLECTION2",1,2,"%R75%line%E2%Result%E6%",1};
9333 se_dump_stack ds;
9334 ds.fd=&fd;
9335 ds.current=((void**)&C);
9336 ds.p=153117462;
9337 ds.caller=caller;
9338 ds.locals=locals;
9339 locals[0]=(void**)&a1;
9340 locals[1]=(void**)&R;
9341 se_dst=&ds;/*link*/
9342 (ds.p=153117972);
9343 R=(((/*RF2*/(C)->_lower1/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper1/*8*/)));
9344 if(fd.assertion_flag){
9345 fd.assertion_flag=0;
9346 (ds.p=153118498);
9347 ac_ens((R)==(r6_px_and(&ds,((/*RF2*/(C)->_lower1/*16*/))<=(a1),(a1)<=((/*RF2*/(C)->_upper1/*8*/)))),NULL);
9348 fd.assertion_flag=1;
9349 }
9350 if(se_rci(caller,C))se_i75(&ds,C);
9351 se_dst=caller;/*unlink*/
9352 return R;
9353 }
9354
9355 T2 r75count(se_dump_stack*caller,T75* C){
9356 T2 R=0;
9357 void**locals[1];
9358 static se_frame_descriptor fd={"count ARRAY2",1,1,"%R75%Result%E2%",1};
9359 se_dump_stack ds;
9360 ds.fd=&fd;
9361 ds.current=((void**)&C);
9362 ds.p=151048968;
9363 ds.caller=caller;
9364 ds.locals=locals;
9365 locals[0]=(void**)&R;
9366 se_dst=&ds;/*link*/
9367 (ds.p=151049492);
9368 R=(r75count1(&ds,C))*(r75count2(&ds,C));
9369 if(fd.assertion_flag){
9370 fd.assertion_flag=0;
9371 (ds.p=153131298);
9372 ac_ens((R)==((r75line_count(&ds,C))*(r75column_count(&ds,C))),NULL);
9373 fd.assertion_flag=1;
9374 }
9375 if(se_rci(caller,C))se_i75(&ds,C);
9376 se_dst=caller;/*unlink*/
9377 return R;
9378 }
9379
9380 void r75put(se_dump_stack*caller,T75* C,T0* a1,T2 a2,T2 a3){
9381 void**locals[3];
9382 static se_frame_descriptor fd={"put ARRAY2",1,3,"%R75%element%R74%line%E2%column%E2%",1};
9383 se_dump_stack ds;
9384 ds.fd=&fd;
9385 ds.current=((void**)&C);
9386 ds.p=151045128;
9387 ds.caller=caller;
9388 ds.locals=locals;
9389 locals[0]=(void**)&a1;
9390 locals[1]=(void**)&a2;
9391 locals[2]=(void**)&a3;
9392 se_dst=&ds;/*link*/
9393 se_require_uppermost_flag=1;
9394 if(fd.assertion_flag){
9395 fd.assertion_flag=0;
9396 (ds.p=153112084);
9397 ac_req(r75valid_index(&ds,C,a2,a3),NULL);
9398 fd.assertion_flag=1;
9399 }
9400 (ds.p=151045668);
9401 ((/*RF2*/(C)->_storage/*20*/))[((((a2)-((/*RF2*/(C)->_lower1/*16*/)))*(r75count2(&ds,C)))+(a3))-((/*RF2*/(C)->_lower2/*12*/))]=(a1);
9402 if(fd.assertion_flag){
9403 fd.assertion_flag=0;
9404 (ds.p=153112888);
9405 ac_ens((r75item(&ds,C,a2,a3))==((void*)(a1)),NULL);
9406 fd.assertion_flag=1;
9407 }
9408 if(se_rci(caller,C))se_i75(&ds,C);
9409 se_dst=caller;/*unlink*/
9410 }
9411
9412 T6 r75is_equal(se_dump_stack*caller,T75* C,T0* a1){
9413 T6 R=0;
9414 void**locals[2];
9415 static se_frame_descriptor fd={"is_equal ARRAY2",1,2,"%R75%other%R75%Result%E6%",1};
9416 se_dump_stack ds;
9417 ds.fd=&fd;
9418 ds.current=((void**)&C);
9419 ds.p=151080968;
9420 ds.caller=caller;
9421 ds.locals=locals;
9422 locals[0]=(void**)&a1;
9423 locals[1]=(void**)&R;
9424 se_dst=&ds;/*link*/
9425 se_require_uppermost_flag=1;
9426 if(fd.assertion_flag){
9427 fd.assertion_flag=0;
9428 (ds.p=2122048);
9429 ac_req((a1)!=((void*)(NULL)),"other_not_void");
9430 fd.assertion_flag=1;
9431 }
9432 /*[IF*/
9433 if(((ds.p=151081510),(a1)==((void*)(C)))){
9434 (ds.p=151081754);
9435 R=1;
9436 }
9437 else if(((ds.p=151082032),((/*RF2*/(C)->_lower1/*16*/))!=((/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151082038))))->_lower1/*16*/)))){
9438 }
9439 else if(((ds.p=151082288),((/*RF2*/(C)->_lower2/*12*/))!=((/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151082294))))->_lower2/*12*/)))){
9440 }
9441 else if(((ds.p=151082544),((/*RF2*/(C)->_upper1/*8*/))!=((/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151082550))))->_upper1/*8*/)))){
9442 }
9443 else if(((ds.p=151082800),((/*RF2*/(C)->_upper2/*4*/))!=((/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151082806))))->_upper2/*4*/)))){
9444 }
9445 else{
9446 (ds.p=151083290);
9447 R=r76memcmp(&ds,(/*RF2*/(C)->_storage/*20*/),(/*RF2*/(se_i75(&ds,((T75*)ci(75,a1,151083340))))->_storage/*20*/),r75count(&ds,C));
9448 }
9449 /*FI]*/
9450 if(fd.assertion_flag){
9451 fd.assertion_flag=0;
9452 (ds.p=2122846);
9453 ac_ens((!(r75standard_is_equal(&ds,C,a1)))||(R),"consistent");
9454 (ds.p=2123064);
9455 ac_ens((!(R))||(r75is_equal(&ds,se_i75(&ds,((T75*)ci(75,a1,2123080))),(T0*)C)),"symmetric");
9456 fd.assertion_flag=1;
9457 }
9458 if(se_rci(caller,C))se_i75(&ds,C);
9459 se_dst=caller;/*unlink*/
9460 return R;
9461 }
9462
9463 T2 r75column_minimum(se_dump_stack*caller,T75* C){
9464 T2 R=0;
9465 void**locals[1];
9466 static se_frame_descriptor fd={"column_minimum COLLECTION2",1,1,"%R75%Result%E2%",1};
9467 se_dump_stack ds;
9468 ds.fd=&fd;
9469 ds.current=((void**)&C);
9470 ds.p=153103126;
9471 ds.caller=caller;
9472 ds.locals=locals;
9473 locals[0]=(void**)&R;
9474 se_dst=&ds;/*link*/
9475 (ds.p=153103892);
9476 R=(/*RF2*/(C)->_lower2/*12*/);
9477 if(se_rci(caller,C))se_i75(&ds,C);
9478 se_dst=caller;/*unlink*/
9479 return R;
9480 }
9481
9482 T0* r75item(se_dump_stack*caller,T75* C,T2 a1,T2 a2){
9483 T0* R=NULL;
9484 void**locals[3];
9485 static se_frame_descriptor fd={"item ARRAY2",1,3,"%R75%line%E2%column%E2%Result%R74%",1};
9486 se_dump_stack ds;
9487 ds.fd=&fd;
9488 ds.current=((void**)&C);
9489 ds.p=151043848;
9490 ds.caller=caller;
9491 ds.locals=locals;
9492 locals[0]=(void**)&a1;
9493 locals[1]=(void**)&a2;
9494 locals[2]=(void**)&R;
9495 se_dst=&ds;/*link*/
9496 se_require_uppermost_flag=1;
9497 if(fd.assertion_flag){
9498 fd.assertion_flag=0;
9499 (ds.p=153110036);
9500 ac_req(r75valid_index(&ds,C,a1,a2),NULL);
9501 fd.assertion_flag=1;
9502 }
9503 (ds.p=151044372);
9504 R=((/*RF2*/(C)->_storage/*20*/))[((((a1)-((/*RF2*/(C)->_lower1/*16*/)))*(r75count2(&ds,C)))+(a2))-((/*RF2*/(C)->_lower2/*12*/))];
9505 if(se_rci(caller,C))se_i75(&ds,C);
9506 se_dst=caller;/*unlink*/
9507 return R;
9508 }
9509
9510 T6 r75valid_index(se_dump_stack*caller,T75* C,T2 a1,T2 a2){
9511 T6 R=0;
9512 void**locals[3];
9513 static se_frame_descriptor fd={"valid_index COLLECTION2",1,3,"%R75%line%E2%column%E2%Result%E6%",1};
9514 se_dump_stack ds;
9515 ds.fd=&fd;
9516 ds.current=((void**)&C);
9517 ds.p=153121046;
9518 ds.caller=caller;
9519 ds.locals=locals;
9520 locals[0]=(void**)&a1;
9521 locals[1]=(void**)&a2;
9522 locals[2]=(void**)&R;
9523 se_dst=&ds;/*link*/
9524 (ds.p=153121556);
9525 R=(((((/*RF2*/(C)->_lower1/*16*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper1/*8*/))))&&(((/*RF2*/(C)->_lower2/*12*/))<=(a2)))&&((a2)<=((/*RF2*/(C)->_upper2/*4*/)));
9526 if(fd.assertion_flag){
9527 fd.assertion_flag=0;
9528 (ds.p=153122594);
9529 ac_ens((R)==(r6_px_and(&ds,r75valid_line(&ds,C,a1),r75valid_index2(&ds,C,a2))),NULL);
9530 fd.assertion_flag=1;
9531 }
9532 if(se_rci(caller,C))se_i75(&ds,C);
9533 se_dst=caller;/*unlink*/
9534 return R;
9535 }
9536
9537 T2 r75column_count(se_dump_stack*caller,T75* C){
9538 T2 R=0;
9539 void**locals[1];
9540 static se_frame_descriptor fd={"column_count COLLECTION2",1,1,"%R75%Result%E2%",1};
9541 se_dump_stack ds;
9542 ds.fd=&fd;
9543 ds.current=((void**)&C);
9544 ds.p=153128982;
9545 ds.caller=caller;
9546 ds.locals=locals;
9547 locals[0]=(void**)&R;
9548 se_dst=&ds;/*link*/
9549 (ds.p=153129492);
9550 R=r75count2(&ds,C);
9551 if(se_rci(caller,C))se_i75(&ds,C);
9552 se_dst=caller;/*unlink*/
9553 return R;
9554 }
9555
9556 void r75make(se_dump_stack*caller,T75* C,T2 a1,T2 a2,T2 a3,T2 a4){
9557 void**locals[4];
9558 static se_frame_descriptor fd={"make ARRAY2",1,4,"%R75%line_min%E2%line_max%E2%column_min%E2%column_max%E2%",1};
9559 se_dump_stack ds;
9560 ds.fd=&fd;
9561 ds.current=((void**)&C);
9562 ds.p=151004168;
9563 ds.caller=caller;
9564 ds.locals=locals;
9565 locals[0]=(void**)&a1;
9566 locals[1]=(void**)&a2;
9567 locals[2]=(void**)&a3;
9568 locals[3]=(void**)&a4;
9569 se_dst=&ds;/*link*/
9570 se_require_uppermost_flag=1;
9571 if(fd.assertion_flag){
9572 fd.assertion_flag=0;
9573 (ds.p=151005478);
9574 ac_req((a1)<=(a2),NULL);
9575 (ds.p=151005738);
9576 ac_req((a3)<=(a4),NULL);
9577 fd.assertion_flag=1;
9578 }
9579 (ds.p=151006228);
9580 (/*SFN*/C->_lower1/*16*/)=a1;
9581 (ds.p=151006484);
9582 (/*SFN*/C->_upper1/*8*/)=a2;
9583 (ds.p=151006740);
9584 (/*SFN*/C->_lower2/*12*/)=a3;
9585 (ds.p=151006996);
9586 (/*SFN*/C->_upper2/*4*/)=a4;
9587 /*[IF*/
9588 if(((ds.p=151007276),((/*RF2*/(C)->_capacity/*24*/))>=(r75count(&ds,C)))){
9589 (ds.p=151007530);
9590 r76clear_all(&ds,(/*RF2*/(C)->_storage/*20*/),(r75count(&ds,C))-(1));
9591 }
9592 else{
9593 (ds.p=151008026);
9594 (/*SFN*/C->_capacity/*24*/)=r75count(&ds,C);
9595 (ds.p=151008282);
9596 (/*SFN*/C->_storage/*20*/)=new76(r75count(&ds,C));
9597 }
9598 /*FI]*/
9599 if(fd.assertion_flag){
9600 fd.assertion_flag=0;
9601 (ds.p=151009070);
9602 ac_ens((r75line_minimum(&ds,C))==(a1),NULL);
9603 (ds.p=151009326);
9604 ac_ens((r75line_maximum(&ds,C))==(a2),NULL);
9605 (ds.p=151009586);
9606 ac_ens((r75column_minimum(&ds,C))==(a3),NULL);
9607 (ds.p=151009842);
9608 ac_ens((r75column_maximum(&ds,C))==(a4),NULL);
9609 fd.assertion_flag=1;
9610 }
9611 if(se_rci(caller,C))se_i75(&ds,C);
9612 se_dst=caller;/*unlink*/
9613 }
9614
9615 T6 r75valid_index2(se_dump_stack*caller,T75* C,T2 a1){
9616 T6 R=0;
9617 void**locals[2];
9618 static se_frame_descriptor fd={"valid_index2 (valid_column COLLECTION2)",1,2,"%R75%column%E2%Result%E6%",1};
9619 se_dump_stack ds;
9620 ds.fd=&fd;
9621 ds.current=((void**)&C);
9622 ds.p=153119254;
9623 ds.caller=caller;
9624 ds.locals=locals;
9625 locals[0]=(void**)&a1;
9626 locals[1]=(void**)&R;
9627 se_dst=&ds;/*link*/
9628 (ds.p=153119764);
9629 R=(((/*RF2*/(C)->_lower2/*12*/))<=(a1))&&((a1)<=((/*RF2*/(C)->_upper2/*4*/)));
9630 if(fd.assertion_flag){
9631 fd.assertion_flag=0;
9632 (ds.p=153120290);
9633 ac_ens((R)==(r6_px_and(&ds,((/*RF2*/(C)->_lower2/*12*/))<=(a1),(a1)<=((/*RF2*/(C)->_upper2/*4*/)))),NULL);
9634 fd.assertion_flag=1;
9635 }
9636 if(se_rci(caller,C))se_i75(&ds,C);
9637 se_dst=caller;/*unlink*/
9638 return R;
9639 }
9640
9641 T6 r75standard_is_equal(se_dump_stack*caller,T75* C,T0* a1){
9642 T6 R=0;
9643 void**locals[2];
9644 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R75%other%R75%Result%E6%",1};
9645 se_dump_stack ds;
9646 ds.fd=&fd;
9647 ds.current=((void**)&C);
9648 ds.p=2128406;
9649 ds.caller=caller;
9650 ds.locals=locals;
9651 locals[0]=(void**)&a1;
9652 locals[1]=(void**)&R;
9653 se_dst=&ds;/*link*/
9654 se_require_uppermost_flag=1;
9655 if(fd.assertion_flag){
9656 fd.assertion_flag=0;
9657 (ds.p=2129184);
9658 ac_req((a1)!=((void*)(NULL)),NULL);
9659 fd.assertion_flag=1;
9660 }
9661 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
9662 fd.assertion_flag=0;
9663 (ds.p=2129976);
9664 ac_ens((!(R))||(r75standard_is_equal(&ds,se_i75(&ds,((T75*)ci(75,a1,2129992))),(T0*)C)),"symmetric");
9665 fd.assertion_flag=1;
9666 }
9667 if(se_rci(caller,C))se_i75(&ds,C);
9668 se_dst=caller;/*unlink*/
9669 return R;
9670 }
9671
9672 T2 r75line_minimum(se_dump_stack*caller,T75* C){
9673 T2 R=0;
9674 void**locals[1];
9675 static se_frame_descriptor fd={"line_minimum COLLECTION2",1,1,"%R75%Result%E2%",1};
9676 se_dump_stack ds;
9677 ds.fd=&fd;
9678 ds.current=((void**)&C);
9679 ds.p=153101590;
9680 ds.caller=caller;
9681 ds.locals=locals;
9682 locals[0]=(void**)&R;
9683 se_dst=&ds;/*link*/
9684 (ds.p=153102356);
9685 R=(/*RF2*/(C)->_lower1/*16*/);
9686 if(se_rci(caller,C))se_i75(&ds,C);
9687 se_dst=caller;/*unlink*/
9688 return R;
9689 }
9690
9691 T2 r75count1(se_dump_stack*caller,T75* C){
9692 T2 R=0;
9693 void**locals[1];
9694 static se_frame_descriptor fd={"count1 ARRAY2",1,1,"%R75%Result%E2%",1};
9695 se_dump_stack ds;
9696 ds.fd=&fd;
9697 ds.current=((void**)&C);
9698 ds.p=151046408;
9699 ds.caller=caller;
9700 ds.locals=locals;
9701 locals[0]=(void**)&R;
9702 se_dst=&ds;/*link*/
9703 (ds.p=151046932);
9704 R=(((/*RF2*/(C)->_upper1/*8*/))-((/*RF2*/(C)->_lower1/*16*/)))+(1);
9705 if(fd.assertion_flag){
9706 fd.assertion_flag=0;
9707 (ds.p=153124898);
9708 ac_ens((R)==((((/*RF2*/(C)->_upper1/*8*/))-((/*RF2*/(C)->_lower1/*16*/)))+(1)),NULL);
9709 fd.assertion_flag=1;
9710 }
9711 if(se_rci(caller,C))se_i75(&ds,C);
9712 se_dst=caller;/*unlink*/
9713 return R;
9714 }
9715
9716 T2 r75count2(se_dump_stack*caller,T75* C){
9717 T2 R=0;
9718 void**locals[1];
9719 static se_frame_descriptor fd={"count2 ARRAY2",1,1,"%R75%Result%E2%",1};
9720 se_dump_stack ds;
9721 ds.fd=&fd;
9722 ds.current=((void**)&C);
9723 ds.p=151047688;
9724 ds.caller=caller;
9725 ds.locals=locals;
9726 locals[0]=(void**)&R;
9727 se_dst=&ds;/*link*/
9728 (ds.p=151048212);
9729 R=(((/*RF2*/(C)->_upper2/*4*/))-((/*RF2*/(C)->_lower2/*12*/)))+(1);
9730 if(fd.assertion_flag){
9731 fd.assertion_flag=0;
9732 (ds.p=153128226);
9733 ac_ens((R)==((((/*RF2*/(C)->_upper2/*4*/))-((/*RF2*/(C)->_lower2/*12*/)))+(1)),NULL);
9734 fd.assertion_flag=1;
9735 }
9736 if(se_rci(caller,C))se_i75(&ds,C);
9737 se_dst=caller;/*unlink*/
9738 return R;
9739 }
9740
9741 T0* r75twin(se_dump_stack*caller,T75* C){
9742 T0* R=NULL;
9743 void**locals[1];
9744 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R75%Result%R75%",1};
9745 se_dump_stack ds;
9746 ds.fd=&fd;
9747 ds.current=((void**)&C);
9748 ds.p=2140182;
9749 ds.caller=caller;
9750 ds.locals=locals;
9751 locals[0]=(void**)&R;
9752 se_dst=&ds;/*link*/
9753 R=((void*)new75());
9754 r75copy(&ds,((T75*)R),((T0*)C));
9755 if(fd.assertion_flag){
9756 fd.assertion_flag=0;
9757 (ds.p=2142256);
9758 ac_ens(r75is_equal(&ds,se_i75(&ds,((T75*)ci(75,R,2142242))),(T0*)C),"equal");
9759 fd.assertion_flag=1;
9760 }
9761 if(se_rci(caller,C))se_i75(&ds,C);
9762 se_dst=caller;/*unlink*/
9763 return R;
9764 }
9765
9766 T2 r75line_maximum(se_dump_stack*caller,T75* C){
9767 T2 R=0;
9768 void**locals[1];
9769 static se_frame_descriptor fd={"line_maximum COLLECTION2",1,1,"%R75%Result%E2%",1};
9770 se_dump_stack ds;
9771 ds.fd=&fd;
9772 ds.current=((void**)&C);
9773 ds.p=153105942;
9774 ds.caller=caller;
9775 ds.locals=locals;
9776 locals[0]=(void**)&R;
9777 se_dst=&ds;/*link*/
9778 (ds.p=153106708);
9779 R=(/*RF2*/(C)->_upper1/*8*/);
9780 if(se_rci(caller,C))se_i75(&ds,C);
9781 se_dst=caller;/*unlink*/
9782 return R;
9783 }
9784
9785 T2 r75line_count(se_dump_stack*caller,T75* C){
9786 T2 R=0;
9787 void**locals[1];
9788 static se_frame_descriptor fd={"line_count COLLECTION2",1,1,"%R75%Result%E2%",1};
9789 se_dump_stack ds;
9790 ds.fd=&fd;
9791 ds.current=((void**)&C);
9792 ds.p=153125654;
9793 ds.caller=caller;
9794 ds.locals=locals;
9795 locals[0]=(void**)&R;
9796 se_dst=&ds;/*link*/
9797 (ds.p=153126420);
9798 R=r75count1(&ds,C);
9799 if(se_rci(caller,C))se_i75(&ds,C);
9800 se_dst=caller;/*unlink*/
9801 return R;
9802 }
9803 se_frame_descriptor se_ifd75={"invariant once ARRAY2[TILE]",1,0,"%R75%",1};
9804
9805 T75*se_i75(se_dump_stack*caller,T75*C){
9806 se_dump_stack ds;
9807 ds.fd=&se_ifd75;
9808 ds.current=((void**)&C);
9809 ds.p=150998030;
9810 ds.caller=caller;
9811 se_dst=&ds;
9812 if(ds.fd->assertion_flag){
9813 ds.fd->assertion_flag=0;
9814 (ds.p=151101206);
9815 ac_inv((r75count2(&ds,C))==((((/*RF2*/(C)->_upper2/*4*/))-((/*RF2*/(C)->_lower2/*12*/)))+(1)),NULL);
9816 (ds.p=151101722);
9817 ac_inv(((/*RF2*/(C)->_capacity/*24*/))>=(r75count(&ds,C)),NULL);
9818 ds.fd->assertion_flag=1;
9819 }
9820 se_dst=caller;
9821 return C;
9822 }
9823
9824 void r41next(se_dump_stack*caller,T41* C){
9825 static se_frame_descriptor fd={"next ITERATOR_ON_LINKED_LIST",1,0,"%R41%",1};
9826 se_dump_stack ds;
9827 ds.fd=&fd;
9828 ds.current=((void**)&C);
9829 ds.p=83899656;
9830 ds.caller=caller;
9831 ds.locals=NULL;
9832 se_dst=&ds;/*link*/
9833 se_require_uppermost_flag=1;
9834 if(fd.assertion_flag){
9835 fd.assertion_flag=0;
9836 (ds.p=65022982);
9837 ac_req(r6_ix_not(&ds,r41is_off(&ds,C)),NULL);
9838 fd.assertion_flag=1;
9839 }
9840 (ds.p=83900166);
9841 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(((T43*)ci(43,(/*RF2*/(C)->_current_link/*8*/),83900198)))->_next/*8*/);
9842 se_dst=caller;/*unlink*/
9843 }
9844
9845 T6 r41is_equal(se_dump_stack*caller,T41* C,T0* a1){
9846 T6 R=0;
9847 void**locals[2];
9848 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R41%other%R41%Result%E6%",1};
9849 se_dump_stack ds;
9850 ds.fd=&fd;
9851 ds.current=((void**)&C);
9852 ds.p=2120968;
9853 ds.caller=caller;
9854 ds.locals=locals;
9855 locals[0]=(void**)&a1;
9856 locals[1]=(void**)&R;
9857 se_dst=&ds;/*link*/
9858 se_require_uppermost_flag=1;
9859 if(fd.assertion_flag){
9860 fd.assertion_flag=0;
9861 (ds.p=2122048);
9862 ac_req((a1)!=((void*)(NULL)),"other_not_void");
9863 fd.assertion_flag=1;
9864 }
9865 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
9866 fd.assertion_flag=0;
9867 (ds.p=2122846);
9868 ac_ens((!(r41standard_is_equal(&ds,C,a1)))||(R),"consistent");
9869 (ds.p=2123064);
9870 ac_ens((!(R))||(r41is_equal(&ds,((T41*)ci(41,a1,2123080)),(T0*)C)),"symmetric");
9871 fd.assertion_flag=1;
9872 }
9873 se_dst=caller;/*unlink*/
9874 return R;
9875 }
9876
9877 T0* r41item(se_dump_stack*caller,T41* C){
9878 T0* R=NULL;
9879 void**locals[1];
9880 static se_frame_descriptor fd={"item ITERATOR_ON_LINKED_LIST",1,1,"%R41%Result%R30%",1};
9881 se_dump_stack ds;
9882 ds.fd=&fd;
9883 ds.current=((void**)&C);
9884 ds.p=83898376;
9885 ds.caller=caller;
9886 ds.locals=locals;
9887 locals[0]=(void**)&R;
9888 se_dst=&ds;/*link*/
9889 se_require_uppermost_flag=1;
9890 if(fd.assertion_flag){
9891 fd.assertion_flag=0;
9892 (ds.p=65020934);
9893 ac_req(r6_ix_not(&ds,r41is_off(&ds,C)),NULL);
9894 fd.assertion_flag=1;
9895 }
9896 (ds.p=83898886);
9897 R=(/*RF2*/(((T43*)ci(43,(/*RF2*/(C)->_current_link/*8*/),83898906)))->_item/*4*/);
9898 se_dst=caller;/*unlink*/
9899 return R;
9900 }
9901
9902 void r41make(se_dump_stack*caller,T41* C,T0* a1){
9903 void**locals[1];
9904 static se_frame_descriptor fd={"make ITERATOR_ON_LINKED_LIST",1,1,"%R41%ll%R39%",1};
9905 se_dump_stack ds;
9906 ds.fd=&fd;
9907 ds.current=((void**)&C);
9908 ds.p=83893256;
9909 ds.caller=caller;
9910 ds.locals=locals;
9911 locals[0]=(void**)&a1;
9912 se_dst=&ds;/*link*/
9913 se_require_uppermost_flag=1;
9914 if(fd.assertion_flag){
9915 fd.assertion_flag=0;
9916 (ds.p=83893772);
9917 ac_req((a1)!=((void*)(NULL)),NULL);
9918 fd.assertion_flag=1;
9919 }
9920 (ds.p=83894278);
9921 (/*SFN*/C->_linked_list/*4*/)=a1;
9922 (ds.p=83894534);
9923 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_linked_list/*4*/),83894566))))->_first_link/*8*/);
9924 if(fd.assertion_flag){
9925 fd.assertion_flag=0;
9926 (ds.p=83895070);
9927 ac_ens(((/*RF2*/(C)->_linked_list/*4*/))==((void*)(a1)),NULL);
9928 fd.assertion_flag=1;
9929 }
9930 se_dst=caller;/*unlink*/
9931 }
9932
9933 T6 r41standard_is_equal(se_dump_stack*caller,T41* C,T0* a1){
9934 T6 R=0;
9935 void**locals[2];
9936 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R41%other%R41%Result%E6%",1};
9937 se_dump_stack ds;
9938 ds.fd=&fd;
9939 ds.current=((void**)&C);
9940 ds.p=2128406;
9941 ds.caller=caller;
9942 ds.locals=locals;
9943 locals[0]=(void**)&a1;
9944 locals[1]=(void**)&R;
9945 se_dst=&ds;/*link*/
9946 se_require_uppermost_flag=1;
9947 if(fd.assertion_flag){
9948 fd.assertion_flag=0;
9949 (ds.p=2129184);
9950 ac_req((a1)!=((void*)(NULL)),NULL);
9951 fd.assertion_flag=1;
9952 }
9953 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
9954 fd.assertion_flag=0;
9955 (ds.p=2129976);
9956 ac_ens((!(R))||(r41standard_is_equal(&ds,((T41*)ci(41,a1,2129992)),(T0*)C)),"symmetric");
9957 fd.assertion_flag=1;
9958 }
9959 se_dst=caller;/*unlink*/
9960 return R;
9961 }
9962
9963 T6 r41is_off(se_dump_stack*caller,T41* C){
9964 T6 R=0;
9965 void**locals[1];
9966 static se_frame_descriptor fd={"is_off ITERATOR_ON_LINKED_LIST",1,1,"%R41%Result%E6%",1};
9967 se_dump_stack ds;
9968 ds.fd=&fd;
9969 ds.current=((void**)&C);
9970 ds.p=83897096;
9971 ds.caller=caller;
9972 ds.locals=locals;
9973 locals[0]=(void**)&R;
9974 se_dst=&ds;/*link*/
9975 (ds.p=83897606);
9976 R=((/*RF2*/(C)->_current_link/*8*/))==((void*)(NULL));
9977 se_dst=caller;/*unlink*/
9978 return R;
9979 }
9980
9981 void r41start(se_dump_stack*caller,T41* C){
9982 static se_frame_descriptor fd={"start ITERATOR_ON_LINKED_LIST",1,0,"%R41%",1};
9983 se_dump_stack ds;
9984 ds.fd=&fd;
9985 ds.current=((void**)&C);
9986 ds.p=83895816;
9987 ds.caller=caller;
9988 ds.locals=NULL;
9989 se_dst=&ds;/*link*/
9990 (ds.p=83896326);
9991 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_linked_list/*4*/),83896358))))->_first_link/*8*/);
9992 se_dst=caller;/*unlink*/
9993 }
9994
9995 T0* r41twin(se_dump_stack*caller,T41* C){
9996 T0* R=NULL;
9997 void**locals[1];
9998 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R41%Result%R41%",1};
9999 se_dump_stack ds;
10000 ds.fd=&fd;
10001 ds.current=((void**)&C);
10002 ds.p=2140182;
10003 ds.caller=caller;
10004 ds.locals=locals;
10005 locals[0]=(void**)&R;
10006 se_dst=&ds;/*link*/
10007 R=((void*)new41());
10008 *((T41*)R)=*C;
10009 if(fd.assertion_flag){
10010 fd.assertion_flag=0;
10011 (ds.p=2142256);
10012 ac_ens(r41is_equal(&ds,((T41*)ci(41,R,2142242)),(T0*)C),"equal");
10013 fd.assertion_flag=1;
10014 }
10015 se_dst=caller;/*unlink*/
10016 return R;
10017 }
10018
10019 void r43set_item(se_dump_stack*caller,T43* C,T0* a1){
10020 void**locals[1];
10021 static se_frame_descriptor fd={"set_item LINK",1,1,"%R43%i%R30%",1};
10022 se_dump_stack ds;
10023 ds.fd=&fd;
10024 ds.current=((void**)&C);
10025 ds.p=88090120;
10026 ds.caller=caller;
10027 ds.locals=locals;
10028 locals[0]=(void**)&a1;
10029 se_dst=&ds;/*link*/
10030 (ds.p=88090644);
10031 (/*SFN*/C->_item/*4*/)=a1;
10032 if(fd.assertion_flag){
10033 fd.assertion_flag=0;
10034 (ds.p=88091166);
10035 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
10036 fd.assertion_flag=1;
10037 }
10038 se_dst=caller;/*unlink*/
10039 }
10040
10041 T6 r43is_equal(se_dump_stack*caller,T43* C,T0* a1){
10042 T6 R=0;
10043 void**locals[2];
10044 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R43%other%R43%Result%E6%",1};
10045 se_dump_stack ds;
10046 ds.fd=&fd;
10047 ds.current=((void**)&C);
10048 ds.p=2120968;
10049 ds.caller=caller;
10050 ds.locals=locals;
10051 locals[0]=(void**)&a1;
10052 locals[1]=(void**)&R;
10053 se_dst=&ds;/*link*/
10054 se_require_uppermost_flag=1;
10055 if(fd.assertion_flag){
10056 fd.assertion_flag=0;
10057 (ds.p=2122048);
10058 ac_req((a1)!=((void*)(NULL)),"other_not_void");
10059 fd.assertion_flag=1;
10060 }
10061 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10062 fd.assertion_flag=0;
10063 (ds.p=2122846);
10064 ac_ens((!(r43standard_is_equal(&ds,C,a1)))||(R),"consistent");
10065 (ds.p=2123064);
10066 ac_ens((!(R))||(r43is_equal(&ds,((T43*)ci(43,a1,2123080)),(T0*)C)),"symmetric");
10067 fd.assertion_flag=1;
10068 }
10069 se_dst=caller;/*unlink*/
10070 return R;
10071 }
10072
10073 void r43make(se_dump_stack*caller,T43* C,T0* a1,T0* a2){
10074 void**locals[2];
10075 static se_frame_descriptor fd={"make LINK",1,2,"%R43%i%R30%n%R43%",1};
10076 se_dump_stack ds;
10077 ds.fd=&fd;
10078 ds.current=((void**)&C);
10079 ds.p=88087304;
10080 ds.caller=caller;
10081 ds.locals=locals;
10082 locals[0]=(void**)&a1;
10083 locals[1]=(void**)&a2;
10084 se_dst=&ds;/*link*/
10085 (ds.p=88087828);
10086 (/*SFN*/C->_item/*4*/)=a1;
10087 (ds.p=88088084);
10088 (/*SFN*/C->_next/*8*/)=a2;
10089 if(fd.assertion_flag){
10090 fd.assertion_flag=0;
10091 (ds.p=88088606);
10092 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
10093 (ds.p=88088862);
10094 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a2)),NULL);
10095 fd.assertion_flag=1;
10096 }
10097 se_dst=caller;/*unlink*/
10098 }
10099
10100 T6 r43standard_is_equal(se_dump_stack*caller,T43* C,T0* a1){
10101 T6 R=0;
10102 void**locals[2];
10103 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R43%other%R43%Result%E6%",1};
10104 se_dump_stack ds;
10105 ds.fd=&fd;
10106 ds.current=((void**)&C);
10107 ds.p=2128406;
10108 ds.caller=caller;
10109 ds.locals=locals;
10110 locals[0]=(void**)&a1;
10111 locals[1]=(void**)&R;
10112 se_dst=&ds;/*link*/
10113 se_require_uppermost_flag=1;
10114 if(fd.assertion_flag){
10115 fd.assertion_flag=0;
10116 (ds.p=2129184);
10117 ac_req((a1)!=((void*)(NULL)),NULL);
10118 fd.assertion_flag=1;
10119 }
10120 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10121 fd.assertion_flag=0;
10122 (ds.p=2129976);
10123 ac_ens((!(R))||(r43standard_is_equal(&ds,((T43*)ci(43,a1,2129992)),(T0*)C)),"symmetric");
10124 fd.assertion_flag=1;
10125 }
10126 se_dst=caller;/*unlink*/
10127 return R;
10128 }
10129
10130 T0* r43twin(se_dump_stack*caller,T43* C){
10131 T0* R=NULL;
10132 void**locals[1];
10133 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R43%Result%R43%",1};
10134 se_dump_stack ds;
10135 ds.fd=&fd;
10136 ds.current=((void**)&C);
10137 ds.p=2140182;
10138 ds.caller=caller;
10139 ds.locals=locals;
10140 locals[0]=(void**)&R;
10141 se_dst=&ds;/*link*/
10142 R=((void*)new43());
10143 *((T43*)R)=*C;
10144 if(fd.assertion_flag){
10145 fd.assertion_flag=0;
10146 (ds.p=2142256);
10147 ac_ens(r43is_equal(&ds,((T43*)ci(43,R,2142242)),(T0*)C),"equal");
10148 fd.assertion_flag=1;
10149 }
10150 se_dst=caller;/*unlink*/
10151 return R;
10152 }
10153
10154 void r43set_next(se_dump_stack*caller,T43* C,T0* a1){
10155 void**locals[1];
10156 static se_frame_descriptor fd={"set_next LINK",1,1,"%R43%n%R43%",1};
10157 se_dump_stack ds;
10158 ds.fd=&fd;
10159 ds.current=((void**)&C);
10160 ds.p=88091912;
10161 ds.caller=caller;
10162 ds.locals=locals;
10163 locals[0]=(void**)&a1;
10164 se_dst=&ds;/*link*/
10165 (ds.p=88092436);
10166 (/*SFN*/C->_next/*8*/)=a1;
10167 if(fd.assertion_flag){
10168 fd.assertion_flag=0;
10169 (ds.p=88092958);
10170 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a1)),NULL);
10171 fd.assertion_flag=1;
10172 }
10173 se_dst=caller;/*unlink*/
10174 }
10175
10176 void r87set_item(se_dump_stack*caller,T87* C,T0* a1){
10177 void**locals[1];
10178 static se_frame_descriptor fd={"set_item LINK",1,1,"%R87%i%R74%",1};
10179 se_dump_stack ds;
10180 ds.fd=&fd;
10181 ds.current=((void**)&C);
10182 ds.p=88090120;
10183 ds.caller=caller;
10184 ds.locals=locals;
10185 locals[0]=(void**)&a1;
10186 se_dst=&ds;/*link*/
10187 (ds.p=88090644);
10188 (/*SFN*/C->_item/*4*/)=a1;
10189 if(fd.assertion_flag){
10190 fd.assertion_flag=0;
10191 (ds.p=88091166);
10192 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
10193 fd.assertion_flag=1;
10194 }
10195 se_dst=caller;/*unlink*/
10196 }
10197
10198 T6 r87is_equal(se_dump_stack*caller,T87* C,T0* a1){
10199 T6 R=0;
10200 void**locals[2];
10201 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R87%other%R87%Result%E6%",1};
10202 se_dump_stack ds;
10203 ds.fd=&fd;
10204 ds.current=((void**)&C);
10205 ds.p=2120968;
10206 ds.caller=caller;
10207 ds.locals=locals;
10208 locals[0]=(void**)&a1;
10209 locals[1]=(void**)&R;
10210 se_dst=&ds;/*link*/
10211 se_require_uppermost_flag=1;
10212 if(fd.assertion_flag){
10213 fd.assertion_flag=0;
10214 (ds.p=2122048);
10215 ac_req((a1)!=((void*)(NULL)),"other_not_void");
10216 fd.assertion_flag=1;
10217 }
10218 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10219 fd.assertion_flag=0;
10220 (ds.p=2122846);
10221 ac_ens((!(r87standard_is_equal(&ds,C,a1)))||(R),"consistent");
10222 (ds.p=2123064);
10223 ac_ens((!(R))||(r87is_equal(&ds,((T87*)ci(87,a1,2123080)),(T0*)C)),"symmetric");
10224 fd.assertion_flag=1;
10225 }
10226 se_dst=caller;/*unlink*/
10227 return R;
10228 }
10229
10230 void r87make(se_dump_stack*caller,T87* C,T0* a1,T0* a2){
10231 void**locals[2];
10232 static se_frame_descriptor fd={"make LINK",1,2,"%R87%i%R74%n%R87%",1};
10233 se_dump_stack ds;
10234 ds.fd=&fd;
10235 ds.current=((void**)&C);
10236 ds.p=88087304;
10237 ds.caller=caller;
10238 ds.locals=locals;
10239 locals[0]=(void**)&a1;
10240 locals[1]=(void**)&a2;
10241 se_dst=&ds;/*link*/
10242 (ds.p=88087828);
10243 (/*SFN*/C->_item/*4*/)=a1;
10244 (ds.p=88088084);
10245 (/*SFN*/C->_next/*8*/)=a2;
10246 if(fd.assertion_flag){
10247 fd.assertion_flag=0;
10248 (ds.p=88088606);
10249 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
10250 (ds.p=88088862);
10251 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a2)),NULL);
10252 fd.assertion_flag=1;
10253 }
10254 se_dst=caller;/*unlink*/
10255 }
10256
10257 T6 r87standard_is_equal(se_dump_stack*caller,T87* C,T0* a1){
10258 T6 R=0;
10259 void**locals[2];
10260 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R87%other%R87%Result%E6%",1};
10261 se_dump_stack ds;
10262 ds.fd=&fd;
10263 ds.current=((void**)&C);
10264 ds.p=2128406;
10265 ds.caller=caller;
10266 ds.locals=locals;
10267 locals[0]=(void**)&a1;
10268 locals[1]=(void**)&R;
10269 se_dst=&ds;/*link*/
10270 se_require_uppermost_flag=1;
10271 if(fd.assertion_flag){
10272 fd.assertion_flag=0;
10273 (ds.p=2129184);
10274 ac_req((a1)!=((void*)(NULL)),NULL);
10275 fd.assertion_flag=1;
10276 }
10277 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10278 fd.assertion_flag=0;
10279 (ds.p=2129976);
10280 ac_ens((!(R))||(r87standard_is_equal(&ds,((T87*)ci(87,a1,2129992)),(T0*)C)),"symmetric");
10281 fd.assertion_flag=1;
10282 }
10283 se_dst=caller;/*unlink*/
10284 return R;
10285 }
10286
10287 T0* r87twin(se_dump_stack*caller,T87* C){
10288 T0* R=NULL;
10289 void**locals[1];
10290 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R87%Result%R87%",1};
10291 se_dump_stack ds;
10292 ds.fd=&fd;
10293 ds.current=((void**)&C);
10294 ds.p=2140182;
10295 ds.caller=caller;
10296 ds.locals=locals;
10297 locals[0]=(void**)&R;
10298 se_dst=&ds;/*link*/
10299 R=((void*)new87());
10300 *((T87*)R)=*C;
10301 if(fd.assertion_flag){
10302 fd.assertion_flag=0;
10303 (ds.p=2142256);
10304 ac_ens(r87is_equal(&ds,((T87*)ci(87,R,2142242)),(T0*)C),"equal");
10305 fd.assertion_flag=1;
10306 }
10307 se_dst=caller;/*unlink*/
10308 return R;
10309 }
10310
10311 void r87set_next(se_dump_stack*caller,T87* C,T0* a1){
10312 void**locals[1];
10313 static se_frame_descriptor fd={"set_next LINK",1,1,"%R87%n%R87%",1};
10314 se_dump_stack ds;
10315 ds.fd=&fd;
10316 ds.current=((void**)&C);
10317 ds.p=88091912;
10318 ds.caller=caller;
10319 ds.locals=locals;
10320 locals[0]=(void**)&a1;
10321 se_dst=&ds;/*link*/
10322 (ds.p=88092436);
10323 (/*SFN*/C->_next/*8*/)=a1;
10324 if(fd.assertion_flag){
10325 fd.assertion_flag=0;
10326 (ds.p=88092958);
10327 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a1)),NULL);
10328 fd.assertion_flag=1;
10329 }
10330 se_dst=caller;/*unlink*/
10331 }
10332
10333 void r121set_item(se_dump_stack*caller,T121* C,T0* a1){
10334 void**locals[1];
10335 static se_frame_descriptor fd={"set_item LINK",1,1,"%R121%i%R7%",1};
10336 se_dump_stack ds;
10337 ds.fd=&fd;
10338 ds.current=((void**)&C);
10339 ds.p=88090120;
10340 ds.caller=caller;
10341 ds.locals=locals;
10342 locals[0]=(void**)&a1;
10343 se_dst=&ds;/*link*/
10344 (ds.p=88090644);
10345 (/*SFN*/C->_item/*4*/)=a1;
10346 if(fd.assertion_flag){
10347 fd.assertion_flag=0;
10348 (ds.p=88091166);
10349 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
10350 fd.assertion_flag=1;
10351 }
10352 se_dst=caller;/*unlink*/
10353 }
10354
10355 T6 r121is_equal(se_dump_stack*caller,T121* C,T0* a1){
10356 T6 R=0;
10357 void**locals[2];
10358 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R121%other%R121%Result%E6%",1};
10359 se_dump_stack ds;
10360 ds.fd=&fd;
10361 ds.current=((void**)&C);
10362 ds.p=2120968;
10363 ds.caller=caller;
10364 ds.locals=locals;
10365 locals[0]=(void**)&a1;
10366 locals[1]=(void**)&R;
10367 se_dst=&ds;/*link*/
10368 se_require_uppermost_flag=1;
10369 if(fd.assertion_flag){
10370 fd.assertion_flag=0;
10371 (ds.p=2122048);
10372 ac_req((a1)!=((void*)(NULL)),"other_not_void");
10373 fd.assertion_flag=1;
10374 }
10375 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10376 fd.assertion_flag=0;
10377 (ds.p=2122846);
10378 ac_ens((!(r121standard_is_equal(&ds,C,a1)))||(R),"consistent");
10379 (ds.p=2123064);
10380 ac_ens((!(R))||(r121is_equal(&ds,((T121*)ci(121,a1,2123080)),(T0*)C)),"symmetric");
10381 fd.assertion_flag=1;
10382 }
10383 se_dst=caller;/*unlink*/
10384 return R;
10385 }
10386
10387 void r121make(se_dump_stack*caller,T121* C,T0* a1,T0* a2){
10388 void**locals[2];
10389 static se_frame_descriptor fd={"make LINK",1,2,"%R121%i%R7%n%R121%",1};
10390 se_dump_stack ds;
10391 ds.fd=&fd;
10392 ds.current=((void**)&C);
10393 ds.p=88087304;
10394 ds.caller=caller;
10395 ds.locals=locals;
10396 locals[0]=(void**)&a1;
10397 locals[1]=(void**)&a2;
10398 se_dst=&ds;/*link*/
10399 (ds.p=88087828);
10400 (/*SFN*/C->_item/*4*/)=a1;
10401 (ds.p=88088084);
10402 (/*SFN*/C->_next/*8*/)=a2;
10403 if(fd.assertion_flag){
10404 fd.assertion_flag=0;
10405 (ds.p=88088606);
10406 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
10407 (ds.p=88088862);
10408 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a2)),NULL);
10409 fd.assertion_flag=1;
10410 }
10411 se_dst=caller;/*unlink*/
10412 }
10413
10414 T6 r121standard_is_equal(se_dump_stack*caller,T121* C,T0* a1){
10415 T6 R=0;
10416 void**locals[2];
10417 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R121%other%R121%Result%E6%",1};
10418 se_dump_stack ds;
10419 ds.fd=&fd;
10420 ds.current=((void**)&C);
10421 ds.p=2128406;
10422 ds.caller=caller;
10423 ds.locals=locals;
10424 locals[0]=(void**)&a1;
10425 locals[1]=(void**)&R;
10426 se_dst=&ds;/*link*/
10427 se_require_uppermost_flag=1;
10428 if(fd.assertion_flag){
10429 fd.assertion_flag=0;
10430 (ds.p=2129184);
10431 ac_req((a1)!=((void*)(NULL)),NULL);
10432 fd.assertion_flag=1;
10433 }
10434 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10435 fd.assertion_flag=0;
10436 (ds.p=2129976);
10437 ac_ens((!(R))||(r121standard_is_equal(&ds,((T121*)ci(121,a1,2129992)),(T0*)C)),"symmetric");
10438 fd.assertion_flag=1;
10439 }
10440 se_dst=caller;/*unlink*/
10441 return R;
10442 }
10443
10444 T0* r121twin(se_dump_stack*caller,T121* C){
10445 T0* R=NULL;
10446 void**locals[1];
10447 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R121%Result%R121%",1};
10448 se_dump_stack ds;
10449 ds.fd=&fd;
10450 ds.current=((void**)&C);
10451 ds.p=2140182;
10452 ds.caller=caller;
10453 ds.locals=locals;
10454 locals[0]=(void**)&R;
10455 se_dst=&ds;/*link*/
10456 R=((void*)new121());
10457 *((T121*)R)=*C;
10458 if(fd.assertion_flag){
10459 fd.assertion_flag=0;
10460 (ds.p=2142256);
10461 ac_ens(r121is_equal(&ds,((T121*)ci(121,R,2142242)),(T0*)C),"equal");
10462 fd.assertion_flag=1;
10463 }
10464 se_dst=caller;/*unlink*/
10465 return R;
10466 }
10467
10468 void r121set_next(se_dump_stack*caller,T121* C,T0* a1){
10469 void**locals[1];
10470 static se_frame_descriptor fd={"set_next LINK",1,1,"%R121%n%R121%",1};
10471 se_dump_stack ds;
10472 ds.fd=&fd;
10473 ds.current=((void**)&C);
10474 ds.p=88091912;
10475 ds.caller=caller;
10476 ds.locals=locals;
10477 locals[0]=(void**)&a1;
10478 se_dst=&ds;/*link*/
10479 (ds.p=88092436);
10480 (/*SFN*/C->_next/*8*/)=a1;
10481 if(fd.assertion_flag){
10482 fd.assertion_flag=0;
10483 (ds.p=88092958);
10484 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a1)),NULL);
10485 fd.assertion_flag=1;
10486 }
10487 se_dst=caller;/*unlink*/
10488 }
10489
10490 void r122next(se_dump_stack*caller,T122* C){
10491 static se_frame_descriptor fd={"next ITERATOR_ON_LINKED_LIST",1,0,"%R122%",1};
10492 se_dump_stack ds;
10493 ds.fd=&fd;
10494 ds.current=((void**)&C);
10495 ds.p=83899656;
10496 ds.caller=caller;
10497 ds.locals=NULL;
10498 se_dst=&ds;/*link*/
10499 se_require_uppermost_flag=1;
10500 if(fd.assertion_flag){
10501 fd.assertion_flag=0;
10502 (ds.p=65022982);
10503 ac_req(r6_ix_not(&ds,r122is_off(&ds,C)),NULL);
10504 fd.assertion_flag=1;
10505 }
10506 (ds.p=83900166);
10507 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(((T67*)ci(67,(/*RF2*/(C)->_current_link/*8*/),83900198)))->_next/*8*/);
10508 se_dst=caller;/*unlink*/
10509 }
10510
10511 T6 r122is_equal(se_dump_stack*caller,T122* C,T0* a1){
10512 T6 R=0;
10513 void**locals[2];
10514 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R122%other%R122%Result%E6%",1};
10515 se_dump_stack ds;
10516 ds.fd=&fd;
10517 ds.current=((void**)&C);
10518 ds.p=2120968;
10519 ds.caller=caller;
10520 ds.locals=locals;
10521 locals[0]=(void**)&a1;
10522 locals[1]=(void**)&R;
10523 se_dst=&ds;/*link*/
10524 se_require_uppermost_flag=1;
10525 if(fd.assertion_flag){
10526 fd.assertion_flag=0;
10527 (ds.p=2122048);
10528 ac_req((a1)!=((void*)(NULL)),"other_not_void");
10529 fd.assertion_flag=1;
10530 }
10531 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10532 fd.assertion_flag=0;
10533 (ds.p=2122846);
10534 ac_ens((!(r122standard_is_equal(&ds,C,a1)))||(R),"consistent");
10535 (ds.p=2123064);
10536 ac_ens((!(R))||(r122is_equal(&ds,((T122*)ci(122,a1,2123080)),(T0*)C)),"symmetric");
10537 fd.assertion_flag=1;
10538 }
10539 se_dst=caller;/*unlink*/
10540 return R;
10541 }
10542
10543 T0* r122item(se_dump_stack*caller,T122* C){
10544 T0* R=NULL;
10545 void**locals[1];
10546 static se_frame_descriptor fd={"item ITERATOR_ON_LINKED_LIST",1,1,"%R122%Result%R65%",1};
10547 se_dump_stack ds;
10548 ds.fd=&fd;
10549 ds.current=((void**)&C);
10550 ds.p=83898376;
10551 ds.caller=caller;
10552 ds.locals=locals;
10553 locals[0]=(void**)&R;
10554 se_dst=&ds;/*link*/
10555 se_require_uppermost_flag=1;
10556 if(fd.assertion_flag){
10557 fd.assertion_flag=0;
10558 (ds.p=65020934);
10559 ac_req(r6_ix_not(&ds,r122is_off(&ds,C)),NULL);
10560 fd.assertion_flag=1;
10561 }
10562 (ds.p=83898886);
10563 R=(/*RF2*/(((T67*)ci(67,(/*RF2*/(C)->_current_link/*8*/),83898906)))->_item/*4*/);
10564 se_dst=caller;/*unlink*/
10565 return R;
10566 }
10567
10568 void r122make(se_dump_stack*caller,T122* C,T0* a1){
10569 void**locals[1];
10570 static se_frame_descriptor fd={"make ITERATOR_ON_LINKED_LIST",1,1,"%R122%ll%R66%",1};
10571 se_dump_stack ds;
10572 ds.fd=&fd;
10573 ds.current=((void**)&C);
10574 ds.p=83893256;
10575 ds.caller=caller;
10576 ds.locals=locals;
10577 locals[0]=(void**)&a1;
10578 se_dst=&ds;/*link*/
10579 se_require_uppermost_flag=1;
10580 if(fd.assertion_flag){
10581 fd.assertion_flag=0;
10582 (ds.p=83893772);
10583 ac_req((a1)!=((void*)(NULL)),NULL);
10584 fd.assertion_flag=1;
10585 }
10586 (ds.p=83894278);
10587 (/*SFN*/C->_linked_list/*4*/)=a1;
10588 (ds.p=83894534);
10589 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(se_i66(&ds,((T66*)ci(66,(/*RF2*/(C)->_linked_list/*4*/),83894566))))->_first_link/*8*/);
10590 if(fd.assertion_flag){
10591 fd.assertion_flag=0;
10592 (ds.p=83895070);
10593 ac_ens(((/*RF2*/(C)->_linked_list/*4*/))==((void*)(a1)),NULL);
10594 fd.assertion_flag=1;
10595 }
10596 se_dst=caller;/*unlink*/
10597 }
10598
10599 T6 r122standard_is_equal(se_dump_stack*caller,T122* C,T0* a1){
10600 T6 R=0;
10601 void**locals[2];
10602 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R122%other%R122%Result%E6%",1};
10603 se_dump_stack ds;
10604 ds.fd=&fd;
10605 ds.current=((void**)&C);
10606 ds.p=2128406;
10607 ds.caller=caller;
10608 ds.locals=locals;
10609 locals[0]=(void**)&a1;
10610 locals[1]=(void**)&R;
10611 se_dst=&ds;/*link*/
10612 se_require_uppermost_flag=1;
10613 if(fd.assertion_flag){
10614 fd.assertion_flag=0;
10615 (ds.p=2129184);
10616 ac_req((a1)!=((void*)(NULL)),NULL);
10617 fd.assertion_flag=1;
10618 }
10619 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10620 fd.assertion_flag=0;
10621 (ds.p=2129976);
10622 ac_ens((!(R))||(r122standard_is_equal(&ds,((T122*)ci(122,a1,2129992)),(T0*)C)),"symmetric");
10623 fd.assertion_flag=1;
10624 }
10625 se_dst=caller;/*unlink*/
10626 return R;
10627 }
10628
10629 T6 r122is_off(se_dump_stack*caller,T122* C){
10630 T6 R=0;
10631 void**locals[1];
10632 static se_frame_descriptor fd={"is_off ITERATOR_ON_LINKED_LIST",1,1,"%R122%Result%E6%",1};
10633 se_dump_stack ds;
10634 ds.fd=&fd;
10635 ds.current=((void**)&C);
10636 ds.p=83897096;
10637 ds.caller=caller;
10638 ds.locals=locals;
10639 locals[0]=(void**)&R;
10640 se_dst=&ds;/*link*/
10641 (ds.p=83897606);
10642 R=((/*RF2*/(C)->_current_link/*8*/))==((void*)(NULL));
10643 se_dst=caller;/*unlink*/
10644 return R;
10645 }
10646
10647 void r122start(se_dump_stack*caller,T122* C){
10648 static se_frame_descriptor fd={"start ITERATOR_ON_LINKED_LIST",1,0,"%R122%",1};
10649 se_dump_stack ds;
10650 ds.fd=&fd;
10651 ds.current=((void**)&C);
10652 ds.p=83895816;
10653 ds.caller=caller;
10654 ds.locals=NULL;
10655 se_dst=&ds;/*link*/
10656 (ds.p=83896326);
10657 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(se_i66(&ds,((T66*)ci(66,(/*RF2*/(C)->_linked_list/*4*/),83896358))))->_first_link/*8*/);
10658 se_dst=caller;/*unlink*/
10659 }
10660
10661 T0* r122twin(se_dump_stack*caller,T122* C){
10662 T0* R=NULL;
10663 void**locals[1];
10664 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R122%Result%R122%",1};
10665 se_dump_stack ds;
10666 ds.fd=&fd;
10667 ds.current=((void**)&C);
10668 ds.p=2140182;
10669 ds.caller=caller;
10670 ds.locals=locals;
10671 locals[0]=(void**)&R;
10672 se_dst=&ds;/*link*/
10673 R=((void*)new122());
10674 *((T122*)R)=*C;
10675 if(fd.assertion_flag){
10676 fd.assertion_flag=0;
10677 (ds.p=2142256);
10678 ac_ens(r122is_equal(&ds,((T122*)ci(122,R,2142242)),(T0*)C),"equal");
10679 fd.assertion_flag=1;
10680 }
10681 se_dst=caller;/*unlink*/
10682 return R;
10683 }
10684
10685 void r151next(se_dump_stack*caller,T151* C){
10686 static se_frame_descriptor fd={"next ITERATOR_ON_LINKED_LIST",1,0,"%R151%",1};
10687 se_dump_stack ds;
10688 ds.fd=&fd;
10689 ds.current=((void**)&C);
10690 ds.p=83899656;
10691 ds.caller=caller;
10692 ds.locals=NULL;
10693 se_dst=&ds;/*link*/
10694 se_require_uppermost_flag=1;
10695 if(fd.assertion_flag){
10696 fd.assertion_flag=0;
10697 (ds.p=65022982);
10698 ac_req(r6_ix_not(&ds,r151is_off(&ds,C)),NULL);
10699 fd.assertion_flag=1;
10700 }
10701 (ds.p=83900166);
10702 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(((T106*)ci(106,(/*RF2*/(C)->_current_link/*8*/),83900198)))->_next/*8*/);
10703 se_dst=caller;/*unlink*/
10704 }
10705
10706 T6 r151is_equal(se_dump_stack*caller,T151* C,T0* a1){
10707 T6 R=0;
10708 void**locals[2];
10709 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R151%other%R151%Result%E6%",1};
10710 se_dump_stack ds;
10711 ds.fd=&fd;
10712 ds.current=((void**)&C);
10713 ds.p=2120968;
10714 ds.caller=caller;
10715 ds.locals=locals;
10716 locals[0]=(void**)&a1;
10717 locals[1]=(void**)&R;
10718 se_dst=&ds;/*link*/
10719 se_require_uppermost_flag=1;
10720 if(fd.assertion_flag){
10721 fd.assertion_flag=0;
10722 (ds.p=2122048);
10723 ac_req((a1)!=((void*)(NULL)),"other_not_void");
10724 fd.assertion_flag=1;
10725 }
10726 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10727 fd.assertion_flag=0;
10728 (ds.p=2122846);
10729 ac_ens((!(r151standard_is_equal(&ds,C,a1)))||(R),"consistent");
10730 (ds.p=2123064);
10731 ac_ens((!(R))||(r151is_equal(&ds,((T151*)ci(151,a1,2123080)),(T0*)C)),"symmetric");
10732 fd.assertion_flag=1;
10733 }
10734 se_dst=caller;/*unlink*/
10735 return R;
10736 }
10737
10738 T0* r151item(se_dump_stack*caller,T151* C){
10739 T0* R=NULL;
10740 void**locals[1];
10741 static se_frame_descriptor fd={"item ITERATOR_ON_LINKED_LIST",1,1,"%R151%Result%R104%",1};
10742 se_dump_stack ds;
10743 ds.fd=&fd;
10744 ds.current=((void**)&C);
10745 ds.p=83898376;
10746 ds.caller=caller;
10747 ds.locals=locals;
10748 locals[0]=(void**)&R;
10749 se_dst=&ds;/*link*/
10750 se_require_uppermost_flag=1;
10751 if(fd.assertion_flag){
10752 fd.assertion_flag=0;
10753 (ds.p=65020934);
10754 ac_req(r6_ix_not(&ds,r151is_off(&ds,C)),NULL);
10755 fd.assertion_flag=1;
10756 }
10757 (ds.p=83898886);
10758 R=(/*RF2*/(((T106*)ci(106,(/*RF2*/(C)->_current_link/*8*/),83898906)))->_item/*4*/);
10759 se_dst=caller;/*unlink*/
10760 return R;
10761 }
10762
10763 void r151make(se_dump_stack*caller,T151* C,T0* a1){
10764 void**locals[1];
10765 static se_frame_descriptor fd={"make ITERATOR_ON_LINKED_LIST",1,1,"%R151%ll%R105%",1};
10766 se_dump_stack ds;
10767 ds.fd=&fd;
10768 ds.current=((void**)&C);
10769 ds.p=83893256;
10770 ds.caller=caller;
10771 ds.locals=locals;
10772 locals[0]=(void**)&a1;
10773 se_dst=&ds;/*link*/
10774 se_require_uppermost_flag=1;
10775 if(fd.assertion_flag){
10776 fd.assertion_flag=0;
10777 (ds.p=83893772);
10778 ac_req((a1)!=((void*)(NULL)),NULL);
10779 fd.assertion_flag=1;
10780 }
10781 (ds.p=83894278);
10782 (/*SFN*/C->_linked_list/*4*/)=a1;
10783 (ds.p=83894534);
10784 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(se_i105(&ds,((T105*)ci(105,(/*RF2*/(C)->_linked_list/*4*/),83894566))))->_first_link/*8*/);
10785 if(fd.assertion_flag){
10786 fd.assertion_flag=0;
10787 (ds.p=83895070);
10788 ac_ens(((/*RF2*/(C)->_linked_list/*4*/))==((void*)(a1)),NULL);
10789 fd.assertion_flag=1;
10790 }
10791 se_dst=caller;/*unlink*/
10792 }
10793
10794 T6 r151standard_is_equal(se_dump_stack*caller,T151* C,T0* a1){
10795 T6 R=0;
10796 void**locals[2];
10797 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R151%other%R151%Result%E6%",1};
10798 se_dump_stack ds;
10799 ds.fd=&fd;
10800 ds.current=((void**)&C);
10801 ds.p=2128406;
10802 ds.caller=caller;
10803 ds.locals=locals;
10804 locals[0]=(void**)&a1;
10805 locals[1]=(void**)&R;
10806 se_dst=&ds;/*link*/
10807 se_require_uppermost_flag=1;
10808 if(fd.assertion_flag){
10809 fd.assertion_flag=0;
10810 (ds.p=2129184);
10811 ac_req((a1)!=((void*)(NULL)),NULL);
10812 fd.assertion_flag=1;
10813 }
10814 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10815 fd.assertion_flag=0;
10816 (ds.p=2129976);
10817 ac_ens((!(R))||(r151standard_is_equal(&ds,((T151*)ci(151,a1,2129992)),(T0*)C)),"symmetric");
10818 fd.assertion_flag=1;
10819 }
10820 se_dst=caller;/*unlink*/
10821 return R;
10822 }
10823
10824 T6 r151is_off(se_dump_stack*caller,T151* C){
10825 T6 R=0;
10826 void**locals[1];
10827 static se_frame_descriptor fd={"is_off ITERATOR_ON_LINKED_LIST",1,1,"%R151%Result%E6%",1};
10828 se_dump_stack ds;
10829 ds.fd=&fd;
10830 ds.current=((void**)&C);
10831 ds.p=83897096;
10832 ds.caller=caller;
10833 ds.locals=locals;
10834 locals[0]=(void**)&R;
10835 se_dst=&ds;/*link*/
10836 (ds.p=83897606);
10837 R=((/*RF2*/(C)->_current_link/*8*/))==((void*)(NULL));
10838 se_dst=caller;/*unlink*/
10839 return R;
10840 }
10841
10842 void r151start(se_dump_stack*caller,T151* C){
10843 static se_frame_descriptor fd={"start ITERATOR_ON_LINKED_LIST",1,0,"%R151%",1};
10844 se_dump_stack ds;
10845 ds.fd=&fd;
10846 ds.current=((void**)&C);
10847 ds.p=83895816;
10848 ds.caller=caller;
10849 ds.locals=NULL;
10850 se_dst=&ds;/*link*/
10851 (ds.p=83896326);
10852 (/*SFN*/C->_current_link/*8*/)=(/*RF2*/(se_i105(&ds,((T105*)ci(105,(/*RF2*/(C)->_linked_list/*4*/),83896358))))->_first_link/*8*/);
10853 se_dst=caller;/*unlink*/
10854 }
10855
10856 T0* r151twin(se_dump_stack*caller,T151* C){
10857 T0* R=NULL;
10858 void**locals[1];
10859 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R151%Result%R151%",1};
10860 se_dump_stack ds;
10861 ds.fd=&fd;
10862 ds.current=((void**)&C);
10863 ds.p=2140182;
10864 ds.caller=caller;
10865 ds.locals=locals;
10866 locals[0]=(void**)&R;
10867 se_dst=&ds;/*link*/
10868 R=((void*)new151());
10869 *((T151*)R)=*C;
10870 if(fd.assertion_flag){
10871 fd.assertion_flag=0;
10872 (ds.p=2142256);
10873 ac_ens(r151is_equal(&ds,((T151*)ci(151,R,2142242)),(T0*)C),"equal");
10874 fd.assertion_flag=1;
10875 }
10876 se_dst=caller;/*unlink*/
10877 return R;
10878 }
10879
10880 T6 r140is_equal(se_dump_stack*caller,T140* C,T0* a1){
10881 T6 R=0;
10882 void**locals[2];
10883 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R140%other%R140%Result%E6%",1};
10884 se_dump_stack ds;
10885 ds.fd=&fd;
10886 ds.current=((void**)&C);
10887 ds.p=2120968;
10888 ds.caller=caller;
10889 ds.locals=locals;
10890 locals[0]=(void**)&a1;
10891 locals[1]=(void**)&R;
10892 se_dst=&ds;/*link*/
10893 se_require_uppermost_flag=1;
10894 if(fd.assertion_flag){
10895 fd.assertion_flag=0;
10896 (ds.p=2122048);
10897 ac_req((a1)!=((void*)(NULL)),"other_not_void");
10898 fd.assertion_flag=1;
10899 }
10900 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10901 fd.assertion_flag=0;
10902 (ds.p=2122846);
10903 ac_ens((!(r140standard_is_equal(&ds,C,a1)))||(R),"consistent");
10904 (ds.p=2123064);
10905 ac_ens((!(R))||(r140is_equal(&ds,((T140*)ci(140,a1,2123080)),(T0*)C)),"symmetric");
10906 fd.assertion_flag=1;
10907 }
10908 se_dst=caller;/*unlink*/
10909 return R;
10910 }
10911
10912 T6 r140standard_is_equal(se_dump_stack*caller,T140* C,T0* a1){
10913 T6 R=0;
10914 void**locals[2];
10915 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R140%other%R140%Result%E6%",1};
10916 se_dump_stack ds;
10917 ds.fd=&fd;
10918 ds.current=((void**)&C);
10919 ds.p=2128406;
10920 ds.caller=caller;
10921 ds.locals=locals;
10922 locals[0]=(void**)&a1;
10923 locals[1]=(void**)&R;
10924 se_dst=&ds;/*link*/
10925 se_require_uppermost_flag=1;
10926 if(fd.assertion_flag){
10927 fd.assertion_flag=0;
10928 (ds.p=2129184);
10929 ac_req((a1)!=((void*)(NULL)),NULL);
10930 fd.assertion_flag=1;
10931 }
10932 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
10933 fd.assertion_flag=0;
10934 (ds.p=2129976);
10935 ac_ens((!(R))||(r140standard_is_equal(&ds,((T140*)ci(140,a1,2129992)),(T0*)C)),"symmetric");
10936 fd.assertion_flag=1;
10937 }
10938 se_dst=caller;/*unlink*/
10939 return R;
10940 }
10941
10942 T0* r140twin(se_dump_stack*caller,T140* C){
10943 T0* R=NULL;
10944 void**locals[1];
10945 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R140%Result%R140%",1};
10946 se_dump_stack ds;
10947 ds.fd=&fd;
10948 ds.current=((void**)&C);
10949 ds.p=2140182;
10950 ds.caller=caller;
10951 ds.locals=locals;
10952 locals[0]=(void**)&R;
10953 se_dst=&ds;/*link*/
10954 R=((void*)new140());
10955 *((T140*)R)=*C;
10956 if(fd.assertion_flag){
10957 fd.assertion_flag=0;
10958 (ds.p=2142256);
10959 ac_ens(r140is_equal(&ds,((T140*)ci(140,R,2142242)),(T0*)C),"equal");
10960 fd.assertion_flag=1;
10961 }
10962 se_dst=caller;/*unlink*/
10963 return R;
10964 }
10965
10966 T6 r118safe_equal(se_dump_stack*caller,T118* C,T0* a1,T0* a2){
10967 T6 R=0;
10968 void**locals[3];
10969 static se_frame_descriptor fd={"safe_equal SAFE_EQUAL",1,3,"%R118%e1%R7%e2%R7%Result%E6%",1};
10970 se_dump_stack ds;
10971 ds.fd=&fd;
10972 ds.current=((void**)&C);
10973 ds.p=79697160;
10974 ds.caller=caller;
10975 ds.locals=locals;
10976 locals[0]=(void**)&a1;
10977 locals[1]=(void**)&a2;
10978 locals[2]=(void**)&R;
10979 se_dst=&ds;/*link*/
10980 /*[IF*/
10981 /*AF*//*AF*/if(((ds.p=79700008),(a1)==((void*)(a2)))){
10982 (ds.p=79700250);
10983 R=1;
10984 }
10985 else if(((ds.p=79700534),((a1)==((void*)(NULL)))||((a2)==((void*)(NULL))))){
10986 }
10987 else if(((ds.p=79700794),((T0*)(t[((T7*)a1)->id]))==((void*)((T0*)(t[((T7*)a2)->id]))))){
10988 (ds.p=79701018);
10989 R=r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,a1,79701038))),a2);
10990 }
10991 /*FI]*/
10992 if(se_rci(caller,C))se_i118(&ds,C);
10993 se_dst=caller;/*unlink*/
10994 return R;
10995 }
10996
10997 void r118copy(se_dump_stack*caller,T118* C,T0* a1){
10998 void**locals[1];
10999 static se_frame_descriptor fd={"copy LINKED_LIST",1,1,"%R118%other%R118%",1};
11000 se_dump_stack ds;
11001 ds.fd=&fd;
11002 ds.current=((void**)&C);
11003 ds.p=71349256;
11004 ds.caller=caller;
11005 ds.locals=locals;
11006 locals[0]=(void**)&a1;
11007 se_dst=&ds;/*link*/
11008 se_require_uppermost_flag=1;
11009 if(fd.assertion_flag){
11010 fd.assertion_flag=0;
11011 (ds.p=2144064);
11012 ac_req((a1)!=((void*)(NULL)),"other_not_void");
11013 fd.assertion_flag=1;
11014 }
11015 (ds.p=71349780);
11016 r118from_collection(&ds,C,a1);
11017 if(fd.assertion_flag){
11018 fd.assertion_flag=0;
11019 (ds.p=2144808);
11020 ac_ens(r118is_equal(&ds,C,a1),"is_equal");
11021 fd.assertion_flag=1;
11022 }
11023 if(se_rci(caller,C))se_i118(&ds,C);
11024 se_dst=caller;/*unlink*/
11025 }
11026
11027 T0* r118last(se_dump_stack*caller,T118* C){
11028 T0* R=NULL;
11029 void**locals[1];
11030 static se_frame_descriptor fd={"last LINKED_LIST",1,1,"%R118%Result%R7%",1};
11031 se_dump_stack ds;
11032 ds.fd=&fd;
11033 ds.current=((void**)&C);
11034 ds.p=71340808;
11035 ds.caller=caller;
11036 ds.locals=locals;
11037 locals[0]=(void**)&R;
11038 se_dst=&ds;/*link*/
11039 se_require_uppermost_flag=1;
11040 if(fd.assertion_flag){
11041 fd.assertion_flag=0;
11042 (ds.p=75520788);
11043 ac_req(r6_ix_not(&ds,r118is_empty(&ds,C)),NULL);
11044 fd.assertion_flag=1;
11045 }
11046 (ds.p=71341332);
11047 R=(/*RF2*/(((T121*)ci(121,(/*RF2*/(C)->_last_link/*12*/),71341352)))->_item/*4*/);
11048 if(fd.assertion_flag){
11049 fd.assertion_flag=0;
11050 (ds.p=75521570);
11051 ac_ens((R)==((void*)(r118item(&ds,C,(/*RF2*/(C)->_upper/*4*/)))),NULL);
11052 fd.assertion_flag=1;
11053 }
11054 if(se_rci(caller,C))se_i118(&ds,C);
11055 se_dst=caller;/*unlink*/
11056 return R;
11057 }
11058
11059 T2 r118count(se_dump_stack*caller,T118* C){
11060 T2 R=0;
11061 void**locals[1];
11062 static se_frame_descriptor fd={"count LINKED_LIST",1,1,"%R118%Result%E2%",1};
11063 se_dump_stack ds;
11064 ds.fd=&fd;
11065 ds.current=((void**)&C);
11066 ds.p=71346184;
11067 ds.caller=caller;
11068 ds.locals=locals;
11069 locals[0]=(void**)&R;
11070 se_dst=&ds;/*link*/
11071 (ds.p=71346708);
11072 R=(/*RF2*/(C)->_upper/*4*/);
11073 if(fd.assertion_flag){
11074 fd.assertion_flag=0;
11075 (ds.p=75511330);
11076 ac_ens((R)==((((/*RF2*/(C)->_upper/*4*/))-(1))+(1)),NULL);
11077 fd.assertion_flag=1;
11078 }
11079 if(se_rci(caller,C))se_i118(&ds,C);
11080 se_dst=caller;/*unlink*/
11081 return R;
11082 }
11083
11084 T6 r118is_equal(se_dump_stack*caller,T118* C,T0* a1){
11085 T6 R=0;
11086 T0* _lnk1=NULL;
11087 T0* _lnk2=NULL;
11088 void**locals[4];
11089 static se_frame_descriptor fd={"is_equal LINKED_LIST",1,4,"%R118%other%R118%Result%E6%lnk1%R121%lnk2%R121%",1};
11090 se_dump_stack ds;
11091 ds.fd=&fd;
11092 ds.current=((void**)&C);
11093 ds.p=71350536;
11094 ds.caller=caller;
11095 ds.locals=locals;
11096 locals[0]=(void**)&a1;
11097 locals[1]=(void**)&R;
11098 locals[2]=(void**)&_lnk1;
11099 locals[3]=(void**)&_lnk2;
11100 se_dst=&ds;/*link*/
11101 se_require_uppermost_flag=1;
11102 if(fd.assertion_flag){
11103 fd.assertion_flag=0;
11104 (ds.p=2122048);
11105 ac_req((a1)!=((void*)(NULL)),"other_not_void");
11106 fd.assertion_flag=1;
11107 }
11108 /*[IF*/
11109 if(((ds.p=71351594),(C)==((void*)(a1)))){
11110 (ds.p=71351834);
11111 R=1;
11112 }
11113 else if(((ds.p=71352110),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i118(&ds,((T118*)ci(118,a1,71352114))))->_upper/*4*/)))){
11114 (ds.p=71352608);
11115 R=1;
11116 (ds.p=71352864);
11117 _lnk1=(/*RF2*/(C)->_first_link/*8*/);
11118 (ds.p=71353120);
11119 _lnk2=(/*RF2*/(se_i118(&ds,((T118*)ci(118,a1,71353136))))->_first_link/*8*/);
11120 while (!(((ds.p=71353656),r6_px_or(&ds,(_lnk1)==((void*)(NULL)),r6_ix_not(&ds,R)))))
11121 {
11122 (ds.p=71354144);
11123 R=((/*RF2*/(((T121*)ci(121,_lnk1,71354164)))->_item/*4*/))==((void*)((/*RF2*/(((T121*)ci(121,_lnk2,71354188)))->_item/*4*/)));
11124 (ds.p=71354400);
11125 _lnk1=(/*RF2*/(((T121*)ci(121,_lnk1,71354416)))->_next/*8*/);
11126 (ds.p=71354656);
11127 _lnk2=(/*RF2*/(((T121*)ci(121,_lnk2,71354672)))->_next/*8*/);
11128 }
11129 }
11130 /*FI]*/
11131 if(fd.assertion_flag){
11132 fd.assertion_flag=0;
11133 (ds.p=75585556);
11134 ac_ens((!(R))||(r6_px_and(&ds,(1)==(1),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i118(&ds,((T118*)ci(118,a1,75585638))))->_upper/*4*/)))),NULL);
11135 (ds.p=2122846);
11136 ac_ens((!(r118standard_is_equal(&ds,C,a1)))||(R),"consistent");
11137 (ds.p=2123064);
11138 ac_ens((!(R))||(r118is_equal(&ds,se_i118(&ds,((T118*)ci(118,a1,2123080))),(T0*)C)),"symmetric");
11139 fd.assertion_flag=1;
11140 }
11141 if(se_rci(caller,C))se_i118(&ds,C);
11142 se_dst=caller;/*unlink*/
11143 return R;
11144 }
11145
11146 T0* r118item(se_dump_stack*caller,T118* C,T2 a1){
11147 T0* R=NULL;
11148 void**locals[2];
11149 static se_frame_descriptor fd={"item LINKED_LIST",1,2,"%R118%index%E2%Result%R7%",1};
11150 se_dump_stack ds;
11151 ds.fd=&fd;
11152 ds.current=((void**)&C);
11153 ds.p=71342088;
11154 ds.caller=caller;
11155 ds.locals=locals;
11156 locals[0]=(void**)&a1;
11157 locals[1]=(void**)&R;
11158 se_dst=&ds;/*link*/
11159 se_require_uppermost_flag=1;
11160 if(fd.assertion_flag){
11161 fd.assertion_flag=0;
11162 (ds.p=75516692);
11163 ac_req(r118valid_index(&ds,C,a1),NULL);
11164 fd.assertion_flag=1;
11165 }
11166 /*[IF*/
11167 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
11168 (ds.p=71342874);
11169 r118go_item(&ds,C,a1);
11170 }
11171 /*FI]*/
11172 (ds.p=71343380);
11173 R=(/*RF2*/(((T121*)ci(121,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
11174 if(se_rci(caller,C))se_i118(&ds,C);
11175 se_dst=caller;/*unlink*/
11176 return R;
11177 }
11178
11179 T6 r118valid_index(se_dump_stack*caller,T118* C,T2 a1){
11180 T6 R=0;
11181 void**locals[2];
11182 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R118%index%E2%Result%E6%",1};
11183 se_dump_stack ds;
11184 ds.fd=&fd;
11185 ds.current=((void**)&C);
11186 ds.p=75507478;
11187 ds.caller=caller;
11188 ds.locals=locals;
11189 locals[0]=(void**)&a1;
11190 locals[1]=(void**)&R;
11191 se_dst=&ds;/*link*/
11192 (ds.p=75508500);
11193 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)));
11194 if(fd.assertion_flag){
11195 fd.assertion_flag=0;
11196 (ds.p=75509026);
11197 ac_ens((R)==(((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)))),NULL);
11198 fd.assertion_flag=1;
11199 }
11200 if(se_rci(caller,C))se_i118(&ds,C);
11201 se_dst=caller;/*unlink*/
11202 return R;
11203 }
11204
11205 T2 r118index_of(se_dump_stack*caller,T118* C,T0* a1){
11206 T2 R=0;
11207 void**locals[2];
11208 static se_frame_descriptor fd={"index_of LINKED_LIST",1,2,"%R118%x%R7%Result%E2%",1};
11209 se_dump_stack ds;
11210 ds.fd=&fd;
11211 ds.current=((void**)&C);
11212 ds.p=71361288;
11213 ds.caller=caller;
11214 ds.locals=locals;
11215 locals[0]=(void**)&a1;
11216 locals[1]=(void**)&R;
11217 se_dst=&ds;/*link*/
11218 (ds.p=71362074);
11219 R=1;
11220 while (!(((ds.p=71362620),((R)>((/*RF2*/(C)->_upper/*4*/)))||(r118safe_equal(&ds,C,a1,r118item(&ds,C,R))))))
11221 {
11222 (ds.p=71363098);
11223 R=(R)+(1);
11224 }
11225 if(fd.assertion_flag){
11226 fd.assertion_flag=0;
11227 (ds.p=75578912);
11228 ac_ens((1)<=(R),NULL);
11229 (ds.p=75579170);
11230 ac_ens((R)<=(((/*RF2*/(C)->_upper/*4*/))+(1)),NULL);
11231 (ds.p=75579444);
11232 ac_ens((!((R)<=((/*RF2*/(C)->_upper/*4*/))))||(r118equal(&ds,C,a1,r118item(&ds,C,R))),NULL);
11233 fd.assertion_flag=1;
11234 }
11235 if(se_rci(caller,C))se_i118(&ds,C);
11236 se_dst=caller;/*unlink*/
11237 return R;
11238 }
11239
11240 void r118make(se_dump_stack*caller,T118* C){
11241 static se_frame_descriptor fd={"make LINKED_LIST",1,0,"%R118%",1};
11242 se_dump_stack ds;
11243 ds.fd=&fd;
11244 ds.current=((void**)&C);
11245 ds.p=71313672;
11246 ds.caller=caller;
11247 ds.locals=NULL;
11248 se_dst=&ds;/*link*/
11249 (ds.p=71314452);
11250 (/*SFN*/C->_first_link/*8*/)=NULL;
11251 (ds.p=71314708);
11252 (/*SFN*/C->_upper/*4*/)=0;
11253 (ds.p=71314964);
11254 (/*SFN*/C->_last_link/*12*/)=NULL;
11255 (ds.p=71315220);
11256 (/*SFN*/C->_mem_idx/*16*/)=0;
11257 (ds.p=71315476);
11258 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
11259 if(fd.assertion_flag){
11260 fd.assertion_flag=0;
11261 (ds.p=71316000);
11262 ac_ens((r118count(&ds,C))==(0),NULL);
11263 fd.assertion_flag=1;
11264 }
11265 if(se_rci(caller,C))se_i118(&ds,C);
11266 se_dst=caller;/*unlink*/
11267 }
11268
11269 T6 r118equal(se_dump_stack*caller,T118* C,T0* a1,T0* a2){
11270 T6 R=0;
11271 void**locals[3];
11272 static se_frame_descriptor fd={"equal GENERAL",1,3,"%R118%some%R10%other%R10%Result%E6%",1};
11273 se_dump_stack ds;
11274 ds.fd=&fd;
11275 ds.current=((void**)&C);
11276 ds.p=2116630;
11277 ds.caller=caller;
11278 ds.locals=locals;
11279 locals[0]=(void**)&a1;
11280 locals[1]=(void**)&a2;
11281 locals[2]=(void**)&R;
11282 se_dst=&ds;/*link*/
11283 /*[IF*/
11284 if(((ds.p=2117668),(a1)==((void*)(a2)))){
11285 (ds.p=2117914);
11286 R=1;
11287 }
11288 else if(((ds.p=2118188),(a1)==((void*)(NULL)))){
11289 }
11290 else if(((ds.p=2118446),(a2)==((void*)(NULL)))){
11291 }
11292 else{
11293 (ds.p=2118938);
11294 R=X10is_equal(&ds,2118958,a1,a2);
11295 }
11296 /*FI]*/
11297 if(fd.assertion_flag){
11298 fd.assertion_flag=0;
11299 (ds.p=2119804);
11300 ac_ens(((R)==(r6_px_and(&ds,(a1)==((void*)(NULL)),(a2)==((void*)(NULL)))))||((r6_px_and(&ds,(a1)!=((void*)(NULL)),(a2)!=((void*)(NULL))))&&(X10is_equal(&ds,2120238,a1,a2))),"definition");
11301 fd.assertion_flag=1;
11302 }
11303 if(se_rci(caller,C))se_i118(&ds,C);
11304 se_dst=caller;/*unlink*/
11305 return R;
11306 }
11307
11308 T6 r118is_empty(se_dump_stack*caller,T118* C){
11309 T6 R=0;
11310 void**locals[1];
11311 static se_frame_descriptor fd={"is_empty LINKED_LIST",1,1,"%R118%Result%E6%",1};
11312 se_dump_stack ds;
11313 ds.fd=&fd;
11314 ds.current=((void**)&C);
11315 ds.p=71316744;
11316 ds.caller=caller;
11317 ds.locals=locals;
11318 locals[0]=(void**)&R;
11319 se_dst=&ds;/*link*/
11320 (ds.p=71317254);
11321 R=((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL));
11322 if(fd.assertion_flag){
11323 fd.assertion_flag=0;
11324 (ds.p=75513108);
11325 ac_ens((R)==((r118count(&ds,C))==(0)),NULL);
11326 fd.assertion_flag=1;
11327 }
11328 if(se_rci(caller,C))se_i118(&ds,C);
11329 se_dst=caller;/*unlink*/
11330 return R;
11331 }
11332
11333 T6 r118has(se_dump_stack*caller,T118* C,T0* a1){
11334 T6 R=0;
11335 void**locals[2];
11336 static se_frame_descriptor fd={"has COLLECTION",1,2,"%R118%x%R7%Result%E6%",1};
11337 se_dump_stack ds;
11338 ds.fd=&fd;
11339 ds.current=((void**)&C);
11340 ds.p=75572488;
11341 ds.caller=caller;
11342 ds.locals=locals;
11343 locals[0]=(void**)&a1;
11344 locals[1]=(void**)&R;
11345 se_dst=&ds;/*link*/
11346 (ds.p=75573524);
11347 R=r118valid_index(&ds,C,r118index_of(&ds,C,a1));
11348 if(se_rci(caller,C))se_i118(&ds,C);
11349 se_dst=caller;/*unlink*/
11350 return R;
11351 }
11352
11353 T6 r118standard_is_equal(se_dump_stack*caller,T118* C,T0* a1){
11354 T6 R=0;
11355 void**locals[2];
11356 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R118%other%R118%Result%E6%",1};
11357 se_dump_stack ds;
11358 ds.fd=&fd;
11359 ds.current=((void**)&C);
11360 ds.p=2128406;
11361 ds.caller=caller;
11362 ds.locals=locals;
11363 locals[0]=(void**)&a1;
11364 locals[1]=(void**)&R;
11365 se_dst=&ds;/*link*/
11366 se_require_uppermost_flag=1;
11367 if(fd.assertion_flag){
11368 fd.assertion_flag=0;
11369 (ds.p=2129184);
11370 ac_req((a1)!=((void*)(NULL)),NULL);
11371 fd.assertion_flag=1;
11372 }
11373 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
11374 fd.assertion_flag=0;
11375 (ds.p=2129976);
11376 ac_ens((!(R))||(r118standard_is_equal(&ds,se_i118(&ds,((T118*)ci(118,a1,2129992))),(T0*)C)),"symmetric");
11377 fd.assertion_flag=1;
11378 }
11379 if(se_rci(caller,C))se_i118(&ds,C);
11380 se_dst=caller;/*unlink*/
11381 return R;
11382 }
11383
11384 T0* r118_px_64(se_dump_stack*caller,T118* C,T2 a1){
11385 T0* R=NULL;
11386 void**locals[2];
11387 static se_frame_descriptor fd={"infix @ (item LINKED_LIST)",1,2,"%R118%index%E2%Result%R7%",1};
11388 se_dump_stack ds;
11389 ds.fd=&fd;
11390 ds.current=((void**)&C);
11391 ds.p=71342088;
11392 ds.caller=caller;
11393 ds.locals=locals;
11394 locals[0]=(void**)&a1;
11395 locals[1]=(void**)&R;
11396 se_dst=&ds;/*link*/
11397 se_require_uppermost_flag=1;
11398 if(fd.assertion_flag){
11399 fd.assertion_flag=0;
11400 (ds.p=75516692);
11401 ac_req(r118valid_index(&ds,C,a1),NULL);
11402 fd.assertion_flag=1;
11403 }
11404 /*[IF*/
11405 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
11406 (ds.p=71342874);
11407 r118go_item(&ds,C,a1);
11408 }
11409 /*FI]*/
11410 (ds.p=71343380);
11411 R=(/*RF2*/(((T121*)ci(121,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
11412 if(se_rci(caller,C))se_i118(&ds,C);
11413 se_dst=caller;/*unlink*/
11414 return R;
11415 }
11416
11417 void r118add_last(se_dump_stack*caller,T118* C,T0* a1){
11418 T0* _lnk=NULL;
11419 T2 o36_185_26=0;
11420 T2 o36_186_22=0;
11421 T2 o36_187_26=0;
11422 void**locals[5];
11423 static se_frame_descriptor fd={"add_last LINKED_LIST",1,5,"%R118%element%R7%lnk%R121%old value%E2%old value%E2%old value%E2%",1};
11424 se_dump_stack ds;
11425 ds.fd=&fd;
11426 ds.current=((void**)&C);
11427 ds.p=71321864;
11428 ds.caller=caller;
11429 ds.locals=locals;
11430 locals[0]=(void**)&a1;
11431 locals[1]=(void**)&_lnk;
11432 locals[2]=(void**)&o36_185_26;
11433 locals[3]=(void**)&o36_186_22;
11434 locals[4]=(void**)&o36_187_26;
11435 se_dst=&ds;/*link*/
11436 o36_185_26=r118count(&ds,C);
11437 o36_186_22=1;
11438 o36_187_26=(/*RF2*/(C)->_upper/*4*/);
11439 /*[IF*/
11440 if(((ds.p=71322928),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
11441 (ds.p=71323162);
11442 {T121*n=new121();
11443 r121make(&ds,n,a1,NULL);
11444 (/*SFN*/C->_first_link/*8*/)=((T0*)n);
11445 }
11446 (ds.p=71323418);
11447 (/*SFN*/C->_upper/*4*/)=1;
11448 (ds.p=71323674);
11449 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_first_link/*8*/);
11450 (ds.p=71323930);
11451 (/*SFN*/C->_mem_idx/*16*/)=1;
11452 (ds.p=71324186);
11453 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
11454 }
11455 else{
11456 (ds.p=71324698);
11457 {T121*n=new121();
11458 r121make(&ds,n,a1,NULL);
11459 _lnk=((T0*)n);
11460 }
11461 (ds.p=71324974);
11462 r121set_next(&ds,((T121*)ci(121,(/*RF2*/(C)->_last_link/*12*/),71324954)),_lnk);
11463 (ds.p=71325210);
11464 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))+(1);
11465 (ds.p=71325466);
11466 (/*SFN*/C->_last_link/*12*/)=_lnk;
11467 }
11468 /*FI]*/
11469 if(fd.assertion_flag){
11470 fd.assertion_flag=0;
11471 (ds.p=75544606);
11472 ac_ens((r118last(&ds,C))==((void*)(a1)),NULL);
11473 (ds.p=75544864);
11474 ac_ens((r118count(&ds,C))==((1)+(o36_185_26)),NULL);
11475 (ds.p=75545120);
11476 ac_ens((1)==(o36_186_22),NULL);
11477 (ds.p=75545376);
11478 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((1)+(o36_187_26)),NULL);
11479 fd.assertion_flag=1;
11480 }
11481 if(se_rci(caller,C))se_i118(&ds,C);
11482 se_dst=caller;/*unlink*/
11483 }
11484
11485 void r118clear(se_dump_stack*caller,T118* C){
11486 static se_frame_descriptor fd={"clear LINKED_LIST",1,0,"%R118%",1};
11487 se_dump_stack ds;
11488 ds.fd=&fd;
11489 ds.current=((void**)&C);
11490 ds.p=71367688;
11491 ds.caller=caller;
11492 ds.locals=NULL;
11493 se_dst=&ds;/*link*/
11494 /*[IF*/
11495 if(((ds.p=71368240),((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL)))){
11496 (ds.p=71368474);
11497 (/*SFN*/C->_first_link/*8*/)=NULL;
11498 (ds.p=71368730);
11499 (/*SFN*/C->_mem_idx/*16*/)=0;
11500 (ds.p=71368986);
11501 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
11502 (ds.p=71369242);
11503 (/*SFN*/C->_upper/*4*/)=0;
11504 (ds.p=71369498);
11505 (/*SFN*/C->_last_link/*12*/)=NULL;
11506 }
11507 /*FI]*/
11508 if(fd.assertion_flag){
11509 fd.assertion_flag=0;
11510 (ds.p=71370272);
11511 ac_ens(((/*RF2*/(C)->_upper/*4*/))==(0),NULL);
11512 (ds.p=75571220);
11513 ac_ens(r118is_empty(&ds,C),NULL);
11514 fd.assertion_flag=1;
11515 }
11516 if(se_rci(caller,C))se_i118(&ds,C);
11517 se_dst=caller;/*unlink*/
11518 }
11519
11520 T0* r118twin(se_dump_stack*caller,T118* C){
11521 T0* R=NULL;
11522 void**locals[1];
11523 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R118%Result%R118%",1};
11524 se_dump_stack ds;
11525 ds.fd=&fd;
11526 ds.current=((void**)&C);
11527 ds.p=2140182;
11528 ds.caller=caller;
11529 ds.locals=locals;
11530 locals[0]=(void**)&R;
11531 se_dst=&ds;/*link*/
11532 R=((void*)new118());
11533 r118copy(&ds,((T118*)R),((T0*)C));
11534 if(fd.assertion_flag){
11535 fd.assertion_flag=0;
11536 (ds.p=2142256);
11537 ac_ens(r118is_equal(&ds,se_i118(&ds,((T118*)ci(118,R,2142242))),(T0*)C),"equal");
11538 fd.assertion_flag=1;
11539 }
11540 if(se_rci(caller,C))se_i118(&ds,C);
11541 se_dst=caller;/*unlink*/
11542 return R;
11543 }
11544
11545 void r118go_item(se_dump_stack*caller,T118* C,T2 a1){
11546 void**locals[1];
11547 static se_frame_descriptor fd={"go_item LINKED_LIST",1,1,"%R118%i%E2%",1};
11548 se_dump_stack ds;
11549 ds.fd=&fd;
11550 ds.current=((void**)&C);
11551 ds.p=71418632;
11552 ds.caller=caller;
11553 ds.locals=locals;
11554 locals[0]=(void**)&a1;
11555 se_dst=&ds;/*link*/
11556 se_require_uppermost_flag=1;
11557 if(fd.assertion_flag){
11558 fd.assertion_flag=0;
11559 (ds.p=71419156);
11560 ac_req(r118valid_index(&ds,C,a1),NULL);
11561 (ds.p=71419428);
11562 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))!=(a1),NULL);
11563 (ds.p=71419684);
11564 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))>(0),NULL);
11565 (ds.p=71419940);
11566 ac_req(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
11567 fd.assertion_flag=1;
11568 }
11569 /*[IF*/
11570 if(((ds.p=71420458),((/*RF2*/(C)->_mem_idx/*16*/))>(a1))){
11571 (ds.p=71420698);
11572 (/*SFN*/C->_mem_idx/*16*/)=1;
11573 (ds.p=71420954);
11574 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
11575 }
11576 /*FI]*/
11577 while (!(((ds.p=71421982),(a1)==((/*RF2*/(C)->_mem_idx/*16*/)))))
11578 {
11579 (ds.p=71422490);
11580 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(((T121*)ci(121,(/*RF2*/(C)->_mem_lnk/*20*/),71422512)))->_next/*8*/);
11581 (ds.p=71422746);
11582 (/*SFN*/C->_mem_idx/*16*/)=((/*RF2*/(C)->_mem_idx/*16*/))+(1);
11583 }
11584 if(fd.assertion_flag){
11585 fd.assertion_flag=0;
11586 (ds.p=71423524);
11587 ac_ens(((/*RF2*/(C)->_mem_idx/*16*/))==(a1),NULL);
11588 (ds.p=71423780);
11589 ac_ens(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
11590 fd.assertion_flag=1;
11591 }
11592 if(se_rci(caller,C))se_i118(&ds,C);
11593 se_dst=caller;/*unlink*/
11594 }
11595
11596 void r118from_collection(se_dump_stack*caller,T118* C,T0* a1){
11597 T2 _i=0;
11598 T2 _up=0;
11599 T0* _lnk=NULL;
11600 void**locals[4];
11601 static se_frame_descriptor fd={"from_collection LINKED_LIST",1,4,"%R118%model%R70%i%E2%up%E2%lnk%R121%",1};
11602 se_dump_stack ds;
11603 ds.fd=&fd;
11604 ds.current=((void**)&C);
11605 ds.p=71371016;
11606 ds.caller=caller;
11607 ds.locals=locals;
11608 locals[0]=(void**)&a1;
11609 locals[1]=(void**)&_i;
11610 locals[2]=(void**)&_up;
11611 locals[3]=(void**)&_lnk;
11612 se_dst=&ds;/*link*/
11613 se_require_uppermost_flag=1;
11614 if(fd.assertion_flag){
11615 fd.assertion_flag=0;
11616 (ds.p=75559968);
11617 ac_req((a1)!=((void*)(NULL)),NULL);
11618 fd.assertion_flag=1;
11619 }
11620 /*[IF*/
11621 if(((ds.p=71372336),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
11622 (ds.p=71372832);
11623 _i=X70lower(&ds,71372842,a1);
11624 (ds.p=71373088);
11625 _up=X70upper(&ds,71373100,a1);
11626 while (!(((ds.p=71373604),(_i)>(_up))))
11627 {
11628 (ds.p=71374112);
11629 r118add_last(&ds,C,X70item(&ds,71374130,a1,_i));
11630 (ds.p=71374368);
11631 _i=(_i)+(1);
11632 }
11633 }
11634 else{
11635 (ds.p=71375392);
11636 _lnk=(/*RF2*/(C)->_first_link/*8*/);
11637 (ds.p=71375648);
11638 _i=X70lower(&ds,71375658,a1);
11639 (ds.p=71375904);
11640 _up=X70upper(&ds,71375916,a1);
11641 while (!(((ds.p=71376420),(_i)>(_up))))
11642 {
11643 /*[IF*/
11644 if(((ds.p=71376942),(_lnk)==((void*)(NULL)))){
11645 (ds.p=71377190);
11646 r118add_last(&ds,C,X70item(&ds,71377208,a1,_i));
11647 }
11648 else{
11649 (ds.p=71377710);
11650 r121set_item(&ds,((T121*)ci(121,_lnk,71377702)),X70item(&ds,71377728,a1,_i));
11651 (ds.p=71377958);
11652 _lnk=(/*RF2*/(((T121*)ci(121,_lnk,71377972)))->_next/*8*/);
11653 }
11654 /*FI]*/
11655 (ds.p=71378464);
11656 _i=(_i)+(1);
11657 }
11658 /*[IF*/
11659 if(((ds.p=71378984),(_lnk)==((void*)((/*RF2*/(C)->_first_link/*8*/))))){
11660 if(fd.assertion_flag){
11661 fd.assertion_flag=0;
11662 (ds.p=71379518);
11663 ac_civ((X70count(&ds,71379494,a1))==(0),NULL);
11664 fd.assertion_flag=1;
11665 }
11666 (ds.p=71380000);
11667 r118clear(&ds,C);
11668 }
11669 else if(((ds.p=71380272),(_lnk)!=((void*)(NULL)))){
11670 (ds.p=71380512);
11671 _i=X70count(&ds,71380522,a1);
11672 /*[IF*/
11673 if(((ds.p=71380790),((/*RF2*/(C)->_mem_idx/*16*/))!=(_i))){
11674 (ds.p=71381030);
11675 r118go_item(&ds,C,_i);
11676 }
11677 /*FI]*/
11678 if(fd.assertion_flag){
11679 fd.assertion_flag=0;
11680 (ds.p=71381806);
11681 ac_civ((_lnk)==((void*)((/*RF2*/(((T121*)ci(121,(/*RF2*/(C)->_mem_lnk/*20*/),71381810)))->_next/*8*/))),NULL);
11682 fd.assertion_flag=1;
11683 }
11684 (ds.p=71382320);
11685 r121set_next(&ds,((T121*)ci(121,(/*RF2*/(C)->_mem_lnk/*20*/),71382304)),NULL);
11686 (ds.p=71382560);
11687 (/*SFN*/C->_upper/*4*/)=_i;
11688 (ds.p=71382816);
11689 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_mem_lnk/*20*/);
11690 }
11691 /*FI]*/
11692 }
11693 /*FI]*/
11694 if(fd.assertion_flag){
11695 fd.assertion_flag=0;
11696 (ds.p=75560736);
11697 ac_ens((r118count(&ds,C))==(X70count(&ds,75560740,a1)),NULL);
11698 fd.assertion_flag=1;
11699 }
11700 if(se_rci(caller,C))se_i118(&ds,C);
11701 se_dst=caller;/*unlink*/
11702 }
11703 se_frame_descriptor se_ifd118={"invariant once LINKED_LIST[STRING]",1,0,"%R118%",1};
11704
11705 T118*se_i118(se_dump_stack*caller,T118*C){
11706 se_dump_stack ds;
11707 ds.fd=&se_ifd118;
11708 ds.current=((void**)&C);
11709 ds.p=71306254;
11710 ds.caller=caller;
11711 se_dst=&ds;
11712 if(ds.fd->assertion_flag){
11713 ds.fd->assertion_flag=0;
11714 (ds.p=75651888);
11715 ac_inv((1)<=(((/*RF2*/(C)->_upper/*4*/))+(1)),"valid_bounds");
11716 (ds.p=71425330);
11717 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))==((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))==(0)),((/*RF2*/(C)->_mem_idx/*16*/))==(0)),((/*RF2*/(C)->_mem_lnk/*20*/))==((void*)(NULL)))),"empty_status");
11718 (ds.p=71426612);
11719 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))!=((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))>(0)),((/*RF2*/(C)->_mem_idx/*16*/))>(0)),((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)))),"not_empty_status");
11720 ds.fd->assertion_flag=1;
11721 }
11722 se_dst=caller;
11723 return C;
11724 }
11725
11726 void r105copy(se_dump_stack*caller,T105* C,T0* a1){
11727 void**locals[1];
11728 static se_frame_descriptor fd={"copy LINKED_LIST",1,1,"%R105%other%R105%",1};
11729 se_dump_stack ds;
11730 ds.fd=&fd;
11731 ds.current=((void**)&C);
11732 ds.p=71349256;
11733 ds.caller=caller;
11734 ds.locals=locals;
11735 locals[0]=(void**)&a1;
11736 se_dst=&ds;/*link*/
11737 se_require_uppermost_flag=1;
11738 if(fd.assertion_flag){
11739 fd.assertion_flag=0;
11740 (ds.p=2144064);
11741 ac_req((a1)!=((void*)(NULL)),"other_not_void");
11742 fd.assertion_flag=1;
11743 }
11744 (ds.p=71349780);
11745 r105from_collection(&ds,C,a1);
11746 if(fd.assertion_flag){
11747 fd.assertion_flag=0;
11748 (ds.p=2144808);
11749 ac_ens(r105is_equal(&ds,C,a1),"is_equal");
11750 fd.assertion_flag=1;
11751 }
11752 if(se_rci(caller,C))se_i105(&ds,C);
11753 se_dst=caller;/*unlink*/
11754 }
11755
11756 T0* r105last(se_dump_stack*caller,T105* C){
11757 T0* R=NULL;
11758 void**locals[1];
11759 static se_frame_descriptor fd={"last LINKED_LIST",1,1,"%R105%Result%R104%",1};
11760 se_dump_stack ds;
11761 ds.fd=&fd;
11762 ds.current=((void**)&C);
11763 ds.p=71340808;
11764 ds.caller=caller;
11765 ds.locals=locals;
11766 locals[0]=(void**)&R;
11767 se_dst=&ds;/*link*/
11768 se_require_uppermost_flag=1;
11769 if(fd.assertion_flag){
11770 fd.assertion_flag=0;
11771 (ds.p=75520788);
11772 ac_req(r6_ix_not(&ds,r105is_empty(&ds,C)),NULL);
11773 fd.assertion_flag=1;
11774 }
11775 (ds.p=71341332);
11776 R=(/*RF2*/(((T106*)ci(106,(/*RF2*/(C)->_last_link/*12*/),71341352)))->_item/*4*/);
11777 if(fd.assertion_flag){
11778 fd.assertion_flag=0;
11779 (ds.p=75521570);
11780 ac_ens((R)==((void*)(r105item(&ds,C,(/*RF2*/(C)->_upper/*4*/)))),NULL);
11781 fd.assertion_flag=1;
11782 }
11783 if(se_rci(caller,C))se_i105(&ds,C);
11784 se_dst=caller;/*unlink*/
11785 return R;
11786 }
11787
11788 T2 r105count(se_dump_stack*caller,T105* C){
11789 T2 R=0;
11790 void**locals[1];
11791 static se_frame_descriptor fd={"count LINKED_LIST",1,1,"%R105%Result%E2%",1};
11792 se_dump_stack ds;
11793 ds.fd=&fd;
11794 ds.current=((void**)&C);
11795 ds.p=71346184;
11796 ds.caller=caller;
11797 ds.locals=locals;
11798 locals[0]=(void**)&R;
11799 se_dst=&ds;/*link*/
11800 (ds.p=71346708);
11801 R=(/*RF2*/(C)->_upper/*4*/);
11802 if(fd.assertion_flag){
11803 fd.assertion_flag=0;
11804 (ds.p=75511330);
11805 ac_ens((R)==((((/*RF2*/(C)->_upper/*4*/))-(1))+(1)),NULL);
11806 fd.assertion_flag=1;
11807 }
11808 if(se_rci(caller,C))se_i105(&ds,C);
11809 se_dst=caller;/*unlink*/
11810 return R;
11811 }
11812
11813 T6 r105is_equal(se_dump_stack*caller,T105* C,T0* a1){
11814 T6 R=0;
11815 T0* _lnk1=NULL;
11816 T0* _lnk2=NULL;
11817 void**locals[4];
11818 static se_frame_descriptor fd={"is_equal LINKED_LIST",1,4,"%R105%other%R105%Result%E6%lnk1%R106%lnk2%R106%",1};
11819 se_dump_stack ds;
11820 ds.fd=&fd;
11821 ds.current=((void**)&C);
11822 ds.p=71350536;
11823 ds.caller=caller;
11824 ds.locals=locals;
11825 locals[0]=(void**)&a1;
11826 locals[1]=(void**)&R;
11827 locals[2]=(void**)&_lnk1;
11828 locals[3]=(void**)&_lnk2;
11829 se_dst=&ds;/*link*/
11830 se_require_uppermost_flag=1;
11831 if(fd.assertion_flag){
11832 fd.assertion_flag=0;
11833 (ds.p=2122048);
11834 ac_req((a1)!=((void*)(NULL)),"other_not_void");
11835 fd.assertion_flag=1;
11836 }
11837 /*[IF*/
11838 if(((ds.p=71351594),(C)==((void*)(a1)))){
11839 (ds.p=71351834);
11840 R=1;
11841 }
11842 else if(((ds.p=71352110),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i105(&ds,((T105*)ci(105,a1,71352114))))->_upper/*4*/)))){
11843 (ds.p=71352608);
11844 R=1;
11845 (ds.p=71352864);
11846 _lnk1=(/*RF2*/(C)->_first_link/*8*/);
11847 (ds.p=71353120);
11848 _lnk2=(/*RF2*/(se_i105(&ds,((T105*)ci(105,a1,71353136))))->_first_link/*8*/);
11849 while (!(((ds.p=71353656),r6_px_or(&ds,(_lnk1)==((void*)(NULL)),r6_ix_not(&ds,R)))))
11850 {
11851 (ds.p=71354144);
11852 R=((/*RF2*/(((T106*)ci(106,_lnk1,71354164)))->_item/*4*/))==((void*)((/*RF2*/(((T106*)ci(106,_lnk2,71354188)))->_item/*4*/)));
11853 (ds.p=71354400);
11854 _lnk1=(/*RF2*/(((T106*)ci(106,_lnk1,71354416)))->_next/*8*/);
11855 (ds.p=71354656);
11856 _lnk2=(/*RF2*/(((T106*)ci(106,_lnk2,71354672)))->_next/*8*/);
11857 }
11858 }
11859 /*FI]*/
11860 if(fd.assertion_flag){
11861 fd.assertion_flag=0;
11862 (ds.p=75585556);
11863 ac_ens((!(R))||(r6_px_and(&ds,(1)==(1),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i105(&ds,((T105*)ci(105,a1,75585638))))->_upper/*4*/)))),NULL);
11864 (ds.p=2122846);
11865 ac_ens((!(r105standard_is_equal(&ds,C,a1)))||(R),"consistent");
11866 (ds.p=2123064);
11867 ac_ens((!(R))||(r105is_equal(&ds,se_i105(&ds,((T105*)ci(105,a1,2123080))),(T0*)C)),"symmetric");
11868 fd.assertion_flag=1;
11869 }
11870 if(se_rci(caller,C))se_i105(&ds,C);
11871 se_dst=caller;/*unlink*/
11872 return R;
11873 }
11874
11875 T0* r105item(se_dump_stack*caller,T105* C,T2 a1){
11876 T0* R=NULL;
11877 void**locals[2];
11878 static se_frame_descriptor fd={"item LINKED_LIST",1,2,"%R105%index%E2%Result%R104%",1};
11879 se_dump_stack ds;
11880 ds.fd=&fd;
11881 ds.current=((void**)&C);
11882 ds.p=71342088;
11883 ds.caller=caller;
11884 ds.locals=locals;
11885 locals[0]=(void**)&a1;
11886 locals[1]=(void**)&R;
11887 se_dst=&ds;/*link*/
11888 se_require_uppermost_flag=1;
11889 if(fd.assertion_flag){
11890 fd.assertion_flag=0;
11891 (ds.p=75516692);
11892 ac_req(r105valid_index(&ds,C,a1),NULL);
11893 fd.assertion_flag=1;
11894 }
11895 /*[IF*/
11896 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
11897 (ds.p=71342874);
11898 r105go_item(&ds,C,a1);
11899 }
11900 /*FI]*/
11901 (ds.p=71343380);
11902 R=(/*RF2*/(((T106*)ci(106,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
11903 if(se_rci(caller,C))se_i105(&ds,C);
11904 se_dst=caller;/*unlink*/
11905 return R;
11906 }
11907
11908 T6 r105valid_index(se_dump_stack*caller,T105* C,T2 a1){
11909 T6 R=0;
11910 void**locals[2];
11911 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R105%index%E2%Result%E6%",1};
11912 se_dump_stack ds;
11913 ds.fd=&fd;
11914 ds.current=((void**)&C);
11915 ds.p=75507478;
11916 ds.caller=caller;
11917 ds.locals=locals;
11918 locals[0]=(void**)&a1;
11919 locals[1]=(void**)&R;
11920 se_dst=&ds;/*link*/
11921 (ds.p=75508500);
11922 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)));
11923 if(fd.assertion_flag){
11924 fd.assertion_flag=0;
11925 (ds.p=75509026);
11926 ac_ens((R)==(((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)))),NULL);
11927 fd.assertion_flag=1;
11928 }
11929 if(se_rci(caller,C))se_i105(&ds,C);
11930 se_dst=caller;/*unlink*/
11931 return R;
11932 }
11933
11934 void r105make(se_dump_stack*caller,T105* C){
11935 static se_frame_descriptor fd={"make LINKED_LIST",1,0,"%R105%",1};
11936 se_dump_stack ds;
11937 ds.fd=&fd;
11938 ds.current=((void**)&C);
11939 ds.p=71313672;
11940 ds.caller=caller;
11941 ds.locals=NULL;
11942 se_dst=&ds;/*link*/
11943 (ds.p=71314452);
11944 (/*SFN*/C->_first_link/*8*/)=NULL;
11945 (ds.p=71314708);
11946 (/*SFN*/C->_upper/*4*/)=0;
11947 (ds.p=71314964);
11948 (/*SFN*/C->_last_link/*12*/)=NULL;
11949 (ds.p=71315220);
11950 (/*SFN*/C->_mem_idx/*16*/)=0;
11951 (ds.p=71315476);
11952 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
11953 if(fd.assertion_flag){
11954 fd.assertion_flag=0;
11955 (ds.p=71316000);
11956 ac_ens((r105count(&ds,C))==(0),NULL);
11957 fd.assertion_flag=1;
11958 }
11959 if(se_rci(caller,C))se_i105(&ds,C);
11960 se_dst=caller;/*unlink*/
11961 }
11962
11963 T6 r105is_empty(se_dump_stack*caller,T105* C){
11964 T6 R=0;
11965 void**locals[1];
11966 static se_frame_descriptor fd={"is_empty LINKED_LIST",1,1,"%R105%Result%E6%",1};
11967 se_dump_stack ds;
11968 ds.fd=&fd;
11969 ds.current=((void**)&C);
11970 ds.p=71316744;
11971 ds.caller=caller;
11972 ds.locals=locals;
11973 locals[0]=(void**)&R;
11974 se_dst=&ds;/*link*/
11975 (ds.p=71317254);
11976 R=((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL));
11977 if(fd.assertion_flag){
11978 fd.assertion_flag=0;
11979 (ds.p=75513108);
11980 ac_ens((R)==((r105count(&ds,C))==(0)),NULL);
11981 fd.assertion_flag=1;
11982 }
11983 if(se_rci(caller,C))se_i105(&ds,C);
11984 se_dst=caller;/*unlink*/
11985 return R;
11986 }
11987
11988 T0* r105get_new_iterator(se_dump_stack*caller,T105* C){
11989 T0* R=NULL;
11990 void**locals[1];
11991 static se_frame_descriptor fd={"get_new_iterator LINKED_LIST",1,1,"%R105%Result%R150%",1};
11992 se_dump_stack ds;
11993 ds.fd=&fd;
11994 ds.current=((void**)&C);
11995 ds.p=71416840;
11996 ds.caller=caller;
11997 ds.locals=locals;
11998 locals[0]=(void**)&R;
11999 se_dst=&ds;/*link*/
12000 (ds.p=71417364);
12001 {T151*n=new151();
12002 r151make(&ds,n,(T0*)C);
12003 R=((T0*)n);
12004 }
12005 if(se_rci(caller,C))se_i105(&ds,C);
12006 se_dst=caller;/*unlink*/
12007 return R;
12008 }
12009
12010 T6 r105standard_is_equal(se_dump_stack*caller,T105* C,T0* a1){
12011 T6 R=0;
12012 void**locals[2];
12013 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R105%other%R105%Result%E6%",1};
12014 se_dump_stack ds;
12015 ds.fd=&fd;
12016 ds.current=((void**)&C);
12017 ds.p=2128406;
12018 ds.caller=caller;
12019 ds.locals=locals;
12020 locals[0]=(void**)&a1;
12021 locals[1]=(void**)&R;
12022 se_dst=&ds;/*link*/
12023 se_require_uppermost_flag=1;
12024 if(fd.assertion_flag){
12025 fd.assertion_flag=0;
12026 (ds.p=2129184);
12027 ac_req((a1)!=((void*)(NULL)),NULL);
12028 fd.assertion_flag=1;
12029 }
12030 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
12031 fd.assertion_flag=0;
12032 (ds.p=2129976);
12033 ac_ens((!(R))||(r105standard_is_equal(&ds,se_i105(&ds,((T105*)ci(105,a1,2129992))),(T0*)C)),"symmetric");
12034 fd.assertion_flag=1;
12035 }
12036 if(se_rci(caller,C))se_i105(&ds,C);
12037 se_dst=caller;/*unlink*/
12038 return R;
12039 }
12040
12041 void r105add_last(se_dump_stack*caller,T105* C,T0* a1){
12042 T0* _lnk=NULL;
12043 T2 o36_185_26=0;
12044 T2 o36_186_22=0;
12045 T2 o36_187_26=0;
12046 void**locals[5];
12047 static se_frame_descriptor fd={"add_last LINKED_LIST",1,5,"%R105%element%R104%lnk%R106%old value%E2%old value%E2%old value%E2%",1};
12048 se_dump_stack ds;
12049 ds.fd=&fd;
12050 ds.current=((void**)&C);
12051 ds.p=71321864;
12052 ds.caller=caller;
12053 ds.locals=locals;
12054 locals[0]=(void**)&a1;
12055 locals[1]=(void**)&_lnk;
12056 locals[2]=(void**)&o36_185_26;
12057 locals[3]=(void**)&o36_186_22;
12058 locals[4]=(void**)&o36_187_26;
12059 se_dst=&ds;/*link*/
12060 o36_185_26=r105count(&ds,C);
12061 o36_186_22=1;
12062 o36_187_26=(/*RF2*/(C)->_upper/*4*/);
12063 /*[IF*/
12064 if(((ds.p=71322928),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
12065 (ds.p=71323162);
12066 {T106*n=new106();
12067 r106make(&ds,n,a1,NULL);
12068 (/*SFN*/C->_first_link/*8*/)=((T0*)n);
12069 }
12070 (ds.p=71323418);
12071 (/*SFN*/C->_upper/*4*/)=1;
12072 (ds.p=71323674);
12073 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_first_link/*8*/);
12074 (ds.p=71323930);
12075 (/*SFN*/C->_mem_idx/*16*/)=1;
12076 (ds.p=71324186);
12077 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
12078 }
12079 else{
12080 (ds.p=71324698);
12081 {T106*n=new106();
12082 r106make(&ds,n,a1,NULL);
12083 _lnk=((T0*)n);
12084 }
12085 (ds.p=71324974);
12086 r106set_next(&ds,((T106*)ci(106,(/*RF2*/(C)->_last_link/*12*/),71324954)),_lnk);
12087 (ds.p=71325210);
12088 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))+(1);
12089 (ds.p=71325466);
12090 (/*SFN*/C->_last_link/*12*/)=_lnk;
12091 }
12092 /*FI]*/
12093 if(fd.assertion_flag){
12094 fd.assertion_flag=0;
12095 (ds.p=75544606);
12096 ac_ens((r105last(&ds,C))==((void*)(a1)),NULL);
12097 (ds.p=75544864);
12098 ac_ens((r105count(&ds,C))==((1)+(o36_185_26)),NULL);
12099 (ds.p=75545120);
12100 ac_ens((1)==(o36_186_22),NULL);
12101 (ds.p=75545376);
12102 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((1)+(o36_187_26)),NULL);
12103 fd.assertion_flag=1;
12104 }
12105 if(se_rci(caller,C))se_i105(&ds,C);
12106 se_dst=caller;/*unlink*/
12107 }
12108
12109 void r105clear(se_dump_stack*caller,T105* C){
12110 static se_frame_descriptor fd={"clear LINKED_LIST",1,0,"%R105%",1};
12111 se_dump_stack ds;
12112 ds.fd=&fd;
12113 ds.current=((void**)&C);
12114 ds.p=71367688;
12115 ds.caller=caller;
12116 ds.locals=NULL;
12117 se_dst=&ds;/*link*/
12118 /*[IF*/
12119 if(((ds.p=71368240),((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL)))){
12120 (ds.p=71368474);
12121 (/*SFN*/C->_first_link/*8*/)=NULL;
12122 (ds.p=71368730);
12123 (/*SFN*/C->_mem_idx/*16*/)=0;
12124 (ds.p=71368986);
12125 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
12126 (ds.p=71369242);
12127 (/*SFN*/C->_upper/*4*/)=0;
12128 (ds.p=71369498);
12129 (/*SFN*/C->_last_link/*12*/)=NULL;
12130 }
12131 /*FI]*/
12132 if(fd.assertion_flag){
12133 fd.assertion_flag=0;
12134 (ds.p=71370272);
12135 ac_ens(((/*RF2*/(C)->_upper/*4*/))==(0),NULL);
12136 (ds.p=75571220);
12137 ac_ens(r105is_empty(&ds,C),NULL);
12138 fd.assertion_flag=1;
12139 }
12140 if(se_rci(caller,C))se_i105(&ds,C);
12141 se_dst=caller;/*unlink*/
12142 }
12143
12144 T0* r105twin(se_dump_stack*caller,T105* C){
12145 T0* R=NULL;
12146 void**locals[1];
12147 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R105%Result%R105%",1};
12148 se_dump_stack ds;
12149 ds.fd=&fd;
12150 ds.current=((void**)&C);
12151 ds.p=2140182;
12152 ds.caller=caller;
12153 ds.locals=locals;
12154 locals[0]=(void**)&R;
12155 se_dst=&ds;/*link*/
12156 R=((void*)new105());
12157 r105copy(&ds,((T105*)R),((T0*)C));
12158 if(fd.assertion_flag){
12159 fd.assertion_flag=0;
12160 (ds.p=2142256);
12161 ac_ens(r105is_equal(&ds,se_i105(&ds,((T105*)ci(105,R,2142242))),(T0*)C),"equal");
12162 fd.assertion_flag=1;
12163 }
12164 if(se_rci(caller,C))se_i105(&ds,C);
12165 se_dst=caller;/*unlink*/
12166 return R;
12167 }
12168
12169 void r105go_item(se_dump_stack*caller,T105* C,T2 a1){
12170 void**locals[1];
12171 static se_frame_descriptor fd={"go_item LINKED_LIST",1,1,"%R105%i%E2%",1};
12172 se_dump_stack ds;
12173 ds.fd=&fd;
12174 ds.current=((void**)&C);
12175 ds.p=71418632;
12176 ds.caller=caller;
12177 ds.locals=locals;
12178 locals[0]=(void**)&a1;
12179 se_dst=&ds;/*link*/
12180 se_require_uppermost_flag=1;
12181 if(fd.assertion_flag){
12182 fd.assertion_flag=0;
12183 (ds.p=71419156);
12184 ac_req(r105valid_index(&ds,C,a1),NULL);
12185 (ds.p=71419428);
12186 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))!=(a1),NULL);
12187 (ds.p=71419684);
12188 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))>(0),NULL);
12189 (ds.p=71419940);
12190 ac_req(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
12191 fd.assertion_flag=1;
12192 }
12193 /*[IF*/
12194 if(((ds.p=71420458),((/*RF2*/(C)->_mem_idx/*16*/))>(a1))){
12195 (ds.p=71420698);
12196 (/*SFN*/C->_mem_idx/*16*/)=1;
12197 (ds.p=71420954);
12198 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
12199 }
12200 /*FI]*/
12201 while (!(((ds.p=71421982),(a1)==((/*RF2*/(C)->_mem_idx/*16*/)))))
12202 {
12203 (ds.p=71422490);
12204 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(((T106*)ci(106,(/*RF2*/(C)->_mem_lnk/*20*/),71422512)))->_next/*8*/);
12205 (ds.p=71422746);
12206 (/*SFN*/C->_mem_idx/*16*/)=((/*RF2*/(C)->_mem_idx/*16*/))+(1);
12207 }
12208 if(fd.assertion_flag){
12209 fd.assertion_flag=0;
12210 (ds.p=71423524);
12211 ac_ens(((/*RF2*/(C)->_mem_idx/*16*/))==(a1),NULL);
12212 (ds.p=71423780);
12213 ac_ens(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
12214 fd.assertion_flag=1;
12215 }
12216 if(se_rci(caller,C))se_i105(&ds,C);
12217 se_dst=caller;/*unlink*/
12218 }
12219
12220 void r105from_collection(se_dump_stack*caller,T105* C,T0* a1){
12221 T2 _i=0;
12222 T2 _up=0;
12223 T0* _lnk=NULL;
12224 void**locals[4];
12225 static se_frame_descriptor fd={"from_collection LINKED_LIST",1,4,"%R105%model%R144%i%E2%up%E2%lnk%R106%",1};
12226 se_dump_stack ds;
12227 ds.fd=&fd;
12228 ds.current=((void**)&C);
12229 ds.p=71371016;
12230 ds.caller=caller;
12231 ds.locals=locals;
12232 locals[0]=(void**)&a1;
12233 locals[1]=(void**)&_i;
12234 locals[2]=(void**)&_up;
12235 locals[3]=(void**)&_lnk;
12236 se_dst=&ds;/*link*/
12237 se_require_uppermost_flag=1;
12238 if(fd.assertion_flag){
12239 fd.assertion_flag=0;
12240 (ds.p=75559968);
12241 ac_req((a1)!=((void*)(NULL)),NULL);
12242 fd.assertion_flag=1;
12243 }
12244 /*[IF*/
12245 if(((ds.p=71372336),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
12246 (ds.p=71372832);
12247 _i=1;
12248 (ds.p=71373088);
12249 _up=(/*RF2*/(se_i105(&ds,((T105*)ci(105,a1,71373100))))->_upper/*4*/);
12250 while (!(((ds.p=71373604),(_i)>(_up))))
12251 {
12252 (ds.p=71374112);
12253 r105add_last(&ds,C,r105item(&ds,se_i105(&ds,((T105*)ci(105,a1,71374130))),_i));
12254 (ds.p=71374368);
12255 _i=(_i)+(1);
12256 }
12257 }
12258 else{
12259 (ds.p=71375392);
12260 _lnk=(/*RF2*/(C)->_first_link/*8*/);
12261 (ds.p=71375648);
12262 _i=1;
12263 (ds.p=71375904);
12264 _up=(/*RF2*/(se_i105(&ds,((T105*)ci(105,a1,71375916))))->_upper/*4*/);
12265 while (!(((ds.p=71376420),(_i)>(_up))))
12266 {
12267 /*[IF*/
12268 if(((ds.p=71376942),(_lnk)==((void*)(NULL)))){
12269 (ds.p=71377190);
12270 r105add_last(&ds,C,r105item(&ds,se_i105(&ds,((T105*)ci(105,a1,71377208))),_i));
12271 }
12272 else{
12273 (ds.p=71377710);
12274 r106set_item(&ds,((T106*)ci(106,_lnk,71377702)),r105item(&ds,se_i105(&ds,((T105*)ci(105,a1,71377728))),_i));
12275 (ds.p=71377958);
12276 _lnk=(/*RF2*/(((T106*)ci(106,_lnk,71377972)))->_next/*8*/);
12277 }
12278 /*FI]*/
12279 (ds.p=71378464);
12280 _i=(_i)+(1);
12281 }
12282 /*[IF*/
12283 if(((ds.p=71378984),(_lnk)==((void*)((/*RF2*/(C)->_first_link/*8*/))))){
12284 if(fd.assertion_flag){
12285 fd.assertion_flag=0;
12286 (ds.p=71379518);
12287 ac_civ((r105count(&ds,se_i105(&ds,((T105*)ci(105,a1,71379494)))))==(0),NULL);
12288 fd.assertion_flag=1;
12289 }
12290 (ds.p=71380000);
12291 r105clear(&ds,C);
12292 }
12293 else if(((ds.p=71380272),(_lnk)!=((void*)(NULL)))){
12294 (ds.p=71380512);
12295 _i=r105count(&ds,se_i105(&ds,((T105*)ci(105,a1,71380522))));
12296 /*[IF*/
12297 if(((ds.p=71380790),((/*RF2*/(C)->_mem_idx/*16*/))!=(_i))){
12298 (ds.p=71381030);
12299 r105go_item(&ds,C,_i);
12300 }
12301 /*FI]*/
12302 if(fd.assertion_flag){
12303 fd.assertion_flag=0;
12304 (ds.p=71381806);
12305 ac_civ((_lnk)==((void*)((/*RF2*/(((T106*)ci(106,(/*RF2*/(C)->_mem_lnk/*20*/),71381810)))->_next/*8*/))),NULL);
12306 fd.assertion_flag=1;
12307 }
12308 (ds.p=71382320);
12309 r106set_next(&ds,((T106*)ci(106,(/*RF2*/(C)->_mem_lnk/*20*/),71382304)),NULL);
12310 (ds.p=71382560);
12311 (/*SFN*/C->_upper/*4*/)=_i;
12312 (ds.p=71382816);
12313 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_mem_lnk/*20*/);
12314 }
12315 /*FI]*/
12316 }
12317 /*FI]*/
12318 if(fd.assertion_flag){
12319 fd.assertion_flag=0;
12320 (ds.p=75560736);
12321 ac_ens((r105count(&ds,C))==(r105count(&ds,se_i105(&ds,((T105*)ci(105,a1,75560740))))),NULL);
12322 fd.assertion_flag=1;
12323 }
12324 if(se_rci(caller,C))se_i105(&ds,C);
12325 se_dst=caller;/*unlink*/
12326 }
12327 se_frame_descriptor se_ifd105={"invariant once LINKED_LIST[SCORE_DISPLAY]",1,0,"%R105%",1};
12328
12329 T105*se_i105(se_dump_stack*caller,T105*C){
12330 se_dump_stack ds;
12331 ds.fd=&se_ifd105;
12332 ds.current=((void**)&C);
12333 ds.p=71306254;
12334 ds.caller=caller;
12335 se_dst=&ds;
12336 if(ds.fd->assertion_flag){
12337 ds.fd->assertion_flag=0;
12338 (ds.p=75651888);
12339 ac_inv((1)<=(((/*RF2*/(C)->_upper/*4*/))+(1)),"valid_bounds");
12340 (ds.p=71425330);
12341 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))==((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))==(0)),((/*RF2*/(C)->_mem_idx/*16*/))==(0)),((/*RF2*/(C)->_mem_lnk/*20*/))==((void*)(NULL)))),"empty_status");
12342 (ds.p=71426612);
12343 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))!=((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))>(0)),((/*RF2*/(C)->_mem_idx/*16*/))>(0)),((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)))),"not_empty_status");
12344 ds.fd->assertion_flag=1;
12345 }
12346 se_dst=caller;
12347 return C;
12348 }
12349
12350 void r45copy(se_dump_stack*caller,T45* C,T0* a1){
12351 T2 _i=0;
12352 void**locals[2];
12353 static se_frame_descriptor fd={"copy DICTIONARY",1,2,"%R45%other%R45%i%E2%",1};
12354 se_dump_stack ds;
12355 ds.fd=&fd;
12356 ds.current=((void**)&C);
12357 ds.p=92398600;
12358 ds.caller=caller;
12359 ds.locals=locals;
12360 locals[0]=(void**)&a1;
12361 locals[1]=(void**)&_i;
12362 se_dst=&ds;/*link*/
12363 se_require_uppermost_flag=1;
12364 if(fd.assertion_flag){
12365 fd.assertion_flag=0;
12366 (ds.p=2144064);
12367 ac_req((a1)!=((void*)(NULL)),"other_not_void");
12368 fd.assertion_flag=1;
12369 }
12370 /*[IF*/
12371 if(((ds.p=92400676),((/*RF2*/(C)->_capacity/*8*/))==(0))){
12372 (ds.p=92400914);
12373 r45with_capacity(&ds,C,((/*RF2*/(se_i45(&ds,((T45*)ci(45,a1,92400942))))->_count/*12*/))+(1));
12374 }
12375 else{
12376 (ds.p=92401426);
12377 r45clear(&ds,C);
12378 }
12379 /*FI]*/
12380 (ds.p=92401932);
12381 _i=1;
12382 while (!(((ds.p=92402448),(_i)>((/*RF2*/(se_i45(&ds,((T45*)ci(45,a1,92402452))))->_count/*12*/)))))
12383 {
12384 (ds.p=92402956);
12385 r45put(&ds,C,r45item(&ds,se_i45(&ds,((T45*)ci(45,a1,92402964))),_i),r45key(&ds,se_i45(&ds,((T45*)ci(45,a1,92402992))),_i));
12386 (ds.p=92403212);
12387 _i=(_i)+(1);
12388 }
12389 if(fd.assertion_flag){
12390 fd.assertion_flag=0;
12391 (ds.p=2144808);
12392 ac_ens(r45is_equal(&ds,C,a1),"is_equal");
12393 fd.assertion_flag=1;
12394 }
12395 if(se_rci(caller,C))se_i45(&ds,C);
12396 se_dst=caller;/*unlink*/
12397 }
12398
12399 T2 r45key(se_dump_stack*caller,T45* C,T2 a1){
12400 T2 R=0;
12401 void**locals[2];
12402 static se_frame_descriptor fd={"key DICTIONARY",1,2,"%R45%index%E2%Result%E2%",1};
12403 se_dump_stack ds;
12404 ds.fd=&fd;
12405 ds.current=((void**)&C);
12406 ds.p=92361736;
12407 ds.caller=caller;
12408 ds.locals=locals;
12409 locals[0]=(void**)&a1;
12410 locals[1]=(void**)&R;
12411 se_dst=&ds;/*link*/
12412 se_require_uppermost_flag=1;
12413 if(fd.assertion_flag){
12414 fd.assertion_flag=0;
12415 (ds.p=92362260);
12416 ac_req(r45valid_index(&ds,C,a1),NULL);
12417 fd.assertion_flag=1;
12418 }
12419 (ds.p=92362772);
12420 r45set_cache_user(&ds,C,a1);
12421 (ds.p=92363028);
12422 R=(/*RF2*/(((T47*)ci(47,(/*RF2*/(C)->_cache_node/*20*/),92363048)))->_key/*8*/);
12423 if(fd.assertion_flag){
12424 fd.assertion_flag=0;
12425 (ds.p=92363562);
12426 ac_ens((r45at(&ds,C,R))==((void*)(r45item(&ds,C,a1))),NULL);
12427 fd.assertion_flag=1;
12428 }
12429 if(se_rci(caller,C))se_i45(&ds,C);
12430 se_dst=caller;/*unlink*/
12431 return R;
12432 }
12433
12434 T0* r45at(se_dump_stack*caller,T45* C,T2 a1){
12435 T0* R=NULL;
12436 T2 _idx=0;
12437 T0* _node=NULL;
12438 void**locals[4];
12439 static se_frame_descriptor fd={"at DICTIONARY",1,4,"%R45%k%E2%Result%R25%idx%E2%node%R47%",1};
12440 se_dump_stack ds;
12441 ds.fd=&fd;
12442 ds.current=((void**)&C);
12443 ds.p=92294152;
12444 ds.caller=caller;
12445 ds.locals=locals;
12446 locals[0]=(void**)&a1;
12447 locals[1]=(void**)&R;
12448 locals[2]=(void**)&_idx;
12449 locals[3]=(void**)&_node;
12450 se_dst=&ds;/*link*/
12451 se_require_uppermost_flag=1;
12452 if(fd.assertion_flag){
12453 fd.assertion_flag=0;
12454 (ds.p=92295188);
12455 ac_req(r45has(&ds,C,a1),NULL);
12456 fd.assertion_flag=1;
12457 }
12458 (ds.p=92296460);
12459 _idx=(r2hash_code(&ds,a1))%((/*RF2*/(C)->_capacity/*8*/));
12460 (ds.p=92296716);
12461 _node=((/*RF2*/(C)->_buckets/*4*/))[_idx];
12462 while (!(((ds.p=92297246),r2is_equal(&ds,(/*RF2*/(((T47*)ci(47,_node,92297228)))->_key/*8*/),a1))))
12463 {
12464 (ds.p=92297740);
12465 _node=(/*RF2*/(((T47*)ci(47,_node,92297756)))->_next/*12*/);
12466 }
12467 (ds.p=92298246);
12468 R=(/*RF2*/(((T47*)ci(47,_node,92298266)))->_item/*4*/);
12469 if(se_rci(caller,C))se_i45(&ds,C);
12470 se_dst=caller;/*unlink*/
12471 return R;
12472 }
12473
12474 T2 r45upper(se_dump_stack*caller,T45* C){
12475 T2 R=0;
12476 void**locals[1];
12477 static se_frame_descriptor fd={"upper DICTIONARY",1,1,"%R45%Result%E2%",1};
12478 se_dump_stack ds;
12479 ds.fd=&fd;
12480 ds.current=((void**)&C);
12481 ds.p=92355592;
12482 ds.caller=caller;
12483 ds.locals=locals;
12484 locals[0]=(void**)&R;
12485 se_dst=&ds;/*link*/
12486 (ds.p=92356116);
12487 R=(/*RF2*/(C)->_count/*12*/);
12488 if(fd.assertion_flag){
12489 fd.assertion_flag=0;
12490 (ds.p=92356642);
12491 ac_ens((R)==((/*RF2*/(C)->_count/*12*/)),NULL);
12492 fd.assertion_flag=1;
12493 }
12494 if(se_rci(caller,C))se_i45(&ds,C);
12495 se_dst=caller;/*unlink*/
12496 return R;
12497 }
12498
12499 void r45put(se_dump_stack*caller,T45* C,T0* a1,T2 a2){
12500 T2 _h=0;
12501 T2 _idx=0;
12502 T0* _node=NULL;
12503 void**locals[5];
12504 static se_frame_descriptor fd={"put DICTIONARY",1,5,"%R45%v%R25%k%E2%h%E2%idx%E2%node%R47%",1};
12505 se_dump_stack ds;
12506 ds.fd=&fd;
12507 ds.current=((void**)&C);
12508 ds.p=92305416;
12509 ds.caller=caller;
12510 ds.locals=locals;
12511 locals[0]=(void**)&a1;
12512 locals[1]=(void**)&a2;
12513 locals[2]=(void**)&_h;
12514 locals[3]=(void**)&_idx;
12515 locals[4]=(void**)&_node;
12516 se_dst=&ds;/*link*/
12517 (ds.p=92307206);
12518 (/*SFN*/C->_cache_user/*16*/)=-(1);
12519 (ds.p=92307724);
12520 _h=r2hash_code(&ds,a2);
12521 (ds.p=92307980);
12522 _idx=(_h)%((/*RF2*/(C)->_capacity/*8*/));
12523 (ds.p=92308236);
12524 _node=((/*RF2*/(C)->_buckets/*4*/))[_idx];
12525 while (!(((ds.p=92308772),((_node)==((void*)(NULL)))||(r2is_equal(&ds,(/*RF2*/(((T47*)ci(47,_node,92308788)))->_key/*8*/),a2)))))
12526 {
12527 (ds.p=92309260);
12528 _node=(/*RF2*/(((T47*)ci(47,_node,92309276)))->_next/*12*/);
12529 }
12530 /*[IF*/
12531 if(((ds.p=92309782),(_node)==((void*)(NULL)))){
12532 /*[IF*/
12533 if(((ds.p=92310052),((/*RF2*/(C)->_capacity/*8*/))==((/*RF2*/(C)->_count/*12*/)))){
12534 (ds.p=92310290);
12535 r45increase_capacity(&ds,C);
12536 (ds.p=92310546);
12537 _idx=(_h)%((/*RF2*/(C)->_capacity/*8*/));
12538 }
12539 /*FI]*/
12540 (ds.p=92311052);
12541 {T47*n=new47();
12542 r47make(&ds,n,a1,a2,((/*RF2*/(C)->_buckets/*4*/))[_idx]);
12543 _node=((T0*)n);
12544 }
12545 (ds.p=92311324);
12546 ((/*RF2*/(C)->_buckets/*4*/))[_idx]=(_node);
12547 (ds.p=92311564);
12548 (/*SFN*/C->_count/*12*/)=((/*RF2*/(C)->_count/*12*/))+(1);
12549 }
12550 else{
12551 (ds.p=92312086);
12552 r47set_item(&ds,((T47*)ci(47,_node,92312076)),a1);
12553 }
12554 /*FI]*/
12555 if(fd.assertion_flag){
12556 fd.assertion_flag=0;
12557 (ds.p=92312856);
12558 ac_ens((a1)==((void*)(r45at(&ds,C,a2))),NULL);
12559 fd.assertion_flag=1;
12560 }
12561 if(se_rci(caller,C))se_i45(&ds,C);
12562 se_dst=caller;/*unlink*/
12563 }
12564
12565 T6 r45is_equal(se_dump_stack*caller,T45* C,T0* a1){
12566 T6 R=0;
12567 T2 _i=0;
12568 void**locals[3];
12569 static se_frame_descriptor fd={"is_equal DICTIONARY",1,3,"%R45%other%R45%Result%E6%i%E2%",1};
12570 se_dump_stack ds;
12571 ds.fd=&fd;
12572 ds.current=((void**)&C);
12573 ds.p=92382984;
12574 ds.caller=caller;
12575 ds.locals=locals;
12576 locals[0]=(void**)&a1;
12577 locals[1]=(void**)&R;
12578 locals[2]=(void**)&_i;
12579 se_dst=&ds;/*link*/
12580 se_require_uppermost_flag=1;
12581 if(fd.assertion_flag){
12582 fd.assertion_flag=0;
12583 (ds.p=2122048);
12584 ac_req((a1)!=((void*)(NULL)),"other_not_void");
12585 fd.assertion_flag=1;
12586 }
12587 /*[IF*/
12588 if(((ds.p=92384810),(C)==((void*)(a1)))){
12589 (ds.p=92385050);
12590 R=1;
12591 }
12592 else if(((ds.p=92385326),((/*RF2*/(C)->_count/*12*/))==((/*RF2*/(se_i45(&ds,((T45*)ci(45,a1,92385330))))->_count/*12*/)))){
12593 (ds.p=92385810);
12594 R=1;
12595 (ds.p=92386066);
12596 _i=1;
12597 while (!(((ds.p=92386600),(r6_ix_not(&ds,R))||((_i)>((/*RF2*/(C)->_count/*12*/))))))
12598 {
12599 /*[IF*/
12600 if(((ds.p=92387108),r45has(&ds,se_i45(&ds,((T45*)ci(45,a1,92387096))),r45key(&ds,C,_i)))){
12601 /*[IF*/
12602 if(((ds.p=92387378),(r45at(&ds,se_i45(&ds,((T45*)ci(45,a1,92387344))),r45key(&ds,C,_i)))!=((void*)(r45item(&ds,C,_i))))){
12603 (ds.p=92387600);
12604 R=0;
12605 }
12606 else{
12607 (ds.p=92388112);
12608 _i=(_i)+(1);
12609 }
12610 /*FI]*/
12611 }
12612 else{
12613 (ds.p=92388874);
12614 R=0;
12615 }
12616 /*FI]*/
12617 }
12618 }
12619 /*FI]*/
12620 if(fd.assertion_flag){
12621 fd.assertion_flag=0;
12622 (ds.p=92390164);
12623 ac_ens((!(R))||(((/*RF2*/(C)->_count/*12*/))==((/*RF2*/(se_i45(&ds,((T45*)ci(45,a1,92390196))))->_count/*12*/))),NULL);
12624 (ds.p=2122846);
12625 ac_ens((!(r45standard_is_equal(&ds,C,a1)))||(R),"consistent");
12626 (ds.p=2123064);
12627 ac_ens((!(R))||(r45is_equal(&ds,se_i45(&ds,((T45*)ci(45,a1,2123080))),(T0*)C)),"symmetric");
12628 fd.assertion_flag=1;
12629 }
12630 if(se_rci(caller,C))se_i45(&ds,C);
12631 se_dst=caller;/*unlink*/
12632 return R;
12633 }
12634
12635 T0* r45item(se_dump_stack*caller,T45* C,T2 a1){
12636 T0* R=NULL;
12637 void**locals[2];
12638 static se_frame_descriptor fd={"item DICTIONARY",1,2,"%R45%index%E2%Result%R25%",1};
12639 se_dump_stack ds;
12640 ds.fd=&fd;
12641 ds.current=((void**)&C);
12642 ds.p=92359176;
12643 ds.caller=caller;
12644 ds.locals=locals;
12645 locals[0]=(void**)&a1;
12646 locals[1]=(void**)&R;
12647 se_dst=&ds;/*link*/
12648 se_require_uppermost_flag=1;
12649 if(fd.assertion_flag){
12650 fd.assertion_flag=0;
12651 (ds.p=92359700);
12652 ac_req(r45valid_index(&ds,C,a1),NULL);
12653 fd.assertion_flag=1;
12654 }
12655 (ds.p=92360212);
12656 r45set_cache_user(&ds,C,a1);
12657 (ds.p=92360468);
12658 R=(/*RF2*/(((T47*)ci(47,(/*RF2*/(C)->_cache_node/*20*/),92360488)))->_item/*4*/);
12659 if(fd.assertion_flag){
12660 fd.assertion_flag=0;
12661 (ds.p=92360994);
12662 ac_ens((R)==((void*)(r45at(&ds,C,r45key(&ds,C,a1)))),NULL);
12663 fd.assertion_flag=1;
12664 }
12665 if(se_rci(caller,C))se_i45(&ds,C);
12666 se_dst=caller;/*unlink*/
12667 return R;
12668 }
12669
12670 T6 r45valid_index(se_dump_stack*caller,T45* C,T2 a1){
12671 T6 R=0;
12672 void**locals[2];
12673 static se_frame_descriptor fd={"valid_index DICTIONARY",1,2,"%R45%index%E2%Result%E6%",1};
12674 se_dump_stack ds;
12675 ds.fd=&fd;
12676 ds.current=((void**)&C);
12677 ds.p=92357384;
12678 ds.caller=caller;
12679 ds.locals=locals;
12680 locals[0]=(void**)&a1;
12681 locals[1]=(void**)&R;
12682 se_dst=&ds;/*link*/
12683 (ds.p=92357908);
12684 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_count/*12*/)));
12685 if(fd.assertion_flag){
12686 fd.assertion_flag=0;
12687 (ds.p=92358434);
12688 ac_ens((R)==(r2in_range(&ds,a1,1,r45upper(&ds,C))),NULL);
12689 fd.assertion_flag=1;
12690 }
12691 if(se_rci(caller,C))se_i45(&ds,C);
12692 se_dst=caller;/*unlink*/
12693 return R;
12694 }
12695
12696 void r45set_cache_user(se_dump_stack*caller,T45* C,T2 a1){
12697 void**locals[1];
12698 static se_frame_descriptor fd={"set_cache_user DICTIONARY",1,1,"%R45%index%E2%",1};
12699 se_dump_stack ds;
12700 ds.fd=&fd;
12701 ds.current=((void**)&C);
12702 ds.p=92433160;
12703 ds.caller=caller;
12704 ds.locals=locals;
12705 locals[0]=(void**)&a1;
12706 se_dst=&ds;/*link*/
12707 se_require_uppermost_flag=1;
12708 if(fd.assertion_flag){
12709 fd.assertion_flag=0;
12710 (ds.p=92434196);
12711 ac_req(r45valid_index(&ds,C,a1),NULL);
12712 fd.assertion_flag=1;
12713 }
12714 /*[IF*/
12715 if(((ds.p=92434726),(a1)==(((/*RF2*/(C)->_cache_user/*16*/))+(1)))){
12716 (ds.p=92435218);
12717 (/*SFN*/C->_cache_user/*16*/)=a1;
12718 (ds.p=92435474);
12719 (/*SFN*/C->_cache_node/*20*/)=(/*RF2*/(((T47*)ci(47,(/*RF2*/(C)->_cache_node/*20*/),92435502)))->_next/*12*/);
12720 while (!(((ds.p=92436008),((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL)))))
12721 {
12722 (ds.p=92436498);
12723 (/*SFN*/C->_cache_buckets/*24*/)=((/*RF2*/(C)->_cache_buckets/*24*/))+(1);
12724 (ds.p=92436754);
12725 (/*SFN*/C->_cache_node/*20*/)=((/*RF2*/(C)->_buckets/*4*/))[(/*RF2*/(C)->_cache_buckets/*24*/)];
12726 }
12727 }
12728 else if(((ds.p=92437294),(a1)==((/*RF2*/(C)->_cache_user/*16*/)))){
12729 }
12730 else if(((ds.p=92437536),(a1)==(1))){
12731 (ds.p=92438034);
12732 (/*SFN*/C->_cache_user/*16*/)=1;
12733 (ds.p=92438290);
12734 (/*SFN*/C->_cache_buckets/*24*/)=0;
12735 (ds.p=92438546);
12736 (/*SFN*/C->_cache_node/*20*/)=((/*RF2*/(C)->_buckets/*4*/))[(/*RF2*/(C)->_cache_buckets/*24*/)];
12737 while (!(((ds.p=92439080),((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL)))))
12738 {
12739 (ds.p=92439570);
12740 (/*SFN*/C->_cache_buckets/*24*/)=((/*RF2*/(C)->_cache_buckets/*24*/))+(1);
12741 (ds.p=92439826);
12742 (/*SFN*/C->_cache_node/*20*/)=((/*RF2*/(C)->_buckets/*4*/))[(/*RF2*/(C)->_cache_buckets/*24*/)];
12743 }
12744 }
12745 else{
12746 (ds.p=92440850);
12747 r45set_cache_user(&ds,C,1);
12748 while (!(((ds.p=92441384),((/*RF2*/(C)->_cache_user/*16*/))==(a1))))
12749 {
12750 (ds.p=92441874);
12751 r45set_cache_user(&ds,C,((/*RF2*/(C)->_cache_user/*16*/))+(1));
12752 }
12753 }
12754 /*FI]*/
12755 if(fd.assertion_flag){
12756 fd.assertion_flag=0;
12757 (ds.p=92442922);
12758 ac_ens(((/*RF2*/(C)->_cache_user/*16*/))==(a1),NULL);
12759 (ds.p=92443184);
12760 ac_ens(r2in_range(&ds,(/*RF2*/(C)->_cache_buckets/*24*/),0,((/*RF2*/(C)->_capacity/*8*/))-(1)),NULL);
12761 (ds.p=92443434);
12762 ac_ens(((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL)),NULL);
12763 fd.assertion_flag=1;
12764 }
12765 if(se_rci(caller,C))se_i45(&ds,C);
12766 se_dst=caller;/*unlink*/
12767 }
12768
12769 void r45make(se_dump_stack*caller,T45* C){
12770 static se_frame_descriptor fd={"make DICTIONARY",1,0,"%R45%",1};
12771 se_dump_stack ds;
12772 ds.fd=&fd;
12773 ds.current=((void**)&C);
12774 ds.p=92447496;
12775 ds.caller=caller;
12776 ds.locals=NULL;
12777 se_dst=&ds;/*link*/
12778 (ds.p=92449556);
12779 r45with_capacity(&ds,C,193);
12780 if(fd.assertion_flag){
12781 fd.assertion_flag=0;
12782 (ds.p=92450068);
12783 ac_ens(r45is_empty(&ds,C),NULL);
12784 (ds.p=92450342);
12785 ac_ens(((/*RF2*/(C)->_capacity/*8*/))==(193),NULL);
12786 fd.assertion_flag=1;
12787 }
12788 if(se_rci(caller,C))se_i45(&ds,C);
12789 se_dst=caller;/*unlink*/
12790 }
12791
12792 T6 r45is_empty(se_dump_stack*caller,T45* C){
12793 T6 R=0;
12794 void**locals[1];
12795 static se_frame_descriptor fd={"is_empty DICTIONARY",1,1,"%R45%Result%E6%",1};
12796 se_dump_stack ds;
12797 ds.fd=&fd;
12798 ds.current=((void**)&C);
12799 ds.p=92285960;
12800 ds.caller=caller;
12801 ds.locals=locals;
12802 locals[0]=(void**)&R;
12803 se_dst=&ds;/*link*/
12804 (ds.p=92286740);
12805 R=((/*RF2*/(C)->_count/*12*/))==(0);
12806 if(fd.assertion_flag){
12807 fd.assertion_flag=0;
12808 (ds.p=92287266);
12809 ac_ens((R)==(((/*RF2*/(C)->_count/*12*/))==(0)),NULL);
12810 fd.assertion_flag=1;
12811 }
12812 if(se_rci(caller,C))se_i45(&ds,C);
12813 se_dst=caller;/*unlink*/
12814 return R;
12815 }
12816
12817 void r45increase_capacity(se_dump_stack*caller,T45* C){
12818 T2 _i=0;
12819 T2 _idx=0;
12820 T2 _new_capacity=0;
12821 T49 _old_buckets=NULL;
12822 T0* _node1=NULL;
12823 T0* _node2=NULL;
12824 int _hts=0;
12825 T2 o44_614_18=0;
12826 T2 o44_615_15=0;
12827 void**locals[9];
12828 static se_frame_descriptor fd={"increase_capacity DICTIONARY",1,9,"%R45%i%E2%idx%E2%new_capacity%E2%old_buckets%E49%node1%R47%node2%R47%hts%E108%old value%E2%old value%E2%",1};
12829 se_dump_stack ds;
12830 ds.fd=&fd;
12831 ds.current=((void**)&C);
12832 ds.p=92423688;
12833 ds.caller=caller;
12834 ds.locals=locals;
12835 locals[0]=(void**)&_i;
12836 locals[1]=(void**)&_idx;
12837 locals[2]=(void**)&_new_capacity;
12838 locals[3]=(void**)&_old_buckets;
12839 locals[4]=(void**)&_node1;
12840 locals[5]=(void**)&_node2;
12841 locals[6]=(void**)&_hts;
12842 locals[7]=(void**)&o44_614_18;
12843 locals[8]=(void**)&o44_615_15;
12844 se_dst=&ds;/*link*/
12845 o44_614_18=(/*RF2*/(C)->_capacity/*8*/);
12846 o44_615_15=(/*RF2*/(C)->_count/*12*/);
12847 se_require_uppermost_flag=1;
12848 if(fd.assertion_flag){
12849 fd.assertion_flag=0;
12850 (ds.p=92424472);
12851 ac_req(((/*RF2*/(C)->_capacity/*8*/))==((/*RF2*/(C)->_count/*12*/)),NULL);
12852 fd.assertion_flag=1;
12853 }
12854 (ds.p=92425996);
12855 _new_capacity=r108prime_number_ceiling(&ds,((/*RF2*/(C)->_capacity/*8*/))+(1));
12856 (ds.p=92426252);
12857 _old_buckets=(/*RF2*/(C)->_buckets/*4*/);
12858 (ds.p=92426508);
12859 (/*SFN*/C->_buckets/*4*/)=new49(_new_capacity);
12860 (ds.p=92426764);
12861 _i=((/*RF2*/(C)->_capacity/*8*/))-(1);
12862 (ds.p=92427020);
12863 (/*SFN*/C->_capacity/*8*/)=_new_capacity;
12864 while (!(((ds.p=92427536),(_i)<(0))))
12865 {
12866 (ds.p=92428306);
12867 _node1=(_old_buckets)[_i];
12868 while (!(((ds.p=92428830),(_node1)==((void*)(NULL)))))
12869 {
12870 (ds.p=92429330);
12871 _node2=(/*RF2*/(((T47*)ci(47,_node1,92429348)))->_next/*12*/);
12872 (ds.p=92429586);
12873 _idx=(r2hash_code(&ds,(/*RF2*/(((T47*)ci(47,_node1,92429600)))->_key/*8*/)))%((/*RF2*/(C)->_capacity/*8*/));
12874 (ds.p=92429854);
12875 r47set_next(&ds,((T47*)ci(47,_node1,92429842)),((/*RF2*/(C)->_buckets/*4*/))[_idx]);
12876 (ds.p=92430114);
12877 ((/*RF2*/(C)->_buckets/*4*/))[_idx]=(_node1);
12878 (ds.p=92430354);
12879 _node1=_node2;
12880 }
12881 (ds.p=92430860);
12882 _i=(_i)-(1);
12883 }
12884 (ds.p=92431366);
12885 (/*SFN*/C->_cache_user/*16*/)=-(1);
12886 if(fd.assertion_flag){
12887 fd.assertion_flag=0;
12888 (ds.p=92431896);
12889 ac_ens(((/*RF2*/(C)->_capacity/*8*/))>(o44_614_18),NULL);
12890 (ds.p=92432146);
12891 ac_ens(((/*RF2*/(C)->_count/*12*/))==(o44_615_15),NULL);
12892 fd.assertion_flag=1;
12893 }
12894 if(se_rci(caller,C))se_i45(&ds,C);
12895 se_dst=caller;/*unlink*/
12896 }
12897
12898 T6 r45standard_is_equal(se_dump_stack*caller,T45* C,T0* a1){
12899 T6 R=0;
12900 void**locals[2];
12901 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R45%other%R45%Result%E6%",1};
12902 se_dump_stack ds;
12903 ds.fd=&fd;
12904 ds.current=((void**)&C);
12905 ds.p=2128406;
12906 ds.caller=caller;
12907 ds.locals=locals;
12908 locals[0]=(void**)&a1;
12909 locals[1]=(void**)&R;
12910 se_dst=&ds;/*link*/
12911 se_require_uppermost_flag=1;
12912 if(fd.assertion_flag){
12913 fd.assertion_flag=0;
12914 (ds.p=2129184);
12915 ac_req((a1)!=((void*)(NULL)),NULL);
12916 fd.assertion_flag=1;
12917 }
12918 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
12919 fd.assertion_flag=0;
12920 (ds.p=2129976);
12921 ac_ens((!(R))||(r45standard_is_equal(&ds,se_i45(&ds,((T45*)ci(45,a1,2129992))),(T0*)C)),"symmetric");
12922 fd.assertion_flag=1;
12923 }
12924 if(se_rci(caller,C))se_i45(&ds,C);
12925 se_dst=caller;/*unlink*/
12926 return R;
12927 }
12928
12929 T6 r45has(se_dump_stack*caller,T45* C,T2 a1){
12930 T6 R=0;
12931 T2 _idx=0;
12932 T0* _node=NULL;
12933 void**locals[4];
12934 static se_frame_descriptor fd={"has DICTIONARY",1,4,"%R45%k%E2%Result%E6%idx%E2%node%R47%",1};
12935 se_dump_stack ds;
12936 ds.fd=&fd;
12937 ds.current=((void**)&C);
12938 ds.p=92290056;
12939 ds.caller=caller;
12940 ds.locals=locals;
12941 locals[0]=(void**)&a1;
12942 locals[1]=(void**)&R;
12943 locals[2]=(void**)&_idx;
12944 locals[3]=(void**)&_node;
12945 se_dst=&ds;/*link*/
12946 (ds.p=92291596);
12947 _idx=(r2hash_code(&ds,a1))%((/*RF2*/(C)->_capacity/*8*/));
12948 (ds.p=92291852);
12949 _node=((/*RF2*/(C)->_buckets/*4*/))[_idx];
12950 while (!(((ds.p=92292388),((_node)==((void*)(NULL)))||(r2is_equal(&ds,(/*RF2*/(((T47*)ci(47,_node,92292404)))->_key/*8*/),a1)))))
12951 {
12952 (ds.p=92292876);
12953 _node=(/*RF2*/(((T47*)ci(47,_node,92292892)))->_next/*12*/);
12954 }
12955 (ds.p=92293382);
12956 R=(_node)!=((void*)(NULL));
12957 if(se_rci(caller,C))se_i45(&ds,C);
12958 se_dst=caller;/*unlink*/
12959 return R;
12960 }
12961
12962 void r45clear(se_dump_stack*caller,T45* C){
12963 T2 o44_309_18=0;
12964 void**locals[1];
12965 static se_frame_descriptor fd={"clear DICTIONARY",1,1,"%R45%old value%E2%",1};
12966 se_dump_stack ds;
12967 ds.fd=&fd;
12968 ds.current=((void**)&C);
12969 ds.p=92351752;
12970 ds.caller=caller;
12971 ds.locals=locals;
12972 locals[0]=(void**)&o44_309_18;
12973 se_dst=&ds;/*link*/
12974 o44_309_18=(/*RF2*/(C)->_capacity/*8*/);
12975 (ds.p=92352548);
12976 r49set_all_with(&ds,(/*RF2*/(C)->_buckets/*4*/),NULL,((/*RF2*/(C)->_capacity/*8*/))-(1));
12977 (ds.p=92352788);
12978 (/*SFN*/C->_cache_user/*16*/)=-(1);
12979 (ds.p=92353044);
12980 (/*SFN*/C->_count/*12*/)=0;
12981 if(fd.assertion_flag){
12982 fd.assertion_flag=0;
12983 (ds.p=92353556);
12984 ac_ens(r45is_empty(&ds,C),NULL);
12985 (ds.p=92353816);
12986 ac_ens(((/*RF2*/(C)->_capacity/*8*/))==(o44_309_18),NULL);
12987 fd.assertion_flag=1;
12988 }
12989 if(se_rci(caller,C))se_i45(&ds,C);
12990 se_dst=caller;/*unlink*/
12991 }
12992
12993 T0* r45twin(se_dump_stack*caller,T45* C){
12994 T0* R=NULL;
12995 void**locals[1];
12996 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R45%Result%R45%",1};
12997 se_dump_stack ds;
12998 ds.fd=&fd;
12999 ds.current=((void**)&C);
13000 ds.p=2140182;
13001 ds.caller=caller;
13002 ds.locals=locals;
13003 locals[0]=(void**)&R;
13004 se_dst=&ds;/*link*/
13005 R=((void*)new45());
13006 r45copy(&ds,((T45*)R),((T0*)C));
13007 if(fd.assertion_flag){
13008 fd.assertion_flag=0;
13009 (ds.p=2142256);
13010 ac_ens(r45is_equal(&ds,se_i45(&ds,((T45*)ci(45,R,2142242))),(T0*)C),"equal");
13011 fd.assertion_flag=1;
13012 }
13013 if(se_rci(caller,C))se_i45(&ds,C);
13014 se_dst=caller;/*unlink*/
13015 return R;
13016 }
13017
13018 void r45with_capacity(se_dump_stack*caller,T45* C,T2 a1){
13019 T2 _new_capacity=0;
13020 int _hts=0;
13021 void**locals[3];
13022 static se_frame_descriptor fd={"with_capacity DICTIONARY",1,3,"%R45%medium_size%E2%new_capacity%E2%hts%E108%",1};
13023 se_dump_stack ds;
13024 ds.fd=&fd;
13025 ds.current=((void**)&C);
13026 ds.p=92451080;
13027 ds.caller=caller;
13028 ds.locals=locals;
13029 locals[0]=(void**)&a1;
13030 locals[1]=(void**)&_new_capacity;
13031 locals[2]=(void**)&_hts;
13032 se_dst=&ds;/*link*/
13033 se_require_uppermost_flag=1;
13034 if(fd.assertion_flag){
13035 fd.assertion_flag=0;
13036 (ds.p=92452908);
13037 ac_req((a1)>(0),NULL);
13038 fd.assertion_flag=1;
13039 }
13040 (ds.p=92454150);
13041 _new_capacity=r108prime_number_ceiling(&ds,a1);
13042 (ds.p=92454420);
13043 (/*SFN*/C->_buckets/*4*/)=new49(_new_capacity);
13044 (ds.p=92454662);
13045 (/*SFN*/C->_capacity/*8*/)=_new_capacity;
13046 (ds.p=92454932);
13047 (/*SFN*/C->_cache_user/*16*/)=-(1);
13048 (ds.p=92455188);
13049 (/*SFN*/C->_count/*12*/)=0;
13050 if(fd.assertion_flag){
13051 fd.assertion_flag=0;
13052 (ds.p=92455700);
13053 ac_ens(r45is_empty(&ds,C),NULL);
13054 (ds.p=92455974);
13055 ac_ens(((/*RF2*/(C)->_capacity/*8*/))>=(a1),NULL);
13056 fd.assertion_flag=1;
13057 }
13058 if(se_rci(caller,C))se_i45(&ds,C);
13059 se_dst=caller;/*unlink*/
13060 }
13061 se_frame_descriptor se_ifd45={"invariant once DICTIONARY[COMMAND,INTEGER]",1,0,"%R45%",1};
13062
13063 T45*se_i45(se_dump_stack*caller,T45*C){
13064 se_dump_stack ds;
13065 ds.fd=&se_ifd45;
13066 ds.current=((void**)&C);
13067 ds.p=92277774;
13068 ds.caller=caller;
13069 se_dst=&ds;
13070 if(ds.fd->assertion_flag){
13071 ds.fd->assertion_flag=0;
13072 (ds.p=92457242);
13073 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>(0),NULL);
13074 (ds.p=92457754);
13075 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>=((/*RF2*/(C)->_count/*12*/)),NULL);
13076 (ds.p=92458270);
13077 ac_inv(r2in_range(&ds,(/*RF2*/(C)->_cache_user/*16*/),-(1),(/*RF2*/(C)->_count/*12*/)),NULL);
13078 (ds.p=92458790);
13079 ac_inv((!(((/*RF2*/(C)->_cache_user/*16*/))>(0)))||(((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL))),NULL);
13080 (ds.p=92459302);
13081 ac_inv((!(((/*RF2*/(C)->_cache_user/*16*/))>(0)))||(r2in_range(&ds,(/*RF2*/(C)->_cache_buckets/*24*/),0,((/*RF2*/(C)->_capacity/*8*/))-(1))),NULL);
13082 ds.fd->assertion_flag=1;
13083 }
13084 se_dst=caller;
13085 return C;
13086 }
13087
13088 void r39copy(se_dump_stack*caller,T39* C,T0* a1){
13089 void**locals[1];
13090 static se_frame_descriptor fd={"copy LINKED_LIST",1,1,"%R39%other%R39%",1};
13091 se_dump_stack ds;
13092 ds.fd=&fd;
13093 ds.current=((void**)&C);
13094 ds.p=71349256;
13095 ds.caller=caller;
13096 ds.locals=locals;
13097 locals[0]=(void**)&a1;
13098 se_dst=&ds;/*link*/
13099 se_require_uppermost_flag=1;
13100 if(fd.assertion_flag){
13101 fd.assertion_flag=0;
13102 (ds.p=2144064);
13103 ac_req((a1)!=((void*)(NULL)),"other_not_void");
13104 fd.assertion_flag=1;
13105 }
13106 (ds.p=71349780);
13107 r39from_collection(&ds,C,a1);
13108 if(fd.assertion_flag){
13109 fd.assertion_flag=0;
13110 (ds.p=2144808);
13111 ac_ens(r39is_equal(&ds,C,a1),"is_equal");
13112 fd.assertion_flag=1;
13113 }
13114 if(se_rci(caller,C))se_i39(&ds,C);
13115 se_dst=caller;/*unlink*/
13116 }
13117
13118 void r39do_all(se_dump_stack*caller,T39* C,/*agent*/T0* a1){
13119 T2 _i=0;
13120 void**locals[2];
13121 static se_frame_descriptor fd={"do_all COLLECTION",1,2,"%R39%action%R93%i%E2%",1};
13122 se_dump_stack ds;
13123 ds.fd=&fd;
13124 ds.current=((void**)&C);
13125 ds.p=75614728;
13126 ds.caller=caller;
13127 ds.locals=locals;
13128 locals[0]=(void**)&a1;
13129 locals[1]=(void**)&_i;
13130 se_dst=&ds;/*link*/
13131 (ds.p=75616016);
13132 _i=1;
13133 while (!(((ds.p=75616054),(_i)>((/*RF2*/(C)->_upper/*4*/)))))
13134 {
13135 (ds.p=75616524);
13136 call_r0v(&ds,a1,r39item(&ds,C,_i));
13137 (ds.p=75616780);
13138 _i=(_i)+(1);
13139 }
13140 if(se_rci(caller,C))se_i39(&ds,C);
13141 se_dst=caller;/*unlink*/
13142 }
13143
13144 T0* r39last(se_dump_stack*caller,T39* C){
13145 T0* R=NULL;
13146 void**locals[1];
13147 static se_frame_descriptor fd={"last LINKED_LIST",1,1,"%R39%Result%R30%",1};
13148 se_dump_stack ds;
13149 ds.fd=&fd;
13150 ds.current=((void**)&C);
13151 ds.p=71340808;
13152 ds.caller=caller;
13153 ds.locals=locals;
13154 locals[0]=(void**)&R;
13155 se_dst=&ds;/*link*/
13156 se_require_uppermost_flag=1;
13157 if(fd.assertion_flag){
13158 fd.assertion_flag=0;
13159 (ds.p=75520788);
13160 ac_req(r6_ix_not(&ds,r39is_empty(&ds,C)),NULL);
13161 fd.assertion_flag=1;
13162 }
13163 (ds.p=71341332);
13164 R=(/*RF2*/(((T43*)ci(43,(/*RF2*/(C)->_last_link/*12*/),71341352)))->_item/*4*/);
13165 if(fd.assertion_flag){
13166 fd.assertion_flag=0;
13167 (ds.p=75521570);
13168 ac_ens((R)==((void*)(r39item(&ds,C,(/*RF2*/(C)->_upper/*4*/)))),NULL);
13169 fd.assertion_flag=1;
13170 }
13171 if(se_rci(caller,C))se_i39(&ds,C);
13172 se_dst=caller;/*unlink*/
13173 return R;
13174 }
13175
13176 T2 r39count(se_dump_stack*caller,T39* C){
13177 T2 R=0;
13178 void**locals[1];
13179 static se_frame_descriptor fd={"count LINKED_LIST",1,1,"%R39%Result%E2%",1};
13180 se_dump_stack ds;
13181 ds.fd=&fd;
13182 ds.current=((void**)&C);
13183 ds.p=71346184;
13184 ds.caller=caller;
13185 ds.locals=locals;
13186 locals[0]=(void**)&R;
13187 se_dst=&ds;/*link*/
13188 (ds.p=71346708);
13189 R=(/*RF2*/(C)->_upper/*4*/);
13190 if(fd.assertion_flag){
13191 fd.assertion_flag=0;
13192 (ds.p=75511330);
13193 ac_ens((R)==((((/*RF2*/(C)->_upper/*4*/))-(1))+(1)),NULL);
13194 fd.assertion_flag=1;
13195 }
13196 if(se_rci(caller,C))se_i39(&ds,C);
13197 se_dst=caller;/*unlink*/
13198 return R;
13199 }
13200
13201 T6 r39is_equal(se_dump_stack*caller,T39* C,T0* a1){
13202 T6 R=0;
13203 T0* _lnk1=NULL;
13204 T0* _lnk2=NULL;
13205 void**locals[4];
13206 static se_frame_descriptor fd={"is_equal LINKED_LIST",1,4,"%R39%other%R39%Result%E6%lnk1%R43%lnk2%R43%",1};
13207 se_dump_stack ds;
13208 ds.fd=&fd;
13209 ds.current=((void**)&C);
13210 ds.p=71350536;
13211 ds.caller=caller;
13212 ds.locals=locals;
13213 locals[0]=(void**)&a1;
13214 locals[1]=(void**)&R;
13215 locals[2]=(void**)&_lnk1;
13216 locals[3]=(void**)&_lnk2;
13217 se_dst=&ds;/*link*/
13218 se_require_uppermost_flag=1;
13219 if(fd.assertion_flag){
13220 fd.assertion_flag=0;
13221 (ds.p=2122048);
13222 ac_req((a1)!=((void*)(NULL)),"other_not_void");
13223 fd.assertion_flag=1;
13224 }
13225 /*[IF*/
13226 if(((ds.p=71351594),(C)==((void*)(a1)))){
13227 (ds.p=71351834);
13228 R=1;
13229 }
13230 else if(((ds.p=71352110),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i39(&ds,((T39*)ci(39,a1,71352114))))->_upper/*4*/)))){
13231 (ds.p=71352608);
13232 R=1;
13233 (ds.p=71352864);
13234 _lnk1=(/*RF2*/(C)->_first_link/*8*/);
13235 (ds.p=71353120);
13236 _lnk2=(/*RF2*/(se_i39(&ds,((T39*)ci(39,a1,71353136))))->_first_link/*8*/);
13237 while (!(((ds.p=71353656),r6_px_or(&ds,(_lnk1)==((void*)(NULL)),r6_ix_not(&ds,R)))))
13238 {
13239 (ds.p=71354144);
13240 R=((/*RF2*/(((T43*)ci(43,_lnk1,71354164)))->_item/*4*/))==((void*)((/*RF2*/(((T43*)ci(43,_lnk2,71354188)))->_item/*4*/)));
13241 (ds.p=71354400);
13242 _lnk1=(/*RF2*/(((T43*)ci(43,_lnk1,71354416)))->_next/*8*/);
13243 (ds.p=71354656);
13244 _lnk2=(/*RF2*/(((T43*)ci(43,_lnk2,71354672)))->_next/*8*/);
13245 }
13246 }
13247 /*FI]*/
13248 if(fd.assertion_flag){
13249 fd.assertion_flag=0;
13250 (ds.p=75585556);
13251 ac_ens((!(R))||(r6_px_and(&ds,(1)==(1),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i39(&ds,((T39*)ci(39,a1,75585638))))->_upper/*4*/)))),NULL);
13252 (ds.p=2122846);
13253 ac_ens((!(r39standard_is_equal(&ds,C,a1)))||(R),"consistent");
13254 (ds.p=2123064);
13255 ac_ens((!(R))||(r39is_equal(&ds,se_i39(&ds,((T39*)ci(39,a1,2123080))),(T0*)C)),"symmetric");
13256 fd.assertion_flag=1;
13257 }
13258 if(se_rci(caller,C))se_i39(&ds,C);
13259 se_dst=caller;/*unlink*/
13260 return R;
13261 }
13262
13263 T0* r39item(se_dump_stack*caller,T39* C,T2 a1){
13264 T0* R=NULL;
13265 void**locals[2];
13266 static se_frame_descriptor fd={"item LINKED_LIST",1,2,"%R39%index%E2%Result%R30%",1};
13267 se_dump_stack ds;
13268 ds.fd=&fd;
13269 ds.current=((void**)&C);
13270 ds.p=71342088;
13271 ds.caller=caller;
13272 ds.locals=locals;
13273 locals[0]=(void**)&a1;
13274 locals[1]=(void**)&R;
13275 se_dst=&ds;/*link*/
13276 se_require_uppermost_flag=1;
13277 if(fd.assertion_flag){
13278 fd.assertion_flag=0;
13279 (ds.p=75516692);
13280 ac_req(r39valid_index(&ds,C,a1),NULL);
13281 fd.assertion_flag=1;
13282 }
13283 /*[IF*/
13284 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
13285 (ds.p=71342874);
13286 r39go_item(&ds,C,a1);
13287 }
13288 /*FI]*/
13289 (ds.p=71343380);
13290 R=(/*RF2*/(((T43*)ci(43,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
13291 if(se_rci(caller,C))se_i39(&ds,C);
13292 se_dst=caller;/*unlink*/
13293 return R;
13294 }
13295
13296 T6 r39valid_index(se_dump_stack*caller,T39* C,T2 a1){
13297 T6 R=0;
13298 void**locals[2];
13299 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R39%index%E2%Result%E6%",1};
13300 se_dump_stack ds;
13301 ds.fd=&fd;
13302 ds.current=((void**)&C);
13303 ds.p=75507478;
13304 ds.caller=caller;
13305 ds.locals=locals;
13306 locals[0]=(void**)&a1;
13307 locals[1]=(void**)&R;
13308 se_dst=&ds;/*link*/
13309 (ds.p=75508500);
13310 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)));
13311 if(fd.assertion_flag){
13312 fd.assertion_flag=0;
13313 (ds.p=75509026);
13314 ac_ens((R)==(((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)))),NULL);
13315 fd.assertion_flag=1;
13316 }
13317 if(se_rci(caller,C))se_i39(&ds,C);
13318 se_dst=caller;/*unlink*/
13319 return R;
13320 }
13321
13322 void r39make(se_dump_stack*caller,T39* C){
13323 static se_frame_descriptor fd={"make LINKED_LIST",1,0,"%R39%",1};
13324 se_dump_stack ds;
13325 ds.fd=&fd;
13326 ds.current=((void**)&C);
13327 ds.p=71313672;
13328 ds.caller=caller;
13329 ds.locals=NULL;
13330 se_dst=&ds;/*link*/
13331 (ds.p=71314452);
13332 (/*SFN*/C->_first_link/*8*/)=NULL;
13333 (ds.p=71314708);
13334 (/*SFN*/C->_upper/*4*/)=0;
13335 (ds.p=71314964);
13336 (/*SFN*/C->_last_link/*12*/)=NULL;
13337 (ds.p=71315220);
13338 (/*SFN*/C->_mem_idx/*16*/)=0;
13339 (ds.p=71315476);
13340 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
13341 if(fd.assertion_flag){
13342 fd.assertion_flag=0;
13343 (ds.p=71316000);
13344 ac_ens((r39count(&ds,C))==(0),NULL);
13345 fd.assertion_flag=1;
13346 }
13347 if(se_rci(caller,C))se_i39(&ds,C);
13348 se_dst=caller;/*unlink*/
13349 }
13350
13351 T6 r39is_empty(se_dump_stack*caller,T39* C){
13352 T6 R=0;
13353 void**locals[1];
13354 static se_frame_descriptor fd={"is_empty LINKED_LIST",1,1,"%R39%Result%E6%",1};
13355 se_dump_stack ds;
13356 ds.fd=&fd;
13357 ds.current=((void**)&C);
13358 ds.p=71316744;
13359 ds.caller=caller;
13360 ds.locals=locals;
13361 locals[0]=(void**)&R;
13362 se_dst=&ds;/*link*/
13363 (ds.p=71317254);
13364 R=((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL));
13365 if(fd.assertion_flag){
13366 fd.assertion_flag=0;
13367 (ds.p=75513108);
13368 ac_ens((R)==((r39count(&ds,C))==(0)),NULL);
13369 fd.assertion_flag=1;
13370 }
13371 if(se_rci(caller,C))se_i39(&ds,C);
13372 se_dst=caller;/*unlink*/
13373 return R;
13374 }
13375
13376 T0* r39get_new_iterator(se_dump_stack*caller,T39* C){
13377 T0* R=NULL;
13378 void**locals[1];
13379 static se_frame_descriptor fd={"get_new_iterator LINKED_LIST",1,1,"%R39%Result%R32%",1};
13380 se_dump_stack ds;
13381 ds.fd=&fd;
13382 ds.current=((void**)&C);
13383 ds.p=71416840;
13384 ds.caller=caller;
13385 ds.locals=locals;
13386 locals[0]=(void**)&R;
13387 se_dst=&ds;/*link*/
13388 (ds.p=71417364);
13389 {T41*n=new41();
13390 r41make(&ds,n,(T0*)C);
13391 R=((T0*)n);
13392 }
13393 if(se_rci(caller,C))se_i39(&ds,C);
13394 se_dst=caller;/*unlink*/
13395 return R;
13396 }
13397
13398 T6 r39standard_is_equal(se_dump_stack*caller,T39* C,T0* a1){
13399 T6 R=0;
13400 void**locals[2];
13401 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R39%other%R39%Result%E6%",1};
13402 se_dump_stack ds;
13403 ds.fd=&fd;
13404 ds.current=((void**)&C);
13405 ds.p=2128406;
13406 ds.caller=caller;
13407 ds.locals=locals;
13408 locals[0]=(void**)&a1;
13409 locals[1]=(void**)&R;
13410 se_dst=&ds;/*link*/
13411 se_require_uppermost_flag=1;
13412 if(fd.assertion_flag){
13413 fd.assertion_flag=0;
13414 (ds.p=2129184);
13415 ac_req((a1)!=((void*)(NULL)),NULL);
13416 fd.assertion_flag=1;
13417 }
13418 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
13419 fd.assertion_flag=0;
13420 (ds.p=2129976);
13421 ac_ens((!(R))||(r39standard_is_equal(&ds,se_i39(&ds,((T39*)ci(39,a1,2129992))),(T0*)C)),"symmetric");
13422 fd.assertion_flag=1;
13423 }
13424 if(se_rci(caller,C))se_i39(&ds,C);
13425 se_dst=caller;/*unlink*/
13426 return R;
13427 }
13428
13429 void r39add_last(se_dump_stack*caller,T39* C,T0* a1){
13430 T0* _lnk=NULL;
13431 T2 o36_185_26=0;
13432 T2 o36_186_22=0;
13433 T2 o36_187_26=0;
13434 void**locals[5];
13435 static se_frame_descriptor fd={"add_last LINKED_LIST",1,5,"%R39%element%R30%lnk%R43%old value%E2%old value%E2%old value%E2%",1};
13436 se_dump_stack ds;
13437 ds.fd=&fd;
13438 ds.current=((void**)&C);
13439 ds.p=71321864;
13440 ds.caller=caller;
13441 ds.locals=locals;
13442 locals[0]=(void**)&a1;
13443 locals[1]=(void**)&_lnk;
13444 locals[2]=(void**)&o36_185_26;
13445 locals[3]=(void**)&o36_186_22;
13446 locals[4]=(void**)&o36_187_26;
13447 se_dst=&ds;/*link*/
13448 o36_185_26=r39count(&ds,C);
13449 o36_186_22=1;
13450 o36_187_26=(/*RF2*/(C)->_upper/*4*/);
13451 /*[IF*/
13452 if(((ds.p=71322928),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
13453 (ds.p=71323162);
13454 {T43*n=new43();
13455 r43make(&ds,n,a1,NULL);
13456 (/*SFN*/C->_first_link/*8*/)=((T0*)n);
13457 }
13458 (ds.p=71323418);
13459 (/*SFN*/C->_upper/*4*/)=1;
13460 (ds.p=71323674);
13461 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_first_link/*8*/);
13462 (ds.p=71323930);
13463 (/*SFN*/C->_mem_idx/*16*/)=1;
13464 (ds.p=71324186);
13465 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
13466 }
13467 else{
13468 (ds.p=71324698);
13469 {T43*n=new43();
13470 r43make(&ds,n,a1,NULL);
13471 _lnk=((T0*)n);
13472 }
13473 (ds.p=71324974);
13474 r43set_next(&ds,((T43*)ci(43,(/*RF2*/(C)->_last_link/*12*/),71324954)),_lnk);
13475 (ds.p=71325210);
13476 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))+(1);
13477 (ds.p=71325466);
13478 (/*SFN*/C->_last_link/*12*/)=_lnk;
13479 }
13480 /*FI]*/
13481 if(fd.assertion_flag){
13482 fd.assertion_flag=0;
13483 (ds.p=75544606);
13484 ac_ens((r39last(&ds,C))==((void*)(a1)),NULL);
13485 (ds.p=75544864);
13486 ac_ens((r39count(&ds,C))==((1)+(o36_185_26)),NULL);
13487 (ds.p=75545120);
13488 ac_ens((1)==(o36_186_22),NULL);
13489 (ds.p=75545376);
13490 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((1)+(o36_187_26)),NULL);
13491 fd.assertion_flag=1;
13492 }
13493 if(se_rci(caller,C))se_i39(&ds,C);
13494 se_dst=caller;/*unlink*/
13495 }
13496
13497 void r39clear(se_dump_stack*caller,T39* C){
13498 static se_frame_descriptor fd={"clear LINKED_LIST",1,0,"%R39%",1};
13499 se_dump_stack ds;
13500 ds.fd=&fd;
13501 ds.current=((void**)&C);
13502 ds.p=71367688;
13503 ds.caller=caller;
13504 ds.locals=NULL;
13505 se_dst=&ds;/*link*/
13506 /*[IF*/
13507 if(((ds.p=71368240),((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL)))){
13508 (ds.p=71368474);
13509 (/*SFN*/C->_first_link/*8*/)=NULL;
13510 (ds.p=71368730);
13511 (/*SFN*/C->_mem_idx/*16*/)=0;
13512 (ds.p=71368986);
13513 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
13514 (ds.p=71369242);
13515 (/*SFN*/C->_upper/*4*/)=0;
13516 (ds.p=71369498);
13517 (/*SFN*/C->_last_link/*12*/)=NULL;
13518 }
13519 /*FI]*/
13520 if(fd.assertion_flag){
13521 fd.assertion_flag=0;
13522 (ds.p=71370272);
13523 ac_ens(((/*RF2*/(C)->_upper/*4*/))==(0),NULL);
13524 (ds.p=75571220);
13525 ac_ens(r39is_empty(&ds,C),NULL);
13526 fd.assertion_flag=1;
13527 }
13528 if(se_rci(caller,C))se_i39(&ds,C);
13529 se_dst=caller;/*unlink*/
13530 }
13531
13532 T0* r39twin(se_dump_stack*caller,T39* C){
13533 T0* R=NULL;
13534 void**locals[1];
13535 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R39%Result%R39%",1};
13536 se_dump_stack ds;
13537 ds.fd=&fd;
13538 ds.current=((void**)&C);
13539 ds.p=2140182;
13540 ds.caller=caller;
13541 ds.locals=locals;
13542 locals[0]=(void**)&R;
13543 se_dst=&ds;/*link*/
13544 R=((void*)new39());
13545 r39copy(&ds,((T39*)R),((T0*)C));
13546 if(fd.assertion_flag){
13547 fd.assertion_flag=0;
13548 (ds.p=2142256);
13549 ac_ens(r39is_equal(&ds,se_i39(&ds,((T39*)ci(39,R,2142242))),(T0*)C),"equal");
13550 fd.assertion_flag=1;
13551 }
13552 if(se_rci(caller,C))se_i39(&ds,C);
13553 se_dst=caller;/*unlink*/
13554 return R;
13555 }
13556
13557 void r39go_item(se_dump_stack*caller,T39* C,T2 a1){
13558 void**locals[1];
13559 static se_frame_descriptor fd={"go_item LINKED_LIST",1,1,"%R39%i%E2%",1};
13560 se_dump_stack ds;
13561 ds.fd=&fd;
13562 ds.current=((void**)&C);
13563 ds.p=71418632;
13564 ds.caller=caller;
13565 ds.locals=locals;
13566 locals[0]=(void**)&a1;
13567 se_dst=&ds;/*link*/
13568 se_require_uppermost_flag=1;
13569 if(fd.assertion_flag){
13570 fd.assertion_flag=0;
13571 (ds.p=71419156);
13572 ac_req(r39valid_index(&ds,C,a1),NULL);
13573 (ds.p=71419428);
13574 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))!=(a1),NULL);
13575 (ds.p=71419684);
13576 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))>(0),NULL);
13577 (ds.p=71419940);
13578 ac_req(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
13579 fd.assertion_flag=1;
13580 }
13581 /*[IF*/
13582 if(((ds.p=71420458),((/*RF2*/(C)->_mem_idx/*16*/))>(a1))){
13583 (ds.p=71420698);
13584 (/*SFN*/C->_mem_idx/*16*/)=1;
13585 (ds.p=71420954);
13586 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
13587 }
13588 /*FI]*/
13589 while (!(((ds.p=71421982),(a1)==((/*RF2*/(C)->_mem_idx/*16*/)))))
13590 {
13591 (ds.p=71422490);
13592 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(((T43*)ci(43,(/*RF2*/(C)->_mem_lnk/*20*/),71422512)))->_next/*8*/);
13593 (ds.p=71422746);
13594 (/*SFN*/C->_mem_idx/*16*/)=((/*RF2*/(C)->_mem_idx/*16*/))+(1);
13595 }
13596 if(fd.assertion_flag){
13597 fd.assertion_flag=0;
13598 (ds.p=71423524);
13599 ac_ens(((/*RF2*/(C)->_mem_idx/*16*/))==(a1),NULL);
13600 (ds.p=71423780);
13601 ac_ens(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
13602 fd.assertion_flag=1;
13603 }
13604 if(se_rci(caller,C))se_i39(&ds,C);
13605 se_dst=caller;/*unlink*/
13606 }
13607
13608 void r39from_collection(se_dump_stack*caller,T39* C,T0* a1){
13609 T2 _i=0;
13610 T2 _up=0;
13611 T0* _lnk=NULL;
13612 void**locals[4];
13613 static se_frame_descriptor fd={"from_collection LINKED_LIST",1,4,"%R39%model%R145%i%E2%up%E2%lnk%R43%",1};
13614 se_dump_stack ds;
13615 ds.fd=&fd;
13616 ds.current=((void**)&C);
13617 ds.p=71371016;
13618 ds.caller=caller;
13619 ds.locals=locals;
13620 locals[0]=(void**)&a1;
13621 locals[1]=(void**)&_i;
13622 locals[2]=(void**)&_up;
13623 locals[3]=(void**)&_lnk;
13624 se_dst=&ds;/*link*/
13625 se_require_uppermost_flag=1;
13626 if(fd.assertion_flag){
13627 fd.assertion_flag=0;
13628 (ds.p=75559968);
13629 ac_req((a1)!=((void*)(NULL)),NULL);
13630 fd.assertion_flag=1;
13631 }
13632 /*[IF*/
13633 if(((ds.p=71372336),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
13634 (ds.p=71372832);
13635 _i=1;
13636 (ds.p=71373088);
13637 _up=(/*RF2*/(se_i39(&ds,((T39*)ci(39,a1,71373100))))->_upper/*4*/);
13638 while (!(((ds.p=71373604),(_i)>(_up))))
13639 {
13640 (ds.p=71374112);
13641 r39add_last(&ds,C,r39item(&ds,se_i39(&ds,((T39*)ci(39,a1,71374130))),_i));
13642 (ds.p=71374368);
13643 _i=(_i)+(1);
13644 }
13645 }
13646 else{
13647 (ds.p=71375392);
13648 _lnk=(/*RF2*/(C)->_first_link/*8*/);
13649 (ds.p=71375648);
13650 _i=1;
13651 (ds.p=71375904);
13652 _up=(/*RF2*/(se_i39(&ds,((T39*)ci(39,a1,71375916))))->_upper/*4*/);
13653 while (!(((ds.p=71376420),(_i)>(_up))))
13654 {
13655 /*[IF*/
13656 if(((ds.p=71376942),(_lnk)==((void*)(NULL)))){
13657 (ds.p=71377190);
13658 r39add_last(&ds,C,r39item(&ds,se_i39(&ds,((T39*)ci(39,a1,71377208))),_i));
13659 }
13660 else{
13661 (ds.p=71377710);
13662 r43set_item(&ds,((T43*)ci(43,_lnk,71377702)),r39item(&ds,se_i39(&ds,((T39*)ci(39,a1,71377728))),_i));
13663 (ds.p=71377958);
13664 _lnk=(/*RF2*/(((T43*)ci(43,_lnk,71377972)))->_next/*8*/);
13665 }
13666 /*FI]*/
13667 (ds.p=71378464);
13668 _i=(_i)+(1);
13669 }
13670 /*[IF*/
13671 if(((ds.p=71378984),(_lnk)==((void*)((/*RF2*/(C)->_first_link/*8*/))))){
13672 if(fd.assertion_flag){
13673 fd.assertion_flag=0;
13674 (ds.p=71379518);
13675 ac_civ((r39count(&ds,se_i39(&ds,((T39*)ci(39,a1,71379494)))))==(0),NULL);
13676 fd.assertion_flag=1;
13677 }
13678 (ds.p=71380000);
13679 r39clear(&ds,C);
13680 }
13681 else if(((ds.p=71380272),(_lnk)!=((void*)(NULL)))){
13682 (ds.p=71380512);
13683 _i=r39count(&ds,se_i39(&ds,((T39*)ci(39,a1,71380522))));
13684 /*[IF*/
13685 if(((ds.p=71380790),((/*RF2*/(C)->_mem_idx/*16*/))!=(_i))){
13686 (ds.p=71381030);
13687 r39go_item(&ds,C,_i);
13688 }
13689 /*FI]*/
13690 if(fd.assertion_flag){
13691 fd.assertion_flag=0;
13692 (ds.p=71381806);
13693 ac_civ((_lnk)==((void*)((/*RF2*/(((T43*)ci(43,(/*RF2*/(C)->_mem_lnk/*20*/),71381810)))->_next/*8*/))),NULL);
13694 fd.assertion_flag=1;
13695 }
13696 (ds.p=71382320);
13697 r43set_next(&ds,((T43*)ci(43,(/*RF2*/(C)->_mem_lnk/*20*/),71382304)),NULL);
13698 (ds.p=71382560);
13699 (/*SFN*/C->_upper/*4*/)=_i;
13700 (ds.p=71382816);
13701 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_mem_lnk/*20*/);
13702 }
13703 /*FI]*/
13704 }
13705 /*FI]*/
13706 if(fd.assertion_flag){
13707 fd.assertion_flag=0;
13708 (ds.p=75560736);
13709 ac_ens((r39count(&ds,C))==(r39count(&ds,se_i39(&ds,((T39*)ci(39,a1,75560740))))),NULL);
13710 fd.assertion_flag=1;
13711 }
13712 if(se_rci(caller,C))se_i39(&ds,C);
13713 se_dst=caller;/*unlink*/
13714 }
13715 se_frame_descriptor se_ifd39={"invariant once LINKED_LIST[WIDGET]",1,0,"%R39%",1};
13716
13717 T39*se_i39(se_dump_stack*caller,T39*C){
13718 se_dump_stack ds;
13719 ds.fd=&se_ifd39;
13720 ds.current=((void**)&C);
13721 ds.p=71306254;
13722 ds.caller=caller;
13723 se_dst=&ds;
13724 if(ds.fd->assertion_flag){
13725 ds.fd->assertion_flag=0;
13726 (ds.p=75651888);
13727 ac_inv((1)<=(((/*RF2*/(C)->_upper/*4*/))+(1)),"valid_bounds");
13728 (ds.p=71425330);
13729 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))==((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))==(0)),((/*RF2*/(C)->_mem_idx/*16*/))==(0)),((/*RF2*/(C)->_mem_lnk/*20*/))==((void*)(NULL)))),"empty_status");
13730 (ds.p=71426612);
13731 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))!=((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))>(0)),((/*RF2*/(C)->_mem_idx/*16*/))>(0)),((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)))),"not_empty_status");
13732 ds.fd->assertion_flag=1;
13733 }
13734 se_dst=caller;
13735 return C;
13736 }
13737
13738 void r131copy(se_dump_stack*caller,T131* C,T0* a1){
13739 T2 _i=0;
13740 void**locals[2];
13741 static se_frame_descriptor fd={"copy DICTIONARY",1,2,"%R131%other%R131%i%E2%",1};
13742 se_dump_stack ds;
13743 ds.fd=&fd;
13744 ds.current=((void**)&C);
13745 ds.p=92398600;
13746 ds.caller=caller;
13747 ds.locals=locals;
13748 locals[0]=(void**)&a1;
13749 locals[1]=(void**)&_i;
13750 se_dst=&ds;/*link*/
13751 se_require_uppermost_flag=1;
13752 if(fd.assertion_flag){
13753 fd.assertion_flag=0;
13754 (ds.p=2144064);
13755 ac_req((a1)!=((void*)(NULL)),"other_not_void");
13756 fd.assertion_flag=1;
13757 }
13758 /*[IF*/
13759 if(((ds.p=92400676),((/*RF2*/(C)->_capacity/*8*/))==(0))){
13760 (ds.p=92400914);
13761 r131with_capacity(&ds,C,((/*RF2*/(se_i131(&ds,((T131*)ci(131,a1,92400942))))->_count/*12*/))+(1));
13762 }
13763 else{
13764 (ds.p=92401426);
13765 r131clear(&ds,C);
13766 }
13767 /*FI]*/
13768 (ds.p=92401932);
13769 _i=1;
13770 while (!(((ds.p=92402448),(_i)>((/*RF2*/(se_i131(&ds,((T131*)ci(131,a1,92402452))))->_count/*12*/)))))
13771 {
13772 (ds.p=92402956);
13773 r131put(&ds,C,r131item(&ds,se_i131(&ds,((T131*)ci(131,a1,92402964))),_i),r131key(&ds,se_i131(&ds,((T131*)ci(131,a1,92402992))),_i));
13774 (ds.p=92403212);
13775 _i=(_i)+(1);
13776 }
13777 if(fd.assertion_flag){
13778 fd.assertion_flag=0;
13779 (ds.p=2144808);
13780 ac_ens(r131is_equal(&ds,C,a1),"is_equal");
13781 fd.assertion_flag=1;
13782 }
13783 if(se_rci(caller,C))se_i131(&ds,C);
13784 se_dst=caller;/*unlink*/
13785 }
13786
13787 void r131do_all(se_dump_stack*caller,T131* C,/*agent*/T0* a1){
13788 T2 _i=0;
13789 T0* _v=NULL;
13790 T0* _k=NULL;
13791 void**locals[4];
13792 static se_frame_descriptor fd={"do_all DICTIONARY",1,4,"%R131%action%R148%i%E2%v%R96%k%R7%",1};
13793 se_dump_stack ds;
13794 ds.fd=&fd;
13795 ds.current=((void**)&C);
13796 ds.p=92404744;
13797 ds.caller=caller;
13798 ds.locals=locals;
13799 locals[0]=(void**)&a1;
13800 locals[1]=(void**)&_i;
13801 locals[2]=(void**)&_v;
13802 locals[3]=(void**)&_k;
13803 se_dst=&ds;/*link*/
13804 (ds.p=92406032);
13805 _i=1;
13806 while (!(((ds.p=92406070),(_i)>(r131upper(&ds,C)))))
13807 {
13808 (ds.p=92406540);
13809 _v=r131item(&ds,C,_i);
13810 (ds.p=92406796);
13811 _k=(/*RF2*/(((T132*)ci(132,(/*RF2*/(C)->_cache_node/*20*/),92406806)))->_key/*8*/);
13812 (ds.p=92407052);
13813 call_r0r0v(&ds,a1,_v,_k);
13814 (ds.p=92407308);
13815 _i=(_i)+(1);
13816 }
13817 if(se_rci(caller,C))se_i131(&ds,C);
13818 se_dst=caller;/*unlink*/
13819 }
13820
13821 T0* r131key(se_dump_stack*caller,T131* C,T2 a1){
13822 T0* R=NULL;
13823 void**locals[2];
13824 static se_frame_descriptor fd={"key DICTIONARY",1,2,"%R131%index%E2%Result%R7%",1};
13825 se_dump_stack ds;
13826 ds.fd=&fd;
13827 ds.current=((void**)&C);
13828 ds.p=92361736;
13829 ds.caller=caller;
13830 ds.locals=locals;
13831 locals[0]=(void**)&a1;
13832 locals[1]=(void**)&R;
13833 se_dst=&ds;/*link*/
13834 se_require_uppermost_flag=1;
13835 if(fd.assertion_flag){
13836 fd.assertion_flag=0;
13837 (ds.p=92362260);
13838 ac_req(r131valid_index(&ds,C,a1),NULL);
13839 fd.assertion_flag=1;
13840 }
13841 (ds.p=92362772);
13842 r131set_cache_user(&ds,C,a1);
13843 (ds.p=92363028);
13844 R=(/*RF2*/(((T132*)ci(132,(/*RF2*/(C)->_cache_node/*20*/),92363048)))->_key/*8*/);
13845 if(fd.assertion_flag){
13846 fd.assertion_flag=0;
13847 (ds.p=92363562);
13848 ac_ens((r131at(&ds,C,R))==((void*)(r131item(&ds,C,a1))),NULL);
13849 fd.assertion_flag=1;
13850 }
13851 if(se_rci(caller,C))se_i131(&ds,C);
13852 se_dst=caller;/*unlink*/
13853 return R;
13854 }
13855
13856 T0* r131at(se_dump_stack*caller,T131* C,T0* a1){
13857 T0* R=NULL;
13858 T2 _idx=0;
13859 T0* _node=NULL;
13860 void**locals[4];
13861 static se_frame_descriptor fd={"at DICTIONARY",1,4,"%R131%k%R7%Result%R96%idx%E2%node%R132%",1};
13862 se_dump_stack ds;
13863 ds.fd=&fd;
13864 ds.current=((void**)&C);
13865 ds.p=92294152;
13866 ds.caller=caller;
13867 ds.locals=locals;
13868 locals[0]=(void**)&a1;
13869 locals[1]=(void**)&R;
13870 locals[2]=(void**)&_idx;
13871 locals[3]=(void**)&_node;
13872 se_dst=&ds;/*link*/
13873 se_require_uppermost_flag=1;
13874 if(fd.assertion_flag){
13875 fd.assertion_flag=0;
13876 (ds.p=92295188);
13877 ac_req(r131has(&ds,C,a1),NULL);
13878 fd.assertion_flag=1;
13879 }
13880 (ds.p=92296460);
13881 _idx=(r7hash_code(&ds,se_i7(&ds,((T7*)ci(7,a1,92296474)))))%((/*RF2*/(C)->_capacity/*8*/));
13882 (ds.p=92296716);
13883 _node=((/*RF2*/(C)->_buckets/*4*/))[_idx];
13884 while (!(((ds.p=92297246),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T132*)ci(132,_node,92297228)))->_key/*8*/),92297238))),a1))))
13885 {
13886 (ds.p=92297740);
13887 _node=(/*RF2*/(((T132*)ci(132,_node,92297756)))->_next/*12*/);
13888 }
13889 (ds.p=92298246);
13890 R=(/*RF2*/(((T132*)ci(132,_node,92298266)))->_item/*4*/);
13891 if(se_rci(caller,C))se_i131(&ds,C);
13892 se_dst=caller;/*unlink*/
13893 return R;
13894 }
13895
13896 T2 r131upper(se_dump_stack*caller,T131* C){
13897 T2 R=0;
13898 void**locals[1];
13899 static se_frame_descriptor fd={"upper DICTIONARY",1,1,"%R131%Result%E2%",1};
13900 se_dump_stack ds;
13901 ds.fd=&fd;
13902 ds.current=((void**)&C);
13903 ds.p=92355592;
13904 ds.caller=caller;
13905 ds.locals=locals;
13906 locals[0]=(void**)&R;
13907 se_dst=&ds;/*link*/
13908 (ds.p=92356116);
13909 R=(/*RF2*/(C)->_count/*12*/);
13910 if(fd.assertion_flag){
13911 fd.assertion_flag=0;
13912 (ds.p=92356642);
13913 ac_ens((R)==((/*RF2*/(C)->_count/*12*/)),NULL);
13914 fd.assertion_flag=1;
13915 }
13916 if(se_rci(caller,C))se_i131(&ds,C);
13917 se_dst=caller;/*unlink*/
13918 return R;
13919 }
13920
13921 void r131put(se_dump_stack*caller,T131* C,T0* a1,T0* a2){
13922 T2 _h=0;
13923 T2 _idx=0;
13924 T0* _node=NULL;
13925 void**locals[5];
13926 static se_frame_descriptor fd={"put DICTIONARY",1,5,"%R131%v%R96%k%R7%h%E2%idx%E2%node%R132%",1};
13927 se_dump_stack ds;
13928 ds.fd=&fd;
13929 ds.current=((void**)&C);
13930 ds.p=92305416;
13931 ds.caller=caller;
13932 ds.locals=locals;
13933 locals[0]=(void**)&a1;
13934 locals[1]=(void**)&a2;
13935 locals[2]=(void**)&_h;
13936 locals[3]=(void**)&_idx;
13937 locals[4]=(void**)&_node;
13938 se_dst=&ds;/*link*/
13939 (ds.p=92307206);
13940 (/*SFN*/C->_cache_user/*16*/)=-(1);
13941 (ds.p=92307724);
13942 _h=r7hash_code(&ds,se_i7(&ds,((T7*)ci(7,a2,92307734))));
13943 (ds.p=92307980);
13944 _idx=(_h)%((/*RF2*/(C)->_capacity/*8*/));
13945 (ds.p=92308236);
13946 _node=((/*RF2*/(C)->_buckets/*4*/))[_idx];
13947 while (!(((ds.p=92308772),((_node)==((void*)(NULL)))||(r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T132*)ci(132,_node,92308788)))->_key/*8*/),92308798))),a2)))))
13948 {
13949 (ds.p=92309260);
13950 _node=(/*RF2*/(((T132*)ci(132,_node,92309276)))->_next/*12*/);
13951 }
13952 /*[IF*/
13953 if(((ds.p=92309782),(_node)==((void*)(NULL)))){
13954 /*[IF*/
13955 if(((ds.p=92310052),((/*RF2*/(C)->_capacity/*8*/))==((/*RF2*/(C)->_count/*12*/)))){
13956 (ds.p=92310290);
13957 r131increase_capacity(&ds,C);
13958 (ds.p=92310546);
13959 _idx=(_h)%((/*RF2*/(C)->_capacity/*8*/));
13960 }
13961 /*FI]*/
13962 (ds.p=92311052);
13963 {T132*n=new132();
13964 r132make(&ds,n,a1,a2,((/*RF2*/(C)->_buckets/*4*/))[_idx]);
13965 _node=((T0*)n);
13966 }
13967 (ds.p=92311324);
13968 ((/*RF2*/(C)->_buckets/*4*/))[_idx]=(_node);
13969 (ds.p=92311564);
13970 (/*SFN*/C->_count/*12*/)=((/*RF2*/(C)->_count/*12*/))+(1);
13971 }
13972 else{
13973 (ds.p=92312086);
13974 r132set_item(&ds,((T132*)ci(132,_node,92312076)),a1);
13975 }
13976 /*FI]*/
13977 if(fd.assertion_flag){
13978 fd.assertion_flag=0;
13979 (ds.p=92312856);
13980 ac_ens((a1)==((void*)(r131at(&ds,C,a2))),NULL);
13981 fd.assertion_flag=1;
13982 }
13983 if(se_rci(caller,C))se_i131(&ds,C);
13984 se_dst=caller;/*unlink*/
13985 }
13986
13987 T6 r131is_equal(se_dump_stack*caller,T131* C,T0* a1){
13988 T6 R=0;
13989 T2 _i=0;
13990 void**locals[3];
13991 static se_frame_descriptor fd={"is_equal DICTIONARY",1,3,"%R131%other%R131%Result%E6%i%E2%",1};
13992 se_dump_stack ds;
13993 ds.fd=&fd;
13994 ds.current=((void**)&C);
13995 ds.p=92382984;
13996 ds.caller=caller;
13997 ds.locals=locals;
13998 locals[0]=(void**)&a1;
13999 locals[1]=(void**)&R;
14000 locals[2]=(void**)&_i;
14001 se_dst=&ds;/*link*/
14002 se_require_uppermost_flag=1;
14003 if(fd.assertion_flag){
14004 fd.assertion_flag=0;
14005 (ds.p=2122048);
14006 ac_req((a1)!=((void*)(NULL)),"other_not_void");
14007 fd.assertion_flag=1;
14008 }
14009 /*[IF*/
14010 if(((ds.p=92384810),(C)==((void*)(a1)))){
14011 (ds.p=92385050);
14012 R=1;
14013 }
14014 else if(((ds.p=92385326),((/*RF2*/(C)->_count/*12*/))==((/*RF2*/(se_i131(&ds,((T131*)ci(131,a1,92385330))))->_count/*12*/)))){
14015 (ds.p=92385810);
14016 R=1;
14017 (ds.p=92386066);
14018 _i=1;
14019 while (!(((ds.p=92386600),(r6_ix_not(&ds,R))||((_i)>((/*RF2*/(C)->_count/*12*/))))))
14020 {
14021 /*[IF*/
14022 if(((ds.p=92387108),r131has(&ds,se_i131(&ds,((T131*)ci(131,a1,92387096))),r131key(&ds,C,_i)))){
14023 /*[IF*/
14024 if(((ds.p=92387378),(r131at(&ds,se_i131(&ds,((T131*)ci(131,a1,92387344))),r131key(&ds,C,_i)))!=((void*)(r131item(&ds,C,_i))))){
14025 (ds.p=92387600);
14026 R=0;
14027 }
14028 else{
14029 (ds.p=92388112);
14030 _i=(_i)+(1);
14031 }
14032 /*FI]*/
14033 }
14034 else{
14035 (ds.p=92388874);
14036 R=0;
14037 }
14038 /*FI]*/
14039 }
14040 }
14041 /*FI]*/
14042 if(fd.assertion_flag){
14043 fd.assertion_flag=0;
14044 (ds.p=92390164);
14045 ac_ens((!(R))||(((/*RF2*/(C)->_count/*12*/))==((/*RF2*/(se_i131(&ds,((T131*)ci(131,a1,92390196))))->_count/*12*/))),NULL);
14046 (ds.p=2122846);
14047 ac_ens((!(r131standard_is_equal(&ds,C,a1)))||(R),"consistent");
14048 (ds.p=2123064);
14049 ac_ens((!(R))||(r131is_equal(&ds,se_i131(&ds,((T131*)ci(131,a1,2123080))),(T0*)C)),"symmetric");
14050 fd.assertion_flag=1;
14051 }
14052 if(se_rci(caller,C))se_i131(&ds,C);
14053 se_dst=caller;/*unlink*/
14054 return R;
14055 }
14056
14057 T0* r131item(se_dump_stack*caller,T131* C,T2 a1){
14058 T0* R=NULL;
14059 void**locals[2];
14060 static se_frame_descriptor fd={"item DICTIONARY",1,2,"%R131%index%E2%Result%R96%",1};
14061 se_dump_stack ds;
14062 ds.fd=&fd;
14063 ds.current=((void**)&C);
14064 ds.p=92359176;
14065 ds.caller=caller;
14066 ds.locals=locals;
14067 locals[0]=(void**)&a1;
14068 locals[1]=(void**)&R;
14069 se_dst=&ds;/*link*/
14070 se_require_uppermost_flag=1;
14071 if(fd.assertion_flag){
14072 fd.assertion_flag=0;
14073 (ds.p=92359700);
14074 ac_req(r131valid_index(&ds,C,a1),NULL);
14075 fd.assertion_flag=1;
14076 }
14077 (ds.p=92360212);
14078 r131set_cache_user(&ds,C,a1);
14079 (ds.p=92360468);
14080 R=(/*RF2*/(((T132*)ci(132,(/*RF2*/(C)->_cache_node/*20*/),92360488)))->_item/*4*/);
14081 if(fd.assertion_flag){
14082 fd.assertion_flag=0;
14083 (ds.p=92360994);
14084 ac_ens((R)==((void*)(r131at(&ds,C,r131key(&ds,C,a1)))),NULL);
14085 fd.assertion_flag=1;
14086 }
14087 if(se_rci(caller,C))se_i131(&ds,C);
14088 se_dst=caller;/*unlink*/
14089 return R;
14090 }
14091
14092 T6 r131valid_index(se_dump_stack*caller,T131* C,T2 a1){
14093 T6 R=0;
14094 void**locals[2];
14095 static se_frame_descriptor fd={"valid_index DICTIONARY",1,2,"%R131%index%E2%Result%E6%",1};
14096 se_dump_stack ds;
14097 ds.fd=&fd;
14098 ds.current=((void**)&C);
14099 ds.p=92357384;
14100 ds.caller=caller;
14101 ds.locals=locals;
14102 locals[0]=(void**)&a1;
14103 locals[1]=(void**)&R;
14104 se_dst=&ds;/*link*/
14105 (ds.p=92357908);
14106 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_count/*12*/)));
14107 if(fd.assertion_flag){
14108 fd.assertion_flag=0;
14109 (ds.p=92358434);
14110 ac_ens((R)==(r2in_range(&ds,a1,1,r131upper(&ds,C))),NULL);
14111 fd.assertion_flag=1;
14112 }
14113 if(se_rci(caller,C))se_i131(&ds,C);
14114 se_dst=caller;/*unlink*/
14115 return R;
14116 }
14117
14118 void r131set_cache_user(se_dump_stack*caller,T131* C,T2 a1){
14119 void**locals[1];
14120 static se_frame_descriptor fd={"set_cache_user DICTIONARY",1,1,"%R131%index%E2%",1};
14121 se_dump_stack ds;
14122 ds.fd=&fd;
14123 ds.current=((void**)&C);
14124 ds.p=92433160;
14125 ds.caller=caller;
14126 ds.locals=locals;
14127 locals[0]=(void**)&a1;
14128 se_dst=&ds;/*link*/
14129 se_require_uppermost_flag=1;
14130 if(fd.assertion_flag){
14131 fd.assertion_flag=0;
14132 (ds.p=92434196);
14133 ac_req(r131valid_index(&ds,C,a1),NULL);
14134 fd.assertion_flag=1;
14135 }
14136 /*[IF*/
14137 if(((ds.p=92434726),(a1)==(((/*RF2*/(C)->_cache_user/*16*/))+(1)))){
14138 (ds.p=92435218);
14139 (/*SFN*/C->_cache_user/*16*/)=a1;
14140 (ds.p=92435474);
14141 (/*SFN*/C->_cache_node/*20*/)=(/*RF2*/(((T132*)ci(132,(/*RF2*/(C)->_cache_node/*20*/),92435502)))->_next/*12*/);
14142 while (!(((ds.p=92436008),((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL)))))
14143 {
14144 (ds.p=92436498);
14145 (/*SFN*/C->_cache_buckets/*24*/)=((/*RF2*/(C)->_cache_buckets/*24*/))+(1);
14146 (ds.p=92436754);
14147 (/*SFN*/C->_cache_node/*20*/)=((/*RF2*/(C)->_buckets/*4*/))[(/*RF2*/(C)->_cache_buckets/*24*/)];
14148 }
14149 }
14150 else if(((ds.p=92437294),(a1)==((/*RF2*/(C)->_cache_user/*16*/)))){
14151 }
14152 else if(((ds.p=92437536),(a1)==(1))){
14153 (ds.p=92438034);
14154 (/*SFN*/C->_cache_user/*16*/)=1;
14155 (ds.p=92438290);
14156 (/*SFN*/C->_cache_buckets/*24*/)=0;
14157 (ds.p=92438546);
14158 (/*SFN*/C->_cache_node/*20*/)=((/*RF2*/(C)->_buckets/*4*/))[(/*RF2*/(C)->_cache_buckets/*24*/)];
14159 while (!(((ds.p=92439080),((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL)))))
14160 {
14161 (ds.p=92439570);
14162 (/*SFN*/C->_cache_buckets/*24*/)=((/*RF2*/(C)->_cache_buckets/*24*/))+(1);
14163 (ds.p=92439826);
14164 (/*SFN*/C->_cache_node/*20*/)=((/*RF2*/(C)->_buckets/*4*/))[(/*RF2*/(C)->_cache_buckets/*24*/)];
14165 }
14166 }
14167 else{
14168 (ds.p=92440850);
14169 r131set_cache_user(&ds,C,1);
14170 while (!(((ds.p=92441384),((/*RF2*/(C)->_cache_user/*16*/))==(a1))))
14171 {
14172 (ds.p=92441874);
14173 r131set_cache_user(&ds,C,((/*RF2*/(C)->_cache_user/*16*/))+(1));
14174 }
14175 }
14176 /*FI]*/
14177 if(fd.assertion_flag){
14178 fd.assertion_flag=0;
14179 (ds.p=92442922);
14180 ac_ens(((/*RF2*/(C)->_cache_user/*16*/))==(a1),NULL);
14181 (ds.p=92443184);
14182 ac_ens(r2in_range(&ds,(/*RF2*/(C)->_cache_buckets/*24*/),0,((/*RF2*/(C)->_capacity/*8*/))-(1)),NULL);
14183 (ds.p=92443434);
14184 ac_ens(((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL)),NULL);
14185 fd.assertion_flag=1;
14186 }
14187 if(se_rci(caller,C))se_i131(&ds,C);
14188 se_dst=caller;/*unlink*/
14189 }
14190
14191 void r131make(se_dump_stack*caller,T131* C){
14192 static se_frame_descriptor fd={"make DICTIONARY",1,0,"%R131%",1};
14193 se_dump_stack ds;
14194 ds.fd=&fd;
14195 ds.current=((void**)&C);
14196 ds.p=92447496;
14197 ds.caller=caller;
14198 ds.locals=NULL;
14199 se_dst=&ds;/*link*/
14200 (ds.p=92449556);
14201 r131with_capacity(&ds,C,193);
14202 if(fd.assertion_flag){
14203 fd.assertion_flag=0;
14204 (ds.p=92450068);
14205 ac_ens(r131is_empty(&ds,C),NULL);
14206 (ds.p=92450342);
14207 ac_ens(((/*RF2*/(C)->_capacity/*8*/))==(193),NULL);
14208 fd.assertion_flag=1;
14209 }
14210 if(se_rci(caller,C))se_i131(&ds,C);
14211 se_dst=caller;/*unlink*/
14212 }
14213
14214 T6 r131is_empty(se_dump_stack*caller,T131* C){
14215 T6 R=0;
14216 void**locals[1];
14217 static se_frame_descriptor fd={"is_empty DICTIONARY",1,1,"%R131%Result%E6%",1};
14218 se_dump_stack ds;
14219 ds.fd=&fd;
14220 ds.current=((void**)&C);
14221 ds.p=92285960;
14222 ds.caller=caller;
14223 ds.locals=locals;
14224 locals[0]=(void**)&R;
14225 se_dst=&ds;/*link*/
14226 (ds.p=92286740);
14227 R=((/*RF2*/(C)->_count/*12*/))==(0);
14228 if(fd.assertion_flag){
14229 fd.assertion_flag=0;
14230 (ds.p=92287266);
14231 ac_ens((R)==(((/*RF2*/(C)->_count/*12*/))==(0)),NULL);
14232 fd.assertion_flag=1;
14233 }
14234 if(se_rci(caller,C))se_i131(&ds,C);
14235 se_dst=caller;/*unlink*/
14236 return R;
14237 }
14238
14239 void r131increase_capacity(se_dump_stack*caller,T131* C){
14240 T2 _i=0;
14241 T2 _idx=0;
14242 T2 _new_capacity=0;
14243 T133 _old_buckets=NULL;
14244 T0* _node1=NULL;
14245 T0* _node2=NULL;
14246 int _hts=0;
14247 T2 o44_614_18=0;
14248 T2 o44_615_15=0;
14249 void**locals[9];
14250 static se_frame_descriptor fd={"increase_capacity DICTIONARY",1,9,"%R131%i%E2%idx%E2%new_capacity%E2%old_buckets%E133%node1%R132%node2%R132%hts%E108%old value%E2%old value%E2%",1};
14251 se_dump_stack ds;
14252 ds.fd=&fd;
14253 ds.current=((void**)&C);
14254 ds.p=92423688;
14255 ds.caller=caller;
14256 ds.locals=locals;
14257 locals[0]=(void**)&_i;
14258 locals[1]=(void**)&_idx;
14259 locals[2]=(void**)&_new_capacity;
14260 locals[3]=(void**)&_old_buckets;
14261 locals[4]=(void**)&_node1;
14262 locals[5]=(void**)&_node2;
14263 locals[6]=(void**)&_hts;
14264 locals[7]=(void**)&o44_614_18;
14265 locals[8]=(void**)&o44_615_15;
14266 se_dst=&ds;/*link*/
14267 o44_614_18=(/*RF2*/(C)->_capacity/*8*/);
14268 o44_615_15=(/*RF2*/(C)->_count/*12*/);
14269 se_require_uppermost_flag=1;
14270 if(fd.assertion_flag){
14271 fd.assertion_flag=0;
14272 (ds.p=92424472);
14273 ac_req(((/*RF2*/(C)->_capacity/*8*/))==((/*RF2*/(C)->_count/*12*/)),NULL);
14274 fd.assertion_flag=1;
14275 }
14276 (ds.p=92425996);
14277 _new_capacity=r108prime_number_ceiling(&ds,((/*RF2*/(C)->_capacity/*8*/))+(1));
14278 (ds.p=92426252);
14279 _old_buckets=(/*RF2*/(C)->_buckets/*4*/);
14280 (ds.p=92426508);
14281 (/*SFN*/C->_buckets/*4*/)=new133(_new_capacity);
14282 (ds.p=92426764);
14283 _i=((/*RF2*/(C)->_capacity/*8*/))-(1);
14284 (ds.p=92427020);
14285 (/*SFN*/C->_capacity/*8*/)=_new_capacity;
14286 while (!(((ds.p=92427536),(_i)<(0))))
14287 {
14288 (ds.p=92428306);
14289 _node1=(_old_buckets)[_i];
14290 while (!(((ds.p=92428830),(_node1)==((void*)(NULL)))))
14291 {
14292 (ds.p=92429330);
14293 _node2=(/*RF2*/(((T132*)ci(132,_node1,92429348)))->_next/*12*/);
14294 (ds.p=92429586);
14295 _idx=(r7hash_code(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T132*)ci(132,_node1,92429600)))->_key/*8*/),92429612)))))%((/*RF2*/(C)->_capacity/*8*/));
14296 (ds.p=92429854);
14297 r132set_next(&ds,((T132*)ci(132,_node1,92429842)),((/*RF2*/(C)->_buckets/*4*/))[_idx]);
14298 (ds.p=92430114);
14299 ((/*RF2*/(C)->_buckets/*4*/))[_idx]=(_node1);
14300 (ds.p=92430354);
14301 _node1=_node2;
14302 }
14303 (ds.p=92430860);
14304 _i=(_i)-(1);
14305 }
14306 (ds.p=92431366);
14307 (/*SFN*/C->_cache_user/*16*/)=-(1);
14308 if(fd.assertion_flag){
14309 fd.assertion_flag=0;
14310 (ds.p=92431896);
14311 ac_ens(((/*RF2*/(C)->_capacity/*8*/))>(o44_614_18),NULL);
14312 (ds.p=92432146);
14313 ac_ens(((/*RF2*/(C)->_count/*12*/))==(o44_615_15),NULL);
14314 fd.assertion_flag=1;
14315 }
14316 if(se_rci(caller,C))se_i131(&ds,C);
14317 se_dst=caller;/*unlink*/
14318 }
14319
14320 T6 r131standard_is_equal(se_dump_stack*caller,T131* C,T0* a1){
14321 T6 R=0;
14322 void**locals[2];
14323 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R131%other%R131%Result%E6%",1};
14324 se_dump_stack ds;
14325 ds.fd=&fd;
14326 ds.current=((void**)&C);
14327 ds.p=2128406;
14328 ds.caller=caller;
14329 ds.locals=locals;
14330 locals[0]=(void**)&a1;
14331 locals[1]=(void**)&R;
14332 se_dst=&ds;/*link*/
14333 se_require_uppermost_flag=1;
14334 if(fd.assertion_flag){
14335 fd.assertion_flag=0;
14336 (ds.p=2129184);
14337 ac_req((a1)!=((void*)(NULL)),NULL);
14338 fd.assertion_flag=1;
14339 }
14340 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
14341 fd.assertion_flag=0;
14342 (ds.p=2129976);
14343 ac_ens((!(R))||(r131standard_is_equal(&ds,se_i131(&ds,((T131*)ci(131,a1,2129992))),(T0*)C)),"symmetric");
14344 fd.assertion_flag=1;
14345 }
14346 if(se_rci(caller,C))se_i131(&ds,C);
14347 se_dst=caller;/*unlink*/
14348 return R;
14349 }
14350
14351 T6 r131has(se_dump_stack*caller,T131* C,T0* a1){
14352 T6 R=0;
14353 T2 _idx=0;
14354 T0* _node=NULL;
14355 void**locals[4];
14356 static se_frame_descriptor fd={"has DICTIONARY",1,4,"%R131%k%R7%Result%E6%idx%E2%node%R132%",1};
14357 se_dump_stack ds;
14358 ds.fd=&fd;
14359 ds.current=((void**)&C);
14360 ds.p=92290056;
14361 ds.caller=caller;
14362 ds.locals=locals;
14363 locals[0]=(void**)&a1;
14364 locals[1]=(void**)&R;
14365 locals[2]=(void**)&_idx;
14366 locals[3]=(void**)&_node;
14367 se_dst=&ds;/*link*/
14368 (ds.p=92291596);
14369 _idx=(r7hash_code(&ds,se_i7(&ds,((T7*)ci(7,a1,92291610)))))%((/*RF2*/(C)->_capacity/*8*/));
14370 (ds.p=92291852);
14371 _node=((/*RF2*/(C)->_buckets/*4*/))[_idx];
14372 while (!(((ds.p=92292388),((_node)==((void*)(NULL)))||(r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T132*)ci(132,_node,92292404)))->_key/*8*/),92292414))),a1)))))
14373 {
14374 (ds.p=92292876);
14375 _node=(/*RF2*/(((T132*)ci(132,_node,92292892)))->_next/*12*/);
14376 }
14377 (ds.p=92293382);
14378 R=(_node)!=((void*)(NULL));
14379 if(se_rci(caller,C))se_i131(&ds,C);
14380 se_dst=caller;/*unlink*/
14381 return R;
14382 }
14383
14384 void r131clear(se_dump_stack*caller,T131* C){
14385 T2 o44_309_18=0;
14386 void**locals[1];
14387 static se_frame_descriptor fd={"clear DICTIONARY",1,1,"%R131%old value%E2%",1};
14388 se_dump_stack ds;
14389 ds.fd=&fd;
14390 ds.current=((void**)&C);
14391 ds.p=92351752;
14392 ds.caller=caller;
14393 ds.locals=locals;
14394 locals[0]=(void**)&o44_309_18;
14395 se_dst=&ds;/*link*/
14396 o44_309_18=(/*RF2*/(C)->_capacity/*8*/);
14397 (ds.p=92352548);
14398 r133set_all_with(&ds,(/*RF2*/(C)->_buckets/*4*/),NULL,((/*RF2*/(C)->_capacity/*8*/))-(1));
14399 (ds.p=92352788);
14400 (/*SFN*/C->_cache_user/*16*/)=-(1);
14401 (ds.p=92353044);
14402 (/*SFN*/C->_count/*12*/)=0;
14403 if(fd.assertion_flag){
14404 fd.assertion_flag=0;
14405 (ds.p=92353556);
14406 ac_ens(r131is_empty(&ds,C),NULL);
14407 (ds.p=92353816);
14408 ac_ens(((/*RF2*/(C)->_capacity/*8*/))==(o44_309_18),NULL);
14409 fd.assertion_flag=1;
14410 }
14411 if(se_rci(caller,C))se_i131(&ds,C);
14412 se_dst=caller;/*unlink*/
14413 }
14414
14415 T0* r131twin(se_dump_stack*caller,T131* C){
14416 T0* R=NULL;
14417 void**locals[1];
14418 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R131%Result%R131%",1};
14419 se_dump_stack ds;
14420 ds.fd=&fd;
14421 ds.current=((void**)&C);
14422 ds.p=2140182;
14423 ds.caller=caller;
14424 ds.locals=locals;
14425 locals[0]=(void**)&R;
14426 se_dst=&ds;/*link*/
14427 R=((void*)new131());
14428 r131copy(&ds,((T131*)R),((T0*)C));
14429 if(fd.assertion_flag){
14430 fd.assertion_flag=0;
14431 (ds.p=2142256);
14432 ac_ens(r131is_equal(&ds,se_i131(&ds,((T131*)ci(131,R,2142242))),(T0*)C),"equal");
14433 fd.assertion_flag=1;
14434 }
14435 if(se_rci(caller,C))se_i131(&ds,C);
14436 se_dst=caller;/*unlink*/
14437 return R;
14438 }
14439
14440 void r131with_capacity(se_dump_stack*caller,T131* C,T2 a1){
14441 T2 _new_capacity=0;
14442 int _hts=0;
14443 void**locals[3];
14444 static se_frame_descriptor fd={"with_capacity DICTIONARY",1,3,"%R131%medium_size%E2%new_capacity%E2%hts%E108%",1};
14445 se_dump_stack ds;
14446 ds.fd=&fd;
14447 ds.current=((void**)&C);
14448 ds.p=92451080;
14449 ds.caller=caller;
14450 ds.locals=locals;
14451 locals[0]=(void**)&a1;
14452 locals[1]=(void**)&_new_capacity;
14453 locals[2]=(void**)&_hts;
14454 se_dst=&ds;/*link*/
14455 se_require_uppermost_flag=1;
14456 if(fd.assertion_flag){
14457 fd.assertion_flag=0;
14458 (ds.p=92452908);
14459 ac_req((a1)>(0),NULL);
14460 fd.assertion_flag=1;
14461 }
14462 (ds.p=92454150);
14463 _new_capacity=r108prime_number_ceiling(&ds,a1);
14464 (ds.p=92454420);
14465 (/*SFN*/C->_buckets/*4*/)=new133(_new_capacity);
14466 (ds.p=92454662);
14467 (/*SFN*/C->_capacity/*8*/)=_new_capacity;
14468 (ds.p=92454932);
14469 (/*SFN*/C->_cache_user/*16*/)=-(1);
14470 (ds.p=92455188);
14471 (/*SFN*/C->_count/*12*/)=0;
14472 if(fd.assertion_flag){
14473 fd.assertion_flag=0;
14474 (ds.p=92455700);
14475 ac_ens(r131is_empty(&ds,C),NULL);
14476 (ds.p=92455974);
14477 ac_ens(((/*RF2*/(C)->_capacity/*8*/))>=(a1),NULL);
14478 fd.assertion_flag=1;
14479 }
14480 if(se_rci(caller,C))se_i131(&ds,C);
14481 se_dst=caller;/*unlink*/
14482 }
14483 se_frame_descriptor se_ifd131={"invariant once DICTIONARY[SCORE,STRING]",1,0,"%R131%",1};
14484
14485 T131*se_i131(se_dump_stack*caller,T131*C){
14486 se_dump_stack ds;
14487 ds.fd=&se_ifd131;
14488 ds.current=((void**)&C);
14489 ds.p=92277774;
14490 ds.caller=caller;
14491 se_dst=&ds;
14492 if(ds.fd->assertion_flag){
14493 ds.fd->assertion_flag=0;
14494 (ds.p=92457242);
14495 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>(0),NULL);
14496 (ds.p=92457754);
14497 ac_inv(((/*RF2*/(C)->_capacity/*8*/))>=((/*RF2*/(C)->_count/*12*/)),NULL);
14498 (ds.p=92458270);
14499 ac_inv(r2in_range(&ds,(/*RF2*/(C)->_cache_user/*16*/),-(1),(/*RF2*/(C)->_count/*12*/)),NULL);
14500 (ds.p=92458790);
14501 ac_inv((!(((/*RF2*/(C)->_cache_user/*16*/))>(0)))||(((/*RF2*/(C)->_cache_node/*20*/))!=((void*)(NULL))),NULL);
14502 (ds.p=92459302);
14503 ac_inv((!(((/*RF2*/(C)->_cache_user/*16*/))>(0)))||(r2in_range(&ds,(/*RF2*/(C)->_cache_buckets/*24*/),0,((/*RF2*/(C)->_capacity/*8*/))-(1))),NULL);
14504 ds.fd->assertion_flag=1;
14505 }
14506 se_dst=caller;
14507 return C;
14508 }
14509
14510 void r67set_item(se_dump_stack*caller,T67* C,T0* a1){
14511 void**locals[1];
14512 static se_frame_descriptor fd={"set_item LINK",1,1,"%R67%i%R65%",1};
14513 se_dump_stack ds;
14514 ds.fd=&fd;
14515 ds.current=((void**)&C);
14516 ds.p=88090120;
14517 ds.caller=caller;
14518 ds.locals=locals;
14519 locals[0]=(void**)&a1;
14520 se_dst=&ds;/*link*/
14521 (ds.p=88090644);
14522 (/*SFN*/C->_item/*4*/)=a1;
14523 if(fd.assertion_flag){
14524 fd.assertion_flag=0;
14525 (ds.p=88091166);
14526 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
14527 fd.assertion_flag=1;
14528 }
14529 se_dst=caller;/*unlink*/
14530 }
14531
14532 T6 r67is_equal(se_dump_stack*caller,T67* C,T0* a1){
14533 T6 R=0;
14534 void**locals[2];
14535 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R67%other%R67%Result%E6%",1};
14536 se_dump_stack ds;
14537 ds.fd=&fd;
14538 ds.current=((void**)&C);
14539 ds.p=2120968;
14540 ds.caller=caller;
14541 ds.locals=locals;
14542 locals[0]=(void**)&a1;
14543 locals[1]=(void**)&R;
14544 se_dst=&ds;/*link*/
14545 se_require_uppermost_flag=1;
14546 if(fd.assertion_flag){
14547 fd.assertion_flag=0;
14548 (ds.p=2122048);
14549 ac_req((a1)!=((void*)(NULL)),"other_not_void");
14550 fd.assertion_flag=1;
14551 }
14552 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
14553 fd.assertion_flag=0;
14554 (ds.p=2122846);
14555 ac_ens((!(r67standard_is_equal(&ds,C,a1)))||(R),"consistent");
14556 (ds.p=2123064);
14557 ac_ens((!(R))||(r67is_equal(&ds,((T67*)ci(67,a1,2123080)),(T0*)C)),"symmetric");
14558 fd.assertion_flag=1;
14559 }
14560 se_dst=caller;/*unlink*/
14561 return R;
14562 }
14563
14564 void r67make(se_dump_stack*caller,T67* C,T0* a1,T0* a2){
14565 void**locals[2];
14566 static se_frame_descriptor fd={"make LINK",1,2,"%R67%i%R65%n%R67%",1};
14567 se_dump_stack ds;
14568 ds.fd=&fd;
14569 ds.current=((void**)&C);
14570 ds.p=88087304;
14571 ds.caller=caller;
14572 ds.locals=locals;
14573 locals[0]=(void**)&a1;
14574 locals[1]=(void**)&a2;
14575 se_dst=&ds;/*link*/
14576 (ds.p=88087828);
14577 (/*SFN*/C->_item/*4*/)=a1;
14578 (ds.p=88088084);
14579 (/*SFN*/C->_next/*8*/)=a2;
14580 if(fd.assertion_flag){
14581 fd.assertion_flag=0;
14582 (ds.p=88088606);
14583 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
14584 (ds.p=88088862);
14585 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a2)),NULL);
14586 fd.assertion_flag=1;
14587 }
14588 se_dst=caller;/*unlink*/
14589 }
14590
14591 T6 r67standard_is_equal(se_dump_stack*caller,T67* C,T0* a1){
14592 T6 R=0;
14593 void**locals[2];
14594 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R67%other%R67%Result%E6%",1};
14595 se_dump_stack ds;
14596 ds.fd=&fd;
14597 ds.current=((void**)&C);
14598 ds.p=2128406;
14599 ds.caller=caller;
14600 ds.locals=locals;
14601 locals[0]=(void**)&a1;
14602 locals[1]=(void**)&R;
14603 se_dst=&ds;/*link*/
14604 se_require_uppermost_flag=1;
14605 if(fd.assertion_flag){
14606 fd.assertion_flag=0;
14607 (ds.p=2129184);
14608 ac_req((a1)!=((void*)(NULL)),NULL);
14609 fd.assertion_flag=1;
14610 }
14611 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
14612 fd.assertion_flag=0;
14613 (ds.p=2129976);
14614 ac_ens((!(R))||(r67standard_is_equal(&ds,((T67*)ci(67,a1,2129992)),(T0*)C)),"symmetric");
14615 fd.assertion_flag=1;
14616 }
14617 se_dst=caller;/*unlink*/
14618 return R;
14619 }
14620
14621 T0* r67twin(se_dump_stack*caller,T67* C){
14622 T0* R=NULL;
14623 void**locals[1];
14624 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R67%Result%R67%",1};
14625 se_dump_stack ds;
14626 ds.fd=&fd;
14627 ds.current=((void**)&C);
14628 ds.p=2140182;
14629 ds.caller=caller;
14630 ds.locals=locals;
14631 locals[0]=(void**)&R;
14632 se_dst=&ds;/*link*/
14633 R=((void*)new67());
14634 *((T67*)R)=*C;
14635 if(fd.assertion_flag){
14636 fd.assertion_flag=0;
14637 (ds.p=2142256);
14638 ac_ens(r67is_equal(&ds,((T67*)ci(67,R,2142242)),(T0*)C),"equal");
14639 fd.assertion_flag=1;
14640 }
14641 se_dst=caller;/*unlink*/
14642 return R;
14643 }
14644
14645 void r67set_next(se_dump_stack*caller,T67* C,T0* a1){
14646 void**locals[1];
14647 static se_frame_descriptor fd={"set_next LINK",1,1,"%R67%n%R67%",1};
14648 se_dump_stack ds;
14649 ds.fd=&fd;
14650 ds.current=((void**)&C);
14651 ds.p=88091912;
14652 ds.caller=caller;
14653 ds.locals=locals;
14654 locals[0]=(void**)&a1;
14655 se_dst=&ds;/*link*/
14656 (ds.p=88092436);
14657 (/*SFN*/C->_next/*8*/)=a1;
14658 if(fd.assertion_flag){
14659 fd.assertion_flag=0;
14660 (ds.p=88092958);
14661 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a1)),NULL);
14662 fd.assertion_flag=1;
14663 }
14664 se_dst=caller;/*unlink*/
14665 }
14666
14667 void r86copy(se_dump_stack*caller,T86* C,T0* a1){
14668 void**locals[1];
14669 static se_frame_descriptor fd={"copy LINKED_LIST",1,1,"%R86%other%R86%",1};
14670 se_dump_stack ds;
14671 ds.fd=&fd;
14672 ds.current=((void**)&C);
14673 ds.p=71349256;
14674 ds.caller=caller;
14675 ds.locals=locals;
14676 locals[0]=(void**)&a1;
14677 se_dst=&ds;/*link*/
14678 se_require_uppermost_flag=1;
14679 if(fd.assertion_flag){
14680 fd.assertion_flag=0;
14681 (ds.p=2144064);
14682 ac_req((a1)!=((void*)(NULL)),"other_not_void");
14683 fd.assertion_flag=1;
14684 }
14685 (ds.p=71349780);
14686 r86from_collection(&ds,C,a1);
14687 if(fd.assertion_flag){
14688 fd.assertion_flag=0;
14689 (ds.p=2144808);
14690 ac_ens(r86is_equal(&ds,C,a1),"is_equal");
14691 fd.assertion_flag=1;
14692 }
14693 if(se_rci(caller,C))se_i86(&ds,C);
14694 se_dst=caller;/*unlink*/
14695 }
14696
14697 T0* r86last(se_dump_stack*caller,T86* C){
14698 T0* R=NULL;
14699 void**locals[1];
14700 static se_frame_descriptor fd={"last LINKED_LIST",1,1,"%R86%Result%R74%",1};
14701 se_dump_stack ds;
14702 ds.fd=&fd;
14703 ds.current=((void**)&C);
14704 ds.p=71340808;
14705 ds.caller=caller;
14706 ds.locals=locals;
14707 locals[0]=(void**)&R;
14708 se_dst=&ds;/*link*/
14709 se_require_uppermost_flag=1;
14710 if(fd.assertion_flag){
14711 fd.assertion_flag=0;
14712 (ds.p=75520788);
14713 ac_req(r6_ix_not(&ds,r86is_empty(&ds,C)),NULL);
14714 fd.assertion_flag=1;
14715 }
14716 (ds.p=71341332);
14717 R=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_last_link/*12*/),71341352)))->_item/*4*/);
14718 if(fd.assertion_flag){
14719 fd.assertion_flag=0;
14720 (ds.p=75521570);
14721 ac_ens((R)==((void*)(r86item(&ds,C,(/*RF2*/(C)->_upper/*4*/)))),NULL);
14722 fd.assertion_flag=1;
14723 }
14724 if(se_rci(caller,C))se_i86(&ds,C);
14725 se_dst=caller;/*unlink*/
14726 return R;
14727 }
14728
14729 void r86remove_first(se_dump_stack*caller,T86* C){
14730 T2 o36_258_23=0;
14731 T2 o36_259_54=0;
14732 T2 o36_259_24=0;
14733 void**locals[3];
14734 static se_frame_descriptor fd={"remove_first LINKED_LIST",1,3,"%R86%old value%E2%old value%E2%old value%E2%",1};
14735 se_dump_stack ds;
14736 ds.fd=&fd;
14737 ds.current=((void**)&C);
14738 ds.p=71331080;
14739 ds.caller=caller;
14740 ds.locals=locals;
14741 locals[0]=(void**)&o36_258_23;
14742 locals[1]=(void**)&o36_259_24;
14743 locals[2]=(void**)&o36_259_54;
14744 se_dst=&ds;/*link*/
14745 o36_258_23=r86count(&ds,C);
14746 o36_259_54=(/*RF2*/(C)->_upper/*4*/);
14747 o36_259_24=1;
14748 se_require_uppermost_flag=1;
14749 if(fd.assertion_flag){
14750 fd.assertion_flag=0;
14751 (ds.p=75562772);
14752 ac_req(r6_ix_not(&ds,r86is_empty(&ds,C)),NULL);
14753 fd.assertion_flag=1;
14754 }
14755 /*[IF*/
14756 if(((ds.p=71331622),((/*RF2*/(C)->_upper/*4*/))==(1))){
14757 (ds.p=71331866);
14758 r86make(&ds,C);
14759 }
14760 else{
14761 (ds.p=71332378);
14762 (/*SFN*/C->_first_link/*8*/)=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_first_link/*8*/),71332406)))->_next/*8*/);
14763 /*[IF*/
14764 if(((ds.p=71332656),((/*RF2*/(C)->_mem_idx/*16*/))==(1))){
14765 (ds.p=71332882);
14766 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
14767 }
14768 else{
14769 (ds.p=71333394);
14770 (/*SFN*/C->_mem_idx/*16*/)=((/*RF2*/(C)->_mem_idx/*16*/))-(1);
14771 }
14772 /*FI]*/
14773 (ds.p=71333900);
14774 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))-(1);
14775 }
14776 /*FI]*/
14777 if(fd.assertion_flag){
14778 fd.assertion_flag=0;
14779 (ds.p=75563552);
14780 ac_ens((r86count(&ds,C))==((o36_258_23)-(1)),NULL);
14781 (ds.p=75563848);
14782 ac_ens(r6_px_xor(&ds,(1)==((o36_259_24)+(1)),((/*RF2*/(C)->_upper/*4*/))==((o36_259_54)-(1))),NULL);
14783 fd.assertion_flag=1;
14784 }
14785 if(se_rci(caller,C))se_i86(&ds,C);
14786 se_dst=caller;/*unlink*/
14787 }
14788
14789 T2 r86count(se_dump_stack*caller,T86* C){
14790 T2 R=0;
14791 void**locals[1];
14792 static se_frame_descriptor fd={"count LINKED_LIST",1,1,"%R86%Result%E2%",1};
14793 se_dump_stack ds;
14794 ds.fd=&fd;
14795 ds.current=((void**)&C);
14796 ds.p=71346184;
14797 ds.caller=caller;
14798 ds.locals=locals;
14799 locals[0]=(void**)&R;
14800 se_dst=&ds;/*link*/
14801 (ds.p=71346708);
14802 R=(/*RF2*/(C)->_upper/*4*/);
14803 if(fd.assertion_flag){
14804 fd.assertion_flag=0;
14805 (ds.p=75511330);
14806 ac_ens((R)==((((/*RF2*/(C)->_upper/*4*/))-(1))+(1)),NULL);
14807 fd.assertion_flag=1;
14808 }
14809 if(se_rci(caller,C))se_i86(&ds,C);
14810 se_dst=caller;/*unlink*/
14811 return R;
14812 }
14813
14814 T6 r86is_equal(se_dump_stack*caller,T86* C,T0* a1){
14815 T6 R=0;
14816 T0* _lnk1=NULL;
14817 T0* _lnk2=NULL;
14818 void**locals[4];
14819 static se_frame_descriptor fd={"is_equal LINKED_LIST",1,4,"%R86%other%R86%Result%E6%lnk1%R87%lnk2%R87%",1};
14820 se_dump_stack ds;
14821 ds.fd=&fd;
14822 ds.current=((void**)&C);
14823 ds.p=71350536;
14824 ds.caller=caller;
14825 ds.locals=locals;
14826 locals[0]=(void**)&a1;
14827 locals[1]=(void**)&R;
14828 locals[2]=(void**)&_lnk1;
14829 locals[3]=(void**)&_lnk2;
14830 se_dst=&ds;/*link*/
14831 se_require_uppermost_flag=1;
14832 if(fd.assertion_flag){
14833 fd.assertion_flag=0;
14834 (ds.p=2122048);
14835 ac_req((a1)!=((void*)(NULL)),"other_not_void");
14836 fd.assertion_flag=1;
14837 }
14838 /*[IF*/
14839 if(((ds.p=71351594),(C)==((void*)(a1)))){
14840 (ds.p=71351834);
14841 R=1;
14842 }
14843 else if(((ds.p=71352110),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i86(&ds,((T86*)ci(86,a1,71352114))))->_upper/*4*/)))){
14844 (ds.p=71352608);
14845 R=1;
14846 (ds.p=71352864);
14847 _lnk1=(/*RF2*/(C)->_first_link/*8*/);
14848 (ds.p=71353120);
14849 _lnk2=(/*RF2*/(se_i86(&ds,((T86*)ci(86,a1,71353136))))->_first_link/*8*/);
14850 while (!(((ds.p=71353656),r6_px_or(&ds,(_lnk1)==((void*)(NULL)),r6_ix_not(&ds,R)))))
14851 {
14852 (ds.p=71354144);
14853 R=((/*RF2*/(((T87*)ci(87,_lnk1,71354164)))->_item/*4*/))==((void*)((/*RF2*/(((T87*)ci(87,_lnk2,71354188)))->_item/*4*/)));
14854 (ds.p=71354400);
14855 _lnk1=(/*RF2*/(((T87*)ci(87,_lnk1,71354416)))->_next/*8*/);
14856 (ds.p=71354656);
14857 _lnk2=(/*RF2*/(((T87*)ci(87,_lnk2,71354672)))->_next/*8*/);
14858 }
14859 }
14860 /*FI]*/
14861 if(fd.assertion_flag){
14862 fd.assertion_flag=0;
14863 (ds.p=75585556);
14864 ac_ens((!(R))||(r6_px_and(&ds,(1)==(1),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i86(&ds,((T86*)ci(86,a1,75585638))))->_upper/*4*/)))),NULL);
14865 (ds.p=2122846);
14866 ac_ens((!(r86standard_is_equal(&ds,C,a1)))||(R),"consistent");
14867 (ds.p=2123064);
14868 ac_ens((!(R))||(r86is_equal(&ds,se_i86(&ds,((T86*)ci(86,a1,2123080))),(T0*)C)),"symmetric");
14869 fd.assertion_flag=1;
14870 }
14871 if(se_rci(caller,C))se_i86(&ds,C);
14872 se_dst=caller;/*unlink*/
14873 return R;
14874 }
14875
14876 T0* r86item(se_dump_stack*caller,T86* C,T2 a1){
14877 T0* R=NULL;
14878 void**locals[2];
14879 static se_frame_descriptor fd={"item LINKED_LIST",1,2,"%R86%index%E2%Result%R74%",1};
14880 se_dump_stack ds;
14881 ds.fd=&fd;
14882 ds.current=((void**)&C);
14883 ds.p=71342088;
14884 ds.caller=caller;
14885 ds.locals=locals;
14886 locals[0]=(void**)&a1;
14887 locals[1]=(void**)&R;
14888 se_dst=&ds;/*link*/
14889 se_require_uppermost_flag=1;
14890 if(fd.assertion_flag){
14891 fd.assertion_flag=0;
14892 (ds.p=75516692);
14893 ac_req(r86valid_index(&ds,C,a1),NULL);
14894 fd.assertion_flag=1;
14895 }
14896 /*[IF*/
14897 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
14898 (ds.p=71342874);
14899 r86go_item(&ds,C,a1);
14900 }
14901 /*FI]*/
14902 (ds.p=71343380);
14903 R=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
14904 if(se_rci(caller,C))se_i86(&ds,C);
14905 se_dst=caller;/*unlink*/
14906 return R;
14907 }
14908
14909 T6 r86valid_index(se_dump_stack*caller,T86* C,T2 a1){
14910 T6 R=0;
14911 void**locals[2];
14912 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R86%index%E2%Result%E6%",1};
14913 se_dump_stack ds;
14914 ds.fd=&fd;
14915 ds.current=((void**)&C);
14916 ds.p=75507478;
14917 ds.caller=caller;
14918 ds.locals=locals;
14919 locals[0]=(void**)&a1;
14920 locals[1]=(void**)&R;
14921 se_dst=&ds;/*link*/
14922 (ds.p=75508500);
14923 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)));
14924 if(fd.assertion_flag){
14925 fd.assertion_flag=0;
14926 (ds.p=75509026);
14927 ac_ens((R)==(((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)))),NULL);
14928 fd.assertion_flag=1;
14929 }
14930 if(se_rci(caller,C))se_i86(&ds,C);
14931 se_dst=caller;/*unlink*/
14932 return R;
14933 }
14934
14935 void r86make(se_dump_stack*caller,T86* C){
14936 static se_frame_descriptor fd={"make LINKED_LIST",1,0,"%R86%",1};
14937 se_dump_stack ds;
14938 ds.fd=&fd;
14939 ds.current=((void**)&C);
14940 ds.p=71313672;
14941 ds.caller=caller;
14942 ds.locals=NULL;
14943 se_dst=&ds;/*link*/
14944 (ds.p=71314452);
14945 (/*SFN*/C->_first_link/*8*/)=NULL;
14946 (ds.p=71314708);
14947 (/*SFN*/C->_upper/*4*/)=0;
14948 (ds.p=71314964);
14949 (/*SFN*/C->_last_link/*12*/)=NULL;
14950 (ds.p=71315220);
14951 (/*SFN*/C->_mem_idx/*16*/)=0;
14952 (ds.p=71315476);
14953 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
14954 if(fd.assertion_flag){
14955 fd.assertion_flag=0;
14956 (ds.p=71316000);
14957 ac_ens((r86count(&ds,C))==(0),NULL);
14958 fd.assertion_flag=1;
14959 }
14960 if(se_rci(caller,C))se_i86(&ds,C);
14961 se_dst=caller;/*unlink*/
14962 }
14963
14964 void r86remove(se_dump_stack*caller,T86* C,T2 a1){
14965 T0* _link=NULL;
14966 T2 o36_269_23=0;
14967 T2 o36_270_23=0;
14968 void**locals[4];
14969 static se_frame_descriptor fd={"remove LINKED_LIST",1,4,"%R86%index%E2%link%R87%old value%E2%old value%E2%",1};
14970 se_dump_stack ds;
14971 ds.fd=&fd;
14972 ds.current=((void**)&C);
14973 ds.p=71334920;
14974 ds.caller=caller;
14975 ds.locals=locals;
14976 locals[0]=(void**)&a1;
14977 locals[1]=(void**)&_link;
14978 locals[2]=(void**)&o36_269_23;
14979 locals[3]=(void**)&o36_270_23;
14980 se_dst=&ds;/*link*/
14981 o36_269_23=r86count(&ds,C);
14982 o36_270_23=(/*RF2*/(C)->_upper/*4*/);
14983 se_require_uppermost_flag=1;
14984 if(fd.assertion_flag){
14985 fd.assertion_flag=0;
14986 (ds.p=75565588);
14987 ac_req(r86valid_index(&ds,C,a1),NULL);
14988 fd.assertion_flag=1;
14989 }
14990 /*[IF*/
14991 if(((ds.p=71335974),(a1)==(1))){
14992 (ds.p=71336218);
14993 r86remove_first(&ds,C);
14994 }
14995 else if(((ds.p=71336494),(a1)==((/*RF2*/(C)->_upper/*4*/)))){
14996 (ds.p=71336730);
14997 r86remove_last(&ds,C);
14998 }
14999 else{
15000 /*[IF*/
15001 if(((ds.p=71337272),((a1)-(1))!=((/*RF2*/(C)->_mem_idx/*16*/)))){
15002 (ds.p=71337504);
15003 r86go_item(&ds,C,(a1)-(1));
15004 }
15005 /*FI]*/
15006 (ds.p=71338010);
15007 _link=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71338026)))->_next/*8*/);
15008 (ds.p=71338282);
15009 r87set_next(&ds,((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71338266)),(/*RF2*/(((T87*)ci(87,_link,71338300)))->_next/*8*/));
15010 (ds.p=71338522);
15011 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))-(1);
15012 }
15013 /*FI]*/
15014 if(fd.assertion_flag){
15015 fd.assertion_flag=0;
15016 (ds.p=75566368);
15017 ac_ens((r86count(&ds,C))==((o36_269_23)-(1)),NULL);
15018 (ds.p=75566624);
15019 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((o36_270_23)-(1)),NULL);
15020 fd.assertion_flag=1;
15021 }
15022 if(se_rci(caller,C))se_i86(&ds,C);
15023 se_dst=caller;/*unlink*/
15024 }
15025
15026 T6 r86is_empty(se_dump_stack*caller,T86* C){
15027 T6 R=0;
15028 void**locals[1];
15029 static se_frame_descriptor fd={"is_empty LINKED_LIST",1,1,"%R86%Result%E6%",1};
15030 se_dump_stack ds;
15031 ds.fd=&fd;
15032 ds.current=((void**)&C);
15033 ds.p=71316744;
15034 ds.caller=caller;
15035 ds.locals=locals;
15036 locals[0]=(void**)&R;
15037 se_dst=&ds;/*link*/
15038 (ds.p=71317254);
15039 R=((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL));
15040 if(fd.assertion_flag){
15041 fd.assertion_flag=0;
15042 (ds.p=75513108);
15043 ac_ens((R)==((r86count(&ds,C))==(0)),NULL);
15044 fd.assertion_flag=1;
15045 }
15046 if(se_rci(caller,C))se_i86(&ds,C);
15047 se_dst=caller;/*unlink*/
15048 return R;
15049 }
15050
15051 void r86remove_last(se_dump_stack*caller,T86* C){
15052 T2 o36_279_23=0;
15053 T2 o36_280_23=0;
15054 void**locals[2];
15055 static se_frame_descriptor fd={"remove_last LINKED_LIST",1,2,"%R86%old value%E2%old value%E2%",1};
15056 se_dump_stack ds;
15057 ds.fd=&fd;
15058 ds.current=((void**)&C);
15059 ds.p=71405064;
15060 ds.caller=caller;
15061 ds.locals=locals;
15062 locals[0]=(void**)&o36_279_23;
15063 locals[1]=(void**)&o36_280_23;
15064 se_dst=&ds;/*link*/
15065 o36_279_23=r86count(&ds,C);
15066 o36_280_23=(/*RF2*/(C)->_upper/*4*/);
15067 se_require_uppermost_flag=1;
15068 if(fd.assertion_flag){
15069 fd.assertion_flag=0;
15070 (ds.p=75568148);
15071 ac_req(r6_ix_not(&ds,r86is_empty(&ds,C)),NULL);
15072 fd.assertion_flag=1;
15073 }
15074 /*[IF*/
15075 if(((ds.p=71405606),((/*RF2*/(C)->_upper/*4*/))==(1))){
15076 (ds.p=71405850);
15077 r86make(&ds,C);
15078 }
15079 else{
15080 /*[IF*/
15081 if(((ds.p=71406388),(((/*RF2*/(C)->_upper/*4*/))-(1))!=((/*RF2*/(C)->_mem_idx/*16*/)))){
15082 (ds.p=71406624);
15083 r86go_item(&ds,C,((/*RF2*/(C)->_upper/*4*/))-(1));
15084 }
15085 /*FI]*/
15086 (ds.p=71407130);
15087 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))-(1);
15088 (ds.p=71407386);
15089 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_mem_lnk/*20*/);
15090 (ds.p=71407662);
15091 r87set_next(&ds,((T87*)ci(87,(/*RF2*/(C)->_last_link/*12*/),71407642)),NULL);
15092 }
15093 /*FI]*/
15094 if(fd.assertion_flag){
15095 fd.assertion_flag=0;
15096 (ds.p=75568928);
15097 ac_ens((r86count(&ds,C))==((o36_279_23)-(1)),NULL);
15098 (ds.p=75569184);
15099 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((o36_280_23)-(1)),NULL);
15100 fd.assertion_flag=1;
15101 }
15102 if(se_rci(caller,C))se_i86(&ds,C);
15103 se_dst=caller;/*unlink*/
15104 }
15105
15106 T6 r86standard_is_equal(se_dump_stack*caller,T86* C,T0* a1){
15107 T6 R=0;
15108 void**locals[2];
15109 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R86%other%R86%Result%E6%",1};
15110 se_dump_stack ds;
15111 ds.fd=&fd;
15112 ds.current=((void**)&C);
15113 ds.p=2128406;
15114 ds.caller=caller;
15115 ds.locals=locals;
15116 locals[0]=(void**)&a1;
15117 locals[1]=(void**)&R;
15118 se_dst=&ds;/*link*/
15119 se_require_uppermost_flag=1;
15120 if(fd.assertion_flag){
15121 fd.assertion_flag=0;
15122 (ds.p=2129184);
15123 ac_req((a1)!=((void*)(NULL)),NULL);
15124 fd.assertion_flag=1;
15125 }
15126 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
15127 fd.assertion_flag=0;
15128 (ds.p=2129976);
15129 ac_ens((!(R))||(r86standard_is_equal(&ds,se_i86(&ds,((T86*)ci(86,a1,2129992))),(T0*)C)),"symmetric");
15130 fd.assertion_flag=1;
15131 }
15132 if(se_rci(caller,C))se_i86(&ds,C);
15133 se_dst=caller;/*unlink*/
15134 return R;
15135 }
15136
15137 T0* r86_px_64(se_dump_stack*caller,T86* C,T2 a1){
15138 T0* R=NULL;
15139 void**locals[2];
15140 static se_frame_descriptor fd={"infix @ (item LINKED_LIST)",1,2,"%R86%index%E2%Result%R74%",1};
15141 se_dump_stack ds;
15142 ds.fd=&fd;
15143 ds.current=((void**)&C);
15144 ds.p=71342088;
15145 ds.caller=caller;
15146 ds.locals=locals;
15147 locals[0]=(void**)&a1;
15148 locals[1]=(void**)&R;
15149 se_dst=&ds;/*link*/
15150 se_require_uppermost_flag=1;
15151 if(fd.assertion_flag){
15152 fd.assertion_flag=0;
15153 (ds.p=75516692);
15154 ac_req(r86valid_index(&ds,C,a1),NULL);
15155 fd.assertion_flag=1;
15156 }
15157 /*[IF*/
15158 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
15159 (ds.p=71342874);
15160 r86go_item(&ds,C,a1);
15161 }
15162 /*FI]*/
15163 (ds.p=71343380);
15164 R=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
15165 if(se_rci(caller,C))se_i86(&ds,C);
15166 se_dst=caller;/*unlink*/
15167 return R;
15168 }
15169
15170 void r86add_last(se_dump_stack*caller,T86* C,T0* a1){
15171 T0* _lnk=NULL;
15172 T2 o36_185_26=0;
15173 T2 o36_186_22=0;
15174 T2 o36_187_26=0;
15175 void**locals[5];
15176 static se_frame_descriptor fd={"add_last LINKED_LIST",1,5,"%R86%element%R74%lnk%R87%old value%E2%old value%E2%old value%E2%",1};
15177 se_dump_stack ds;
15178 ds.fd=&fd;
15179 ds.current=((void**)&C);
15180 ds.p=71321864;
15181 ds.caller=caller;
15182 ds.locals=locals;
15183 locals[0]=(void**)&a1;
15184 locals[1]=(void**)&_lnk;
15185 locals[2]=(void**)&o36_185_26;
15186 locals[3]=(void**)&o36_186_22;
15187 locals[4]=(void**)&o36_187_26;
15188 se_dst=&ds;/*link*/
15189 o36_185_26=r86count(&ds,C);
15190 o36_186_22=1;
15191 o36_187_26=(/*RF2*/(C)->_upper/*4*/);
15192 /*[IF*/
15193 if(((ds.p=71322928),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
15194 (ds.p=71323162);
15195 {T87*n=new87();
15196 r87make(&ds,n,a1,NULL);
15197 (/*SFN*/C->_first_link/*8*/)=((T0*)n);
15198 }
15199 (ds.p=71323418);
15200 (/*SFN*/C->_upper/*4*/)=1;
15201 (ds.p=71323674);
15202 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_first_link/*8*/);
15203 (ds.p=71323930);
15204 (/*SFN*/C->_mem_idx/*16*/)=1;
15205 (ds.p=71324186);
15206 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
15207 }
15208 else{
15209 (ds.p=71324698);
15210 {T87*n=new87();
15211 r87make(&ds,n,a1,NULL);
15212 _lnk=((T0*)n);
15213 }
15214 (ds.p=71324974);
15215 r87set_next(&ds,((T87*)ci(87,(/*RF2*/(C)->_last_link/*12*/),71324954)),_lnk);
15216 (ds.p=71325210);
15217 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))+(1);
15218 (ds.p=71325466);
15219 (/*SFN*/C->_last_link/*12*/)=_lnk;
15220 }
15221 /*FI]*/
15222 if(fd.assertion_flag){
15223 fd.assertion_flag=0;
15224 (ds.p=75544606);
15225 ac_ens((r86last(&ds,C))==((void*)(a1)),NULL);
15226 (ds.p=75544864);
15227 ac_ens((r86count(&ds,C))==((1)+(o36_185_26)),NULL);
15228 (ds.p=75545120);
15229 ac_ens((1)==(o36_186_22),NULL);
15230 (ds.p=75545376);
15231 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((1)+(o36_187_26)),NULL);
15232 fd.assertion_flag=1;
15233 }
15234 if(se_rci(caller,C))se_i86(&ds,C);
15235 se_dst=caller;/*unlink*/
15236 }
15237
15238 T0* r86first(se_dump_stack*caller,T86* C){
15239 T0* R=NULL;
15240 void**locals[1];
15241 static se_frame_descriptor fd={"first LINKED_LIST",1,1,"%R86%Result%R74%",1};
15242 se_dump_stack ds;
15243 ds.fd=&fd;
15244 ds.current=((void**)&C);
15245 ds.p=71339528;
15246 ds.caller=caller;
15247 ds.locals=locals;
15248 locals[0]=(void**)&R;
15249 se_dst=&ds;/*link*/
15250 se_require_uppermost_flag=1;
15251 if(fd.assertion_flag){
15252 fd.assertion_flag=0;
15253 (ds.p=75518496);
15254 ac_req((r86count(&ds,C))>=(1),NULL);
15255 fd.assertion_flag=1;
15256 }
15257 (ds.p=71340052);
15258 R=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_first_link/*8*/),71340072)))->_item/*4*/);
15259 if(fd.assertion_flag){
15260 fd.assertion_flag=0;
15261 (ds.p=75519266);
15262 ac_ens((R)==((void*)(r86item(&ds,C,1))),NULL);
15263 fd.assertion_flag=1;
15264 }
15265 if(se_rci(caller,C))se_i86(&ds,C);
15266 se_dst=caller;/*unlink*/
15267 return R;
15268 }
15269
15270 void r86clear(se_dump_stack*caller,T86* C){
15271 static se_frame_descriptor fd={"clear LINKED_LIST",1,0,"%R86%",1};
15272 se_dump_stack ds;
15273 ds.fd=&fd;
15274 ds.current=((void**)&C);
15275 ds.p=71367688;
15276 ds.caller=caller;
15277 ds.locals=NULL;
15278 se_dst=&ds;/*link*/
15279 /*[IF*/
15280 if(((ds.p=71368240),((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL)))){
15281 (ds.p=71368474);
15282 (/*SFN*/C->_first_link/*8*/)=NULL;
15283 (ds.p=71368730);
15284 (/*SFN*/C->_mem_idx/*16*/)=0;
15285 (ds.p=71368986);
15286 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
15287 (ds.p=71369242);
15288 (/*SFN*/C->_upper/*4*/)=0;
15289 (ds.p=71369498);
15290 (/*SFN*/C->_last_link/*12*/)=NULL;
15291 }
15292 /*FI]*/
15293 if(fd.assertion_flag){
15294 fd.assertion_flag=0;
15295 (ds.p=71370272);
15296 ac_ens(((/*RF2*/(C)->_upper/*4*/))==(0),NULL);
15297 (ds.p=75571220);
15298 ac_ens(r86is_empty(&ds,C),NULL);
15299 fd.assertion_flag=1;
15300 }
15301 if(se_rci(caller,C))se_i86(&ds,C);
15302 se_dst=caller;/*unlink*/
15303 }
15304
15305 T0* r86twin(se_dump_stack*caller,T86* C){
15306 T0* R=NULL;
15307 void**locals[1];
15308 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R86%Result%R86%",1};
15309 se_dump_stack ds;
15310 ds.fd=&fd;
15311 ds.current=((void**)&C);
15312 ds.p=2140182;
15313 ds.caller=caller;
15314 ds.locals=locals;
15315 locals[0]=(void**)&R;
15316 se_dst=&ds;/*link*/
15317 R=((void*)new86());
15318 r86copy(&ds,((T86*)R),((T0*)C));
15319 if(fd.assertion_flag){
15320 fd.assertion_flag=0;
15321 (ds.p=2142256);
15322 ac_ens(r86is_equal(&ds,se_i86(&ds,((T86*)ci(86,R,2142242))),(T0*)C),"equal");
15323 fd.assertion_flag=1;
15324 }
15325 if(se_rci(caller,C))se_i86(&ds,C);
15326 se_dst=caller;/*unlink*/
15327 return R;
15328 }
15329
15330 void r86go_item(se_dump_stack*caller,T86* C,T2 a1){
15331 void**locals[1];
15332 static se_frame_descriptor fd={"go_item LINKED_LIST",1,1,"%R86%i%E2%",1};
15333 se_dump_stack ds;
15334 ds.fd=&fd;
15335 ds.current=((void**)&C);
15336 ds.p=71418632;
15337 ds.caller=caller;
15338 ds.locals=locals;
15339 locals[0]=(void**)&a1;
15340 se_dst=&ds;/*link*/
15341 se_require_uppermost_flag=1;
15342 if(fd.assertion_flag){
15343 fd.assertion_flag=0;
15344 (ds.p=71419156);
15345 ac_req(r86valid_index(&ds,C,a1),NULL);
15346 (ds.p=71419428);
15347 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))!=(a1),NULL);
15348 (ds.p=71419684);
15349 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))>(0),NULL);
15350 (ds.p=71419940);
15351 ac_req(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
15352 fd.assertion_flag=1;
15353 }
15354 /*[IF*/
15355 if(((ds.p=71420458),((/*RF2*/(C)->_mem_idx/*16*/))>(a1))){
15356 (ds.p=71420698);
15357 (/*SFN*/C->_mem_idx/*16*/)=1;
15358 (ds.p=71420954);
15359 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
15360 }
15361 /*FI]*/
15362 while (!(((ds.p=71421982),(a1)==((/*RF2*/(C)->_mem_idx/*16*/)))))
15363 {
15364 (ds.p=71422490);
15365 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71422512)))->_next/*8*/);
15366 (ds.p=71422746);
15367 (/*SFN*/C->_mem_idx/*16*/)=((/*RF2*/(C)->_mem_idx/*16*/))+(1);
15368 }
15369 if(fd.assertion_flag){
15370 fd.assertion_flag=0;
15371 (ds.p=71423524);
15372 ac_ens(((/*RF2*/(C)->_mem_idx/*16*/))==(a1),NULL);
15373 (ds.p=71423780);
15374 ac_ens(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
15375 fd.assertion_flag=1;
15376 }
15377 if(se_rci(caller,C))se_i86(&ds,C);
15378 se_dst=caller;/*unlink*/
15379 }
15380
15381 void r86from_collection(se_dump_stack*caller,T86* C,T0* a1){
15382 T2 _i=0;
15383 T2 _up=0;
15384 T0* _lnk=NULL;
15385 void**locals[4];
15386 static se_frame_descriptor fd={"from_collection LINKED_LIST",1,4,"%R86%model%R143%i%E2%up%E2%lnk%R87%",1};
15387 se_dump_stack ds;
15388 ds.fd=&fd;
15389 ds.current=((void**)&C);
15390 ds.p=71371016;
15391 ds.caller=caller;
15392 ds.locals=locals;
15393 locals[0]=(void**)&a1;
15394 locals[1]=(void**)&_i;
15395 locals[2]=(void**)&_up;
15396 locals[3]=(void**)&_lnk;
15397 se_dst=&ds;/*link*/
15398 se_require_uppermost_flag=1;
15399 if(fd.assertion_flag){
15400 fd.assertion_flag=0;
15401 (ds.p=75559968);
15402 ac_req((a1)!=((void*)(NULL)),NULL);
15403 fd.assertion_flag=1;
15404 }
15405 /*[IF*/
15406 if(((ds.p=71372336),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
15407 (ds.p=71372832);
15408 _i=1;
15409 (ds.p=71373088);
15410 _up=(/*RF2*/(se_i86(&ds,((T86*)ci(86,a1,71373100))))->_upper/*4*/);
15411 while (!(((ds.p=71373604),(_i)>(_up))))
15412 {
15413 (ds.p=71374112);
15414 r86add_last(&ds,C,r86item(&ds,se_i86(&ds,((T86*)ci(86,a1,71374130))),_i));
15415 (ds.p=71374368);
15416 _i=(_i)+(1);
15417 }
15418 }
15419 else{
15420 (ds.p=71375392);
15421 _lnk=(/*RF2*/(C)->_first_link/*8*/);
15422 (ds.p=71375648);
15423 _i=1;
15424 (ds.p=71375904);
15425 _up=(/*RF2*/(se_i86(&ds,((T86*)ci(86,a1,71375916))))->_upper/*4*/);
15426 while (!(((ds.p=71376420),(_i)>(_up))))
15427 {
15428 /*[IF*/
15429 if(((ds.p=71376942),(_lnk)==((void*)(NULL)))){
15430 (ds.p=71377190);
15431 r86add_last(&ds,C,r86item(&ds,se_i86(&ds,((T86*)ci(86,a1,71377208))),_i));
15432 }
15433 else{
15434 (ds.p=71377710);
15435 r87set_item(&ds,((T87*)ci(87,_lnk,71377702)),r86item(&ds,se_i86(&ds,((T86*)ci(86,a1,71377728))),_i));
15436 (ds.p=71377958);
15437 _lnk=(/*RF2*/(((T87*)ci(87,_lnk,71377972)))->_next/*8*/);
15438 }
15439 /*FI]*/
15440 (ds.p=71378464);
15441 _i=(_i)+(1);
15442 }
15443 /*[IF*/
15444 if(((ds.p=71378984),(_lnk)==((void*)((/*RF2*/(C)->_first_link/*8*/))))){
15445 if(fd.assertion_flag){
15446 fd.assertion_flag=0;
15447 (ds.p=71379518);
15448 ac_civ((r86count(&ds,se_i86(&ds,((T86*)ci(86,a1,71379494)))))==(0),NULL);
15449 fd.assertion_flag=1;
15450 }
15451 (ds.p=71380000);
15452 r86clear(&ds,C);
15453 }
15454 else if(((ds.p=71380272),(_lnk)!=((void*)(NULL)))){
15455 (ds.p=71380512);
15456 _i=r86count(&ds,se_i86(&ds,((T86*)ci(86,a1,71380522))));
15457 /*[IF*/
15458 if(((ds.p=71380790),((/*RF2*/(C)->_mem_idx/*16*/))!=(_i))){
15459 (ds.p=71381030);
15460 r86go_item(&ds,C,_i);
15461 }
15462 /*FI]*/
15463 if(fd.assertion_flag){
15464 fd.assertion_flag=0;
15465 (ds.p=71381806);
15466 ac_civ((_lnk)==((void*)((/*RF2*/(((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71381810)))->_next/*8*/))),NULL);
15467 fd.assertion_flag=1;
15468 }
15469 (ds.p=71382320);
15470 r87set_next(&ds,((T87*)ci(87,(/*RF2*/(C)->_mem_lnk/*20*/),71382304)),NULL);
15471 (ds.p=71382560);
15472 (/*SFN*/C->_upper/*4*/)=_i;
15473 (ds.p=71382816);
15474 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_mem_lnk/*20*/);
15475 }
15476 /*FI]*/
15477 }
15478 /*FI]*/
15479 if(fd.assertion_flag){
15480 fd.assertion_flag=0;
15481 (ds.p=75560736);
15482 ac_ens((r86count(&ds,C))==(r86count(&ds,se_i86(&ds,((T86*)ci(86,a1,75560740))))),NULL);
15483 fd.assertion_flag=1;
15484 }
15485 if(se_rci(caller,C))se_i86(&ds,C);
15486 se_dst=caller;/*unlink*/
15487 }
15488 se_frame_descriptor se_ifd86={"invariant once LINKED_LIST[TILE]",1,0,"%R86%",1};
15489
15490 T86*se_i86(se_dump_stack*caller,T86*C){
15491 se_dump_stack ds;
15492 ds.fd=&se_ifd86;
15493 ds.current=((void**)&C);
15494 ds.p=71306254;
15495 ds.caller=caller;
15496 se_dst=&ds;
15497 if(ds.fd->assertion_flag){
15498 ds.fd->assertion_flag=0;
15499 (ds.p=75651888);
15500 ac_inv((1)<=(((/*RF2*/(C)->_upper/*4*/))+(1)),"valid_bounds");
15501 (ds.p=71425330);
15502 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))==((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))==(0)),((/*RF2*/(C)->_mem_idx/*16*/))==(0)),((/*RF2*/(C)->_mem_lnk/*20*/))==((void*)(NULL)))),"empty_status");
15503 (ds.p=71426612);
15504 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))!=((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))>(0)),((/*RF2*/(C)->_mem_idx/*16*/))>(0)),((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)))),"not_empty_status");
15505 ds.fd->assertion_flag=1;
15506 }
15507 se_dst=caller;
15508 return C;
15509 }
15510
15511 void r106set_item(se_dump_stack*caller,T106* C,T0* a1){
15512 void**locals[1];
15513 static se_frame_descriptor fd={"set_item LINK",1,1,"%R106%i%R104%",1};
15514 se_dump_stack ds;
15515 ds.fd=&fd;
15516 ds.current=((void**)&C);
15517 ds.p=88090120;
15518 ds.caller=caller;
15519 ds.locals=locals;
15520 locals[0]=(void**)&a1;
15521 se_dst=&ds;/*link*/
15522 (ds.p=88090644);
15523 (/*SFN*/C->_item/*4*/)=a1;
15524 if(fd.assertion_flag){
15525 fd.assertion_flag=0;
15526 (ds.p=88091166);
15527 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
15528 fd.assertion_flag=1;
15529 }
15530 se_dst=caller;/*unlink*/
15531 }
15532
15533 T6 r106is_equal(se_dump_stack*caller,T106* C,T0* a1){
15534 T6 R=0;
15535 void**locals[2];
15536 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R106%other%R106%Result%E6%",1};
15537 se_dump_stack ds;
15538 ds.fd=&fd;
15539 ds.current=((void**)&C);
15540 ds.p=2120968;
15541 ds.caller=caller;
15542 ds.locals=locals;
15543 locals[0]=(void**)&a1;
15544 locals[1]=(void**)&R;
15545 se_dst=&ds;/*link*/
15546 se_require_uppermost_flag=1;
15547 if(fd.assertion_flag){
15548 fd.assertion_flag=0;
15549 (ds.p=2122048);
15550 ac_req((a1)!=((void*)(NULL)),"other_not_void");
15551 fd.assertion_flag=1;
15552 }
15553 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
15554 fd.assertion_flag=0;
15555 (ds.p=2122846);
15556 ac_ens((!(r106standard_is_equal(&ds,C,a1)))||(R),"consistent");
15557 (ds.p=2123064);
15558 ac_ens((!(R))||(r106is_equal(&ds,((T106*)ci(106,a1,2123080)),(T0*)C)),"symmetric");
15559 fd.assertion_flag=1;
15560 }
15561 se_dst=caller;/*unlink*/
15562 return R;
15563 }
15564
15565 void r106make(se_dump_stack*caller,T106* C,T0* a1,T0* a2){
15566 void**locals[2];
15567 static se_frame_descriptor fd={"make LINK",1,2,"%R106%i%R104%n%R106%",1};
15568 se_dump_stack ds;
15569 ds.fd=&fd;
15570 ds.current=((void**)&C);
15571 ds.p=88087304;
15572 ds.caller=caller;
15573 ds.locals=locals;
15574 locals[0]=(void**)&a1;
15575 locals[1]=(void**)&a2;
15576 se_dst=&ds;/*link*/
15577 (ds.p=88087828);
15578 (/*SFN*/C->_item/*4*/)=a1;
15579 (ds.p=88088084);
15580 (/*SFN*/C->_next/*8*/)=a2;
15581 if(fd.assertion_flag){
15582 fd.assertion_flag=0;
15583 (ds.p=88088606);
15584 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
15585 (ds.p=88088862);
15586 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a2)),NULL);
15587 fd.assertion_flag=1;
15588 }
15589 se_dst=caller;/*unlink*/
15590 }
15591
15592 T6 r106standard_is_equal(se_dump_stack*caller,T106* C,T0* a1){
15593 T6 R=0;
15594 void**locals[2];
15595 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R106%other%R106%Result%E6%",1};
15596 se_dump_stack ds;
15597 ds.fd=&fd;
15598 ds.current=((void**)&C);
15599 ds.p=2128406;
15600 ds.caller=caller;
15601 ds.locals=locals;
15602 locals[0]=(void**)&a1;
15603 locals[1]=(void**)&R;
15604 se_dst=&ds;/*link*/
15605 se_require_uppermost_flag=1;
15606 if(fd.assertion_flag){
15607 fd.assertion_flag=0;
15608 (ds.p=2129184);
15609 ac_req((a1)!=((void*)(NULL)),NULL);
15610 fd.assertion_flag=1;
15611 }
15612 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
15613 fd.assertion_flag=0;
15614 (ds.p=2129976);
15615 ac_ens((!(R))||(r106standard_is_equal(&ds,((T106*)ci(106,a1,2129992)),(T0*)C)),"symmetric");
15616 fd.assertion_flag=1;
15617 }
15618 se_dst=caller;/*unlink*/
15619 return R;
15620 }
15621
15622 T0* r106twin(se_dump_stack*caller,T106* C){
15623 T0* R=NULL;
15624 void**locals[1];
15625 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R106%Result%R106%",1};
15626 se_dump_stack ds;
15627 ds.fd=&fd;
15628 ds.current=((void**)&C);
15629 ds.p=2140182;
15630 ds.caller=caller;
15631 ds.locals=locals;
15632 locals[0]=(void**)&R;
15633 se_dst=&ds;/*link*/
15634 R=((void*)new106());
15635 *((T106*)R)=*C;
15636 if(fd.assertion_flag){
15637 fd.assertion_flag=0;
15638 (ds.p=2142256);
15639 ac_ens(r106is_equal(&ds,((T106*)ci(106,R,2142242)),(T0*)C),"equal");
15640 fd.assertion_flag=1;
15641 }
15642 se_dst=caller;/*unlink*/
15643 return R;
15644 }
15645
15646 void r106set_next(se_dump_stack*caller,T106* C,T0* a1){
15647 void**locals[1];
15648 static se_frame_descriptor fd={"set_next LINK",1,1,"%R106%n%R106%",1};
15649 se_dump_stack ds;
15650 ds.fd=&fd;
15651 ds.current=((void**)&C);
15652 ds.p=88091912;
15653 ds.caller=caller;
15654 ds.locals=locals;
15655 locals[0]=(void**)&a1;
15656 se_dst=&ds;/*link*/
15657 (ds.p=88092436);
15658 (/*SFN*/C->_next/*8*/)=a1;
15659 if(fd.assertion_flag){
15660 fd.assertion_flag=0;
15661 (ds.p=88092958);
15662 ac_ens(((/*RF2*/(C)->_next/*8*/))==((void*)(a1)),NULL);
15663 fd.assertion_flag=1;
15664 }
15665 se_dst=caller;/*unlink*/
15666 }
15667
15668 void r66copy(se_dump_stack*caller,T66* C,T0* a1){
15669 void**locals[1];
15670 static se_frame_descriptor fd={"copy LINKED_LIST",1,1,"%R66%other%R66%",1};
15671 se_dump_stack ds;
15672 ds.fd=&fd;
15673 ds.current=((void**)&C);
15674 ds.p=71349256;
15675 ds.caller=caller;
15676 ds.locals=locals;
15677 locals[0]=(void**)&a1;
15678 se_dst=&ds;/*link*/
15679 se_require_uppermost_flag=1;
15680 if(fd.assertion_flag){
15681 fd.assertion_flag=0;
15682 (ds.p=2144064);
15683 ac_req((a1)!=((void*)(NULL)),"other_not_void");
15684 fd.assertion_flag=1;
15685 }
15686 (ds.p=71349780);
15687 r66from_collection(&ds,C,a1);
15688 if(fd.assertion_flag){
15689 fd.assertion_flag=0;
15690 (ds.p=2144808);
15691 ac_ens(r66is_equal(&ds,C,a1),"is_equal");
15692 fd.assertion_flag=1;
15693 }
15694 if(se_rci(caller,C))se_i66(&ds,C);
15695 se_dst=caller;/*unlink*/
15696 }
15697
15698 void r66do_all(se_dump_stack*caller,T66* C,/*agent*/T0* a1){
15699 T2 _i=0;
15700 void**locals[2];
15701 static se_frame_descriptor fd={"do_all COLLECTION",1,2,"%R66%action%R103%i%E2%",1};
15702 se_dump_stack ds;
15703 ds.fd=&fd;
15704 ds.current=((void**)&C);
15705 ds.p=75614728;
15706 ds.caller=caller;
15707 ds.locals=locals;
15708 locals[0]=(void**)&a1;
15709 locals[1]=(void**)&_i;
15710 se_dst=&ds;/*link*/
15711 (ds.p=75616016);
15712 _i=1;
15713 while (!(((ds.p=75616054),(_i)>((/*RF2*/(C)->_upper/*4*/)))))
15714 {
15715 (ds.p=75616524);
15716 call_r0v(&ds,a1,r66item(&ds,C,_i));
15717 (ds.p=75616780);
15718 _i=(_i)+(1);
15719 }
15720 if(se_rci(caller,C))se_i66(&ds,C);
15721 se_dst=caller;/*unlink*/
15722 }
15723
15724 T0* r66last(se_dump_stack*caller,T66* C){
15725 T0* R=NULL;
15726 void**locals[1];
15727 static se_frame_descriptor fd={"last LINKED_LIST",1,1,"%R66%Result%R65%",1};
15728 se_dump_stack ds;
15729 ds.fd=&fd;
15730 ds.current=((void**)&C);
15731 ds.p=71340808;
15732 ds.caller=caller;
15733 ds.locals=locals;
15734 locals[0]=(void**)&R;
15735 se_dst=&ds;/*link*/
15736 se_require_uppermost_flag=1;
15737 if(fd.assertion_flag){
15738 fd.assertion_flag=0;
15739 (ds.p=75520788);
15740 ac_req(r6_ix_not(&ds,r66is_empty(&ds,C)),NULL);
15741 fd.assertion_flag=1;
15742 }
15743 (ds.p=71341332);
15744 R=(/*RF2*/(((T67*)ci(67,(/*RF2*/(C)->_last_link/*12*/),71341352)))->_item/*4*/);
15745 if(fd.assertion_flag){
15746 fd.assertion_flag=0;
15747 (ds.p=75521570);
15748 ac_ens((R)==((void*)(r66item(&ds,C,(/*RF2*/(C)->_upper/*4*/)))),NULL);
15749 fd.assertion_flag=1;
15750 }
15751 if(se_rci(caller,C))se_i66(&ds,C);
15752 se_dst=caller;/*unlink*/
15753 return R;
15754 }
15755
15756 T2 r66count(se_dump_stack*caller,T66* C){
15757 T2 R=0;
15758 void**locals[1];
15759 static se_frame_descriptor fd={"count LINKED_LIST",1,1,"%R66%Result%E2%",1};
15760 se_dump_stack ds;
15761 ds.fd=&fd;
15762 ds.current=((void**)&C);
15763 ds.p=71346184;
15764 ds.caller=caller;
15765 ds.locals=locals;
15766 locals[0]=(void**)&R;
15767 se_dst=&ds;/*link*/
15768 (ds.p=71346708);
15769 R=(/*RF2*/(C)->_upper/*4*/);
15770 if(fd.assertion_flag){
15771 fd.assertion_flag=0;
15772 (ds.p=75511330);
15773 ac_ens((R)==((((/*RF2*/(C)->_upper/*4*/))-(1))+(1)),NULL);
15774 fd.assertion_flag=1;
15775 }
15776 if(se_rci(caller,C))se_i66(&ds,C);
15777 se_dst=caller;/*unlink*/
15778 return R;
15779 }
15780
15781 T6 r66is_equal(se_dump_stack*caller,T66* C,T0* a1){
15782 T6 R=0;
15783 T0* _lnk1=NULL;
15784 T0* _lnk2=NULL;
15785 void**locals[4];
15786 static se_frame_descriptor fd={"is_equal LINKED_LIST",1,4,"%R66%other%R66%Result%E6%lnk1%R67%lnk2%R67%",1};
15787 se_dump_stack ds;
15788 ds.fd=&fd;
15789 ds.current=((void**)&C);
15790 ds.p=71350536;
15791 ds.caller=caller;
15792 ds.locals=locals;
15793 locals[0]=(void**)&a1;
15794 locals[1]=(void**)&R;
15795 locals[2]=(void**)&_lnk1;
15796 locals[3]=(void**)&_lnk2;
15797 se_dst=&ds;/*link*/
15798 se_require_uppermost_flag=1;
15799 if(fd.assertion_flag){
15800 fd.assertion_flag=0;
15801 (ds.p=2122048);
15802 ac_req((a1)!=((void*)(NULL)),"other_not_void");
15803 fd.assertion_flag=1;
15804 }
15805 /*[IF*/
15806 if(((ds.p=71351594),(C)==((void*)(a1)))){
15807 (ds.p=71351834);
15808 R=1;
15809 }
15810 else if(((ds.p=71352110),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i66(&ds,((T66*)ci(66,a1,71352114))))->_upper/*4*/)))){
15811 (ds.p=71352608);
15812 R=1;
15813 (ds.p=71352864);
15814 _lnk1=(/*RF2*/(C)->_first_link/*8*/);
15815 (ds.p=71353120);
15816 _lnk2=(/*RF2*/(se_i66(&ds,((T66*)ci(66,a1,71353136))))->_first_link/*8*/);
15817 while (!(((ds.p=71353656),r6_px_or(&ds,(_lnk1)==((void*)(NULL)),r6_ix_not(&ds,R)))))
15818 {
15819 (ds.p=71354144);
15820 R=((/*RF2*/(((T67*)ci(67,_lnk1,71354164)))->_item/*4*/))==((void*)((/*RF2*/(((T67*)ci(67,_lnk2,71354188)))->_item/*4*/)));
15821 (ds.p=71354400);
15822 _lnk1=(/*RF2*/(((T67*)ci(67,_lnk1,71354416)))->_next/*8*/);
15823 (ds.p=71354656);
15824 _lnk2=(/*RF2*/(((T67*)ci(67,_lnk2,71354672)))->_next/*8*/);
15825 }
15826 }
15827 /*FI]*/
15828 if(fd.assertion_flag){
15829 fd.assertion_flag=0;
15830 (ds.p=75585556);
15831 ac_ens((!(R))||(r6_px_and(&ds,(1)==(1),((/*RF2*/(C)->_upper/*4*/))==((/*RF2*/(se_i66(&ds,((T66*)ci(66,a1,75585638))))->_upper/*4*/)))),NULL);
15832 (ds.p=2122846);
15833 ac_ens((!(r66standard_is_equal(&ds,C,a1)))||(R),"consistent");
15834 (ds.p=2123064);
15835 ac_ens((!(R))||(r66is_equal(&ds,se_i66(&ds,((T66*)ci(66,a1,2123080))),(T0*)C)),"symmetric");
15836 fd.assertion_flag=1;
15837 }
15838 if(se_rci(caller,C))se_i66(&ds,C);
15839 se_dst=caller;/*unlink*/
15840 return R;
15841 }
15842
15843 T0* r66item(se_dump_stack*caller,T66* C,T2 a1){
15844 T0* R=NULL;
15845 void**locals[2];
15846 static se_frame_descriptor fd={"item LINKED_LIST",1,2,"%R66%index%E2%Result%R65%",1};
15847 se_dump_stack ds;
15848 ds.fd=&fd;
15849 ds.current=((void**)&C);
15850 ds.p=71342088;
15851 ds.caller=caller;
15852 ds.locals=locals;
15853 locals[0]=(void**)&a1;
15854 locals[1]=(void**)&R;
15855 se_dst=&ds;/*link*/
15856 se_require_uppermost_flag=1;
15857 if(fd.assertion_flag){
15858 fd.assertion_flag=0;
15859 (ds.p=75516692);
15860 ac_req(r66valid_index(&ds,C,a1),NULL);
15861 fd.assertion_flag=1;
15862 }
15863 /*[IF*/
15864 if(((ds.p=71342630),(a1)!=((/*RF2*/(C)->_mem_idx/*16*/)))){
15865 (ds.p=71342874);
15866 r66go_item(&ds,C,a1);
15867 }
15868 /*FI]*/
15869 (ds.p=71343380);
15870 R=(/*RF2*/(((T67*)ci(67,(/*RF2*/(C)->_mem_lnk/*20*/),71343400)))->_item/*4*/);
15871 if(se_rci(caller,C))se_i66(&ds,C);
15872 se_dst=caller;/*unlink*/
15873 return R;
15874 }
15875
15876 T6 r66valid_index(se_dump_stack*caller,T66* C,T2 a1){
15877 T6 R=0;
15878 void**locals[2];
15879 static se_frame_descriptor fd={"valid_index COLLECTION",1,2,"%R66%index%E2%Result%E6%",1};
15880 se_dump_stack ds;
15881 ds.fd=&fd;
15882 ds.current=((void**)&C);
15883 ds.p=75507478;
15884 ds.caller=caller;
15885 ds.locals=locals;
15886 locals[0]=(void**)&a1;
15887 locals[1]=(void**)&R;
15888 se_dst=&ds;/*link*/
15889 (ds.p=75508500);
15890 R=((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)));
15891 if(fd.assertion_flag){
15892 fd.assertion_flag=0;
15893 (ds.p=75509026);
15894 ac_ens((R)==(((1)<=(a1))&&((a1)<=((/*RF2*/(C)->_upper/*4*/)))),NULL);
15895 fd.assertion_flag=1;
15896 }
15897 if(se_rci(caller,C))se_i66(&ds,C);
15898 se_dst=caller;/*unlink*/
15899 return R;
15900 }
15901
15902 void r66make(se_dump_stack*caller,T66* C){
15903 static se_frame_descriptor fd={"make LINKED_LIST",1,0,"%R66%",1};
15904 se_dump_stack ds;
15905 ds.fd=&fd;
15906 ds.current=((void**)&C);
15907 ds.p=71313672;
15908 ds.caller=caller;
15909 ds.locals=NULL;
15910 se_dst=&ds;/*link*/
15911 (ds.p=71314452);
15912 (/*SFN*/C->_first_link/*8*/)=NULL;
15913 (ds.p=71314708);
15914 (/*SFN*/C->_upper/*4*/)=0;
15915 (ds.p=71314964);
15916 (/*SFN*/C->_last_link/*12*/)=NULL;
15917 (ds.p=71315220);
15918 (/*SFN*/C->_mem_idx/*16*/)=0;
15919 (ds.p=71315476);
15920 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
15921 if(fd.assertion_flag){
15922 fd.assertion_flag=0;
15923 (ds.p=71316000);
15924 ac_ens((r66count(&ds,C))==(0),NULL);
15925 fd.assertion_flag=1;
15926 }
15927 if(se_rci(caller,C))se_i66(&ds,C);
15928 se_dst=caller;/*unlink*/
15929 }
15930
15931 T6 r66is_empty(se_dump_stack*caller,T66* C){
15932 T6 R=0;
15933 void**locals[1];
15934 static se_frame_descriptor fd={"is_empty LINKED_LIST",1,1,"%R66%Result%E6%",1};
15935 se_dump_stack ds;
15936 ds.fd=&fd;
15937 ds.current=((void**)&C);
15938 ds.p=71316744;
15939 ds.caller=caller;
15940 ds.locals=locals;
15941 locals[0]=(void**)&R;
15942 se_dst=&ds;/*link*/
15943 (ds.p=71317254);
15944 R=((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL));
15945 if(fd.assertion_flag){
15946 fd.assertion_flag=0;
15947 (ds.p=75513108);
15948 ac_ens((R)==((r66count(&ds,C))==(0)),NULL);
15949 fd.assertion_flag=1;
15950 }
15951 if(se_rci(caller,C))se_i66(&ds,C);
15952 se_dst=caller;/*unlink*/
15953 return R;
15954 }
15955
15956 T0* r66get_new_iterator(se_dump_stack*caller,T66* C){
15957 T0* R=NULL;
15958 void**locals[1];
15959 static se_frame_descriptor fd={"get_new_iterator LINKED_LIST",1,1,"%R66%Result%R119%",1};
15960 se_dump_stack ds;
15961 ds.fd=&fd;
15962 ds.current=((void**)&C);
15963 ds.p=71416840;
15964 ds.caller=caller;
15965 ds.locals=locals;
15966 locals[0]=(void**)&R;
15967 se_dst=&ds;/*link*/
15968 (ds.p=71417364);
15969 {T122*n=new122();
15970 r122make(&ds,n,(T0*)C);
15971 R=((T0*)n);
15972 }
15973 if(se_rci(caller,C))se_i66(&ds,C);
15974 se_dst=caller;/*unlink*/
15975 return R;
15976 }
15977
15978 T6 r66standard_is_equal(se_dump_stack*caller,T66* C,T0* a1){
15979 T6 R=0;
15980 void**locals[2];
15981 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R66%other%R66%Result%E6%",1};
15982 se_dump_stack ds;
15983 ds.fd=&fd;
15984 ds.current=((void**)&C);
15985 ds.p=2128406;
15986 ds.caller=caller;
15987 ds.locals=locals;
15988 locals[0]=(void**)&a1;
15989 locals[1]=(void**)&R;
15990 se_dst=&ds;/*link*/
15991 se_require_uppermost_flag=1;
15992 if(fd.assertion_flag){
15993 fd.assertion_flag=0;
15994 (ds.p=2129184);
15995 ac_req((a1)!=((void*)(NULL)),NULL);
15996 fd.assertion_flag=1;
15997 }
15998 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
15999 fd.assertion_flag=0;
16000 (ds.p=2129976);
16001 ac_ens((!(R))||(r66standard_is_equal(&ds,se_i66(&ds,((T66*)ci(66,a1,2129992))),(T0*)C)),"symmetric");
16002 fd.assertion_flag=1;
16003 }
16004 if(se_rci(caller,C))se_i66(&ds,C);
16005 se_dst=caller;/*unlink*/
16006 return R;
16007 }
16008
16009 void r66add_last(se_dump_stack*caller,T66* C,T0* a1){
16010 T0* _lnk=NULL;
16011 T2 o36_185_26=0;
16012 T2 o36_186_22=0;
16013 T2 o36_187_26=0;
16014 void**locals[5];
16015 static se_frame_descriptor fd={"add_last LINKED_LIST",1,5,"%R66%element%R65%lnk%R67%old value%E2%old value%E2%old value%E2%",1};
16016 se_dump_stack ds;
16017 ds.fd=&fd;
16018 ds.current=((void**)&C);
16019 ds.p=71321864;
16020 ds.caller=caller;
16021 ds.locals=locals;
16022 locals[0]=(void**)&a1;
16023 locals[1]=(void**)&_lnk;
16024 locals[2]=(void**)&o36_185_26;
16025 locals[3]=(void**)&o36_186_22;
16026 locals[4]=(void**)&o36_187_26;
16027 se_dst=&ds;/*link*/
16028 o36_185_26=r66count(&ds,C);
16029 o36_186_22=1;
16030 o36_187_26=(/*RF2*/(C)->_upper/*4*/);
16031 /*[IF*/
16032 if(((ds.p=71322928),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
16033 (ds.p=71323162);
16034 {T67*n=new67();
16035 r67make(&ds,n,a1,NULL);
16036 (/*SFN*/C->_first_link/*8*/)=((T0*)n);
16037 }
16038 (ds.p=71323418);
16039 (/*SFN*/C->_upper/*4*/)=1;
16040 (ds.p=71323674);
16041 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_first_link/*8*/);
16042 (ds.p=71323930);
16043 (/*SFN*/C->_mem_idx/*16*/)=1;
16044 (ds.p=71324186);
16045 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
16046 }
16047 else{
16048 (ds.p=71324698);
16049 {T67*n=new67();
16050 r67make(&ds,n,a1,NULL);
16051 _lnk=((T0*)n);
16052 }
16053 (ds.p=71324974);
16054 r67set_next(&ds,((T67*)ci(67,(/*RF2*/(C)->_last_link/*12*/),71324954)),_lnk);
16055 (ds.p=71325210);
16056 (/*SFN*/C->_upper/*4*/)=((/*RF2*/(C)->_upper/*4*/))+(1);
16057 (ds.p=71325466);
16058 (/*SFN*/C->_last_link/*12*/)=_lnk;
16059 }
16060 /*FI]*/
16061 if(fd.assertion_flag){
16062 fd.assertion_flag=0;
16063 (ds.p=75544606);
16064 ac_ens((r66last(&ds,C))==((void*)(a1)),NULL);
16065 (ds.p=75544864);
16066 ac_ens((r66count(&ds,C))==((1)+(o36_185_26)),NULL);
16067 (ds.p=75545120);
16068 ac_ens((1)==(o36_186_22),NULL);
16069 (ds.p=75545376);
16070 ac_ens(((/*RF2*/(C)->_upper/*4*/))==((1)+(o36_187_26)),NULL);
16071 fd.assertion_flag=1;
16072 }
16073 if(se_rci(caller,C))se_i66(&ds,C);
16074 se_dst=caller;/*unlink*/
16075 }
16076
16077 void r66clear(se_dump_stack*caller,T66* C){
16078 static se_frame_descriptor fd={"clear LINKED_LIST",1,0,"%R66%",1};
16079 se_dump_stack ds;
16080 ds.fd=&fd;
16081 ds.current=((void**)&C);
16082 ds.p=71367688;
16083 ds.caller=caller;
16084 ds.locals=NULL;
16085 se_dst=&ds;/*link*/
16086 /*[IF*/
16087 if(((ds.p=71368240),((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL)))){
16088 (ds.p=71368474);
16089 (/*SFN*/C->_first_link/*8*/)=NULL;
16090 (ds.p=71368730);
16091 (/*SFN*/C->_mem_idx/*16*/)=0;
16092 (ds.p=71368986);
16093 (/*SFN*/C->_mem_lnk/*20*/)=NULL;
16094 (ds.p=71369242);
16095 (/*SFN*/C->_upper/*4*/)=0;
16096 (ds.p=71369498);
16097 (/*SFN*/C->_last_link/*12*/)=NULL;
16098 }
16099 /*FI]*/
16100 if(fd.assertion_flag){
16101 fd.assertion_flag=0;
16102 (ds.p=71370272);
16103 ac_ens(((/*RF2*/(C)->_upper/*4*/))==(0),NULL);
16104 (ds.p=75571220);
16105 ac_ens(r66is_empty(&ds,C),NULL);
16106 fd.assertion_flag=1;
16107 }
16108 if(se_rci(caller,C))se_i66(&ds,C);
16109 se_dst=caller;/*unlink*/
16110 }
16111
16112 T0* r66twin(se_dump_stack*caller,T66* C){
16113 T0* R=NULL;
16114 void**locals[1];
16115 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R66%Result%R66%",1};
16116 se_dump_stack ds;
16117 ds.fd=&fd;
16118 ds.current=((void**)&C);
16119 ds.p=2140182;
16120 ds.caller=caller;
16121 ds.locals=locals;
16122 locals[0]=(void**)&R;
16123 se_dst=&ds;/*link*/
16124 R=((void*)new66());
16125 r66copy(&ds,((T66*)R),((T0*)C));
16126 if(fd.assertion_flag){
16127 fd.assertion_flag=0;
16128 (ds.p=2142256);
16129 ac_ens(r66is_equal(&ds,se_i66(&ds,((T66*)ci(66,R,2142242))),(T0*)C),"equal");
16130 fd.assertion_flag=1;
16131 }
16132 if(se_rci(caller,C))se_i66(&ds,C);
16133 se_dst=caller;/*unlink*/
16134 return R;
16135 }
16136
16137 void r66go_item(se_dump_stack*caller,T66* C,T2 a1){
16138 void**locals[1];
16139 static se_frame_descriptor fd={"go_item LINKED_LIST",1,1,"%R66%i%E2%",1};
16140 se_dump_stack ds;
16141 ds.fd=&fd;
16142 ds.current=((void**)&C);
16143 ds.p=71418632;
16144 ds.caller=caller;
16145 ds.locals=locals;
16146 locals[0]=(void**)&a1;
16147 se_dst=&ds;/*link*/
16148 se_require_uppermost_flag=1;
16149 if(fd.assertion_flag){
16150 fd.assertion_flag=0;
16151 (ds.p=71419156);
16152 ac_req(r66valid_index(&ds,C,a1),NULL);
16153 (ds.p=71419428);
16154 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))!=(a1),NULL);
16155 (ds.p=71419684);
16156 ac_req(((/*RF2*/(C)->_mem_idx/*16*/))>(0),NULL);
16157 (ds.p=71419940);
16158 ac_req(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
16159 fd.assertion_flag=1;
16160 }
16161 /*[IF*/
16162 if(((ds.p=71420458),((/*RF2*/(C)->_mem_idx/*16*/))>(a1))){
16163 (ds.p=71420698);
16164 (/*SFN*/C->_mem_idx/*16*/)=1;
16165 (ds.p=71420954);
16166 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(C)->_first_link/*8*/);
16167 }
16168 /*FI]*/
16169 while (!(((ds.p=71421982),(a1)==((/*RF2*/(C)->_mem_idx/*16*/)))))
16170 {
16171 (ds.p=71422490);
16172 (/*SFN*/C->_mem_lnk/*20*/)=(/*RF2*/(((T67*)ci(67,(/*RF2*/(C)->_mem_lnk/*20*/),71422512)))->_next/*8*/);
16173 (ds.p=71422746);
16174 (/*SFN*/C->_mem_idx/*16*/)=((/*RF2*/(C)->_mem_idx/*16*/))+(1);
16175 }
16176 if(fd.assertion_flag){
16177 fd.assertion_flag=0;
16178 (ds.p=71423524);
16179 ac_ens(((/*RF2*/(C)->_mem_idx/*16*/))==(a1),NULL);
16180 (ds.p=71423780);
16181 ac_ens(((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)),NULL);
16182 fd.assertion_flag=1;
16183 }
16184 if(se_rci(caller,C))se_i66(&ds,C);
16185 se_dst=caller;/*unlink*/
16186 }
16187
16188 void r66from_collection(se_dump_stack*caller,T66* C,T0* a1){
16189 T2 _i=0;
16190 T2 _up=0;
16191 T0* _lnk=NULL;
16192 void**locals[4];
16193 static se_frame_descriptor fd={"from_collection LINKED_LIST",1,4,"%R66%model%R101%i%E2%up%E2%lnk%R67%",1};
16194 se_dump_stack ds;
16195 ds.fd=&fd;
16196 ds.current=((void**)&C);
16197 ds.p=71371016;
16198 ds.caller=caller;
16199 ds.locals=locals;
16200 locals[0]=(void**)&a1;
16201 locals[1]=(void**)&_i;
16202 locals[2]=(void**)&_up;
16203 locals[3]=(void**)&_lnk;
16204 se_dst=&ds;/*link*/
16205 se_require_uppermost_flag=1;
16206 if(fd.assertion_flag){
16207 fd.assertion_flag=0;
16208 (ds.p=75559968);
16209 ac_req((a1)!=((void*)(NULL)),NULL);
16210 fd.assertion_flag=1;
16211 }
16212 /*[IF*/
16213 if(((ds.p=71372336),((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL)))){
16214 (ds.p=71372832);
16215 _i=1;
16216 (ds.p=71373088);
16217 _up=(/*RF2*/(se_i66(&ds,((T66*)ci(66,a1,71373100))))->_upper/*4*/);
16218 while (!(((ds.p=71373604),(_i)>(_up))))
16219 {
16220 (ds.p=71374112);
16221 r66add_last(&ds,C,r66item(&ds,se_i66(&ds,((T66*)ci(66,a1,71374130))),_i));
16222 (ds.p=71374368);
16223 _i=(_i)+(1);
16224 }
16225 }
16226 else{
16227 (ds.p=71375392);
16228 _lnk=(/*RF2*/(C)->_first_link/*8*/);
16229 (ds.p=71375648);
16230 _i=1;
16231 (ds.p=71375904);
16232 _up=(/*RF2*/(se_i66(&ds,((T66*)ci(66,a1,71375916))))->_upper/*4*/);
16233 while (!(((ds.p=71376420),(_i)>(_up))))
16234 {
16235 /*[IF*/
16236 if(((ds.p=71376942),(_lnk)==((void*)(NULL)))){
16237 (ds.p=71377190);
16238 r66add_last(&ds,C,r66item(&ds,se_i66(&ds,((T66*)ci(66,a1,71377208))),_i));
16239 }
16240 else{
16241 (ds.p=71377710);
16242 r67set_item(&ds,((T67*)ci(67,_lnk,71377702)),r66item(&ds,se_i66(&ds,((T66*)ci(66,a1,71377728))),_i));
16243 (ds.p=71377958);
16244 _lnk=(/*RF2*/(((T67*)ci(67,_lnk,71377972)))->_next/*8*/);
16245 }
16246 /*FI]*/
16247 (ds.p=71378464);
16248 _i=(_i)+(1);
16249 }
16250 /*[IF*/
16251 if(((ds.p=71378984),(_lnk)==((void*)((/*RF2*/(C)->_first_link/*8*/))))){
16252 if(fd.assertion_flag){
16253 fd.assertion_flag=0;
16254 (ds.p=71379518);
16255 ac_civ((r66count(&ds,se_i66(&ds,((T66*)ci(66,a1,71379494)))))==(0),NULL);
16256 fd.assertion_flag=1;
16257 }
16258 (ds.p=71380000);
16259 r66clear(&ds,C);
16260 }
16261 else if(((ds.p=71380272),(_lnk)!=((void*)(NULL)))){
16262 (ds.p=71380512);
16263 _i=r66count(&ds,se_i66(&ds,((T66*)ci(66,a1,71380522))));
16264 /*[IF*/
16265 if(((ds.p=71380790),((/*RF2*/(C)->_mem_idx/*16*/))!=(_i))){
16266 (ds.p=71381030);
16267 r66go_item(&ds,C,_i);
16268 }
16269 /*FI]*/
16270 if(fd.assertion_flag){
16271 fd.assertion_flag=0;
16272 (ds.p=71381806);
16273 ac_civ((_lnk)==((void*)((/*RF2*/(((T67*)ci(67,(/*RF2*/(C)->_mem_lnk/*20*/),71381810)))->_next/*8*/))),NULL);
16274 fd.assertion_flag=1;
16275 }
16276 (ds.p=71382320);
16277 r67set_next(&ds,((T67*)ci(67,(/*RF2*/(C)->_mem_lnk/*20*/),71382304)),NULL);
16278 (ds.p=71382560);
16279 (/*SFN*/C->_upper/*4*/)=_i;
16280 (ds.p=71382816);
16281 (/*SFN*/C->_last_link/*12*/)=(/*RF2*/(C)->_mem_lnk/*20*/);
16282 }
16283 /*FI]*/
16284 }
16285 /*FI]*/
16286 if(fd.assertion_flag){
16287 fd.assertion_flag=0;
16288 (ds.p=75560736);
16289 ac_ens((r66count(&ds,C))==(r66count(&ds,se_i66(&ds,((T66*)ci(66,a1,75560740))))),NULL);
16290 fd.assertion_flag=1;
16291 }
16292 if(se_rci(caller,C))se_i66(&ds,C);
16293 se_dst=caller;/*unlink*/
16294 }
16295 se_frame_descriptor se_ifd66={"invariant once LINKED_LIST[PRESET]",1,0,"%R66%",1};
16296
16297 T66*se_i66(se_dump_stack*caller,T66*C){
16298 se_dump_stack ds;
16299 ds.fd=&se_ifd66;
16300 ds.current=((void**)&C);
16301 ds.p=71306254;
16302 ds.caller=caller;
16303 se_dst=&ds;
16304 if(ds.fd->assertion_flag){
16305 ds.fd->assertion_flag=0;
16306 (ds.p=75651888);
16307 ac_inv((1)<=(((/*RF2*/(C)->_upper/*4*/))+(1)),"valid_bounds");
16308 (ds.p=71425330);
16309 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))==((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))==((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))==(0)),((/*RF2*/(C)->_mem_idx/*16*/))==(0)),((/*RF2*/(C)->_mem_lnk/*20*/))==((void*)(NULL)))),"empty_status");
16310 (ds.p=71426612);
16311 ac_inv((!(((/*RF2*/(C)->_first_link/*8*/))!=((void*)(NULL))))||(r6_px_and(&ds,r6_px_and(&ds,r6_px_and(&ds,((/*RF2*/(C)->_last_link/*12*/))!=((void*)(NULL)),((/*RF2*/(C)->_upper/*4*/))>(0)),((/*RF2*/(C)->_mem_idx/*16*/))>(0)),((/*RF2*/(C)->_mem_lnk/*20*/))!=((void*)(NULL)))),"not_empty_status");
16312 ds.fd->assertion_flag=1;
16313 }
16314 se_dst=caller;
16315 return C;
16316 }
16317
16318 void r132set_item(se_dump_stack*caller,T132* C,T0* a1){
16319 void**locals[1];
16320 static se_frame_descriptor fd={"set_item DICTIONARY_NODE",1,1,"%R132%i%R96%",1};
16321 se_dump_stack ds;
16322 ds.fd=&fd;
16323 ds.current=((void**)&C);
16324 ds.p=96476168;
16325 ds.caller=caller;
16326 ds.locals=locals;
16327 locals[0]=(void**)&a1;
16328 se_dst=&ds;/*link*/
16329 (ds.p=96476692);
16330 (/*SFN*/C->_item/*4*/)=a1;
16331 if(fd.assertion_flag){
16332 fd.assertion_flag=0;
16333 (ds.p=96477216);
16334 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
16335 fd.assertion_flag=1;
16336 }
16337 se_dst=caller;/*unlink*/
16338 }
16339
16340 T6 r132is_equal(se_dump_stack*caller,T132* C,T0* a1){
16341 T6 R=0;
16342 void**locals[2];
16343 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R132%other%R132%Result%E6%",1};
16344 se_dump_stack ds;
16345 ds.fd=&fd;
16346 ds.current=((void**)&C);
16347 ds.p=2120968;
16348 ds.caller=caller;
16349 ds.locals=locals;
16350 locals[0]=(void**)&a1;
16351 locals[1]=(void**)&R;
16352 se_dst=&ds;/*link*/
16353 se_require_uppermost_flag=1;
16354 if(fd.assertion_flag){
16355 fd.assertion_flag=0;
16356 (ds.p=2122048);
16357 ac_req((a1)!=((void*)(NULL)),"other_not_void");
16358 fd.assertion_flag=1;
16359 }
16360 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16361 fd.assertion_flag=0;
16362 (ds.p=2122846);
16363 ac_ens((!(r132standard_is_equal(&ds,C,a1)))||(R),"consistent");
16364 (ds.p=2123064);
16365 ac_ens((!(R))||(r132is_equal(&ds,((T132*)ci(132,a1,2123080)),(T0*)C)),"symmetric");
16366 fd.assertion_flag=1;
16367 }
16368 se_dst=caller;/*unlink*/
16369 return R;
16370 }
16371
16372 void r132make(se_dump_stack*caller,T132* C,T0* a1,T0* a2,T0* a3){
16373 void**locals[3];
16374 static se_frame_descriptor fd={"make DICTIONARY_NODE",1,3,"%R132%i%R96%k%R7%n%R132%",1};
16375 se_dump_stack ds;
16376 ds.fd=&fd;
16377 ds.current=((void**)&C);
16378 ds.p=96480264;
16379 ds.caller=caller;
16380 ds.locals=locals;
16381 locals[0]=(void**)&a1;
16382 locals[1]=(void**)&a2;
16383 locals[2]=(void**)&a3;
16384 se_dst=&ds;/*link*/
16385 (ds.p=96480788);
16386 (/*SFN*/C->_item/*4*/)=a1;
16387 (ds.p=96481044);
16388 (/*SFN*/C->_key/*8*/)=a2;
16389 (ds.p=96481300);
16390 (/*SFN*/C->_next/*12*/)=a3;
16391 if(fd.assertion_flag){
16392 fd.assertion_flag=0;
16393 (ds.p=96481822);
16394 ac_ens(((/*RF2*/(C)->_item/*4*/))==((void*)(a1)),NULL);
16395 (ds.p=96482076);
16396 ac_ens(((/*RF2*/(C)->_key/*8*/))==((void*)(a2)),NULL);
16397 (ds.p=96482334);
16398 ac_ens(((/*RF2*/(C)->_next/*12*/))==((void*)(a3)),NULL);
16399 fd.assertion_flag=1;
16400 }
16401 se_dst=caller;/*unlink*/
16402 }
16403
16404 T6 r132standard_is_equal(se_dump_stack*caller,T132* C,T0* a1){
16405 T6 R=0;
16406 void**locals[2];
16407 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R132%other%R132%Result%E6%",1};
16408 se_dump_stack ds;
16409 ds.fd=&fd;
16410 ds.current=((void**)&C);
16411 ds.p=2128406;
16412 ds.caller=caller;
16413 ds.locals=locals;
16414 locals[0]=(void**)&a1;
16415 locals[1]=(void**)&R;
16416 se_dst=&ds;/*link*/
16417 se_require_uppermost_flag=1;
16418 if(fd.assertion_flag){
16419 fd.assertion_flag=0;
16420 (ds.p=2129184);
16421 ac_req((a1)!=((void*)(NULL)),NULL);
16422 fd.assertion_flag=1;
16423 }
16424 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16425 fd.assertion_flag=0;
16426 (ds.p=2129976);
16427 ac_ens((!(R))||(r132standard_is_equal(&ds,((T132*)ci(132,a1,2129992)),(T0*)C)),"symmetric");
16428 fd.assertion_flag=1;
16429 }
16430 se_dst=caller;/*unlink*/
16431 return R;
16432 }
16433
16434 T0* r132twin(se_dump_stack*caller,T132* C){
16435 T0* R=NULL;
16436 void**locals[1];
16437 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R132%Result%R132%",1};
16438 se_dump_stack ds;
16439 ds.fd=&fd;
16440 ds.current=((void**)&C);
16441 ds.p=2140182;
16442 ds.caller=caller;
16443 ds.locals=locals;
16444 locals[0]=(void**)&R;
16445 se_dst=&ds;/*link*/
16446 R=((void*)new132());
16447 *((T132*)R)=*C;
16448 if(fd.assertion_flag){
16449 fd.assertion_flag=0;
16450 (ds.p=2142256);
16451 ac_ens(r132is_equal(&ds,((T132*)ci(132,R,2142242)),(T0*)C),"equal");
16452 fd.assertion_flag=1;
16453 }
16454 se_dst=caller;/*unlink*/
16455 return R;
16456 }
16457
16458 void r132set_next(se_dump_stack*caller,T132* C,T0* a1){
16459 void**locals[1];
16460 static se_frame_descriptor fd={"set_next DICTIONARY_NODE",1,1,"%R132%n%R132%",1};
16461 se_dump_stack ds;
16462 ds.fd=&fd;
16463 ds.current=((void**)&C);
16464 ds.p=96477960;
16465 ds.caller=caller;
16466 ds.locals=locals;
16467 locals[0]=(void**)&a1;
16468 se_dst=&ds;/*link*/
16469 (ds.p=96478484);
16470 (/*SFN*/C->_next/*12*/)=a1;
16471 if(fd.assertion_flag){
16472 fd.assertion_flag=0;
16473 (ds.p=96479008);
16474 ac_ens(((/*RF2*/(C)->_next/*12*/))==((void*)(a1)),NULL);
16475 fd.assertion_flag=1;
16476 }
16477 se_dst=caller;/*unlink*/
16478 }
16479
16480 T8 r50free_img(se_dump_stack*caller,T8 a1){
16481 T8 R=NULL;
16482 void**locals[2];
16483 static se_frame_descriptor fd={"free_img IMAGE",0,2,"i%E8%Result%E8%",1};
16484 se_dump_stack ds;
16485 ds.fd=&fd;
16486 ds.current=NULL;
16487 ds.p=104886282;
16488 ds.caller=caller;
16489 ds.locals=locals;
16490 locals[0]=(void**)&a1;
16491 locals[1]=(void**)&R;
16492 se_dst=&ds;/*link*/
16493 /*[ from line 113 of ./image.e:*/
16494 (ds.p=104886556);
16495 R=(free_img(a1));
16496 /* from line 113 of ./image.e]*/
16497 se_dst=caller;/*unlink*/
16498 return R;
16499 }
16500
16501 void r50convert_display_format(se_dump_stack*caller,T50* C){
16502 static se_frame_descriptor fd={"convert_display_format IMAGE",1,0,"%R50%",1};
16503 se_dump_stack ds;
16504 ds.fd=&fd;
16505 ds.current=((void**)&C);
16506 ds.p=104882698;
16507 ds.caller=caller;
16508 ds.locals=NULL;
16509 se_dst=&ds;/*link*/
16510 se_require_uppermost_flag=1;
16511 if(fd.assertion_flag){
16512 fd.assertion_flag=0;
16513 (ds.p=104883204);
16514 ac_req((/*RF2*/(C)->_is_connected/*4*/),NULL);
16515 fd.assertion_flag=1;
16516 }
16517 (ds.p=104883716);
16518 (/*SFN*/C->_ptr/*5*/)=r50ext_display_format(&ds,(/*RF2*/(C)->_ptr/*5*/));
16519 se_dst=caller;/*unlink*/
16520 }
16521
16522 void r50render_string(se_dump_stack*caller,T50* C,T0* a1,T0* a2,T0* a3){
16523 void**locals[3];
16524 static se_frame_descriptor fd={"render_string IMAGE",1,3,"%R50%s%R7%font%R53%c%R51%",1};
16525 se_dump_stack ds;
16526 ds.fd=&fd;
16527 ds.current=((void**)&C);
16528 ds.p=104874506;
16529 ds.caller=caller;
16530 ds.locals=locals;
16531 locals[0]=(void**)&a1;
16532 locals[1]=(void**)&a2;
16533 locals[2]=(void**)&a3;
16534 se_dst=&ds;/*link*/
16535 se_require_uppermost_flag=1;
16536 if(fd.assertion_flag){
16537 fd.assertion_flag=0;
16538 (ds.p=104875012);
16539 ac_req(r6_ix_not(&ds,(/*RF2*/(C)->_is_connected/*4*/)),NULL);
16540 (ds.p=104875278);
16541 ac_req((/*RF2*/(((T53*)ci(53,a2,104875268)))->_is_connected/*4*/),NULL);
16542 (ds.p=104875528);
16543 ac_req((a1)!=((void*)(NULL)),NULL);
16544 (ds.p=104875796);
16545 ac_req(((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,104875780))))->_count/*8*/))>(0),NULL);
16546 fd.assertion_flag=1;
16547 }
16548 (ds.p=104876292);
16549 (/*SFN*/C->_ptr/*5*/)=r50ext_render_text(&ds,r7to_external(&ds,se_i7(&ds,((T7*)ci(7,a1,104876338)))),r53to_external(&ds,((T53*)ci(53,a2,104876368))),r51to_external(&ds,((T51*)ci(51,a3,104876404))));
16550 /*[IF*/
16551 if(((ds.p=104876562),(NULL!=(/*RF2*/(C)->_ptr/*5*/)))){
16552 (ds.p=104876812);
16553 (/*SFN*/C->_is_connected/*4*/)=1;
16554 (ds.p=104877068);
16555 r50convert_display_format(&ds,C);
16556 }
16557 else{
16558 (ds.p=104877586);
16559 r57put_string(&ds,((T57*)ci(57,oBC1io,104877580)),r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r7_px_43(&ds,se_ms(14,"render_string "),r2to_string(&ds,(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,104877646))))->_count/*8*/))),104877642))),((T0*)se_ms(9," failed!\n"))));
16560 }
16561 /*FI]*/
16562 if(fd.assertion_flag){
16563 fd.assertion_flag=0;
16564 (ds.p=104878340);
16565 ac_ens((/*RF2*/(C)->_is_connected/*4*/),NULL);
16566 fd.assertion_flag=1;
16567 }
16568 se_dst=caller;/*unlink*/
16569 }
16570
16571 T6 r50is_equal(se_dump_stack*caller,T50* C,T0* a1){
16572 T6 R=0;
16573 void**locals[2];
16574 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R50%other%R50%Result%E6%",1};
16575 se_dump_stack ds;
16576 ds.fd=&fd;
16577 ds.current=((void**)&C);
16578 ds.p=2120968;
16579 ds.caller=caller;
16580 ds.locals=locals;
16581 locals[0]=(void**)&a1;
16582 locals[1]=(void**)&R;
16583 se_dst=&ds;/*link*/
16584 se_require_uppermost_flag=1;
16585 if(fd.assertion_flag){
16586 fd.assertion_flag=0;
16587 (ds.p=2122048);
16588 ac_req((a1)!=((void*)(NULL)),"other_not_void");
16589 fd.assertion_flag=1;
16590 }
16591 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16592 fd.assertion_flag=0;
16593 (ds.p=2122846);
16594 ac_ens((!(r50standard_is_equal(&ds,C,a1)))||(R),"consistent");
16595 (ds.p=2123064);
16596 ac_ens((!(R))||(r50is_equal(&ds,((T50*)ci(50,a1,2123080)),(T0*)C)),"symmetric");
16597 fd.assertion_flag=1;
16598 }
16599 se_dst=caller;/*unlink*/
16600 return R;
16601 }
16602
16603 T8 r50ext_display_format(se_dump_stack*caller,T8 a1){
16604 T8 R=NULL;
16605 void**locals[2];
16606 static se_frame_descriptor fd={"ext_display_format IMAGE",0,2,"p%E8%Result%E8%",1};
16607 se_dump_stack ds;
16608 ds.fd=&fd;
16609 ds.current=NULL;
16610 ds.p=104894474;
16611 ds.caller=caller;
16612 ds.locals=locals;
16613 locals[0]=(void**)&a1;
16614 locals[1]=(void**)&R;
16615 se_dst=&ds;/*link*/
16616 /*[ from line 145 of ./image.e:*/
16617 (ds.p=104894748);
16618 R=(ext_display_format(a1));
16619 /* from line 145 of ./image.e]*/
16620 se_dst=caller;/*unlink*/
16621 return R;
16622 }
16623
16624 T8 r50ext_render_text(se_dump_stack*caller,T8 a1,T8 a2,T8 a3){
16625 T8 R=NULL;
16626 void**locals[4];
16627 static se_frame_descriptor fd={"ext_render_text IMAGE",0,4,"string%E8%font%E8%c%E8%Result%E8%",1};
16628 se_dump_stack ds;
16629 ds.fd=&fd;
16630 ds.current=NULL;
16631 ds.p=104887306;
16632 ds.caller=caller;
16633 ds.locals=locals;
16634 locals[0]=(void**)&a1;
16635 locals[1]=(void**)&a2;
16636 locals[2]=(void**)&a3;
16637 locals[3]=(void**)&R;
16638 se_dst=&ds;/*link*/
16639 /*[ from line 117 of ./image.e:*/
16640 (ds.p=104887580);
16641 R=(ext_render_text(a1,a2,a3));
16642 /* from line 117 of ./image.e]*/
16643 se_dst=caller;/*unlink*/
16644 return R;
16645 }
16646 T0*oBC1io=NULL;
16647
16648 void r50make(se_dump_stack*caller,T50* C){
16649 static se_frame_descriptor fd={"make IMAGE",1,0,"%R50%",1};
16650 se_dump_stack ds;
16651 ds.fd=&fd;
16652 ds.current=((void**)&C);
16653 ds.p=104858634;
16654 ds.caller=caller;
16655 ds.locals=NULL;
16656 se_dst=&ds;/*link*/
16657 se_dst=caller;/*unlink*/
16658 }
16659
16660 void r50blit_img(se_dump_stack*caller,T8 a1,T2 a2,T2 a3){
16661 void**locals[3];
16662 static se_frame_descriptor fd={"blit_img IMAGE",0,3,"i%E8%x%E2%y%E2%",1};
16663 se_dump_stack ds;
16664 ds.fd=&fd;
16665 ds.current=NULL;
16666 ds.p=104892426;
16667 ds.caller=caller;
16668 ds.locals=locals;
16669 locals[0]=(void**)&a1;
16670 locals[1]=(void**)&a2;
16671 locals[2]=(void**)&a3;
16672 se_dst=&ds;/*link*/
16673 /*[ from line 137 of ./image.e:*/
16674 (ds.p=104892700);
16675 blit_img(a1,a2,a3);
16676 /* from line 137 of ./image.e]*/
16677 se_dst=caller;/*unlink*/
16678 }
16679
16680 void r50new_dummy(se_dump_stack*caller,T50* C){
16681 static se_frame_descriptor fd={"new_dummy IMAGE",1,0,"%R50%",1};
16682 se_dump_stack ds;
16683 ds.fd=&fd;
16684 ds.current=((void**)&C);
16685 ds.p=104859658;
16686 ds.caller=caller;
16687 ds.locals=NULL;
16688 se_dst=&ds;/*link*/
16689 se_require_uppermost_flag=1;
16690 if(fd.assertion_flag){
16691 fd.assertion_flag=0;
16692 (ds.p=104860164);
16693 ac_req(r6_ix_not(&ds,(/*RF2*/(C)->_is_connected/*4*/)),NULL);
16694 fd.assertion_flag=1;
16695 }
16696 (ds.p=104860676);
16697 (/*SFN*/C->_ptr/*5*/)=r50ext_new_dummy(&ds);
16698 /*[IF*/
16699 if(((ds.p=104860946),(NULL!=(/*RF2*/(C)->_ptr/*5*/)))){
16700 (ds.p=104861196);
16701 (/*SFN*/C->_is_connected/*4*/)=1;
16702 }
16703 /*FI]*/
16704 se_dst=caller;/*unlink*/
16705 }
16706
16707 T6 r50standard_is_equal(se_dump_stack*caller,T50* C,T0* a1){
16708 T6 R=0;
16709 void**locals[2];
16710 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R50%other%R50%Result%E6%",1};
16711 se_dump_stack ds;
16712 ds.fd=&fd;
16713 ds.current=((void**)&C);
16714 ds.p=2128406;
16715 ds.caller=caller;
16716 ds.locals=locals;
16717 locals[0]=(void**)&a1;
16718 locals[1]=(void**)&R;
16719 se_dst=&ds;/*link*/
16720 se_require_uppermost_flag=1;
16721 if(fd.assertion_flag){
16722 fd.assertion_flag=0;
16723 (ds.p=2129184);
16724 ac_req((a1)!=((void*)(NULL)),NULL);
16725 fd.assertion_flag=1;
16726 }
16727 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16728 fd.assertion_flag=0;
16729 (ds.p=2129976);
16730 ac_ens((!(R))||(r50standard_is_equal(&ds,((T50*)ci(50,a1,2129992)),(T0*)C)),"symmetric");
16731 fd.assertion_flag=1;
16732 }
16733 se_dst=caller;/*unlink*/
16734 return R;
16735 }
16736
16737 T8 r50ext_new_dummy(se_dump_stack*caller){
16738 T8 R=NULL;
16739 void**locals[1];
16740 static se_frame_descriptor fd={"ext_new_dummy IMAGE",0,1,"Result%E8%",1};
16741 se_dump_stack ds;
16742 ds.fd=&fd;
16743 ds.current=NULL;
16744 ds.p=104895498;
16745 ds.caller=caller;
16746 ds.locals=locals;
16747 locals[0]=(void**)&R;
16748 se_dst=&ds;/*link*/
16749 /*[ from line 149 of ./image.e:*/
16750 (ds.p=104895772);
16751 R=(ext_new_dummy());
16752 /* from line 149 of ./image.e]*/
16753 se_dst=caller;/*unlink*/
16754 return R;
16755 }
16756
16757 void r50blit(se_dump_stack*caller,T50* C,T2 a1,T2 a2){
16758 void**locals[2];
16759 static se_frame_descriptor fd={"blit IMAGE",1,2,"%R50%x%E2%y%E2%",1};
16760 se_dump_stack ds;
16761 ds.fd=&fd;
16762 ds.current=((void**)&C);
16763 ds.p=104872714;
16764 ds.caller=caller;
16765 ds.locals=locals;
16766 locals[0]=(void**)&a1;
16767 locals[1]=(void**)&a2;
16768 se_dst=&ds;/*link*/
16769 se_require_uppermost_flag=1;
16770 if(fd.assertion_flag){
16771 fd.assertion_flag=0;
16772 (ds.p=104873220);
16773 ac_req((/*RF2*/(C)->_is_connected/*4*/),NULL);
16774 fd.assertion_flag=1;
16775 }
16776 (ds.p=104873732);
16777 r50blit_img(&ds,(/*RF2*/(C)->_ptr/*5*/),a1,a2);
16778 se_dst=caller;/*unlink*/
16779 }
16780
16781 T0* r50twin(se_dump_stack*caller,T50* C){
16782 T0* R=NULL;
16783 void**locals[1];
16784 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R50%Result%R50%",1};
16785 se_dump_stack ds;
16786 ds.fd=&fd;
16787 ds.current=((void**)&C);
16788 ds.p=2140182;
16789 ds.caller=caller;
16790 ds.locals=locals;
16791 locals[0]=(void**)&R;
16792 se_dst=&ds;/*link*/
16793 R=((void*)new50());
16794 *((T50*)R)=*C;
16795 if(fd.assertion_flag){
16796 fd.assertion_flag=0;
16797 (ds.p=2142256);
16798 ac_ens(r50is_equal(&ds,((T50*)ci(50,R,2142242)),(T0*)C),"equal");
16799 fd.assertion_flag=1;
16800 }
16801 se_dst=caller;/*unlink*/
16802 return R;
16803 }
16804
16805 void r50free(se_dump_stack*caller,T50* C){
16806 static se_frame_descriptor fd={"free IMAGE",1,0,"%R50%",1};
16807 se_dump_stack ds;
16808 ds.fd=&fd;
16809 ds.current=((void**)&C);
16810 ds.p=104868362;
16811 ds.caller=caller;
16812 ds.locals=NULL;
16813 se_dst=&ds;/*link*/
16814 se_require_uppermost_flag=1;
16815 if(fd.assertion_flag){
16816 fd.assertion_flag=0;
16817 (ds.p=104868868);
16818 ac_req((/*RF2*/(C)->_is_connected/*4*/),NULL);
16819 fd.assertion_flag=1;
16820 }
16821 /*[IF*/
16822 if(((ds.p=104869394),(NULL!=(/*RF2*/(C)->_ptr/*5*/)))){
16823 (ds.p=104869644);
16824 (/*SFN*/C->_ptr/*5*/)=r50free_img(&ds,(/*RF2*/(C)->_ptr/*5*/));
16825 (ds.p=104869900);
16826 (/*SFN*/C->_is_connected/*4*/)=0;
16827 }
16828 /*FI]*/
16829 se_dst=caller;/*unlink*/
16830 }
16831
16832 T6 r114is_equal(se_dump_stack*caller,T114* C,T0* a1){
16833 T6 R=0;
16834 void**locals[2];
16835 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R114%other%R114%Result%E6%",1};
16836 se_dump_stack ds;
16837 ds.fd=&fd;
16838 ds.current=((void**)&C);
16839 ds.p=2120968;
16840 ds.caller=caller;
16841 ds.locals=locals;
16842 locals[0]=(void**)&a1;
16843 locals[1]=(void**)&R;
16844 se_dst=&ds;/*link*/
16845 se_require_uppermost_flag=1;
16846 if(fd.assertion_flag){
16847 fd.assertion_flag=0;
16848 (ds.p=2122048);
16849 ac_req((a1)!=((void*)(NULL)),"other_not_void");
16850 fd.assertion_flag=1;
16851 }
16852 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16853 fd.assertion_flag=0;
16854 (ds.p=2122846);
16855 ac_ens((!(r114standard_is_equal(&ds,C,a1)))||(R),"consistent");
16856 (ds.p=2123064);
16857 ac_ens((!(R))||(r114is_equal(&ds,((T114*)ci(114,a1,2123080)),(T0*)C)),"symmetric");
16858 fd.assertion_flag=1;
16859 }
16860 se_dst=caller;/*unlink*/
16861 return R;
16862 }
16863
16864 void r114make(se_dump_stack*caller,T114* C,T0* a1){
16865 void**locals[1];
16866 static se_frame_descriptor fd={"make COMMAND_ACTIVATE",1,1,"%R114%m%R30%",1};
16867 se_dump_stack ds;
16868 ds.fd=&fd;
16869 ds.current=((void**)&C);
16870 ds.p=239077130;
16871 ds.caller=caller;
16872 ds.locals=locals;
16873 locals[0]=(void**)&a1;
16874 se_dst=&ds;/*link*/
16875 (ds.p=239077636);
16876 (/*SFN*/C->_main/*4*/)=a1;
16877 se_dst=caller;/*unlink*/
16878 }
16879
16880 T6 r114standard_is_equal(se_dump_stack*caller,T114* C,T0* a1){
16881 T6 R=0;
16882 void**locals[2];
16883 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R114%other%R114%Result%E6%",1};
16884 se_dump_stack ds;
16885 ds.fd=&fd;
16886 ds.current=((void**)&C);
16887 ds.p=2128406;
16888 ds.caller=caller;
16889 ds.locals=locals;
16890 locals[0]=(void**)&a1;
16891 locals[1]=(void**)&R;
16892 se_dst=&ds;/*link*/
16893 se_require_uppermost_flag=1;
16894 if(fd.assertion_flag){
16895 fd.assertion_flag=0;
16896 (ds.p=2129184);
16897 ac_req((a1)!=((void*)(NULL)),NULL);
16898 fd.assertion_flag=1;
16899 }
16900 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16901 fd.assertion_flag=0;
16902 (ds.p=2129976);
16903 ac_ens((!(R))||(r114standard_is_equal(&ds,((T114*)ci(114,a1,2129992)),(T0*)C)),"symmetric");
16904 fd.assertion_flag=1;
16905 }
16906 se_dst=caller;/*unlink*/
16907 return R;
16908 }
16909
16910 void r114execute(se_dump_stack*caller,T114* C){
16911 static se_frame_descriptor fd={"execute COMMAND_ACTIVATE",1,0,"%R114%",1};
16912 se_dump_stack ds;
16913 ds.fd=&fd;
16914 ds.current=((void**)&C);
16915 ds.p=239078410;
16916 ds.caller=caller;
16917 ds.locals=NULL;
16918 se_dst=&ds;/*link*/
16919 (ds.p=239078926);
16920 X30raise_signal(&ds,239078916,(/*RF2*/(C)->_main/*4*/),X30signal_activate(&ds,239078952,(/*RF2*/(C)->_main/*4*/)));
16921 se_dst=caller;/*unlink*/
16922 }
16923
16924 T0* r114twin(se_dump_stack*caller,T114* C){
16925 T0* R=NULL;
16926 void**locals[1];
16927 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R114%Result%R114%",1};
16928 se_dump_stack ds;
16929 ds.fd=&fd;
16930 ds.current=((void**)&C);
16931 ds.p=2140182;
16932 ds.caller=caller;
16933 ds.locals=locals;
16934 locals[0]=(void**)&R;
16935 se_dst=&ds;/*link*/
16936 R=((void*)new114());
16937 *((T114*)R)=*C;
16938 if(fd.assertion_flag){
16939 fd.assertion_flag=0;
16940 (ds.p=2142256);
16941 ac_ens(r114is_equal(&ds,((T114*)ci(114,R,2142242)),(T0*)C),"equal");
16942 fd.assertion_flag=1;
16943 }
16944 se_dst=caller;/*unlink*/
16945 return R;
16946 }
16947
16948 T6 r135is_equal(se_dump_stack*caller,T135* C,T0* a1){
16949 T6 R=0;
16950 void**locals[2];
16951 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R135%other%R135%Result%E6%",1};
16952 se_dump_stack ds;
16953 ds.fd=&fd;
16954 ds.current=((void**)&C);
16955 ds.p=2120968;
16956 ds.caller=caller;
16957 ds.locals=locals;
16958 locals[0]=(void**)&a1;
16959 locals[1]=(void**)&R;
16960 se_dst=&ds;/*link*/
16961 se_require_uppermost_flag=1;
16962 if(fd.assertion_flag){
16963 fd.assertion_flag=0;
16964 (ds.p=2122048);
16965 ac_req((a1)!=((void*)(NULL)),"other_not_void");
16966 fd.assertion_flag=1;
16967 }
16968 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
16969 fd.assertion_flag=0;
16970 (ds.p=2122846);
16971 ac_ens((!(r135standard_is_equal(&ds,C,a1)))||(R),"consistent");
16972 (ds.p=2123064);
16973 ac_ens((!(R))||(r135is_equal(&ds,((T135*)ci(135,a1,2123080)),(T0*)C)),"symmetric");
16974 fd.assertion_flag=1;
16975 }
16976 se_dst=caller;/*unlink*/
16977 return R;
16978 }
16979
16980 void r135make(se_dump_stack*caller,T135* C,T0* a1){
16981 void**locals[1];
16982 static se_frame_descriptor fd={"make COMMAND_QUIT",1,1,"%R135%m%R16%",1};
16983 se_dump_stack ds;
16984 ds.fd=&fd;
16985 ds.current=((void**)&C);
16986 ds.p=283117322;
16987 ds.caller=caller;
16988 ds.locals=locals;
16989 locals[0]=(void**)&a1;
16990 se_dst=&ds;/*link*/
16991 (ds.p=283117828);
16992 (/*SFN*/C->_main/*4*/)=a1;
16993 se_dst=caller;/*unlink*/
16994 }
16995
16996 T6 r135standard_is_equal(se_dump_stack*caller,T135* C,T0* a1){
16997 T6 R=0;
16998 void**locals[2];
16999 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R135%other%R135%Result%E6%",1};
17000 se_dump_stack ds;
17001 ds.fd=&fd;
17002 ds.current=((void**)&C);
17003 ds.p=2128406;
17004 ds.caller=caller;
17005 ds.locals=locals;
17006 locals[0]=(void**)&a1;
17007 locals[1]=(void**)&R;
17008 se_dst=&ds;/*link*/
17009 se_require_uppermost_flag=1;
17010 if(fd.assertion_flag){
17011 fd.assertion_flag=0;
17012 (ds.p=2129184);
17013 ac_req((a1)!=((void*)(NULL)),NULL);
17014 fd.assertion_flag=1;
17015 }
17016 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
17017 fd.assertion_flag=0;
17018 (ds.p=2129976);
17019 ac_ens((!(R))||(r135standard_is_equal(&ds,((T135*)ci(135,a1,2129992)),(T0*)C)),"symmetric");
17020 fd.assertion_flag=1;
17021 }
17022 se_dst=caller;/*unlink*/
17023 return R;
17024 }
17025
17026 void r135execute(se_dump_stack*caller,T135* C){
17027 static se_frame_descriptor fd={"execute COMMAND_QUIT",1,0,"%R135%",1};
17028 se_dump_stack ds;
17029 ds.fd=&fd;
17030 ds.current=((void**)&C);
17031 ds.p=283118602;
17032 ds.caller=caller;
17033 ds.locals=NULL;
17034 se_dst=&ds;/*link*/
17035 (ds.p=283119118);
17036 r16quit(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),283119108)));
17037 se_dst=caller;/*unlink*/
17038 }
17039
17040 T0* r135twin(se_dump_stack*caller,T135* C){
17041 T0* R=NULL;
17042 void**locals[1];
17043 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R135%Result%R135%",1};
17044 se_dump_stack ds;
17045 ds.fd=&fd;
17046 ds.current=((void**)&C);
17047 ds.p=2140182;
17048 ds.caller=caller;
17049 ds.locals=locals;
17050 locals[0]=(void**)&R;
17051 se_dst=&ds;/*link*/
17052 R=((void*)new135());
17053 *((T135*)R)=*C;
17054 if(fd.assertion_flag){
17055 fd.assertion_flag=0;
17056 (ds.p=2142256);
17057 ac_ens(r135is_equal(&ds,((T135*)ci(135,R,2142242)),(T0*)C),"equal");
17058 fd.assertion_flag=1;
17059 }
17060 se_dst=caller;/*unlink*/
17061 return R;
17062 }
17063
17064 void r130parse_scores(se_dump_stack*caller,T130* C){
17065 T0* _level=NULL;
17066 T0* _sc=NULL;
17067 T0* _n=NULL;
17068 T2 _i=0;
17069 T2 _j=0;
17070 void**locals[5];
17071 static se_frame_descriptor fd={"parse_scores IO_SCORE",1,5,"%R130%level%R7%sc%R96%n%R7%i%E2%j%E2%",1};
17072 se_dump_stack ds;
17073 ds.fd=&fd;
17074 ds.current=((void**)&C);
17075 ds.p=272635402;
17076 ds.caller=caller;
17077 ds.locals=locals;
17078 locals[0]=(void**)&_level;
17079 locals[1]=(void**)&_sc;
17080 locals[2]=(void**)&_n;
17081 locals[3]=(void**)&_i;
17082 locals[4]=(void**)&_j;
17083 se_dst=&ds;/*link*/
17084 (ds.p=272637196);
17085 r55read_word(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272637188)));
17086 while (!(((ds.p=272637720),r55end_of_input(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272637712))))))
17087 {
17088 (ds.p=272638220);
17089 {T7*n=new7();
17090 r7copy(&ds,n,r55last_string(&ds));
17091 _level=((T0*)n);
17092 se_i7(&ds,n);}
17093 (ds.p=272638484);
17094 r55read_word(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272638476)));
17095 (ds.p=272638732);
17096 {T7*n=new7();
17097 r7copy(&ds,n,r55last_string(&ds));
17098 _n=((T0*)n);
17099 se_i7(&ds,n);}
17100 (ds.p=272638996);
17101 r55read_word(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272638988)));
17102 (ds.p=272639244);
17103 _i=r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,r55last_string(&ds),272639262))));
17104 (ds.p=272639508);
17105 r55read_word(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272639500)));
17106 (ds.p=272639756);
17107 _j=r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,r55last_string(&ds),272639774))));
17108 (ds.p=272640012);
17109 {T96*n=new96();
17110 r96make(&ds,n,_n,_i,_j);
17111 _sc=((T0*)n);
17112 }
17113 (ds.p=272640292);
17114 r131put(&ds,se_i131(&ds,((T131*)ci(131,(/*RF2*/(C)->_score_table/*4*/),272640268))),_sc,_level);
17115 (ds.p=272640532);
17116 r55read_word(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272640524)));
17117 }
17118 se_dst=caller;/*unlink*/
17119 }
17120
17121 void r130into_preset_list(se_dump_stack*caller,T130* C,T0* a1){
17122 void**locals[1];
17123 static se_frame_descriptor fd={"into_preset_list IO_SCORE",1,1,"%R130%l%R66%",1};
17124 se_dump_stack ds;
17125 ds.fd=&fd;
17126 ds.current=((void**)&C);
17127 ds.p=272641546;
17128 ds.caller=caller;
17129 ds.locals=locals;
17130 locals[0]=(void**)&a1;
17131 se_dst=&ds;/*link*/
17132 (ds.p=272642056);
17133 r66do_all(&ds,se_i66(&ds,((T66*)ci(66,a1,272642052))),agent7(&ds,(T0*)C));
17134 se_dst=caller;/*unlink*/
17135 }
17136
17137 void r130import_score(se_dump_stack*caller,T130* C,T0* a1){
17138 void**locals[1];
17139 static se_frame_descriptor fd={"import_score IO_SCORE",1,1,"%R130%p%R65%",1};
17140 se_dump_stack ds;
17141 ds.fd=&fd;
17142 ds.current=((void**)&C);
17143 ds.p=272645898;
17144 ds.caller=caller;
17145 ds.locals=locals;
17146 locals[0]=(void**)&a1;
17147 se_dst=&ds;/*link*/
17148 /*[IF*/
17149 if(((ds.p=272646430),((/*RF2*/(((T65*)ci(65,a1,272646410)))->_hiscore/*12*/))!=((void*)(NULL)))){
17150 (ds.p=272646692);
17151 r131put(&ds,se_i131(&ds,((T131*)ci(131,(/*RF2*/(C)->_score_table/*4*/),272646668))),(/*RF2*/(((T65*)ci(65,a1,272646700)))->_hiscore/*12*/),(/*RF2*/(((T65*)ci(65,a1,272646722)))->_name/*4*/));
17152 }
17153 /*FI]*/
17154 se_dst=caller;/*unlink*/
17155 }
17156
17157 T6 r130is_equal(se_dump_stack*caller,T130* C,T0* a1){
17158 T6 R=0;
17159 void**locals[2];
17160 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R130%other%R130%Result%E6%",1};
17161 se_dump_stack ds;
17162 ds.fd=&fd;
17163 ds.current=((void**)&C);
17164 ds.p=2120968;
17165 ds.caller=caller;
17166 ds.locals=locals;
17167 locals[0]=(void**)&a1;
17168 locals[1]=(void**)&R;
17169 se_dst=&ds;/*link*/
17170 se_require_uppermost_flag=1;
17171 if(fd.assertion_flag){
17172 fd.assertion_flag=0;
17173 (ds.p=2122048);
17174 ac_req((a1)!=((void*)(NULL)),"other_not_void");
17175 fd.assertion_flag=1;
17176 }
17177 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
17178 fd.assertion_flag=0;
17179 (ds.p=2122846);
17180 ac_ens((!(r130standard_is_equal(&ds,C,a1)))||(R),"consistent");
17181 (ds.p=2123064);
17182 ac_ens((!(R))||(r130is_equal(&ds,((T130*)ci(130,a1,2123080)),(T0*)C)),"symmetric");
17183 fd.assertion_flag=1;
17184 }
17185 se_dst=caller;/*unlink*/
17186 return R;
17187 }
17188
17189 void r130load(se_dump_stack*caller,T130* C,T0* a1){
17190 void**locals[1];
17191 static se_frame_descriptor fd={"load IO_SCORE",1,1,"%R130%filename%R7%",1};
17192 se_dump_stack ds;
17193 ds.fd=&fd;
17194 ds.current=((void**)&C);
17195 ds.p=272633098;
17196 ds.caller=caller;
17197 ds.locals=locals;
17198 locals[0]=(void**)&a1;
17199 se_dst=&ds;/*link*/
17200 (ds.p=272633604);
17201 {T55*n=new55();
17202 r55connect_to(&ds,n,a1);
17203 (/*SFN*/C->_tfr/*8*/)=((T0*)n);
17204 }
17205 /*[IF*/
17206 if(((ds.p=272633874),r55is_connected(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272633866))))){
17207 (ds.p=272634124);
17208 r130parse_scores(&ds,C);
17209 (ds.p=272634388);
17210 r55disconnect(&ds,((T55*)ci(55,(/*RF2*/(C)->_tfr/*8*/),272634380)));
17211 }
17212 /*FI]*/
17213 se_dst=caller;/*unlink*/
17214 }
17215
17216 void r130make(se_dump_stack*caller,T130* C){
17217 static se_frame_descriptor fd={"make IO_SCORE",1,0,"%R130%",1};
17218 se_dump_stack ds;
17219 ds.fd=&fd;
17220 ds.current=((void**)&C);
17221 ds.p=272630794;
17222 ds.caller=caller;
17223 ds.locals=NULL;
17224 se_dst=&ds;/*link*/
17225 (ds.p=272631300);
17226 {T131*n=new131();
17227 r131make(&ds,n);
17228 (/*SFN*/C->_score_table/*4*/)=((T0*)n);
17229 se_i131(&ds,n);}
17230 se_dst=caller;/*unlink*/
17231 }
17232
17233 void r130from_preset_list(se_dump_stack*caller,T130* C,T0* a1){
17234 void**locals[1];
17235 static se_frame_descriptor fd={"from_preset_list IO_SCORE",1,1,"%R130%l%R66%",1};
17236 se_dump_stack ds;
17237 ds.fd=&fd;
17238 ds.current=((void**)&C);
17239 ds.p=272644618;
17240 ds.caller=caller;
17241 ds.locals=locals;
17242 locals[0]=(void**)&a1;
17243 se_dst=&ds;/*link*/
17244 (ds.p=272645128);
17245 r66do_all(&ds,se_i66(&ds,((T66*)ci(66,a1,272645124))),agent12(&ds,(T0*)C));
17246 se_dst=caller;/*unlink*/
17247 }
17248
17249 void r130export_score(se_dump_stack*caller,T130* C,T0* a1){
17250 void**locals[1];
17251 static se_frame_descriptor fd={"export_score IO_SCORE",1,1,"%R130%p%R65%",1};
17252 se_dump_stack ds;
17253 ds.fd=&fd;
17254 ds.current=((void**)&C);
17255 ds.p=272642826;
17256 ds.caller=caller;
17257 ds.locals=locals;
17258 locals[0]=(void**)&a1;
17259 se_dst=&ds;/*link*/
17260 /*[IF*/
17261 if(((ds.p=272643362),r131has(&ds,se_i131(&ds,((T131*)ci(131,(/*RF2*/(C)->_score_table/*4*/),272643338))),(/*RF2*/(((T65*)ci(65,a1,272643370)))->_name/*4*/)))){
17262 (ds.p=272643600);
17263 r65put_hiscore(&ds,((T65*)ci(65,a1,272643596)),r131at(&ds,se_i131(&ds,((T131*)ci(131,(/*RF2*/(C)->_score_table/*4*/),272643624))),(/*RF2*/(((T65*)ci(65,a1,272643654)))->_name/*4*/)));
17264 }
17265 /*FI]*/
17266 se_dst=caller;/*unlink*/
17267 }
17268
17269 T6 r130standard_is_equal(se_dump_stack*caller,T130* C,T0* a1){
17270 T6 R=0;
17271 void**locals[2];
17272 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R130%other%R130%Result%E6%",1};
17273 se_dump_stack ds;
17274 ds.fd=&fd;
17275 ds.current=((void**)&C);
17276 ds.p=2128406;
17277 ds.caller=caller;
17278 ds.locals=locals;
17279 locals[0]=(void**)&a1;
17280 locals[1]=(void**)&R;
17281 se_dst=&ds;/*link*/
17282 se_require_uppermost_flag=1;
17283 if(fd.assertion_flag){
17284 fd.assertion_flag=0;
17285 (ds.p=2129184);
17286 ac_req((a1)!=((void*)(NULL)),NULL);
17287 fd.assertion_flag=1;
17288 }
17289 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
17290 fd.assertion_flag=0;
17291 (ds.p=2129976);
17292 ac_ens((!(R))||(r130standard_is_equal(&ds,((T130*)ci(130,a1,2129992)),(T0*)C)),"symmetric");
17293 fd.assertion_flag=1;
17294 }
17295 se_dst=caller;/*unlink*/
17296 return R;
17297 }
17298
17299 void r130save(se_dump_stack*caller,T130* C,T0* a1){
17300 void**locals[1];
17301 static se_frame_descriptor fd={"save IO_SCORE",1,1,"%R130%filename%R7%",1};
17302 se_dump_stack ds;
17303 ds.fd=&fd;
17304 ds.current=((void**)&C);
17305 ds.p=272648202;
17306 ds.caller=caller;
17307 ds.locals=locals;
17308 locals[0]=(void**)&a1;
17309 se_dst=&ds;/*link*/
17310 (ds.p=272648708);
17311 {T146*n=new146();
17312 r146connect_to(&ds,n,a1);
17313 (/*SFN*/C->_tfw/*12*/)=((T0*)n);
17314 }
17315 (ds.p=272648988);
17316 r131do_all(&ds,se_i131(&ds,((T131*)ci(131,(/*RF2*/(C)->_score_table/*4*/),272648964))),agent11(&ds,(T0*)C));
17317 (ds.p=272649228);
17318 r146disconnect(&ds,((T146*)ci(146,(/*RF2*/(C)->_tfw/*12*/),272649220)));
17319 se_dst=caller;/*unlink*/
17320 }
17321
17322 T0* r130twin(se_dump_stack*caller,T130* C){
17323 T0* R=NULL;
17324 void**locals[1];
17325 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R130%Result%R130%",1};
17326 se_dump_stack ds;
17327 ds.fd=&fd;
17328 ds.current=((void**)&C);
17329 ds.p=2140182;
17330 ds.caller=caller;
17331 ds.locals=locals;
17332 locals[0]=(void**)&R;
17333 se_dst=&ds;/*link*/
17334 R=((void*)new130());
17335 *((T130*)R)=*C;
17336 if(fd.assertion_flag){
17337 fd.assertion_flag=0;
17338 (ds.p=2142256);
17339 ac_ens(r130is_equal(&ds,((T130*)ci(130,R,2142242)),(T0*)C),"equal");
17340 fd.assertion_flag=1;
17341 }
17342 se_dst=caller;/*unlink*/
17343 return R;
17344 }
17345
17346 void r130write_score(se_dump_stack*caller,T130* C,T0* a1,T0* a2){
17347 void**locals[2];
17348 static se_frame_descriptor fd={"write_score IO_SCORE",1,2,"%R130%sc%R96%level%R7%",1};
17349 se_dump_stack ds;
17350 ds.fd=&fd;
17351 ds.current=((void**)&C);
17352 ds.p=272649994;
17353 ds.caller=caller;
17354 ds.locals=locals;
17355 locals[0]=(void**)&a1;
17356 locals[1]=(void**)&a2;
17357 se_dst=&ds;/*link*/
17358 (ds.p=272650508);
17359 r146put_string(&ds,((T146*)ci(146,(/*RF2*/(C)->_tfw/*12*/),272650500)),r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,a2,272650530))),((T0*)se_ms(1," "))),272650542))),(/*RF2*/(((T96*)ci(96,a1,272650558)))->_name/*4*/)),272650554))),((T0*)se_ms(1," "))));
17360 (ds.p=272650764);
17361 r146put_string(&ds,((T146*)ci(146,(/*RF2*/(C)->_tfw/*12*/),272650756)),r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r2to_string(&ds,(/*RF2*/(((T96*)ci(96,a1,272650786)))->_score/*8*/)),272650804))),((T0*)se_ms(1," "))),272650824))),r2to_string(&ds,(/*RF2*/(((T96*)ci(96,a1,272650840)))->_time/*12*/))),272650836))),((T0*)se_ms(1,"\n"))));
17362 se_dst=caller;/*unlink*/
17363 }
17364
17365 void r117put_command(se_dump_stack*caller,T117* C,T0* a1,T2 a2){
17366 void**locals[2];
17367 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R117%c%R25%i%E2%",1};
17368 se_dump_stack ds;
17369 ds.fd=&fd;
17370 ds.current=((void**)&C);
17371 ds.p=62923274;
17372 ds.caller=caller;
17373 ds.locals=locals;
17374 locals[0]=(void**)&a1;
17375 locals[1]=(void**)&a2;
17376 se_dst=&ds;/*link*/
17377 (ds.p=62923806);
17378 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
17379 se_dst=caller;/*unlink*/
17380 }
17381
17382 void r117move_widget(se_dump_stack*caller,T117* C,T0* a1,T2 a2,T2 a3){
17383 void**locals[3];
17384 static se_frame_descriptor fd={"move_widget WINDOW",1,3,"%R117%w%R30%x%E2%y%E2%",1};
17385 se_dump_stack ds;
17386 ds.fd=&fd;
17387 ds.current=((void**)&C);
17388 ds.p=60835850;
17389 ds.caller=caller;
17390 ds.locals=locals;
17391 locals[0]=(void**)&a1;
17392 locals[1]=(void**)&a2;
17393 locals[2]=(void**)&a3;
17394 se_dst=&ds;/*link*/
17395 (ds.p=60836360);
17396 X30put_xy(&ds,60836356,a1,((X30offsetx(&ds,60836374,a1))-((/*RF2*/(C)->_offsetx/*9*/)))+(a2),((X30offsety(&ds,60836424,a1))-((/*RF2*/(C)->_offsety/*13*/)))+(a3));
17397 se_dst=caller;/*unlink*/
17398 }
17399
17400 void r117change_focus(se_dump_stack*caller,T117* C,T0* a1){
17401 void**locals[1];
17402 static se_frame_descriptor fd={"change_focus WINDOW",1,1,"%R117%w%R30%",1};
17403 se_dump_stack ds;
17404 ds.fd=&fd;
17405 ds.current=((void**)&C);
17406 ds.p=60832010;
17407 ds.caller=caller;
17408 ds.locals=locals;
17409 locals[0]=(void**)&a1;
17410 se_dst=&ds;/*link*/
17411 /*[IF*/
17412 if(((ds.p=60832548),((/*RF2*/(C)->_focus_widget/*29*/))!=((void*)(NULL)))){
17413 (ds.p=60832806);
17414 X30put_focus(&ds,60832780,(/*RF2*/(C)->_focus_widget/*29*/),0);
17415 }
17416 /*FI]*/
17417 (ds.p=60833284);
17418 (/*SFN*/C->_focus_widget/*29*/)=a1;
17419 (ds.p=60833566);
17420 X30put_focus(&ds,60833540,(/*RF2*/(C)->_focus_widget/*29*/),1);
17421 se_dst=caller;/*unlink*/
17422 }
17423
17424 void r117_30Pwidget_init(se_dump_stack*caller,T117* C){
17425 static se_frame_descriptor fd={"Precursor widget_init (widget_init WIDGET)",1,0,"%R117%",1};
17426 se_dump_stack ds;
17427 ds.fd=&fd;
17428 ds.current=((void**)&C);
17429 ds.p=62919434;
17430 ds.caller=caller;
17431 ds.locals=NULL;
17432 se_dst=&ds;/*link*/
17433 (ds.p=62919940);
17434 {T45*n=new45();
17435 r45make(&ds,n);
17436 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
17437 se_i45(&ds,n);}
17438 se_dst=caller;/*unlink*/
17439 }
17440
17441 T6 r117is_equal(se_dump_stack*caller,T117* C,T0* a1){
17442 T6 R=0;
17443 void**locals[2];
17444 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R117%other%R117%Result%E6%",1};
17445 se_dump_stack ds;
17446 ds.fd=&fd;
17447 ds.current=((void**)&C);
17448 ds.p=2120968;
17449 ds.caller=caller;
17450 ds.locals=locals;
17451 locals[0]=(void**)&a1;
17452 locals[1]=(void**)&R;
17453 se_dst=&ds;/*link*/
17454 se_require_uppermost_flag=1;
17455 if(fd.assertion_flag){
17456 fd.assertion_flag=0;
17457 (ds.p=2122048);
17458 ac_req((a1)!=((void*)(NULL)),"other_not_void");
17459 fd.assertion_flag=1;
17460 }
17461 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
17462 fd.assertion_flag=0;
17463 (ds.p=2122846);
17464 ac_ens((!(r117standard_is_equal(&ds,C,a1)))||(R),"consistent");
17465 (ds.p=2123064);
17466 ac_ens((!(R))||(r117is_equal(&ds,((T117*)ci(117,a1,2123080)),(T0*)C)),"symmetric");
17467 fd.assertion_flag=1;
17468 }
17469 se_dst=caller;/*unlink*/
17470 return R;
17471 }
17472
17473 void r117_30Pput_xy(se_dump_stack*caller,T117* C,T2 a1,T2 a2){
17474 void**locals[2];
17475 static se_frame_descriptor fd={"Precursor put_xy (put_xy WIDGET)",1,2,"%R117%x%E2%y%E2%",1};
17476 se_dump_stack ds;
17477 ds.fd=&fd;
17478 ds.current=((void**)&C);
17479 ds.p=62927626;
17480 ds.caller=caller;
17481 ds.locals=locals;
17482 locals[0]=(void**)&a1;
17483 locals[1]=(void**)&a2;
17484 se_dst=&ds;/*link*/
17485 (ds.p=62928132);
17486 (/*SFN*/C->_offsetx/*9*/)=a1;
17487 (ds.p=62928388);
17488 (/*SFN*/C->_offsety/*13*/)=a2;
17489 se_dst=caller;/*unlink*/
17490 }
17491
17492 void r117preset_change(se_dump_stack*caller,T117* C){
17493 T0* _p=NULL;
17494 void**locals[1];
17495 static se_frame_descriptor fd={"preset_change OPTIONS_WINDOW",1,1,"%R117%p%R65%",1};
17496 se_dump_stack ds;
17497 ds.fd=&fd;
17498 ds.current=((void**)&C);
17499 ds.p=245392906;
17500 ds.caller=caller;
17501 ds.locals=locals;
17502 locals[0]=(void**)&_p;
17503 se_dst=&ds;/*link*/
17504 /*[IF*/
17505 if(((ds.p=245394220),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245394186)))->_string/*29*/),245394206))),((T0*)se_ms(6,"Custom"))))){
17506 (ds.p=245394444);
17507 r117put_info(&ds,C,NULL,r117custom(&ds));
17508 }
17509 else{
17510 (ds.p=245394956);
17511 _p=r117get_preset(&ds,C,(/*RF2*/(((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245394988)))->_string/*29*/));
17512 (ds.p=245395212);
17513 r117put_info(&ds,C,_p,(/*RF2*/(((T65*)ci(65,_p,245395236)))->_setting/*8*/));
17514 }
17515 /*FI]*/
17516 se_dst=caller;/*unlink*/
17517 }
17518
17519 void r117add_widget(se_dump_stack*caller,T117* C,T0* a1,T2 a2,T2 a3){
17520 void**locals[3];
17521 static se_frame_descriptor fd={"add_widget WINDOW",1,3,"%R117%w%R30%x%E2%y%E2%",1};
17522 se_dump_stack ds;
17523 ds.fd=&fd;
17524 ds.current=((void**)&C);
17525 ds.p=60819978;
17526 ds.caller=caller;
17527 ds.locals=locals;
17528 locals[0]=(void**)&a1;
17529 locals[1]=(void**)&a2;
17530 locals[2]=(void**)&a3;
17531 se_dst=&ds;/*link*/
17532 (ds.p=60820488);
17533 X30put_xy(&ds,60820484,a1,((/*RF2*/(C)->_offsetx/*9*/))+(a2),((/*RF2*/(C)->_offsety/*13*/))+(a3));
17534 (ds.p=60820764);
17535 r39add_last(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60820740))),a1);
17536 se_dst=caller;/*unlink*/
17537 }
17538
17539 void r117put_info(se_dump_stack*caller,T117* C,T0* a1,T0* a2){
17540 void**locals[2];
17541 static se_frame_descriptor fd={"put_info OPTIONS_WINDOW",1,2,"%R117%p%R65%s%R68%",1};
17542 se_dump_stack ds;
17543 ds.fd=&fd;
17544 ds.current=((void**)&C);
17545 ds.p=245400330;
17546 ds.caller=caller;
17547 ds.locals=locals;
17548 locals[0]=(void**)&a1;
17549 locals[1]=(void**)&a2;
17550 se_dst=&ds;/*link*/
17551 (ds.p=245400836);
17552 (/*SFN*/C->_preset/*53*/)=a1;
17553 /*[IF*/
17554 if(((ds.p=245401102),(a1)==((void*)(NULL)))){
17555 (ds.p=245401376);
17556 r120put_string(&ds,((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245401356)),((T0*)se_ms(6,"Custom")));
17557 }
17558 else{
17559 (ds.p=245401888);
17560 r120put_string(&ds,((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245401868)),(/*RF2*/(((T65*)ci(65,a1,245401910)))->_name/*4*/));
17561 }
17562 /*FI]*/
17563 (ds.p=245402388);
17564 r126put_value(&ds,((T126*)ci(126,(/*RF2*/(C)->_wrap_cb/*37*/),245402372)),(/*RF2*/(((T68*)ci(68,a2,245402408)))->_wrap/*12*/));
17565 (ds.p=245402646);
17566 r98put_string(&ds,((T98*)ci(98,(/*RF2*/(C)->_width_tb/*41*/),245402628)),r2to_string(&ds,(/*RF2*/(((T68*)ci(68,a2,245402668)))->_width/*4*/)));
17567 (ds.p=245402904);
17568 r98put_string(&ds,((T98*)ci(98,(/*RF2*/(C)->_height_tb/*45*/),245402884)),r2to_string(&ds,(/*RF2*/(((T68*)ci(68,a2,245402926)))->_height/*8*/)));
17569 se_dst=caller;/*unlink*/
17570 }
17571
17572 void r117widget_init(se_dump_stack*caller,T117* C){
17573 static se_frame_descriptor fd={"widget_init WINDOW",1,0,"%R117%",1};
17574 se_dump_stack ds;
17575 ds.fd=&fd;
17576 ds.current=((void**)&C);
17577 ds.p=60822026;
17578 ds.caller=caller;
17579 ds.locals=NULL;
17580 se_dst=&ds;/*link*/
17581 r117_30Pwidget_init(&ds,C);
17582 (ds.p=60822788);
17583 {T39*n=new39();
17584 r39make(&ds,n);
17585 (/*SFN*/C->_widget_list/*25*/)=((T0*)n);
17586 se_i39(&ds,n);}
17587 se_dst=caller;/*unlink*/
17588 }
17589
17590 void r117put_preset_list(se_dump_stack*caller,T117* C,T0* a1){
17591 T0* _it=NULL;
17592 T0* _sl=NULL;
17593 void**locals[3];
17594 static se_frame_descriptor fd={"put_preset_list OPTIONS_WINDOW",1,3,"%R117%l%R66%it%R119%sl%R118%",1};
17595 se_dump_stack ds;
17596 ds.fd=&fd;
17597 ds.current=((void**)&C);
17598 ds.p=245371914;
17599 ds.caller=caller;
17600 ds.locals=locals;
17601 locals[0]=(void**)&a1;
17602 locals[1]=(void**)&_it;
17603 locals[2]=(void**)&_sl;
17604 se_dst=&ds;/*link*/
17605 (ds.p=245373188);
17606 {T118*n=new118();
17607 r118make(&ds,n);
17608 _sl=((T0*)n);
17609 se_i118(&ds,n);}
17610 (ds.p=245373444);
17611 _it=r66get_new_iterator(&ds,se_i66(&ds,((T66*)ci(66,a1,245373456))));
17612 (ds.p=245373716);
17613 r122start(&ds,((T122*)ci(122,_it,245373710)));
17614 while (!(((ds.p=245373974),r122is_off(&ds,((T122*)ci(122,_it,245373968))))))
17615 {
17616 (ds.p=245374482);
17617 r118add_last(&ds,se_i118(&ds,((T118*)ci(118,_sl,245374476))),(/*RF2*/(((T65*)ci(65,r122item(&ds,((T122*)ci(122,_it,245374500))),245374506)))->_name/*4*/));
17618 (ds.p=245374738);
17619 r122next(&ds,((T122*)ci(122,_it,245374732)));
17620 }
17621 (ds.p=245375242);
17622 r118add_last(&ds,se_i118(&ds,((T118*)ci(118,_sl,245375236))),((T0*)se_ms(6,"Custom")));
17623 (ds.p=245375512);
17624 r120put_list(&ds,((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245375492)),_sl);
17625 (ds.p=245375748);
17626 (/*SFN*/C->_preset_list/*57*/)=a1;
17627 se_dst=caller;/*unlink*/
17628 }
17629
17630 void r117make(se_dump_stack*caller,T117* C){
17631 T0* _b=NULL;
17632 T0* _c=NULL;
17633 T0* _l=NULL;
17634 void**locals[3];
17635 static se_frame_descriptor fd={"make OPTIONS_WINDOW",1,3,"%R117%b%R113%c%R25%l%R107%",1};
17636 se_dump_stack ds;
17637 ds.fd=&fd;
17638 ds.current=((void**)&C);
17639 ds.p=245376522;
17640 ds.caller=caller;
17641 ds.locals=locals;
17642 locals[0]=(void**)&_b;
17643 locals[1]=(void**)&_c;
17644 locals[2]=(void**)&_l;
17645 se_dst=&ds;/*link*/
17646 (ds.p=245378052);
17647 r117widget_init(&ds,C);
17648 (ds.p=245378564);
17649 r117put_size(&ds,C,200,200);
17650 (ds.p=245378820);
17651 {T113*n=new113();
17652 r113make(&ds,n,((T0*)se_ms(2,"Ok")));
17653 _b=((T0*)n);
17654 }
17655 (ds.p=245379080);
17656 r113put_size(&ds,((T113*)ci(113,_b,245379076)),60,20);
17657 (ds.p=245379332);
17658 {T114*n=new114();
17659 r114make(&ds,n,(T0*)C);
17660 _c=((T0*)n);
17661 }
17662 (ds.p=245379592);
17663 r113put_command(&ds,((T113*)ci(113,_b,245379588)),_c,1);
17664 (ds.p=245379844);
17665 r117add_widget(&ds,C,_b,30,175);
17666 (ds.p=245380356);
17667 {T113*n=new113();
17668 r113make(&ds,n,((T0*)se_ms(6,"Cancel")));
17669 _b=((T0*)n);
17670 }
17671 (ds.p=245380616);
17672 r113put_size(&ds,((T113*)ci(113,_b,245380612)),60,20);
17673 (ds.p=245380868);
17674 {T129*n=new129();
17675 r129make(&ds,n,(T0*)C);
17676 _c=((T0*)n);
17677 }
17678 (ds.p=245381128);
17679 r113put_command(&ds,((T113*)ci(113,_b,245381124)),_c,1);
17680 (ds.p=245381380);
17681 r117add_widget(&ds,C,_b,100,175);
17682 (ds.p=245381892);
17683 {T107*n=new107();
17684 r107make(&ds,n,((T0*)se_ms(5,"Level")));
17685 _l=((T0*)n);
17686 }
17687 (ds.p=245382152);
17688 r107put_size(&ds,((T107*)ci(107,_l,245382148)),50,20);
17689 (ds.p=245382404);
17690 r117add_widget(&ds,C,_l,10,10);
17691 (ds.p=245382660);
17692 {T120*n=new120();
17693 r120make(&ds,n);
17694 (/*SFN*/C->_preset_lb/*33*/)=((T0*)n);
17695 }
17696 (ds.p=245382916);
17697 {T128*n=new128();
17698 r128make(&ds,n,(T0*)C);
17699 _c=((T0*)n);
17700 }
17701 (ds.p=245383192);
17702 r120put_command(&ds,((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245383172)),_c,3);
17703 (ds.p=245383448);
17704 r120put_size(&ds,((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245383428)),70,16);
17705 (ds.p=245383684);
17706 r117add_widget(&ds,C,(/*RF2*/(C)->_preset_lb/*33*/),70,10);
17707 (ds.p=245384196);
17708 {T107*n=new107();
17709 r107make(&ds,n,((T0*)se_ms(5,"Width")));
17710 _l=((T0*)n);
17711 }
17712 (ds.p=245384456);
17713 r107put_size(&ds,((T107*)ci(107,_l,245384452)),50,20);
17714 (ds.p=245384708);
17715 r117add_widget(&ds,C,_l,10,30);
17716 (ds.p=245384964);
17717 {T98*n=new98();
17718 r98make(&ds,n);
17719 (/*SFN*/C->_width_tb/*41*/)=((T0*)n);
17720 }
17721 (ds.p=245385220);
17722 {T127*n=new127();
17723 r127make(&ds,n,(T0*)C);
17724 _c=((T0*)n);
17725 }
17726 (ds.p=245385494);
17727 r98put_command(&ds,((T98*)ci(98,(/*RF2*/(C)->_width_tb/*41*/),245385476)),_c,3);
17728 (ds.p=245385750);
17729 r98put_size(&ds,((T98*)ci(98,(/*RF2*/(C)->_width_tb/*41*/),245385732)),40,16);
17730 (ds.p=245385988);
17731 r117add_widget(&ds,C,(/*RF2*/(C)->_width_tb/*41*/),70,30);
17732 (ds.p=245386500);
17733 {T107*n=new107();
17734 r107make(&ds,n,((T0*)se_ms(6,"Height")));
17735 _l=((T0*)n);
17736 }
17737 (ds.p=245386760);
17738 r107put_size(&ds,((T107*)ci(107,_l,245386756)),50,20);
17739 (ds.p=245387012);
17740 r117add_widget(&ds,C,_l,10,50);
17741 (ds.p=245387268);
17742 {T98*n=new98();
17743 r98make(&ds,n);
17744 (/*SFN*/C->_height_tb/*45*/)=((T0*)n);
17745 }
17746 (ds.p=245387524);
17747 {T127*n=new127();
17748 r127make(&ds,n,(T0*)C);
17749 _c=((T0*)n);
17750 }
17751 (ds.p=245387800);
17752 r98put_command(&ds,((T98*)ci(98,(/*RF2*/(C)->_height_tb/*45*/),245387780)),_c,3);
17753 (ds.p=245388056);
17754 r98put_size(&ds,((T98*)ci(98,(/*RF2*/(C)->_height_tb/*45*/),245388036)),40,16);
17755 (ds.p=245388292);
17756 r117add_widget(&ds,C,(/*RF2*/(C)->_height_tb/*45*/),70,50);
17757 (ds.p=245388804);
17758 {T107*n=new107();
17759 r107make(&ds,n,((T0*)se_ms(4,"Wrap")));
17760 _l=((T0*)n);
17761 }
17762 (ds.p=245389064);
17763 r107put_size(&ds,((T107*)ci(107,_l,245389060)),50,20);
17764 (ds.p=245389316);
17765 r117add_widget(&ds,C,_l,10,70);
17766 (ds.p=245389572);
17767 {T126*n=new126();
17768 r126make(&ds,n);
17769 (/*SFN*/C->_wrap_cb/*37*/)=((T0*)n);
17770 }
17771 (ds.p=245389828);
17772 {T127*n=new127();
17773 r127make(&ds,n,(T0*)C);
17774 _c=((T0*)n);
17775 }
17776 (ds.p=245390100);
17777 r126put_command(&ds,((T126*)ci(126,(/*RF2*/(C)->_wrap_cb/*37*/),245390084)),_c,3);
17778 (ds.p=245390356);
17779 r126put_size(&ds,((T126*)ci(126,(/*RF2*/(C)->_wrap_cb/*37*/),245390340)),12,12);
17780 (ds.p=245390596);
17781 r117add_widget(&ds,C,(/*RF2*/(C)->_wrap_cb/*37*/),75,75);
17782 se_dst=caller;/*unlink*/
17783 }
17784
17785 T6 r117contains(se_dump_stack*caller,T117* C,T2 a1,T2 a2){
17786 T6 R=0;
17787 void**locals[3];
17788 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R117%x%E2%y%E2%Result%E6%",1};
17789 se_dump_stack ds;
17790 ds.fd=&fd;
17791 ds.current=((void**)&C);
17792 ds.p=62930698;
17793 ds.caller=caller;
17794 ds.locals=locals;
17795 locals[0]=(void**)&a1;
17796 locals[1]=(void**)&a2;
17797 locals[2]=(void**)&R;
17798 se_dst=&ds;/*link*/
17799 (ds.p=62931204);
17800 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
17801 se_dst=caller;/*unlink*/
17802 return R;
17803 }
17804
17805 void r117fill_rect(se_dump_stack*caller,T117* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
17806 void**locals[5];
17807 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R117%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
17808 se_dump_stack ds;
17809 ds.fd=&fd;
17810 ds.current=((void**)&C);
17811 ds.p=62937354;
17812 ds.caller=caller;
17813 ds.locals=locals;
17814 locals[0]=(void**)&a1;
17815 locals[1]=(void**)&a2;
17816 locals[2]=(void**)&a3;
17817 locals[3]=(void**)&a4;
17818 locals[4]=(void**)&a5;
17819 se_dst=&ds;/*link*/
17820 (ds.p=62937860);
17821 r117ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
17822 se_dst=caller;/*unlink*/
17823 }
17824
17825 void r117put_xy(se_dump_stack*caller,T117* C,T2 a1,T2 a2){
17826 void**locals[2];
17827 static se_frame_descriptor fd={"put_xy WINDOW",1,2,"%R117%x%E2%y%E2%",1};
17828 se_dump_stack ds;
17829 ds.fd=&fd;
17830 ds.current=((void**)&C);
17831 ds.p=60834314;
17832 ds.caller=caller;
17833 ds.locals=locals;
17834 locals[0]=(void**)&a1;
17835 locals[1]=(void**)&a2;
17836 se_dst=&ds;/*link*/
17837 (ds.p=60834844);
17838 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60834820))),agent6(&ds,(T0*)C,a1,a2));
17839 r117_30Pput_xy(&ds,C,a1,a2);
17840 se_dst=caller;/*unlink*/
17841 }
17842
17843 T6 r117standard_is_equal(se_dump_stack*caller,T117* C,T0* a1){
17844 T6 R=0;
17845 void**locals[2];
17846 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R117%other%R117%Result%E6%",1};
17847 se_dump_stack ds;
17848 ds.fd=&fd;
17849 ds.current=((void**)&C);
17850 ds.p=2128406;
17851 ds.caller=caller;
17852 ds.locals=locals;
17853 locals[0]=(void**)&a1;
17854 locals[1]=(void**)&R;
17855 se_dst=&ds;/*link*/
17856 se_require_uppermost_flag=1;
17857 if(fd.assertion_flag){
17858 fd.assertion_flag=0;
17859 (ds.p=2129184);
17860 ac_req((a1)!=((void*)(NULL)),NULL);
17861 fd.assertion_flag=1;
17862 }
17863 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
17864 fd.assertion_flag=0;
17865 (ds.p=2129976);
17866 ac_ens((!(R))||(r117standard_is_equal(&ds,((T117*)ci(117,a1,2129992)),(T0*)C)),"symmetric");
17867 fd.assertion_flag=1;
17868 }
17869 se_dst=caller;/*unlink*/
17870 return R;
17871 }
17872
17873 void r117put_size(se_dump_stack*caller,T117* C,T2 a1,T2 a2){
17874 void**locals[2];
17875 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R117%w%E2%h%E2%",1};
17876 se_dump_stack ds;
17877 ds.fd=&fd;
17878 ds.current=((void**)&C);
17879 ds.p=62929162;
17880 ds.caller=caller;
17881 ds.locals=locals;
17882 locals[0]=(void**)&a1;
17883 locals[1]=(void**)&a2;
17884 se_dst=&ds;/*link*/
17885 (ds.p=62929668);
17886 (/*SFN*/C->_width/*17*/)=a1;
17887 (ds.p=62929924);
17888 (/*SFN*/C->_height/*21*/)=a2;
17889 se_dst=caller;/*unlink*/
17890 }
17891
17892 void r117ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
17893 void**locals[5];
17894 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
17895 se_dump_stack ds;
17896 ds.fd=&fd;
17897 ds.current=NULL;
17898 ds.p=62938634;
17899 ds.caller=caller;
17900 ds.locals=locals;
17901 locals[0]=(void**)&a1;
17902 locals[1]=(void**)&a2;
17903 locals[2]=(void**)&a3;
17904 locals[3]=(void**)&a4;
17905 locals[4]=(void**)&a5;
17906 se_dst=&ds;/*link*/
17907 /*[ from line 95 of ./widget.e:*/
17908 (ds.p=62938908);
17909 ext_fill_rect(a1,a2,a3,a4,a5);
17910 /* from line 95 of ./widget.e]*/
17911 se_dst=caller;/*unlink*/
17912 }
17913
17914 void r117custom_change(se_dump_stack*caller,T117* C){
17915 static se_frame_descriptor fd={"custom_change OPTIONS_WINDOW",1,0,"%R117%",1};
17916 se_dump_stack ds;
17917 ds.fd=&fd;
17918 ds.current=((void**)&C);
17919 ds.p=245391370;
17920 ds.caller=caller;
17921 ds.locals=NULL;
17922 se_dst=&ds;/*link*/
17923 (ds.p=245391876);
17924 (/*SFN*/C->_preset/*53*/)=NULL;
17925 (ds.p=245392152);
17926 r120put_string(&ds,((T120*)ci(120,(/*RF2*/(C)->_preset_lb/*33*/),245392132)),((T0*)se_ms(6,"Custom")));
17927 se_dst=caller;/*unlink*/
17928 }
17929 T0*oBC18green=NULL;
17930 int fBC18green=0;
17931
17932 T0* r117green(se_dump_stack*caller){
17933 if(fBC18green==0){fBC18green=1;{
17934 void**locals[1];
17935 static se_frame_descriptor fd={"green COLOR_TABLE",0,1,"Result%R51%",1};
17936 se_dump_stack ds;
17937 ds.fd=&fd;
17938 ds.current=NULL;
17939 ds.p=37761034;
17940 ds.caller=caller;
17941 ds.locals=locals;
17942 locals[0]=(void**)&oBC18green;
17943 se_dst=&ds;/*link*/
17944 (ds.p=37761540);
17945 {T51*n=new51();
17946 oBC18green=((T0*)n);
17947 r51make(&ds,n,0,255,0);
17948 }
17949 se_dst=caller;/*unlink*/
17950 }}
17951 return oBC18green;
17952 }
17953
17954 void r117put_focus(se_dump_stack*caller,T117* C,T6 a1){
17955 void**locals[1];
17956 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R117%b%E6%",1};
17957 se_dump_stack ds;
17958 ds.fd=&fd;
17959 ds.current=((void**)&C);
17960 ds.p=62916874;
17961 ds.caller=caller;
17962 ds.locals=locals;
17963 locals[0]=(void**)&a1;
17964 se_dst=&ds;/*link*/
17965 (ds.p=62917380);
17966 (/*SFN*/C->_has_focus/*4*/)=a1;
17967 se_dst=caller;/*unlink*/
17968 }
17969
17970 void r117process_event(se_dump_stack*caller,T117* C,T0* a1){
17971 T0* _it=NULL;
17972 void**locals[2];
17973 static se_frame_descriptor fd={"process_event WINDOW",1,2,"%R117%e%R28%it%R32%",1};
17974 se_dump_stack ds;
17975 ds.fd=&fd;
17976 ds.current=((void**)&C);
17977 ds.p=60823562;
17978 ds.caller=caller;
17979 ds.locals=locals;
17980 locals[0]=(void**)&a1;
17981 locals[1]=(void**)&_it;
17982 se_dst=&ds;/*link*/
17983 /*[INSPECT*/
17984 {int z1=((ds.p=60824600),(/*RF2*/(((T28*)ci(28,a1,60824596)))->_type/*12*/));
17985 switch(z1){
17986 case 5:
17987 (ds.p=60825100);
17988 _it=r39get_new_iterator(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60825112))));
17989 (ds.p=60825372);
17990 r41start(&ds,((T41*)ci(41,_it,60825366)));
17991 while (!(((ds.p=60825630),r41is_off(&ds,((T41*)ci(41,_it,60825624))))))
17992 {
17993 /*[IF*/
17994 if(((ds.p=60826140),X30contains(&ds,60826130,r41item(&ds,((T41*)ci(41,_it,60826124))),(/*RF2*/(((T28*)ci(28,a1,60826158)))->_x/*8*/),(/*RF2*/(((T28*)ci(28,a1,60826168)))->_y/*4*/)))){
17995 (ds.p=60826382);
17996 r117change_focus(&ds,C,r41item(&ds,((T41*)ci(41,_it,60826408))));
17997 (ds.p=60826654);
17998 X30process_event(&ds,60826644,r41item(&ds,((T41*)ci(41,_it,60826638))),a1);
17999 }
18000 /*FI]*/
18001 (ds.p=60827148);
18002 r41next(&ds,((T41*)ci(41,_it,60827142)));
18003 }
18004 break;
18005 case 2:
18006 /*[IF*/
18007 if(((ds.p=60827932),((/*RF2*/(((T28*)ci(28,a1,60827922)))->_i1/*16*/))==(27))){
18008 (ds.p=60828166);
18009 r117raise_signal(&ds,C,2);
18010 }
18011 else if(((ds.p=60828468),((/*RF2*/(C)->_focus_widget/*29*/))!=((void*)(NULL)))){
18012 (ds.p=60828704);
18013 X30process_event(&ds,60828678,(/*RF2*/(C)->_focus_widget/*29*/),a1);
18014 }
18015 /*FI]*/
18016 break;
18017 }
18018 }/*INSPECT]*/
18019 se_dst=caller;/*unlink*/
18020 }
18021 T0*oBC117custom=NULL;
18022 int fBC117custom=0;
18023
18024 T0* r117custom(se_dump_stack*caller){
18025 if(fBC117custom==0){fBC117custom=1;{
18026 void**locals[1];
18027 static se_frame_descriptor fd={"custom OPTIONS_WINDOW",0,1,"Result%R68%",1};
18028 se_dump_stack ds;
18029 ds.fd=&fd;
18030 ds.current=NULL;
18031 ds.p=245370634;
18032 ds.caller=caller;
18033 ds.locals=locals;
18034 locals[0]=(void**)&oBC117custom;
18035 se_dst=&ds;/*link*/
18036 (ds.p=245371140);
18037 {T68*n=new68();
18038 oBC117custom=((T0*)n);
18039 r68make(&ds,n);
18040 }
18041 se_dst=caller;/*unlink*/
18042 }}
18043 return oBC117custom;
18044 }
18045
18046 void r117update_setting(se_dump_stack*caller,T117* C){
18047 T0* _s=NULL;
18048 T2 _i=0;
18049 void**locals[2];
18050 static se_frame_descriptor fd={"update_setting OPTIONS_WINDOW",1,2,"%R117%s%R7%i%E2%",1};
18051 se_dump_stack ds;
18052 ds.fd=&fd;
18053 ds.current=((void**)&C);
18054 ds.p=245403658;
18055 ds.caller=caller;
18056 ds.locals=locals;
18057 locals[0]=(void**)&_s;
18058 locals[1]=(void**)&_i;
18059 se_dst=&ds;/*link*/
18060 /*[IF*/
18061 if(((ds.p=245404952),((/*RF2*/(C)->_preset/*53*/))==((void*)(NULL)))){
18062 (ds.p=245405196);
18063 (/*SFN*/C->_setting/*49*/)=r117custom(&ds);
18064 (ds.p=245405468);
18065 r68put_wrap(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*49*/),245405452)),(/*RF2*/(((T126*)ci(126,(/*RF2*/(C)->_wrap_cb/*37*/),245405486)))->_value/*25*/));
18066 (ds.p=245405964);
18067 _s=(/*RF2*/(((T98*)ci(98,(/*RF2*/(C)->_width_tb/*41*/),245405974)))->_string/*33*/);
18068 /*[IF*/
18069 if(((ds.p=245406230),r7is_integer(&ds,se_i7(&ds,((T7*)ci(7,_s,245406226)))))){
18070 (ds.p=245406470);
18071 _i=r68clip_width(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*49*/),245406480)),r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,_s,245406518)))));
18072 (ds.p=245406742);
18073 r68put_width(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*49*/),245406726)),_i);
18074 }
18075 /*FI]*/
18076 (ds.p=245407500);
18077 _s=(/*RF2*/(((T98*)ci(98,(/*RF2*/(C)->_height_tb/*45*/),245407510)))->_string/*33*/);
18078 /*[IF*/
18079 if(((ds.p=245407766),r7is_integer(&ds,se_i7(&ds,((T7*)ci(7,_s,245407762)))))){
18080 (ds.p=245408006);
18081 _i=r68clip_height(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*49*/),245408016)),r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,_s,245408056)))));
18082 (ds.p=245408278);
18083 r68put_height(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*49*/),245408262)),_i);
18084 }
18085 /*FI]*/
18086 }
18087 else{
18088 (ds.p=245409036);
18089 (/*SFN*/C->_setting/*49*/)=(/*RF2*/(((T65*)ci(65,(/*RF2*/(C)->_preset/*53*/),245409058)))->_setting/*8*/);
18090 }
18091 /*FI]*/
18092 se_dst=caller;/*unlink*/
18093 }
18094
18095 T0* r117twin(se_dump_stack*caller,T117* C){
18096 T0* R=NULL;
18097 void**locals[1];
18098 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R117%Result%R117%",1};
18099 se_dump_stack ds;
18100 ds.fd=&fd;
18101 ds.current=((void**)&C);
18102 ds.p=2140182;
18103 ds.caller=caller;
18104 ds.locals=locals;
18105 locals[0]=(void**)&R;
18106 se_dst=&ds;/*link*/
18107 R=((void*)new117());
18108 *((T117*)R)=*C;
18109 if(fd.assertion_flag){
18110 fd.assertion_flag=0;
18111 (ds.p=2142256);
18112 ac_ens(r117is_equal(&ds,((T117*)ci(117,R,2142242)),(T0*)C),"equal");
18113 fd.assertion_flag=1;
18114 }
18115 se_dst=caller;/*unlink*/
18116 return R;
18117 }
18118
18119 T0* r117get_preset(se_dump_stack*caller,T117* C,T0* a1){
18120 T0* R=NULL;
18121 T0* _it=NULL;
18122 void**locals[3];
18123 static se_frame_descriptor fd={"get_preset OPTIONS_WINDOW",1,3,"%R117%s%R7%Result%R65%it%R119%",1};
18124 se_dump_stack ds;
18125 ds.fd=&fd;
18126 ds.current=((void**)&C);
18127 ds.p=245396490;
18128 ds.caller=caller;
18129 ds.locals=locals;
18130 locals[0]=(void**)&a1;
18131 locals[1]=(void**)&R;
18132 locals[2]=(void**)&_it;
18133 se_dst=&ds;/*link*/
18134 (ds.p=245397508);
18135 _it=r66get_new_iterator(&ds,se_i66(&ds,((T66*)ci(66,(/*RF2*/(C)->_preset_list/*57*/),245397520))));
18136 (ds.p=245397780);
18137 r122start(&ds,((T122*)ci(122,_it,245397774)));
18138 while (!(((ds.p=245398038),r122is_off(&ds,((T122*)ci(122,_it,245398032))))))
18139 {
18140 /*[IF*/
18141 if(((ds.p=245398572),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T65*)ci(65,r122item(&ds,((T122*)ci(122,_it,245398546))),245398552)))->_name/*4*/),245398562))),a1))){
18142 (ds.p=245398790);
18143 R=r122item(&ds,((T122*)ci(122,_it,245398810)));
18144 }
18145 /*FI]*/
18146 (ds.p=245399314);
18147 r122next(&ds,((T122*)ci(122,_it,245399308)));
18148 }
18149 se_dst=caller;/*unlink*/
18150 return R;
18151 }
18152
18153 void r117raise_signal(se_dump_stack*caller,T117* C,T2 a1){
18154 void**locals[1];
18155 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R117%i%E2%",1};
18156 se_dump_stack ds;
18157 ds.fd=&fd;
18158 ds.current=((void**)&C);
18159 ds.p=62924554;
18160 ds.caller=caller;
18161 ds.locals=locals;
18162 locals[0]=(void**)&a1;
18163 se_dst=&ds;/*link*/
18164 /*[IF*/
18165 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
18166 (ds.p=62925362);
18167 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
18168 }
18169 /*FI]*/
18170 se_dst=caller;/*unlink*/
18171 }
18172
18173 void r117update(se_dump_stack*caller,T117* C){
18174 static se_frame_descriptor fd={"update WINDOW",1,0,"%R117%",1};
18175 se_dump_stack ds;
18176 ds.fd=&fd;
18177 ds.current=((void**)&C);
18178 ds.p=60830218;
18179 ds.caller=caller;
18180 ds.locals=NULL;
18181 se_dst=&ds;/*link*/
18182 (ds.p=60830724);
18183 r117fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r117green(&ds));
18184 (ds.p=60830980);
18185 r117fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r117black(&ds));
18186 (ds.p=60831260);
18187 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60831236))),agent10(&ds));
18188 se_dst=caller;/*unlink*/
18189 }
18190 T0*oBC18black=NULL;
18191 int fBC18black=0;
18192
18193 T0* r117black(se_dump_stack*caller){
18194 if(fBC18black==0){fBC18black=1;{
18195 void**locals[1];
18196 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
18197 se_dump_stack ds;
18198 ds.fd=&fd;
18199 ds.current=NULL;
18200 ds.p=37749514;
18201 ds.caller=caller;
18202 ds.locals=locals;
18203 locals[0]=(void**)&oBC18black;
18204 se_dst=&ds;/*link*/
18205 (ds.p=37750020);
18206 {T51*n=new51();
18207 oBC18black=((T0*)n);
18208 r51make(&ds,n,0,0,0);
18209 }
18210 se_dst=caller;/*unlink*/
18211 }}
18212 return oBC18black;
18213 }
18214
18215 void r126put_command(se_dump_stack*caller,T126* C,T0* a1,T2 a2){
18216 void**locals[2];
18217 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R126%c%R25%i%E2%",1};
18218 se_dump_stack ds;
18219 ds.fd=&fd;
18220 ds.current=((void**)&C);
18221 ds.p=62923274;
18222 ds.caller=caller;
18223 ds.locals=locals;
18224 locals[0]=(void**)&a1;
18225 locals[1]=(void**)&a2;
18226 se_dst=&ds;/*link*/
18227 (ds.p=62923806);
18228 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
18229 se_dst=caller;/*unlink*/
18230 }
18231
18232 T6 r126is_equal(se_dump_stack*caller,T126* C,T0* a1){
18233 T6 R=0;
18234 void**locals[2];
18235 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R126%other%R126%Result%E6%",1};
18236 se_dump_stack ds;
18237 ds.fd=&fd;
18238 ds.current=((void**)&C);
18239 ds.p=2120968;
18240 ds.caller=caller;
18241 ds.locals=locals;
18242 locals[0]=(void**)&a1;
18243 locals[1]=(void**)&R;
18244 se_dst=&ds;/*link*/
18245 se_require_uppermost_flag=1;
18246 if(fd.assertion_flag){
18247 fd.assertion_flag=0;
18248 (ds.p=2122048);
18249 ac_req((a1)!=((void*)(NULL)),"other_not_void");
18250 fd.assertion_flag=1;
18251 }
18252 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
18253 fd.assertion_flag=0;
18254 (ds.p=2122846);
18255 ac_ens((!(r126standard_is_equal(&ds,C,a1)))||(R),"consistent");
18256 (ds.p=2123064);
18257 ac_ens((!(R))||(r126is_equal(&ds,((T126*)ci(126,a1,2123080)),(T0*)C)),"symmetric");
18258 fd.assertion_flag=1;
18259 }
18260 se_dst=caller;/*unlink*/
18261 return R;
18262 }
18263
18264 void r126widget_init(se_dump_stack*caller,T126* C){
18265 static se_frame_descriptor fd={"widget_init WIDGET",1,0,"%R126%",1};
18266 se_dump_stack ds;
18267 ds.fd=&fd;
18268 ds.current=((void**)&C);
18269 ds.p=62919434;
18270 ds.caller=caller;
18271 ds.locals=NULL;
18272 se_dst=&ds;/*link*/
18273 (ds.p=62919940);
18274 {T45*n=new45();
18275 r45make(&ds,n);
18276 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
18277 se_i45(&ds,n);}
18278 se_dst=caller;/*unlink*/
18279 }
18280
18281 void r126make(se_dump_stack*caller,T126* C){
18282 static se_frame_descriptor fd={"make CHECKBOX",1,0,"%R126%",1};
18283 se_dump_stack ds;
18284 ds.fd=&fd;
18285 ds.current=((void**)&C);
18286 ds.p=264244490;
18287 ds.caller=caller;
18288 ds.locals=NULL;
18289 se_dst=&ds;/*link*/
18290 (ds.p=264244996);
18291 r126widget_init(&ds,C);
18292 se_dst=caller;/*unlink*/
18293 }
18294
18295 T6 r126contains(se_dump_stack*caller,T126* C,T2 a1,T2 a2){
18296 T6 R=0;
18297 void**locals[3];
18298 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R126%x%E2%y%E2%Result%E6%",1};
18299 se_dump_stack ds;
18300 ds.fd=&fd;
18301 ds.current=((void**)&C);
18302 ds.p=62930698;
18303 ds.caller=caller;
18304 ds.locals=locals;
18305 locals[0]=(void**)&a1;
18306 locals[1]=(void**)&a2;
18307 locals[2]=(void**)&R;
18308 se_dst=&ds;/*link*/
18309 (ds.p=62931204);
18310 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
18311 se_dst=caller;/*unlink*/
18312 return R;
18313 }
18314
18315 void r126fill_rect(se_dump_stack*caller,T126* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
18316 void**locals[5];
18317 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R126%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
18318 se_dump_stack ds;
18319 ds.fd=&fd;
18320 ds.current=((void**)&C);
18321 ds.p=62937354;
18322 ds.caller=caller;
18323 ds.locals=locals;
18324 locals[0]=(void**)&a1;
18325 locals[1]=(void**)&a2;
18326 locals[2]=(void**)&a3;
18327 locals[3]=(void**)&a4;
18328 locals[4]=(void**)&a5;
18329 se_dst=&ds;/*link*/
18330 (ds.p=62937860);
18331 r126ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
18332 se_dst=caller;/*unlink*/
18333 }
18334
18335 void r126put_xy(se_dump_stack*caller,T126* C,T2 a1,T2 a2){
18336 void**locals[2];
18337 static se_frame_descriptor fd={"put_xy WIDGET",1,2,"%R126%x%E2%y%E2%",1};
18338 se_dump_stack ds;
18339 ds.fd=&fd;
18340 ds.current=((void**)&C);
18341 ds.p=62927626;
18342 ds.caller=caller;
18343 ds.locals=locals;
18344 locals[0]=(void**)&a1;
18345 locals[1]=(void**)&a2;
18346 se_dst=&ds;/*link*/
18347 (ds.p=62928132);
18348 (/*SFN*/C->_offsetx/*9*/)=a1;
18349 (ds.p=62928388);
18350 (/*SFN*/C->_offsety/*13*/)=a2;
18351 se_dst=caller;/*unlink*/
18352 }
18353
18354 T6 r126standard_is_equal(se_dump_stack*caller,T126* C,T0* a1){
18355 T6 R=0;
18356 void**locals[2];
18357 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R126%other%R126%Result%E6%",1};
18358 se_dump_stack ds;
18359 ds.fd=&fd;
18360 ds.current=((void**)&C);
18361 ds.p=2128406;
18362 ds.caller=caller;
18363 ds.locals=locals;
18364 locals[0]=(void**)&a1;
18365 locals[1]=(void**)&R;
18366 se_dst=&ds;/*link*/
18367 se_require_uppermost_flag=1;
18368 if(fd.assertion_flag){
18369 fd.assertion_flag=0;
18370 (ds.p=2129184);
18371 ac_req((a1)!=((void*)(NULL)),NULL);
18372 fd.assertion_flag=1;
18373 }
18374 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
18375 fd.assertion_flag=0;
18376 (ds.p=2129976);
18377 ac_ens((!(R))||(r126standard_is_equal(&ds,((T126*)ci(126,a1,2129992)),(T0*)C)),"symmetric");
18378 fd.assertion_flag=1;
18379 }
18380 se_dst=caller;/*unlink*/
18381 return R;
18382 }
18383
18384 void r126put_value(se_dump_stack*caller,T126* C,T6 a1){
18385 void**locals[1];
18386 static se_frame_descriptor fd={"put_value CHECKBOX",1,1,"%R126%b%E6%",1};
18387 se_dump_stack ds;
18388 ds.fd=&fd;
18389 ds.current=((void**)&C);
18390 ds.p=264243210;
18391 ds.caller=caller;
18392 ds.locals=locals;
18393 locals[0]=(void**)&a1;
18394 se_dst=&ds;/*link*/
18395 (ds.p=264243716);
18396 (/*SFN*/C->_value/*25*/)=a1;
18397 se_dst=caller;/*unlink*/
18398 }
18399
18400 void r126put_size(se_dump_stack*caller,T126* C,T2 a1,T2 a2){
18401 void**locals[2];
18402 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R126%w%E2%h%E2%",1};
18403 se_dump_stack ds;
18404 ds.fd=&fd;
18405 ds.current=((void**)&C);
18406 ds.p=62929162;
18407 ds.caller=caller;
18408 ds.locals=locals;
18409 locals[0]=(void**)&a1;
18410 locals[1]=(void**)&a2;
18411 se_dst=&ds;/*link*/
18412 (ds.p=62929668);
18413 (/*SFN*/C->_width/*17*/)=a1;
18414 (ds.p=62929924);
18415 (/*SFN*/C->_height/*21*/)=a2;
18416 se_dst=caller;/*unlink*/
18417 }
18418
18419 void r126ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
18420 void**locals[5];
18421 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
18422 se_dump_stack ds;
18423 ds.fd=&fd;
18424 ds.current=NULL;
18425 ds.p=62938634;
18426 ds.caller=caller;
18427 ds.locals=locals;
18428 locals[0]=(void**)&a1;
18429 locals[1]=(void**)&a2;
18430 locals[2]=(void**)&a3;
18431 locals[3]=(void**)&a4;
18432 locals[4]=(void**)&a5;
18433 se_dst=&ds;/*link*/
18434 /*[ from line 95 of ./widget.e:*/
18435 (ds.p=62938908);
18436 ext_fill_rect(a1,a2,a3,a4,a5);
18437 /* from line 95 of ./widget.e]*/
18438 se_dst=caller;/*unlink*/
18439 }
18440
18441 T0* r126green(se_dump_stack*caller){
18442 if(fBC18green==0){fBC18green=1;{
18443 void**locals[1];
18444 static se_frame_descriptor fd={"green COLOR_TABLE",0,1,"Result%R51%",1};
18445 se_dump_stack ds;
18446 ds.fd=&fd;
18447 ds.current=NULL;
18448 ds.p=37761034;
18449 ds.caller=caller;
18450 ds.locals=locals;
18451 locals[0]=(void**)&oBC18green;
18452 se_dst=&ds;/*link*/
18453 (ds.p=37761540);
18454 {T51*n=new51();
18455 oBC18green=((T0*)n);
18456 r51make(&ds,n,0,255,0);
18457 }
18458 se_dst=caller;/*unlink*/
18459 }}
18460 return oBC18green;
18461 }
18462 T0*oBC18darkgreen=NULL;
18463 int fBC18darkgreen=0;
18464
18465 T0* r126darkgreen(se_dump_stack*caller){
18466 if(fBC18darkgreen==0){fBC18darkgreen=1;{
18467 void**locals[1];
18468 static se_frame_descriptor fd={"darkgreen COLOR_TABLE",0,1,"Result%R51%",1};
18469 se_dump_stack ds;
18470 ds.fd=&fd;
18471 ds.current=NULL;
18472 ds.p=37762314;
18473 ds.caller=caller;
18474 ds.locals=locals;
18475 locals[0]=(void**)&oBC18darkgreen;
18476 se_dst=&ds;/*link*/
18477 (ds.p=37762820);
18478 {T51*n=new51();
18479 oBC18darkgreen=((T0*)n);
18480 r51make(&ds,n,0,127,0);
18481 }
18482 se_dst=caller;/*unlink*/
18483 }}
18484 return oBC18darkgreen;
18485 }
18486
18487 void r126put_focus(se_dump_stack*caller,T126* C,T6 a1){
18488 void**locals[1];
18489 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R126%b%E6%",1};
18490 se_dump_stack ds;
18491 ds.fd=&fd;
18492 ds.current=((void**)&C);
18493 ds.p=62916874;
18494 ds.caller=caller;
18495 ds.locals=locals;
18496 locals[0]=(void**)&a1;
18497 se_dst=&ds;/*link*/
18498 (ds.p=62917380);
18499 (/*SFN*/C->_has_focus/*4*/)=a1;
18500 se_dst=caller;/*unlink*/
18501 }
18502
18503 void r126process_event(se_dump_stack*caller,T126* C,T0* a1){
18504 void**locals[1];
18505 static se_frame_descriptor fd={"process_event CHECKBOX",1,1,"%R126%e%R28%",1};
18506 se_dump_stack ds;
18507 ds.fd=&fd;
18508 ds.current=((void**)&C);
18509 ds.p=264245770;
18510 ds.caller=caller;
18511 ds.locals=locals;
18512 locals[0]=(void**)&a1;
18513 se_dst=&ds;/*link*/
18514 /*[IF*/
18515 if(((ds.p=264246296),((/*RF2*/(((T28*)ci(28,a1,264246282)))->_type/*12*/))==(5))){
18516 (ds.p=264246540);
18517 (/*SFN*/C->_value/*25*/)=r6_ix_not(&ds,(/*RF2*/(C)->_value/*25*/));
18518 }
18519 /*FI]*/
18520 (ds.p=264247044);
18521 r126raise_signal(&ds,C,3);
18522 se_dst=caller;/*unlink*/
18523 }
18524
18525 T0* r126twin(se_dump_stack*caller,T126* C){
18526 T0* R=NULL;
18527 void**locals[1];
18528 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R126%Result%R126%",1};
18529 se_dump_stack ds;
18530 ds.fd=&fd;
18531 ds.current=((void**)&C);
18532 ds.p=2140182;
18533 ds.caller=caller;
18534 ds.locals=locals;
18535 locals[0]=(void**)&R;
18536 se_dst=&ds;/*link*/
18537 R=((void*)new126());
18538 *((T126*)R)=*C;
18539 if(fd.assertion_flag){
18540 fd.assertion_flag=0;
18541 (ds.p=2142256);
18542 ac_ens(r126is_equal(&ds,((T126*)ci(126,R,2142242)),(T0*)C),"equal");
18543 fd.assertion_flag=1;
18544 }
18545 se_dst=caller;/*unlink*/
18546 return R;
18547 }
18548 T0*oBC18white=NULL;
18549 int fBC18white=0;
18550
18551 T0* r126white(se_dump_stack*caller){
18552 if(fBC18white==0){fBC18white=1;{
18553 void**locals[1];
18554 static se_frame_descriptor fd={"white COLOR_TABLE",0,1,"Result%R51%",1};
18555 se_dump_stack ds;
18556 ds.fd=&fd;
18557 ds.current=NULL;
18558 ds.p=37752074;
18559 ds.caller=caller;
18560 ds.locals=locals;
18561 locals[0]=(void**)&oBC18white;
18562 se_dst=&ds;/*link*/
18563 (ds.p=37752580);
18564 {T51*n=new51();
18565 oBC18white=((T0*)n);
18566 r51make(&ds,n,255,255,255);
18567 }
18568 se_dst=caller;/*unlink*/
18569 }}
18570 return oBC18white;
18571 }
18572
18573 void r126raise_signal(se_dump_stack*caller,T126* C,T2 a1){
18574 void**locals[1];
18575 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R126%i%E2%",1};
18576 se_dump_stack ds;
18577 ds.fd=&fd;
18578 ds.current=((void**)&C);
18579 ds.p=62924554;
18580 ds.caller=caller;
18581 ds.locals=locals;
18582 locals[0]=(void**)&a1;
18583 se_dst=&ds;/*link*/
18584 /*[IF*/
18585 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
18586 (ds.p=62925362);
18587 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
18588 }
18589 /*FI]*/
18590 se_dst=caller;/*unlink*/
18591 }
18592
18593 void r126update(se_dump_stack*caller,T126* C){
18594 static se_frame_descriptor fd={"update CHECKBOX",1,0,"%R126%",1};
18595 se_dump_stack ds;
18596 ds.fd=&fd;
18597 ds.current=((void**)&C);
18598 ds.p=264247818;
18599 ds.caller=caller;
18600 ds.locals=NULL;
18601 se_dst=&ds;/*link*/
18602 (ds.p=264248324);
18603 r126fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r126white(&ds));
18604 /*[IF*/
18605 if(((ds.p=264248586),(/*RF2*/(C)->_value/*25*/))){
18606 (ds.p=264248844);
18607 r126fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r126green(&ds));
18608 }
18609 else{
18610 (ds.p=264249356);
18611 r126fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r126darkgreen(&ds));
18612 }
18613 /*FI]*/
18614 se_dst=caller;/*unlink*/
18615 }
18616
18617 T6 r54is_equal(se_dump_stack*caller,T54* C,T0* a1){
18618 T6 R=0;
18619 void**locals[2];
18620 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R54%other%R54%Result%E6%",1};
18621 se_dump_stack ds;
18622 ds.fd=&fd;
18623 ds.current=((void**)&C);
18624 ds.p=2120968;
18625 ds.caller=caller;
18626 ds.locals=locals;
18627 locals[0]=(void**)&a1;
18628 locals[1]=(void**)&R;
18629 se_dst=&ds;/*link*/
18630 se_require_uppermost_flag=1;
18631 if(fd.assertion_flag){
18632 fd.assertion_flag=0;
18633 (ds.p=2122048);
18634 ac_req((a1)!=((void*)(NULL)),"other_not_void");
18635 fd.assertion_flag=1;
18636 }
18637 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
18638 fd.assertion_flag=0;
18639 (ds.p=2122846);
18640 ac_ens((!(r54standard_is_equal(&ds,C,a1)))||(R),"consistent");
18641 (ds.p=2123064);
18642 ac_ens((!(R))||(r54is_equal(&ds,((T54*)ci(54,a1,2123080)),(T0*)C)),"symmetric");
18643 fd.assertion_flag=1;
18644 }
18645 se_dst=caller;/*unlink*/
18646 return R;
18647 }
18648
18649 void r54read_config(se_dump_stack*caller,T54* C,T0* a1){
18650 T0* _s1=NULL;
18651 T0* _s2=NULL;
18652 T2 _state=0;
18653 void**locals[4];
18654 static se_frame_descriptor fd={"read_config CONFIG_DATA",1,4,"%R54%in%R55%s1%R7%s2%R7%state%E2%",1};
18655 se_dump_stack ds;
18656 ds.fd=&fd;
18657 ds.current=((void**)&C);
18658 ds.p=113264394;
18659 ds.caller=caller;
18660 ds.locals=locals;
18661 locals[0]=(void**)&a1;
18662 locals[1]=(void**)&_s1;
18663 locals[2]=(void**)&_s2;
18664 locals[3]=(void**)&_state;
18665 se_dst=&ds;/*link*/
18666 (ds.p=113265684);
18667 r55read_word(&ds,((T55*)ci(55,a1,113265678)));
18668 while (!(((ds.p=113265942),r55end_of_input(&ds,((T55*)ci(55,a1,113265936))))))
18669 {
18670 (ds.p=113266444);
18671 _s1=r54clone(&ds,C,r55last_string(&ds));
18672 (ds.p=113266706);
18673 r55read_line(&ds,((T55*)ci(55,a1,113266700)));
18674 /*[IF*/
18675 if(((ds.p=113266962),r6_ix_not(&ds,r55end_of_input(&ds,((T55*)ci(55,a1,113266970)))))){
18676 (ds.p=113267206);
18677 _s2=r54clone(&ds,C,r55last_string(&ds));
18678 (ds.p=113267468);
18679 r55read_word(&ds,((T55*)ci(55,a1,113267462)));
18680 }
18681 else{
18682 (ds.p=113267974);
18683 {T7*n=new7();
18684 r7copy(&ds,n,((T0*)se_ms(0,"")));
18685 _s2=((T0*)n);
18686 se_i7(&ds,n);}
18687 }
18688 /*FI]*/
18689 /*[IF*/
18690 if(((ds.p=113268772),(r7first(&ds,se_i7(&ds,((T7*)ci(7,_s1,113268754)))))==(((T3)'\43')))){
18691 }
18692 else if(((ds.p=113269024),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s1,113269018))),((T0*)se_ms(5,"begin"))))){
18693 (ds.p=113269254);
18694 _state=1;
18695 /*[IF*/
18696 if(((ds.p=113269522),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s2,113269516))),((T0*)se_ms(6,"preset"))))){
18697 (ds.p=113269774);
18698 _state=2;
18699 }
18700 /*FI]*/
18701 }
18702 else if(((ds.p=113270304),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s1,113270298))),((T0*)se_ms(3,"end"))))){
18703 (ds.p=113270534);
18704 _state=0;
18705 }
18706 else{
18707 /*[INSPECT*/
18708 {int z1=((ds.p=113271062),_state);
18709 switch(z1){
18710 case 0:
18711 /*[IF*/
18712 if(((ds.p=113271578),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s1,113271572))),((T0*)se_ms(9,"main_font"))))){
18713 (ds.p=113271816);
18714 (/*SFN*/C->_mainttf/*12*/)=_s2;
18715 }
18716 else if(((ds.p=113272098),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s1,113272092))),((T0*)se_ms(8,"big_font"))))){
18717 (ds.p=113272328);
18718 (/*SFN*/C->_bigttf/*16*/)=_s2;
18719 }
18720 else if(((ds.p=113272610),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s1,113272604))),((T0*)se_ms(14,"default_preset"))))){
18721 (ds.p=113272840);
18722 (/*SFN*/C->_default_preset/*28*/)=_s2;
18723 }
18724 else if(((ds.p=113273122),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,_s1,113273116))),((T0*)se_ms(8,"hiscores"))))){
18725 (ds.p=113273352);
18726 (/*SFN*/C->_score_file/*4*/)=_s2;
18727 }
18728 /*FI]*/
18729 break;
18730 case 2:
18731 (ds.p=113274126);
18732 r54parse_preset(&ds,C,_s1,_s2);
18733 break;
18734 }
18735 }/*INSPECT]*/
18736 }
18737 /*FI]*/
18738 }
18739 (ds.p=113275652);
18740 {T53*n=new53();
18741 r53load(&ds,n,(/*RF2*/(C)->_mainttf/*12*/),12);
18742 (/*SFN*/C->_mainfont/*20*/)=((T0*)n);
18743 }
18744 (ds.p=113275908);
18745 {T53*n=new53();
18746 r53load(&ds,n,(/*RF2*/(C)->_bigttf/*16*/),24);
18747 (/*SFN*/C->_bigfont/*24*/)=((T0*)n);
18748 }
18749 se_dst=caller;/*unlink*/
18750 }
18751
18752 T0* r54clone(se_dump_stack*caller,T54* C,T0* a1){
18753 T0* R=NULL;
18754 void**locals[2];
18755 static se_frame_descriptor fd={"clone GENERAL",1,2,"%R54%other%R10%Result%R10%",1};
18756 se_dump_stack ds;
18757 ds.fd=&fd;
18758 ds.current=((void**)&C);
18759 ds.p=2137366;
18760 ds.caller=caller;
18761 ds.locals=locals;
18762 locals[0]=(void**)&a1;
18763 locals[1]=(void**)&R;
18764 se_dst=&ds;/*link*/
18765 /*[IF*/
18766 if(((ds.p=2138406),(a1)!=((void*)(NULL)))){
18767 (ds.p=2138650);
18768 R=X10twin(&ds,2138670,a1);
18769 }
18770 /*FI]*/
18771 if(fd.assertion_flag){
18772 fd.assertion_flag=0;
18773 (ds.p=2139426);
18774 ac_ens(r54equal(&ds,C,R,a1),"equal");
18775 fd.assertion_flag=1;
18776 }
18777 se_dst=caller;/*unlink*/
18778 return R;
18779 }
18780
18781 void r54parse_preset(se_dump_stack*caller,T54* C,T0* a1,T0* a2){
18782 T0* _p=NULL;
18783 T0* _args=NULL;
18784 T2 _width=0;
18785 T2 _height=0;
18786 T6 _wrap=0;
18787 void**locals[7];
18788 static se_frame_descriptor fd={"parse_preset CONFIG_DATA",1,7,"%R54%s1%R7%s2%R7%p%R65%args%R64%width%E2%height%E2%wrap%E6%",1};
18789 se_dump_stack ds;
18790 ds.fd=&fd;
18791 ds.current=((void**)&C);
18792 ds.p=113276682;
18793 ds.caller=caller;
18794 ds.locals=locals;
18795 locals[0]=(void**)&a1;
18796 locals[1]=(void**)&a2;
18797 locals[2]=(void**)&_p;
18798 locals[3]=(void**)&_args;
18799 locals[4]=(void**)&_width;
18800 locals[5]=(void**)&_height;
18801 locals[6]=(void**)&_wrap;
18802 se_dst=&ds;/*link*/
18803 (ds.p=113278468);
18804 _args=r7split(&ds,se_i7(&ds,((T7*)ci(7,a2,113278484))));
18805 (ds.p=113278724);
18806 _width=r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,r64item(&ds,se_i64(&ds,((T64*)ci(64,_args,113278742))),1),113278752))));
18807 (ds.p=113278980);
18808 _height=r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,r64item(&ds,se_i64(&ds,((T64*)ci(64,_args,113279000))),2),113279010))));
18809 (ds.p=113279236);
18810 _wrap=(r7to_integer(&ds,se_i7(&ds,((T7*)ci(7,r64item(&ds,se_i64(&ds,((T64*)ci(64,_args,113279252))),3),113279262)))))!=(0);
18811 (ds.p=113279492);
18812 {T65*n=new65();
18813 r65make(&ds,n,a1,_width,_height,_wrap);
18814 _p=((T0*)n);
18815 }
18816 (ds.p=113279772);
18817 r66add_last(&ds,se_i66(&ds,((T66*)ci(66,(/*RF2*/(C)->_preset_list/*8*/),113279748))),_p);
18818 se_dst=caller;/*unlink*/
18819 }
18820
18821 void r54make(se_dump_stack*caller,T54* C){
18822 static se_frame_descriptor fd={"make CONFIG_DATA",1,0,"%R54%",1};
18823 se_dump_stack ds;
18824 ds.fd=&fd;
18825 ds.current=((void**)&C);
18826 ds.p=113258250;
18827 ds.caller=caller;
18828 ds.locals=NULL;
18829 se_dst=&ds;/*link*/
18830 (ds.p=113258756);
18831 {T66*n=new66();
18832 r66make(&ds,n);
18833 (/*SFN*/C->_preset_list/*8*/)=((T0*)n);
18834 se_i66(&ds,n);}
18835 (ds.p=113259012);
18836 r54load_config(&ds,C);
18837 se_dst=caller;/*unlink*/
18838 }
18839
18840 T6 r54equal(se_dump_stack*caller,T54* C,T0* a1,T0* a2){
18841 T6 R=0;
18842 void**locals[3];
18843 static se_frame_descriptor fd={"equal GENERAL",1,3,"%R54%some%R10%other%R10%Result%E6%",1};
18844 se_dump_stack ds;
18845 ds.fd=&fd;
18846 ds.current=((void**)&C);
18847 ds.p=2116630;
18848 ds.caller=caller;
18849 ds.locals=locals;
18850 locals[0]=(void**)&a1;
18851 locals[1]=(void**)&a2;
18852 locals[2]=(void**)&R;
18853 se_dst=&ds;/*link*/
18854 /*[IF*/
18855 if(((ds.p=2117668),(a1)==((void*)(a2)))){
18856 (ds.p=2117914);
18857 R=1;
18858 }
18859 else if(((ds.p=2118188),(a1)==((void*)(NULL)))){
18860 }
18861 else if(((ds.p=2118446),(a2)==((void*)(NULL)))){
18862 }
18863 else{
18864 (ds.p=2118938);
18865 R=X10is_equal(&ds,2118958,a1,a2);
18866 }
18867 /*FI]*/
18868 if(fd.assertion_flag){
18869 fd.assertion_flag=0;
18870 (ds.p=2119804);
18871 ac_ens(((R)==(r6_px_and(&ds,(a1)==((void*)(NULL)),(a2)==((void*)(NULL)))))||((r6_px_and(&ds,(a1)!=((void*)(NULL)),(a2)!=((void*)(NULL))))&&(X10is_equal(&ds,2120238,a1,a2))),"definition");
18872 fd.assertion_flag=1;
18873 }
18874 se_dst=caller;/*unlink*/
18875 return R;
18876 }
18877
18878 T6 r54standard_is_equal(se_dump_stack*caller,T54* C,T0* a1){
18879 T6 R=0;
18880 void**locals[2];
18881 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R54%other%R54%Result%E6%",1};
18882 se_dump_stack ds;
18883 ds.fd=&fd;
18884 ds.current=((void**)&C);
18885 ds.p=2128406;
18886 ds.caller=caller;
18887 ds.locals=locals;
18888 locals[0]=(void**)&a1;
18889 locals[1]=(void**)&R;
18890 se_dst=&ds;/*link*/
18891 se_require_uppermost_flag=1;
18892 if(fd.assertion_flag){
18893 fd.assertion_flag=0;
18894 (ds.p=2129184);
18895 ac_req((a1)!=((void*)(NULL)),NULL);
18896 fd.assertion_flag=1;
18897 }
18898 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
18899 fd.assertion_flag=0;
18900 (ds.p=2129976);
18901 ac_ens((!(R))||(r54standard_is_equal(&ds,((T54*)ci(54,a1,2129992)),(T0*)C)),"symmetric");
18902 fd.assertion_flag=1;
18903 }
18904 se_dst=caller;/*unlink*/
18905 return R;
18906 }
18907
18908 T0* r54twin(se_dump_stack*caller,T54* C){
18909 T0* R=NULL;
18910 void**locals[1];
18911 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R54%Result%R54%",1};
18912 se_dump_stack ds;
18913 ds.fd=&fd;
18914 ds.current=((void**)&C);
18915 ds.p=2140182;
18916 ds.caller=caller;
18917 ds.locals=locals;
18918 locals[0]=(void**)&R;
18919 se_dst=&ds;/*link*/
18920 R=((void*)new54());
18921 *((T54*)R)=*C;
18922 if(fd.assertion_flag){
18923 fd.assertion_flag=0;
18924 (ds.p=2142256);
18925 ac_ens(r54is_equal(&ds,((T54*)ci(54,R,2142242)),(T0*)C),"equal");
18926 fd.assertion_flag=1;
18927 }
18928 se_dst=caller;/*unlink*/
18929 return R;
18930 }
18931
18932 T0* r54get_preset(se_dump_stack*caller,T54* C,T0* a1){
18933 T0* R=NULL;
18934 T0* _it=NULL;
18935 void**locals[3];
18936 static se_frame_descriptor fd={"get_preset CONFIG_DATA",1,3,"%R54%s%R7%Result%R65%it%R119%",1};
18937 se_dump_stack ds;
18938 ds.fd=&fd;
18939 ds.current=((void**)&C);
18940 ds.p=113254410;
18941 ds.caller=caller;
18942 ds.locals=locals;
18943 locals[0]=(void**)&a1;
18944 locals[1]=(void**)&R;
18945 locals[2]=(void**)&_it;
18946 se_dst=&ds;/*link*/
18947 (ds.p=113255428);
18948 _it=r66get_new_iterator(&ds,se_i66(&ds,((T66*)ci(66,(/*RF2*/(C)->_preset_list/*8*/),113255440))));
18949 (ds.p=113255700);
18950 r122start(&ds,((T122*)ci(122,_it,113255694)));
18951 while (!(((ds.p=113255958),r122is_off(&ds,((T122*)ci(122,_it,113255952))))))
18952 {
18953 /*[IF*/
18954 if(((ds.p=113256492),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T65*)ci(65,r122item(&ds,((T122*)ci(122,_it,113256466))),113256472)))->_name/*4*/),113256482))),a1))){
18955 (ds.p=113256710);
18956 R=r122item(&ds,((T122*)ci(122,_it,113256730)));
18957 }
18958 /*FI]*/
18959 (ds.p=113257234);
18960 r122next(&ds,((T122*)ci(122,_it,113257228)));
18961 }
18962 se_dst=caller;/*unlink*/
18963 return R;
18964 }
18965
18966 void r54load_config(se_dump_stack*caller,T54* C){
18967 T0* _in=NULL;
18968 void**locals[1];
18969 static se_frame_descriptor fd={"load_config CONFIG_DATA",1,1,"%R54%in%R55%",1};
18970 se_dump_stack ds;
18971 ds.fd=&fd;
18972 ds.current=((void**)&C);
18973 ds.p=113259786;
18974 ds.caller=caller;
18975 ds.locals=locals;
18976 locals[0]=(void**)&_in;
18977 se_dst=&ds;/*link*/
18978 (ds.p=113260804);
18979 {T55*n=new55();
18980 r55connect_to(&ds,n,((T0*)ms54_395678));
18981 _in=((T0*)n);
18982 }
18983 /*[IF*/
18984 if(((ds.p=113261066),r6_ix_not(&ds,r55is_connected(&ds,((T55*)ci(55,_in,113261074)))))){
18985 (ds.p=113261330);
18986 r57put_string(&ds,((T57*)ci(57,oBC1io,113261324)),((T0*)se_ms(26,"couldn\'t read config file\n")));
18987 (ds.p=113261580);
18988 exit(1);
18989 }
18990 else{
18991 (ds.p=113262092);
18992 r54read_config(&ds,C,_in);
18993 }
18994 /*FI]*/
18995 (ds.p=113262602);
18996 r55disconnect(&ds,((T55*)ci(55,_in,113262596)));
18997 se_dst=caller;/*unlink*/
18998 }
18999 T0*oBC17config=NULL;
19000 int fBC17config=0;
19001
19002 T0* r107config(se_dump_stack*caller){
19003 if(fBC17config==0){fBC17config=1;{
19004 void**locals[1];
19005 static se_frame_descriptor fd={"config CONFIG",0,1,"Result%R54%",1};
19006 se_dump_stack ds;
19007 ds.fd=&fd;
19008 ds.current=NULL;
19009 ds.p=35652362;
19010 ds.caller=caller;
19011 ds.locals=locals;
19012 locals[0]=(void**)&oBC17config;
19013 se_dst=&ds;/*link*/
19014 (ds.p=35652868);
19015 {T54*n=new54();
19016 oBC17config=((T0*)n);
19017 r54make(&ds,n);
19018 }
19019 se_dst=caller;/*unlink*/
19020 }}
19021 return oBC17config;
19022 }
19023
19024 T6 r107is_equal(se_dump_stack*caller,T107* C,T0* a1){
19025 T6 R=0;
19026 void**locals[2];
19027 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R107%other%R107%Result%E6%",1};
19028 se_dump_stack ds;
19029 ds.fd=&fd;
19030 ds.current=((void**)&C);
19031 ds.p=2120968;
19032 ds.caller=caller;
19033 ds.locals=locals;
19034 locals[0]=(void**)&a1;
19035 locals[1]=(void**)&R;
19036 se_dst=&ds;/*link*/
19037 se_require_uppermost_flag=1;
19038 if(fd.assertion_flag){
19039 fd.assertion_flag=0;
19040 (ds.p=2122048);
19041 ac_req((a1)!=((void*)(NULL)),"other_not_void");
19042 fd.assertion_flag=1;
19043 }
19044 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
19045 fd.assertion_flag=0;
19046 (ds.p=2122846);
19047 ac_ens((!(r107standard_is_equal(&ds,C,a1)))||(R),"consistent");
19048 (ds.p=2123064);
19049 ac_ens((!(R))||(r107is_equal(&ds,((T107*)ci(107,a1,2123080)),(T0*)C)),"symmetric");
19050 fd.assertion_flag=1;
19051 }
19052 se_dst=caller;/*unlink*/
19053 return R;
19054 }
19055
19056 void r107widget_init(se_dump_stack*caller,T107* C){
19057 static se_frame_descriptor fd={"widget_init WIDGET",1,0,"%R107%",1};
19058 se_dump_stack ds;
19059 ds.fd=&fd;
19060 ds.current=((void**)&C);
19061 ds.p=62919434;
19062 ds.caller=caller;
19063 ds.locals=NULL;
19064 se_dst=&ds;/*link*/
19065 (ds.p=62919940);
19066 {T45*n=new45();
19067 r45make(&ds,n);
19068 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
19069 se_i45(&ds,n);}
19070 se_dst=caller;/*unlink*/
19071 }
19072
19073 void r107update_image(se_dump_stack*caller,T107* C){
19074 static se_frame_descriptor fd={"update_image LABEL",1,0,"%R107%",1};
19075 se_dump_stack ds;
19076 ds.fd=&fd;
19077 ds.current=((void**)&C);
19078 ds.p=224404746;
19079 ds.caller=caller;
19080 ds.locals=NULL;
19081 se_dst=&ds;/*link*/
19082 se_require_uppermost_flag=1;
19083 if(fd.assertion_flag){
19084 fd.assertion_flag=0;
19085 (ds.p=224405260);
19086 ac_req((/*RF2*/(((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),224405252)))->_is_connected/*4*/),NULL);
19087 fd.assertion_flag=1;
19088 }
19089 (ds.p=224405772);
19090 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),224405764)));
19091 /*[IF*/
19092 if(((ds.p=224406052),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*25*/),224406026))))->_count/*8*/))>(0))){
19093 (ds.p=224406292);
19094 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),224406284)),(/*RF2*/(C)->_string/*25*/),r107font(&ds,C),r107white(&ds));
19095 }
19096 /*FI]*/
19097 if(fd.assertion_flag){
19098 fd.assertion_flag=0;
19099 (ds.p=224407052);
19100 ac_ens((/*RF2*/(((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),224407044)))->_is_connected/*4*/),NULL);
19101 fd.assertion_flag=1;
19102 }
19103 se_dst=caller;/*unlink*/
19104 }
19105
19106 void r107make(se_dump_stack*caller,T107* C,T0* a1){
19107 void**locals[1];
19108 static se_frame_descriptor fd={"make LABEL",1,1,"%R107%s%R7%",1};
19109 se_dump_stack ds;
19110 ds.fd=&fd;
19111 ds.current=((void**)&C);
19112 ds.p=224398858;
19113 ds.caller=caller;
19114 ds.locals=locals;
19115 locals[0]=(void**)&a1;
19116 se_dst=&ds;/*link*/
19117 (ds.p=224399364);
19118 r107widget_init(&ds,C);
19119 (ds.p=224399620);
19120 {T7*n=new7();
19121 r7copy(&ds,n,a1);
19122 (/*SFN*/C->_string/*25*/)=((T0*)n);
19123 se_i7(&ds,n);}
19124 (ds.p=224399876);
19125 {T50*n=new50();
19126 r50make(&ds,n);
19127 (/*SFN*/C->_img/*29*/)=((T0*)n);
19128 }
19129 (ds.p=224400140);
19130 r50new_dummy(&ds,((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),224400132)));
19131 (ds.p=224400388);
19132 r107update_image(&ds,C);
19133 se_dst=caller;/*unlink*/
19134 }
19135
19136 T6 r107contains(se_dump_stack*caller,T107* C,T2 a1,T2 a2){
19137 T6 R=0;
19138 void**locals[3];
19139 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R107%x%E2%y%E2%Result%E6%",1};
19140 se_dump_stack ds;
19141 ds.fd=&fd;
19142 ds.current=((void**)&C);
19143 ds.p=62930698;
19144 ds.caller=caller;
19145 ds.locals=locals;
19146 locals[0]=(void**)&a1;
19147 locals[1]=(void**)&a2;
19148 locals[2]=(void**)&R;
19149 se_dst=&ds;/*link*/
19150 (ds.p=62931204);
19151 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
19152 se_dst=caller;/*unlink*/
19153 return R;
19154 }
19155
19156 void r107fill_rect(se_dump_stack*caller,T107* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
19157 void**locals[5];
19158 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R107%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
19159 se_dump_stack ds;
19160 ds.fd=&fd;
19161 ds.current=((void**)&C);
19162 ds.p=62937354;
19163 ds.caller=caller;
19164 ds.locals=locals;
19165 locals[0]=(void**)&a1;
19166 locals[1]=(void**)&a2;
19167 locals[2]=(void**)&a3;
19168 locals[3]=(void**)&a4;
19169 locals[4]=(void**)&a5;
19170 se_dst=&ds;/*link*/
19171 (ds.p=62937860);
19172 r107ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
19173 se_dst=caller;/*unlink*/
19174 }
19175
19176 void r107put_xy(se_dump_stack*caller,T107* C,T2 a1,T2 a2){
19177 void**locals[2];
19178 static se_frame_descriptor fd={"put_xy WIDGET",1,2,"%R107%x%E2%y%E2%",1};
19179 se_dump_stack ds;
19180 ds.fd=&fd;
19181 ds.current=((void**)&C);
19182 ds.p=62927626;
19183 ds.caller=caller;
19184 ds.locals=locals;
19185 locals[0]=(void**)&a1;
19186 locals[1]=(void**)&a2;
19187 se_dst=&ds;/*link*/
19188 (ds.p=62928132);
19189 (/*SFN*/C->_offsetx/*9*/)=a1;
19190 (ds.p=62928388);
19191 (/*SFN*/C->_offsety/*13*/)=a2;
19192 se_dst=caller;/*unlink*/
19193 }
19194
19195 T6 r107standard_is_equal(se_dump_stack*caller,T107* C,T0* a1){
19196 T6 R=0;
19197 void**locals[2];
19198 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R107%other%R107%Result%E6%",1};
19199 se_dump_stack ds;
19200 ds.fd=&fd;
19201 ds.current=((void**)&C);
19202 ds.p=2128406;
19203 ds.caller=caller;
19204 ds.locals=locals;
19205 locals[0]=(void**)&a1;
19206 locals[1]=(void**)&R;
19207 se_dst=&ds;/*link*/
19208 se_require_uppermost_flag=1;
19209 if(fd.assertion_flag){
19210 fd.assertion_flag=0;
19211 (ds.p=2129184);
19212 ac_req((a1)!=((void*)(NULL)),NULL);
19213 fd.assertion_flag=1;
19214 }
19215 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
19216 fd.assertion_flag=0;
19217 (ds.p=2129976);
19218 ac_ens((!(R))||(r107standard_is_equal(&ds,((T107*)ci(107,a1,2129992)),(T0*)C)),"symmetric");
19219 fd.assertion_flag=1;
19220 }
19221 se_dst=caller;/*unlink*/
19222 return R;
19223 }
19224
19225 void r107put_size(se_dump_stack*caller,T107* C,T2 a1,T2 a2){
19226 void**locals[2];
19227 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R107%w%E2%h%E2%",1};
19228 se_dump_stack ds;
19229 ds.fd=&fd;
19230 ds.current=((void**)&C);
19231 ds.p=62929162;
19232 ds.caller=caller;
19233 ds.locals=locals;
19234 locals[0]=(void**)&a1;
19235 locals[1]=(void**)&a2;
19236 se_dst=&ds;/*link*/
19237 (ds.p=62929668);
19238 (/*SFN*/C->_width/*17*/)=a1;
19239 (ds.p=62929924);
19240 (/*SFN*/C->_height/*21*/)=a2;
19241 se_dst=caller;/*unlink*/
19242 }
19243
19244 void r107ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
19245 void**locals[5];
19246 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
19247 se_dump_stack ds;
19248 ds.fd=&fd;
19249 ds.current=NULL;
19250 ds.p=62938634;
19251 ds.caller=caller;
19252 ds.locals=locals;
19253 locals[0]=(void**)&a1;
19254 locals[1]=(void**)&a2;
19255 locals[2]=(void**)&a3;
19256 locals[3]=(void**)&a4;
19257 locals[4]=(void**)&a5;
19258 se_dst=&ds;/*link*/
19259 /*[ from line 95 of ./widget.e:*/
19260 (ds.p=62938908);
19261 ext_fill_rect(a1,a2,a3,a4,a5);
19262 /* from line 95 of ./widget.e]*/
19263 se_dst=caller;/*unlink*/
19264 }
19265
19266 void r107put_focus(se_dump_stack*caller,T107* C,T6 a1){
19267 void**locals[1];
19268 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R107%b%E6%",1};
19269 se_dump_stack ds;
19270 ds.fd=&fd;
19271 ds.current=((void**)&C);
19272 ds.p=62916874;
19273 ds.caller=caller;
19274 ds.locals=locals;
19275 locals[0]=(void**)&a1;
19276 se_dst=&ds;/*link*/
19277 (ds.p=62917380);
19278 (/*SFN*/C->_has_focus/*4*/)=a1;
19279 se_dst=caller;/*unlink*/
19280 }
19281
19282 void r107blit(se_dump_stack*caller,T107* C,T0* a1,T2 a2,T2 a3){
19283 void**locals[3];
19284 static se_frame_descriptor fd={"blit WIDGET",1,3,"%R107%img%R50%x%E2%y%E2%",1};
19285 se_dump_stack ds;
19286 ds.fd=&fd;
19287 ds.current=((void**)&C);
19288 ds.p=62939658;
19289 ds.caller=caller;
19290 ds.locals=locals;
19291 locals[0]=(void**)&a1;
19292 locals[1]=(void**)&a2;
19293 locals[2]=(void**)&a3;
19294 se_dst=&ds;/*link*/
19295 (ds.p=62940172);
19296 r50blit(&ds,((T50*)ci(50,a1,62940164)),(a2)+((/*RF2*/(C)->_offsetx/*9*/)),(a3)+((/*RF2*/(C)->_offsety/*13*/)));
19297 se_dst=caller;/*unlink*/
19298 }
19299
19300 void r107process_event(se_dump_stack*caller,T107* C,T0* a1){
19301 void**locals[1];
19302 static se_frame_descriptor fd={"process_event LABEL",1,1,"%R107%e%R28%",1};
19303 se_dump_stack ds;
19304 ds.fd=&fd;
19305 ds.current=((void**)&C);
19306 ds.p=224401162;
19307 ds.caller=caller;
19308 ds.locals=locals;
19309 locals[0]=(void**)&a1;
19310 se_dst=&ds;/*link*/
19311 se_dst=caller;/*unlink*/
19312 }
19313
19314 T0* r107twin(se_dump_stack*caller,T107* C){
19315 T0* R=NULL;
19316 void**locals[1];
19317 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R107%Result%R107%",1};
19318 se_dump_stack ds;
19319 ds.fd=&fd;
19320 ds.current=((void**)&C);
19321 ds.p=2140182;
19322 ds.caller=caller;
19323 ds.locals=locals;
19324 locals[0]=(void**)&R;
19325 se_dst=&ds;/*link*/
19326 R=((void*)new107());
19327 *((T107*)R)=*C;
19328 if(fd.assertion_flag){
19329 fd.assertion_flag=0;
19330 (ds.p=2142256);
19331 ac_ens(r107is_equal(&ds,((T107*)ci(107,R,2142242)),(T0*)C),"equal");
19332 fd.assertion_flag=1;
19333 }
19334 se_dst=caller;/*unlink*/
19335 return R;
19336 }
19337
19338 T0* r107white(se_dump_stack*caller){
19339 if(fBC18white==0){fBC18white=1;{
19340 void**locals[1];
19341 static se_frame_descriptor fd={"white COLOR_TABLE",0,1,"Result%R51%",1};
19342 se_dump_stack ds;
19343 ds.fd=&fd;
19344 ds.current=NULL;
19345 ds.p=37752074;
19346 ds.caller=caller;
19347 ds.locals=locals;
19348 locals[0]=(void**)&oBC18white;
19349 se_dst=&ds;/*link*/
19350 (ds.p=37752580);
19351 {T51*n=new51();
19352 oBC18white=((T0*)n);
19353 r51make(&ds,n,255,255,255);
19354 }
19355 se_dst=caller;/*unlink*/
19356 }}
19357 return oBC18white;
19358 }
19359
19360 void r107raise_signal(se_dump_stack*caller,T107* C,T2 a1){
19361 void**locals[1];
19362 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R107%i%E2%",1};
19363 se_dump_stack ds;
19364 ds.fd=&fd;
19365 ds.current=((void**)&C);
19366 ds.p=62924554;
19367 ds.caller=caller;
19368 ds.locals=locals;
19369 locals[0]=(void**)&a1;
19370 se_dst=&ds;/*link*/
19371 /*[IF*/
19372 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
19373 (ds.p=62925362);
19374 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
19375 }
19376 /*FI]*/
19377 se_dst=caller;/*unlink*/
19378 }
19379
19380 T0* r107font(se_dump_stack*caller,T107* C){
19381 T0* R=NULL;
19382 void**locals[1];
19383 static se_frame_descriptor fd={"font WIDGET",1,1,"%R107%Result%R53%",1};
19384 se_dump_stack ds;
19385 ds.fd=&fd;
19386 ds.current=((void**)&C);
19387 ds.p=62918154;
19388 ds.caller=caller;
19389 ds.locals=locals;
19390 locals[0]=(void**)&R;
19391 se_dst=&ds;/*link*/
19392 (ds.p=62918660);
19393 R=(/*RF2*/(((T54*)ci(54,r107config(&ds),62918680)))->_mainfont/*20*/);
19394 se_dst=caller;/*unlink*/
19395 return R;
19396 }
19397
19398 void r107put_string(se_dump_stack*caller,T107* C,T0* a1){
19399 void**locals[1];
19400 static se_frame_descriptor fd={"put_string LABEL",1,1,"%R107%s%R7%",1};
19401 se_dump_stack ds;
19402 ds.fd=&fd;
19403 ds.current=((void**)&C);
19404 ds.p=224397322;
19405 ds.caller=caller;
19406 ds.locals=locals;
19407 locals[0]=(void**)&a1;
19408 se_dst=&ds;/*link*/
19409 (ds.p=224397828);
19410 {T7*n=new7();
19411 r7copy(&ds,n,a1);
19412 (/*SFN*/C->_string/*25*/)=((T0*)n);
19413 se_i7(&ds,n);}
19414 (ds.p=224398084);
19415 r107update_image(&ds,C);
19416 se_dst=caller;/*unlink*/
19417 }
19418
19419 void r107update(se_dump_stack*caller,T107* C){
19420 static se_frame_descriptor fd={"update LABEL",1,0,"%R107%",1};
19421 se_dump_stack ds;
19422 ds.fd=&fd;
19423 ds.current=((void**)&C);
19424 ds.p=224402186;
19425 ds.caller=caller;
19426 ds.locals=NULL;
19427 se_dst=&ds;/*link*/
19428 (ds.p=224402692);
19429 r107fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r107black(&ds));
19430 /*[IF*/
19431 if(((ds.p=224402980),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*25*/),224402954))))->_count/*8*/))>(0))){
19432 (ds.p=224403212);
19433 r107blit(&ds,C,(/*RF2*/(C)->_img/*29*/),2,2);
19434 }
19435 /*FI]*/
19436 se_dst=caller;/*unlink*/
19437 }
19438
19439 T0* r107black(se_dump_stack*caller){
19440 if(fBC18black==0){fBC18black=1;{
19441 void**locals[1];
19442 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
19443 se_dump_stack ds;
19444 ds.fd=&fd;
19445 ds.current=NULL;
19446 ds.p=37749514;
19447 ds.caller=caller;
19448 ds.locals=locals;
19449 locals[0]=(void**)&oBC18black;
19450 se_dst=&ds;/*link*/
19451 (ds.p=37750020);
19452 {T51*n=new51();
19453 oBC18black=((T0*)n);
19454 r51make(&ds,n,0,0,0);
19455 }
19456 se_dst=caller;/*unlink*/
19457 }}
19458 return oBC18black;
19459 }
19460
19461 void r120put_command(se_dump_stack*caller,T120* C,T0* a1,T2 a2){
19462 void**locals[2];
19463 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R120%c%R25%i%E2%",1};
19464 se_dump_stack ds;
19465 ds.fd=&fd;
19466 ds.current=((void**)&C);
19467 ds.p=62923274;
19468 ds.caller=caller;
19469 ds.locals=locals;
19470 locals[0]=(void**)&a1;
19471 locals[1]=(void**)&a2;
19472 se_dst=&ds;/*link*/
19473 (ds.p=62923806);
19474 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
19475 se_dst=caller;/*unlink*/
19476 }
19477
19478 void r120next_string(se_dump_stack*caller,T120* C){
19479 T2 _i=0;
19480 void**locals[1];
19481 static se_frame_descriptor fd={"next_string LISTBOX",1,1,"%R120%i%E2%",1};
19482 se_dump_stack ds;
19483 ds.fd=&fd;
19484 ds.current=((void**)&C);
19485 ds.p=251668490;
19486 ds.caller=caller;
19487 ds.locals=locals;
19488 locals[0]=(void**)&_i;
19489 se_dst=&ds;/*link*/
19490 (ds.p=251669508);
19491 _i=((/*RF2*/(C)->_list_i/*33*/))+(1);
19492 /*[IF*/
19493 if(((ds.p=251669774),(_i)>((/*RF2*/(se_i118(&ds,((T118*)ci(118,(/*RF2*/(C)->_string_list/*25*/),251669778))))->_upper/*4*/)))){
19494 (ds.p=251670028);
19495 _i=1;
19496 }
19497 /*FI]*/
19498 /*[IF*/
19499 if(((ds.p=251670542),(_i)!=((/*RF2*/(C)->_list_i/*33*/)))){
19500 (ds.p=251670796);
19501 (/*SFN*/C->_list_i/*33*/)=_i;
19502 (ds.p=251671052);
19503 r120put_string(&ds,C,r118_px_64(&ds,se_i118(&ds,((T118*)ci(118,(/*RF2*/(C)->_string_list/*25*/),251671074))),(/*RF2*/(C)->_list_i/*33*/)));
19504 (ds.p=251671308);
19505 r120raise_signal(&ds,C,3);
19506 (ds.p=251671564);
19507 r120update_image(&ds,C);
19508 }
19509 /*FI]*/
19510 se_dst=caller;/*unlink*/
19511 }
19512
19513 T0* r120config(se_dump_stack*caller){
19514 if(fBC17config==0){fBC17config=1;{
19515 void**locals[1];
19516 static se_frame_descriptor fd={"config CONFIG",0,1,"Result%R54%",1};
19517 se_dump_stack ds;
19518 ds.fd=&fd;
19519 ds.current=NULL;
19520 ds.p=35652362;
19521 ds.caller=caller;
19522 ds.locals=locals;
19523 locals[0]=(void**)&oBC17config;
19524 se_dst=&ds;/*link*/
19525 (ds.p=35652868);
19526 {T54*n=new54();
19527 oBC17config=((T0*)n);
19528 r54make(&ds,n);
19529 }
19530 se_dst=caller;/*unlink*/
19531 }}
19532 return oBC17config;
19533 }
19534
19535 T6 r120is_equal(se_dump_stack*caller,T120* C,T0* a1){
19536 T6 R=0;
19537 void**locals[2];
19538 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R120%other%R120%Result%E6%",1};
19539 se_dump_stack ds;
19540 ds.fd=&fd;
19541 ds.current=((void**)&C);
19542 ds.p=2120968;
19543 ds.caller=caller;
19544 ds.locals=locals;
19545 locals[0]=(void**)&a1;
19546 locals[1]=(void**)&R;
19547 se_dst=&ds;/*link*/
19548 se_require_uppermost_flag=1;
19549 if(fd.assertion_flag){
19550 fd.assertion_flag=0;
19551 (ds.p=2122048);
19552 ac_req((a1)!=((void*)(NULL)),"other_not_void");
19553 fd.assertion_flag=1;
19554 }
19555 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
19556 fd.assertion_flag=0;
19557 (ds.p=2122846);
19558 ac_ens((!(r120standard_is_equal(&ds,C,a1)))||(R),"consistent");
19559 (ds.p=2123064);
19560 ac_ens((!(R))||(r120is_equal(&ds,((T120*)ci(120,a1,2123080)),(T0*)C)),"symmetric");
19561 fd.assertion_flag=1;
19562 }
19563 se_dst=caller;/*unlink*/
19564 return R;
19565 }
19566
19567 void r120prev_string(se_dump_stack*caller,T120* C){
19568 T2 _i=0;
19569 void**locals[1];
19570 static se_frame_descriptor fd={"prev_string LISTBOX",1,1,"%R120%i%E2%",1};
19571 se_dump_stack ds;
19572 ds.fd=&fd;
19573 ds.current=((void**)&C);
19574 ds.p=251664394;
19575 ds.caller=caller;
19576 ds.locals=locals;
19577 locals[0]=(void**)&_i;
19578 se_dst=&ds;/*link*/
19579 (ds.p=251665412);
19580 _i=((/*RF2*/(C)->_list_i/*33*/))-(1);
19581 /*[IF*/
19582 if(((ds.p=251665678),(_i)<(1))){
19583 (ds.p=251665932);
19584 _i=(/*RF2*/(se_i118(&ds,((T118*)ci(118,(/*RF2*/(C)->_string_list/*25*/),251665942))))->_upper/*4*/);
19585 }
19586 /*FI]*/
19587 /*[IF*/
19588 if(((ds.p=251666446),(_i)!=((/*RF2*/(C)->_list_i/*33*/)))){
19589 (ds.p=251666700);
19590 (/*SFN*/C->_list_i/*33*/)=_i;
19591 (ds.p=251666956);
19592 r120put_string(&ds,C,r118_px_64(&ds,se_i118(&ds,((T118*)ci(118,(/*RF2*/(C)->_string_list/*25*/),251666978))),(/*RF2*/(C)->_list_i/*33*/)));
19593 (ds.p=251667212);
19594 r120raise_signal(&ds,C,3);
19595 (ds.p=251667468);
19596 r120update_image(&ds,C);
19597 }
19598 /*FI]*/
19599 se_dst=caller;/*unlink*/
19600 }
19601
19602 void r120widget_init(se_dump_stack*caller,T120* C){
19603 static se_frame_descriptor fd={"widget_init WIDGET",1,0,"%R120%",1};
19604 se_dump_stack ds;
19605 ds.fd=&fd;
19606 ds.current=((void**)&C);
19607 ds.p=62919434;
19608 ds.caller=caller;
19609 ds.locals=NULL;
19610 se_dst=&ds;/*link*/
19611 (ds.p=62919940);
19612 {T45*n=new45();
19613 r45make(&ds,n);
19614 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
19615 se_i45(&ds,n);}
19616 se_dst=caller;/*unlink*/
19617 }
19618
19619 void r120update_image(se_dump_stack*caller,T120* C){
19620 static se_frame_descriptor fd={"update_image LISTBOX",1,0,"%R120%",1};
19621 se_dump_stack ds;
19622 ds.fd=&fd;
19623 ds.current=((void**)&C);
19624 ds.p=251681546;
19625 ds.caller=caller;
19626 ds.locals=NULL;
19627 se_dst=&ds;/*link*/
19628 (ds.p=251682068);
19629 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_textimg/*37*/),251682052)));
19630 /*[IF*/
19631 if(((ds.p=251682340),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*29*/),251682314))))->_count/*8*/))>(0))){
19632 (ds.p=251682588);
19633 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_textimg/*37*/),251682572)),(/*RF2*/(C)->_string/*29*/),r120font(&ds,C),r120white(&ds));
19634 }
19635 /*FI]*/
19636 se_dst=caller;/*unlink*/
19637 }
19638
19639 void r120make(se_dump_stack*caller,T120* C){
19640 static se_frame_descriptor fd={"make LISTBOX",1,0,"%R120%",1};
19641 se_dump_stack ds;
19642 ds.fd=&fd;
19643 ds.current=((void**)&C);
19644 ds.p=251672586;
19645 ds.caller=caller;
19646 ds.locals=NULL;
19647 se_dst=&ds;/*link*/
19648 (ds.p=251673092);
19649 r120widget_init(&ds,C);
19650 (ds.p=251673348);
19651 {T7*n=new7();
19652 r7make(&ds,n,128);
19653 (/*SFN*/C->_string/*29*/)=((T0*)n);
19654 se_i7(&ds,n);}
19655 (ds.p=251673604);
19656 {T118*n=new118();
19657 r118make(&ds,n);
19658 (/*SFN*/C->_string_list/*25*/)=((T0*)n);
19659 se_i118(&ds,n);}
19660 (ds.p=251673860);
19661 {T50*n=new50();
19662 r50make(&ds,n);
19663 (/*SFN*/C->_textimg/*37*/)=((T0*)n);
19664 }
19665 (ds.p=251674132);
19666 r50new_dummy(&ds,((T50*)ci(50,(/*RF2*/(C)->_textimg/*37*/),251674116)));
19667 se_dst=caller;/*unlink*/
19668 }
19669
19670 T6 r120contains(se_dump_stack*caller,T120* C,T2 a1,T2 a2){
19671 T6 R=0;
19672 void**locals[3];
19673 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R120%x%E2%y%E2%Result%E6%",1};
19674 se_dump_stack ds;
19675 ds.fd=&fd;
19676 ds.current=((void**)&C);
19677 ds.p=62930698;
19678 ds.caller=caller;
19679 ds.locals=locals;
19680 locals[0]=(void**)&a1;
19681 locals[1]=(void**)&a2;
19682 locals[2]=(void**)&R;
19683 se_dst=&ds;/*link*/
19684 (ds.p=62931204);
19685 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
19686 se_dst=caller;/*unlink*/
19687 return R;
19688 }
19689
19690 void r120fill_rect(se_dump_stack*caller,T120* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
19691 void**locals[5];
19692 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R120%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
19693 se_dump_stack ds;
19694 ds.fd=&fd;
19695 ds.current=((void**)&C);
19696 ds.p=62937354;
19697 ds.caller=caller;
19698 ds.locals=locals;
19699 locals[0]=(void**)&a1;
19700 locals[1]=(void**)&a2;
19701 locals[2]=(void**)&a3;
19702 locals[3]=(void**)&a4;
19703 locals[4]=(void**)&a5;
19704 se_dst=&ds;/*link*/
19705 (ds.p=62937860);
19706 r120ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
19707 se_dst=caller;/*unlink*/
19708 }
19709
19710 void r120put_xy(se_dump_stack*caller,T120* C,T2 a1,T2 a2){
19711 void**locals[2];
19712 static se_frame_descriptor fd={"put_xy WIDGET",1,2,"%R120%x%E2%y%E2%",1};
19713 se_dump_stack ds;
19714 ds.fd=&fd;
19715 ds.current=((void**)&C);
19716 ds.p=62927626;
19717 ds.caller=caller;
19718 ds.locals=locals;
19719 locals[0]=(void**)&a1;
19720 locals[1]=(void**)&a2;
19721 se_dst=&ds;/*link*/
19722 (ds.p=62928132);
19723 (/*SFN*/C->_offsetx/*9*/)=a1;
19724 (ds.p=62928388);
19725 (/*SFN*/C->_offsety/*13*/)=a2;
19726 se_dst=caller;/*unlink*/
19727 }
19728
19729 T6 r120standard_is_equal(se_dump_stack*caller,T120* C,T0* a1){
19730 T6 R=0;
19731 void**locals[2];
19732 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R120%other%R120%Result%E6%",1};
19733 se_dump_stack ds;
19734 ds.fd=&fd;
19735 ds.current=((void**)&C);
19736 ds.p=2128406;
19737 ds.caller=caller;
19738 ds.locals=locals;
19739 locals[0]=(void**)&a1;
19740 locals[1]=(void**)&R;
19741 se_dst=&ds;/*link*/
19742 se_require_uppermost_flag=1;
19743 if(fd.assertion_flag){
19744 fd.assertion_flag=0;
19745 (ds.p=2129184);
19746 ac_req((a1)!=((void*)(NULL)),NULL);
19747 fd.assertion_flag=1;
19748 }
19749 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
19750 fd.assertion_flag=0;
19751 (ds.p=2129976);
19752 ac_ens((!(R))||(r120standard_is_equal(&ds,((T120*)ci(120,a1,2129992)),(T0*)C)),"symmetric");
19753 fd.assertion_flag=1;
19754 }
19755 se_dst=caller;/*unlink*/
19756 return R;
19757 }
19758
19759 void r120put_size(se_dump_stack*caller,T120* C,T2 a1,T2 a2){
19760 void**locals[2];
19761 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R120%w%E2%h%E2%",1};
19762 se_dump_stack ds;
19763 ds.fd=&fd;
19764 ds.current=((void**)&C);
19765 ds.p=62929162;
19766 ds.caller=caller;
19767 ds.locals=locals;
19768 locals[0]=(void**)&a1;
19769 locals[1]=(void**)&a2;
19770 se_dst=&ds;/*link*/
19771 (ds.p=62929668);
19772 (/*SFN*/C->_width/*17*/)=a1;
19773 (ds.p=62929924);
19774 (/*SFN*/C->_height/*21*/)=a2;
19775 se_dst=caller;/*unlink*/
19776 }
19777
19778 void r120ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
19779 void**locals[5];
19780 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
19781 se_dump_stack ds;
19782 ds.fd=&fd;
19783 ds.current=NULL;
19784 ds.p=62938634;
19785 ds.caller=caller;
19786 ds.locals=locals;
19787 locals[0]=(void**)&a1;
19788 locals[1]=(void**)&a2;
19789 locals[2]=(void**)&a3;
19790 locals[3]=(void**)&a4;
19791 locals[4]=(void**)&a5;
19792 se_dst=&ds;/*link*/
19793 /*[ from line 95 of ./widget.e:*/
19794 (ds.p=62938908);
19795 ext_fill_rect(a1,a2,a3,a4,a5);
19796 /* from line 95 of ./widget.e]*/
19797 se_dst=caller;/*unlink*/
19798 }
19799 T0*oBC18grey=NULL;
19800 int fBC18grey=0;
19801
19802 T0* r120grey(se_dump_stack*caller){
19803 if(fBC18grey==0){fBC18grey=1;{
19804 void**locals[1];
19805 static se_frame_descriptor fd={"grey COLOR_TABLE",0,1,"Result%R51%",1};
19806 se_dump_stack ds;
19807 ds.fd=&fd;
19808 ds.current=NULL;
19809 ds.p=37750794;
19810 ds.caller=caller;
19811 ds.locals=locals;
19812 locals[0]=(void**)&oBC18grey;
19813 se_dst=&ds;/*link*/
19814 (ds.p=37751300);
19815 {T51*n=new51();
19816 oBC18grey=((T0*)n);
19817 r51make(&ds,n,127,127,127);
19818 }
19819 se_dst=caller;/*unlink*/
19820 }}
19821 return oBC18grey;
19822 }
19823
19824 void r120put_focus(se_dump_stack*caller,T120* C,T6 a1){
19825 void**locals[1];
19826 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R120%b%E6%",1};
19827 se_dump_stack ds;
19828 ds.fd=&fd;
19829 ds.current=((void**)&C);
19830 ds.p=62916874;
19831 ds.caller=caller;
19832 ds.locals=locals;
19833 locals[0]=(void**)&a1;
19834 se_dst=&ds;/*link*/
19835 (ds.p=62917380);
19836 (/*SFN*/C->_has_focus/*4*/)=a1;
19837 se_dst=caller;/*unlink*/
19838 }
19839
19840 void r120blit(se_dump_stack*caller,T120* C,T0* a1,T2 a2,T2 a3){
19841 void**locals[3];
19842 static se_frame_descriptor fd={"blit WIDGET",1,3,"%R120%img%R50%x%E2%y%E2%",1};
19843 se_dump_stack ds;
19844 ds.fd=&fd;
19845 ds.current=((void**)&C);
19846 ds.p=62939658;
19847 ds.caller=caller;
19848 ds.locals=locals;
19849 locals[0]=(void**)&a1;
19850 locals[1]=(void**)&a2;
19851 locals[2]=(void**)&a3;
19852 se_dst=&ds;/*link*/
19853 (ds.p=62940172);
19854 r50blit(&ds,((T50*)ci(50,a1,62940164)),(a2)+((/*RF2*/(C)->_offsetx/*9*/)),(a3)+((/*RF2*/(C)->_offsety/*13*/)));
19855 se_dst=caller;/*unlink*/
19856 }
19857
19858 void r120process_event(se_dump_stack*caller,T120* C,T0* a1){
19859 void**locals[1];
19860 static se_frame_descriptor fd={"process_event LISTBOX",1,1,"%R120%e%R28%",1};
19861 se_dump_stack ds;
19862 ds.fd=&fd;
19863 ds.current=((void**)&C);
19864 ds.p=251674890;
19865 ds.caller=caller;
19866 ds.locals=locals;
19867 locals[0]=(void**)&a1;
19868 se_dst=&ds;/*link*/
19869 /*[IF*/
19870 if(((ds.p=251675416),((/*RF2*/(((T28*)ci(28,a1,251675402)))->_type/*12*/))==(5))){
19871 /*[IF*/
19872 if(((ds.p=251675676),((/*RF2*/(((T28*)ci(28,a1,251675666)))->_i1/*16*/))==(1))){
19873 (ds.p=251675910);
19874 r120next_string(&ds,C);
19875 }
19876 else{
19877 (ds.p=251676422);
19878 r120prev_string(&ds,C);
19879 }
19880 /*FI]*/
19881 }
19882 /*FI]*/
19883 se_dst=caller;/*unlink*/
19884 }
19885
19886 T0* r120twin(se_dump_stack*caller,T120* C){
19887 T0* R=NULL;
19888 void**locals[1];
19889 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R120%Result%R120%",1};
19890 se_dump_stack ds;
19891 ds.fd=&fd;
19892 ds.current=((void**)&C);
19893 ds.p=2140182;
19894 ds.caller=caller;
19895 ds.locals=locals;
19896 locals[0]=(void**)&R;
19897 se_dst=&ds;/*link*/
19898 R=((void*)new120());
19899 *((T120*)R)=*C;
19900 if(fd.assertion_flag){
19901 fd.assertion_flag=0;
19902 (ds.p=2142256);
19903 ac_ens(r120is_equal(&ds,((T120*)ci(120,R,2142242)),(T0*)C),"equal");
19904 fd.assertion_flag=1;
19905 }
19906 se_dst=caller;/*unlink*/
19907 return R;
19908 }
19909
19910 T0* r120white(se_dump_stack*caller){
19911 if(fBC18white==0){fBC18white=1;{
19912 void**locals[1];
19913 static se_frame_descriptor fd={"white COLOR_TABLE",0,1,"Result%R51%",1};
19914 se_dump_stack ds;
19915 ds.fd=&fd;
19916 ds.current=NULL;
19917 ds.p=37752074;
19918 ds.caller=caller;
19919 ds.locals=locals;
19920 locals[0]=(void**)&oBC18white;
19921 se_dst=&ds;/*link*/
19922 (ds.p=37752580);
19923 {T51*n=new51();
19924 oBC18white=((T0*)n);
19925 r51make(&ds,n,255,255,255);
19926 }
19927 se_dst=caller;/*unlink*/
19928 }}
19929 return oBC18white;
19930 }
19931
19932 void r120raise_signal(se_dump_stack*caller,T120* C,T2 a1){
19933 void**locals[1];
19934 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R120%i%E2%",1};
19935 se_dump_stack ds;
19936 ds.fd=&fd;
19937 ds.current=((void**)&C);
19938 ds.p=62924554;
19939 ds.caller=caller;
19940 ds.locals=locals;
19941 locals[0]=(void**)&a1;
19942 se_dst=&ds;/*link*/
19943 /*[IF*/
19944 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
19945 (ds.p=62925362);
19946 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
19947 }
19948 /*FI]*/
19949 se_dst=caller;/*unlink*/
19950 }
19951
19952 T0* r120font(se_dump_stack*caller,T120* C){
19953 T0* R=NULL;
19954 void**locals[1];
19955 static se_frame_descriptor fd={"font WIDGET",1,1,"%R120%Result%R53%",1};
19956 se_dump_stack ds;
19957 ds.fd=&fd;
19958 ds.current=((void**)&C);
19959 ds.p=62918154;
19960 ds.caller=caller;
19961 ds.locals=locals;
19962 locals[0]=(void**)&R;
19963 se_dst=&ds;/*link*/
19964 (ds.p=62918660);
19965 R=(/*RF2*/(((T54*)ci(54,r120config(&ds),62918680)))->_mainfont/*20*/);
19966 se_dst=caller;/*unlink*/
19967 return R;
19968 }
19969
19970 void r120put_list(se_dump_stack*caller,T120* C,T0* a1){
19971 void**locals[1];
19972 static se_frame_descriptor fd={"put_list LISTBOX",1,1,"%R120%l%R118%",1};
19973 se_dump_stack ds;
19974 ds.fd=&fd;
19975 ds.current=((void**)&C);
19976 ds.p=251660810;
19977 ds.caller=caller;
19978 ds.locals=locals;
19979 locals[0]=(void**)&a1;
19980 se_dst=&ds;/*link*/
19981 (ds.p=251661316);
19982 (/*SFN*/C->_string_list/*25*/)=a1;
19983 se_dst=caller;/*unlink*/
19984 }
19985
19986 void r120put_string(se_dump_stack*caller,T120* C,T0* a1){
19987 void**locals[1];
19988 static se_frame_descriptor fd={"put_string LISTBOX",1,1,"%R120%s%R7%",1};
19989 se_dump_stack ds;
19990 ds.fd=&fd;
19991 ds.current=((void**)&C);
19992 ds.p=251662090;
19993 ds.caller=caller;
19994 ds.locals=locals;
19995 locals[0]=(void**)&a1;
19996 se_dst=&ds;/*link*/
19997 se_require_uppermost_flag=1;
19998 if(fd.assertion_flag){
19999 fd.assertion_flag=0;
20000 (ds.p=251662620);
20001 ac_req(r118has(&ds,se_i118(&ds,((T118*)ci(118,(/*RF2*/(C)->_string_list/*25*/),251662596))),a1),NULL);
20002 fd.assertion_flag=1;
20003 }
20004 (ds.p=251663108);
20005 (/*SFN*/C->_list_i/*33*/)=r118index_of(&ds,se_i118(&ds,((T118*)ci(118,(/*RF2*/(C)->_string_list/*25*/),251663128))),a1);
20006 (ds.p=251663364);
20007 {T7*n=new7();
20008 r7copy(&ds,n,a1);
20009 (/*SFN*/C->_string/*29*/)=((T0*)n);
20010 se_i7(&ds,n);}
20011 (ds.p=251663620);
20012 r120update_image(&ds,C);
20013 se_dst=caller;/*unlink*/
20014 }
20015
20016 void r120update(se_dump_stack*caller,T120* C){
20017 static se_frame_descriptor fd={"update LISTBOX",1,0,"%R120%",1};
20018 se_dump_stack ds;
20019 ds.fd=&fd;
20020 ds.current=((void**)&C);
20021 ds.p=251677706;
20022 ds.caller=caller;
20023 ds.locals=NULL;
20024 se_dst=&ds;/*link*/
20025 /*[IF*/
20026 if(((ds.p=251678218),(/*RF2*/(C)->_has_focus/*4*/))){
20027 (ds.p=251678476);
20028 r120fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r120white(&ds));
20029 }
20030 else{
20031 (ds.p=251678988);
20032 r120fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r120grey(&ds));
20033 }
20034 /*FI]*/
20035 (ds.p=251679492);
20036 r120fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r120black(&ds));
20037 /*[IF*/
20038 if(((ds.p=251679780),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*29*/),251679754))))->_count/*8*/))>(0))){
20039 (ds.p=251680012);
20040 r120blit(&ds,C,(/*RF2*/(C)->_textimg/*37*/),2,2);
20041 }
20042 /*FI]*/
20043 se_dst=caller;/*unlink*/
20044 }
20045
20046 T0* r120black(se_dump_stack*caller){
20047 if(fBC18black==0){fBC18black=1;{
20048 void**locals[1];
20049 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
20050 se_dump_stack ds;
20051 ds.fd=&fd;
20052 ds.current=NULL;
20053 ds.p=37749514;
20054 ds.caller=caller;
20055 ds.locals=locals;
20056 locals[0]=(void**)&oBC18black;
20057 se_dst=&ds;/*link*/
20058 (ds.p=37750020);
20059 {T51*n=new51();
20060 oBC18black=((T0*)n);
20061 r51make(&ds,n,0,0,0);
20062 }
20063 se_dst=caller;/*unlink*/
20064 }}
20065 return oBC18black;
20066 }
20067
20068 T6 r53is_equal(se_dump_stack*caller,T53* C,T0* a1){
20069 T6 R=0;
20070 void**locals[2];
20071 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R53%other%R53%Result%E6%",1};
20072 se_dump_stack ds;
20073 ds.fd=&fd;
20074 ds.current=((void**)&C);
20075 ds.p=2120968;
20076 ds.caller=caller;
20077 ds.locals=locals;
20078 locals[0]=(void**)&a1;
20079 locals[1]=(void**)&R;
20080 se_dst=&ds;/*link*/
20081 se_require_uppermost_flag=1;
20082 if(fd.assertion_flag){
20083 fd.assertion_flag=0;
20084 (ds.p=2122048);
20085 ac_req((a1)!=((void*)(NULL)),"other_not_void");
20086 fd.assertion_flag=1;
20087 }
20088 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20089 fd.assertion_flag=0;
20090 (ds.p=2122846);
20091 ac_ens((!(r53standard_is_equal(&ds,C,a1)))||(R),"consistent");
20092 (ds.p=2123064);
20093 ac_ens((!(R))||(r53is_equal(&ds,((T53*)ci(53,a1,2123080)),(T0*)C)),"symmetric");
20094 fd.assertion_flag=1;
20095 }
20096 se_dst=caller;/*unlink*/
20097 return R;
20098 }
20099
20100 void r53load(se_dump_stack*caller,T53* C,T0* a1,T2 a2){
20101 void**locals[2];
20102 static se_frame_descriptor fd={"load TTF_FONT",1,2,"%R53%filename%R7%size%E2%",1};
20103 se_dump_stack ds;
20104 ds.fd=&fd;
20105 ds.current=((void**)&C);
20106 ds.p=111151626;
20107 ds.caller=caller;
20108 ds.locals=locals;
20109 locals[0]=(void**)&a1;
20110 locals[1]=(void**)&a2;
20111 se_dst=&ds;/*link*/
20112 se_require_uppermost_flag=1;
20113 if(fd.assertion_flag){
20114 fd.assertion_flag=0;
20115 (ds.p=111152150);
20116 ac_req((a1)!=((void*)(NULL)),NULL);
20117 fd.assertion_flag=1;
20118 }
20119 (ds.p=111152644);
20120 (/*SFN*/C->_ptr/*5*/)=r53ext_ttf_openfont(&ds,r7to_external(&ds,se_i7(&ds,((T7*)ci(7,a1,111152692)))),a2);
20121 /*[IF*/
20122 if(((ds.p=111152914),(NULL!=(/*RF2*/(C)->_ptr/*5*/)))){
20123 (ds.p=111153164);
20124 (/*SFN*/C->_is_connected/*4*/)=1;
20125 }
20126 else{
20127 (ds.p=111153684);
20128 r57put_string(&ds,((T57*)ci(57,oBC1io,111153678)),r7_px_43(&ds,se_i7(&ds,((T7*)ci(7,r7_px_43(&ds,se_ms(21,"Failed to load font: "),a1),111153754))),((T0*)se_ms(1,"\n"))));
20129 }
20130 /*FI]*/
20131 se_dst=caller;/*unlink*/
20132 }
20133
20134 T6 r53standard_is_equal(se_dump_stack*caller,T53* C,T0* a1){
20135 T6 R=0;
20136 void**locals[2];
20137 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R53%other%R53%Result%E6%",1};
20138 se_dump_stack ds;
20139 ds.fd=&fd;
20140 ds.current=((void**)&C);
20141 ds.p=2128406;
20142 ds.caller=caller;
20143 ds.locals=locals;
20144 locals[0]=(void**)&a1;
20145 locals[1]=(void**)&R;
20146 se_dst=&ds;/*link*/
20147 se_require_uppermost_flag=1;
20148 if(fd.assertion_flag){
20149 fd.assertion_flag=0;
20150 (ds.p=2129184);
20151 ac_req((a1)!=((void*)(NULL)),NULL);
20152 fd.assertion_flag=1;
20153 }
20154 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20155 fd.assertion_flag=0;
20156 (ds.p=2129976);
20157 ac_ens((!(R))||(r53standard_is_equal(&ds,((T53*)ci(53,a1,2129992)),(T0*)C)),"symmetric");
20158 fd.assertion_flag=1;
20159 }
20160 se_dst=caller;/*unlink*/
20161 return R;
20162 }
20163
20164 T8 r53ext_ttf_openfont(se_dump_stack*caller,T8 a1,T2 a2){
20165 T8 R=NULL;
20166 void**locals[3];
20167 static se_frame_descriptor fd={"ext_ttf_openfont TTF_FONT",0,3,"p%E8%size%E2%Result%E8%",1};
20168 se_dump_stack ds;
20169 ds.fd=&fd;
20170 ds.current=NULL;
20171 ds.p=111162122;
20172 ds.caller=caller;
20173 ds.locals=locals;
20174 locals[0]=(void**)&a1;
20175 locals[1]=(void**)&a2;
20176 locals[2]=(void**)&R;
20177 se_dst=&ds;/*link*/
20178 /*[ from line 52 of ./ttf_font.e:*/
20179 (ds.p=111162396);
20180 R=(ext_ttf_openfont(a1,a2));
20181 /* from line 52 of ./ttf_font.e]*/
20182 se_dst=caller;/*unlink*/
20183 return R;
20184 }
20185
20186 T8 r53to_external(se_dump_stack*caller,T53* C){
20187 T8 R=NULL;
20188 void**locals[1];
20189 static se_frame_descriptor fd={"to_external TTF_FONT",1,1,"%R53%Result%E8%",1};
20190 se_dump_stack ds;
20191 ds.fd=&fd;
20192 ds.current=((void**)&C);
20193 ds.p=111158026;
20194 ds.caller=caller;
20195 ds.locals=locals;
20196 locals[0]=(void**)&R;
20197 se_dst=&ds;/*link*/
20198 (ds.p=111158532);
20199 R=(/*RF2*/(C)->_ptr/*5*/);
20200 se_dst=caller;/*unlink*/
20201 return R;
20202 }
20203
20204 T0* r53twin(se_dump_stack*caller,T53* C){
20205 T0* R=NULL;
20206 void**locals[1];
20207 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R53%Result%R53%",1};
20208 se_dump_stack ds;
20209 ds.fd=&fd;
20210 ds.current=((void**)&C);
20211 ds.p=2140182;
20212 ds.caller=caller;
20213 ds.locals=locals;
20214 locals[0]=(void**)&R;
20215 se_dst=&ds;/*link*/
20216 R=((void*)new53());
20217 *((T53*)R)=*C;
20218 if(fd.assertion_flag){
20219 fd.assertion_flag=0;
20220 (ds.p=2142256);
20221 ac_ens(r53is_equal(&ds,((T53*)ci(53,R,2142242)),(T0*)C),"equal");
20222 fd.assertion_flag=1;
20223 }
20224 se_dst=caller;/*unlink*/
20225 return R;
20226 }
20227
20228 void r77next(se_dump_stack*caller,T77* C){
20229 T2 _tmp=0;
20230 void**locals[1];
20231 static se_frame_descriptor fd={"next STD_RAND",1,1,"%R77%tmp%E2%",1};
20232 se_dump_stack ds;
20233 ds.fd=&fd;
20234 ds.current=((void**)&C);
20235 ds.p=161499656;
20236 ds.caller=caller;
20237 ds.locals=locals;
20238 locals[0]=(void**)&_tmp;
20239 se_dst=&ds;/*link*/
20240 (ds.p=161500692);
20241 _tmp=(((/*RF2*/(C)->_iy/*12*/))%(32))+(1);
20242 (ds.p=161500948);
20243 r77min_next(&ds,C);
20244 (ds.p=161501204);
20245 (/*SFN*/C->_iy/*12*/)=r83item(&ds,se_i83(&ds,((T83*)ci(83,(/*RF2*/(C)->_iv/*8*/),161501216))),_tmp);
20246 (ds.p=161501466);
20247 r83put(&ds,se_i83(&ds,((T83*)ci(83,(/*RF2*/(C)->_iv/*8*/),161501460))),(/*RF2*/(C)->_seed/*4*/),_tmp);
20248 if(se_rci(caller,C))se_i77(&ds,C);
20249 se_dst=caller;/*unlink*/
20250 }
20251
20252 T2 r77last_integer(se_dump_stack*caller,T77* C,T2 a1){
20253 T2 R=0;
20254 void**locals[2];
20255 static se_frame_descriptor fd={"last_integer STD_RAND",1,2,"%R77%n%E2%Result%E2%",1};
20256 se_dump_stack ds;
20257 ds.fd=&fd;
20258 ds.current=((void**)&C);
20259 ds.p=161502216;
20260 ds.caller=caller;
20261 ds.locals=locals;
20262 locals[0]=(void**)&a1;
20263 locals[1]=(void**)&R;
20264 se_dst=&ds;/*link*/
20265 se_require_uppermost_flag=1;
20266 if(fd.assertion_flag){
20267 fd.assertion_flag=0;
20268 (ds.p=165691672);
20269 ac_req((a1)>=(1),NULL);
20270 fd.assertion_flag=1;
20271 }
20272 (ds.p=161502740);
20273 R=(((/*RF2*/(C)->_iy/*12*/))%(a1))+(1);
20274 if(fd.assertion_flag){
20275 fd.assertion_flag=0;
20276 (ds.p=165692460);
20277 ac_ens(r6_px_and(&ds,(1)<=(R),(R)<=(a1)),NULL);
20278 fd.assertion_flag=1;
20279 }
20280 if(se_rci(caller,C))se_i77(&ds,C);
20281 se_dst=caller;/*unlink*/
20282 return R;
20283 }
20284
20285 T6 r77is_equal(se_dump_stack*caller,T77* C,T0* a1){
20286 T6 R=0;
20287 void**locals[2];
20288 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R77%other%R77%Result%E6%",1};
20289 se_dump_stack ds;
20290 ds.fd=&fd;
20291 ds.current=((void**)&C);
20292 ds.p=2120968;
20293 ds.caller=caller;
20294 ds.locals=locals;
20295 locals[0]=(void**)&a1;
20296 locals[1]=(void**)&R;
20297 se_dst=&ds;/*link*/
20298 se_require_uppermost_flag=1;
20299 if(fd.assertion_flag){
20300 fd.assertion_flag=0;
20301 (ds.p=2122048);
20302 ac_req((a1)!=((void*)(NULL)),"other_not_void");
20303 fd.assertion_flag=1;
20304 }
20305 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20306 fd.assertion_flag=0;
20307 (ds.p=2122846);
20308 ac_ens((!(r77standard_is_equal(&ds,C,a1)))||(R),"consistent");
20309 (ds.p=2123064);
20310 ac_ens((!(R))||(r77is_equal(&ds,se_i77(&ds,((T77*)ci(77,a1,2123080))),(T0*)C)),"symmetric");
20311 fd.assertion_flag=1;
20312 }
20313 if(se_rci(caller,C))se_i77(&ds,C);
20314 se_dst=caller;/*unlink*/
20315 return R;
20316 }
20317
20318 void r77with_seed(se_dump_stack*caller,T77* C,T2 a1){
20319 T2 _i=0;
20320 void**locals[2];
20321 static se_frame_descriptor fd={"with_seed STD_RAND",1,2,"%R77%seed_value%E2%i%E2%",1};
20322 se_dump_stack ds;
20323 ds.fd=&fd;
20324 ds.current=((void**)&C);
20325 ds.p=161491464;
20326 ds.caller=caller;
20327 ds.locals=locals;
20328 locals[0]=(void**)&a1;
20329 locals[1]=(void**)&_i;
20330 se_dst=&ds;/*link*/
20331 se_require_uppermost_flag=0;
20332 se_require_last_result=1;
20333 if(fd.assertion_flag){
20334 fd.assertion_flag=0;
20335 (ds.p=161492042);
20336 ac_req(r6_px_and(&ds,(a1)>(0),(a1)<(2147483647)),"valid_seed");
20337 fd.assertion_flag=1;
20338 }
20339 se_require_uppermost_flag=1;
20340 if(!se_require_last_result){
20341 se_require_last_result=1;
20342 if(fd.assertion_flag){
20343 fd.assertion_flag=0;
20344 (ds.p=163591754);
20345 ac_req(r6_px_and(&ds,(a1)>(0),(a1)<(2147483647)),"valid_seed");
20346 fd.assertion_flag=1;
20347 }
20348 }
20349 (ds.p=161493012);
20350 (/*SFN*/C->_seed/*4*/)=a1;
20351 (ds.p=161493268);
20352 r77min_next(&ds,C);
20353 (ds.p=161493524);
20354 {T83*n=new83();
20355 r83make(&ds,n,1,32);
20356 (/*SFN*/C->_iv/*8*/)=((T0*)n);
20357 se_i83(&ds,n);}
20358 (ds.p=161494042);
20359 _i=1;
20360 while (!(((ds.p=161494558),(_i)>(7))))
20361 {
20362 (ds.p=161495066);
20363 r77min_next(&ds,C);
20364 (ds.p=161495322);
20365 _i=(_i)+(1);
20366 }
20367 (ds.p=161496090);
20368 _i=32;
20369 while (!(((ds.p=161496606),(_i)==(0))))
20370 {
20371 (ds.p=161497120);
20372 r83put(&ds,se_i83(&ds,((T83*)ci(83,(/*RF2*/(C)->_iv/*8*/),161497114))),(/*RF2*/(C)->_seed/*4*/),_i);
20373 (ds.p=161497370);
20374 r77min_next(&ds,C);
20375 (ds.p=161497626);
20376 _i=(_i)-(1);
20377 }
20378 (ds.p=161498132);
20379 (/*SFN*/C->_iy/*12*/)=r83item(&ds,se_i83(&ds,((T83*)ci(83,(/*RF2*/(C)->_iv/*8*/),161498144))),1);
20380 (ds.p=161498388);
20381 r77next(&ds,C);
20382 if(se_rci(caller,C))se_i77(&ds,C);
20383 se_dst=caller;/*unlink*/
20384 }
20385
20386 T6 r77standard_is_equal(se_dump_stack*caller,T77* C,T0* a1){
20387 T6 R=0;
20388 void**locals[2];
20389 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R77%other%R77%Result%E6%",1};
20390 se_dump_stack ds;
20391 ds.fd=&fd;
20392 ds.current=((void**)&C);
20393 ds.p=2128406;
20394 ds.caller=caller;
20395 ds.locals=locals;
20396 locals[0]=(void**)&a1;
20397 locals[1]=(void**)&R;
20398 se_dst=&ds;/*link*/
20399 se_require_uppermost_flag=1;
20400 if(fd.assertion_flag){
20401 fd.assertion_flag=0;
20402 (ds.p=2129184);
20403 ac_req((a1)!=((void*)(NULL)),NULL);
20404 fd.assertion_flag=1;
20405 }
20406 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20407 fd.assertion_flag=0;
20408 (ds.p=2129976);
20409 ac_ens((!(R))||(r77standard_is_equal(&ds,se_i77(&ds,((T77*)ci(77,a1,2129992))),(T0*)C)),"symmetric");
20410 fd.assertion_flag=1;
20411 }
20412 if(se_rci(caller,C))se_i77(&ds,C);
20413 se_dst=caller;/*unlink*/
20414 return R;
20415 }
20416
20417 void r77min_next(se_dump_stack*caller,T77* C){
20418 T2 _k=0;
20419 void**locals[1];
20420 static se_frame_descriptor fd={"min_next (next MIN_STAND)",1,1,"%R77%k%E2%",1};
20421 se_dump_stack ds;
20422 ds.fd=&fd;
20423 ds.current=((void**)&C);
20424 ds.p=163593224;
20425 ds.caller=caller;
20426 ds.locals=locals;
20427 locals[0]=(void**)&_k;
20428 se_dst=&ds;/*link*/
20429 (ds.p=163594260);
20430 _k=((/*RF2*/(C)->_seed/*4*/))/(127773);
20431 (ds.p=163594516);
20432 (/*SFN*/C->_seed/*4*/)=((16807)*(((/*RF2*/(C)->_seed/*4*/))-((_k)*(127773))))-((2836)*(_k));
20433 /*[IF*/
20434 if(((ds.p=163594788),((/*RF2*/(C)->_seed/*4*/))<(0))){
20435 (ds.p=163595034);
20436 (/*SFN*/C->_seed/*4*/)=((/*RF2*/(C)->_seed/*4*/))+(2147483647);
20437 }
20438 /*FI]*/
20439 if(se_rci(caller,C))se_i77(&ds,C);
20440 se_dst=caller;/*unlink*/
20441 }
20442
20443 T0* r77twin(se_dump_stack*caller,T77* C){
20444 T0* R=NULL;
20445 void**locals[1];
20446 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R77%Result%R77%",1};
20447 se_dump_stack ds;
20448 ds.fd=&fd;
20449 ds.current=((void**)&C);
20450 ds.p=2140182;
20451 ds.caller=caller;
20452 ds.locals=locals;
20453 locals[0]=(void**)&R;
20454 se_dst=&ds;/*link*/
20455 R=((void*)new77());
20456 *((T77*)R)=*C;
20457 if(fd.assertion_flag){
20458 fd.assertion_flag=0;
20459 (ds.p=2142256);
20460 ac_ens(r77is_equal(&ds,se_i77(&ds,((T77*)ci(77,R,2142242))),(T0*)C),"equal");
20461 fd.assertion_flag=1;
20462 }
20463 if(se_rci(caller,C))se_i77(&ds,C);
20464 se_dst=caller;/*unlink*/
20465 return R;
20466 }
20467 se_frame_descriptor se_ifd77={"invariant once STD_RAND",1,0,"%R77%",1};
20468
20469 T77*se_i77(se_dump_stack*caller,T77*C){
20470 se_dump_stack ds;
20471 ds.fd=&se_ifd77;
20472 ds.current=((void**)&C);
20473 ds.p=161483790;
20474 ds.caller=caller;
20475 se_dst=&ds;
20476 if(ds.fd->assertion_flag){
20477 ds.fd->assertion_flag=0;
20478 (ds.p=163599152);
20479 ac_inv(r6_px_and(&ds,((/*RF2*/(C)->_seed/*4*/))>(0),((/*RF2*/(C)->_seed/*4*/))<(2147483647)),"good_seed");
20480 ds.fd->assertion_flag=1;
20481 }
20482 se_dst=caller;
20483 return C;
20484 }
20485
20486 T8 r51ext_make_color(se_dump_stack*caller,T2 a1,T2 a2,T2 a3){
20487 T8 R=NULL;
20488 void**locals[4];
20489 static se_frame_descriptor fd={"ext_make_color COLOR",0,4,"r%E2%g%E2%b%E2%Result%E8%",1};
20490 se_dump_stack ds;
20491 ds.fd=&fd;
20492 ds.current=NULL;
20493 ds.p=106961674;
20494 ds.caller=caller;
20495 ds.locals=locals;
20496 locals[0]=(void**)&a1;
20497 locals[1]=(void**)&a2;
20498 locals[2]=(void**)&a3;
20499 locals[3]=(void**)&R;
20500 se_dst=&ds;/*link*/
20501 /*[ from line 28 of ./color.e:*/
20502 (ds.p=106961948);
20503 R=(ext_make_color(a1,a2,a3));
20504 /* from line 28 of ./color.e]*/
20505 se_dst=caller;/*unlink*/
20506 return R;
20507 }
20508
20509 T2 r51ext_convert_color(se_dump_stack*caller,T2 a1,T2 a2,T2 a3){
20510 T2 R=0;
20511 void**locals[4];
20512 static se_frame_descriptor fd={"ext_convert_color COLOR",0,4,"r%E2%g%E2%b%E2%Result%E2%",1};
20513 se_dump_stack ds;
20514 ds.fd=&fd;
20515 ds.current=NULL;
20516 ds.p=106963722;
20517 ds.caller=caller;
20518 ds.locals=locals;
20519 locals[0]=(void**)&a1;
20520 locals[1]=(void**)&a2;
20521 locals[2]=(void**)&a3;
20522 locals[3]=(void**)&R;
20523 se_dst=&ds;/*link*/
20524 /*[ from line 36 of ./color.e:*/
20525 (ds.p=106963996);
20526 R=(ext_convert_color(a1,a2,a3));
20527 /* from line 36 of ./color.e]*/
20528 se_dst=caller;/*unlink*/
20529 return R;
20530 }
20531
20532 T6 r51is_equal(se_dump_stack*caller,T51* C,T0* a1){
20533 T6 R=0;
20534 void**locals[2];
20535 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R51%other%R51%Result%E6%",1};
20536 se_dump_stack ds;
20537 ds.fd=&fd;
20538 ds.current=((void**)&C);
20539 ds.p=2120968;
20540 ds.caller=caller;
20541 ds.locals=locals;
20542 locals[0]=(void**)&a1;
20543 locals[1]=(void**)&R;
20544 se_dst=&ds;/*link*/
20545 se_require_uppermost_flag=1;
20546 if(fd.assertion_flag){
20547 fd.assertion_flag=0;
20548 (ds.p=2122048);
20549 ac_req((a1)!=((void*)(NULL)),"other_not_void");
20550 fd.assertion_flag=1;
20551 }
20552 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20553 fd.assertion_flag=0;
20554 (ds.p=2122846);
20555 ac_ens((!(r51standard_is_equal(&ds,C,a1)))||(R),"consistent");
20556 (ds.p=2123064);
20557 ac_ens((!(R))||(r51is_equal(&ds,((T51*)ci(51,a1,2123080)),(T0*)C)),"symmetric");
20558 fd.assertion_flag=1;
20559 }
20560 se_dst=caller;/*unlink*/
20561 return R;
20562 }
20563
20564 void r51make(se_dump_stack*caller,T51* C,T2 a1,T2 a2,T2 a3){
20565 void**locals[3];
20566 static se_frame_descriptor fd={"make COLOR",1,3,"%R51%r%E2%g%E2%b%E2%",1};
20567 se_dump_stack ds;
20568 ds.fd=&fd;
20569 ds.current=((void**)&C);
20570 ds.p=106955786;
20571 ds.caller=caller;
20572 ds.locals=locals;
20573 locals[0]=(void**)&a1;
20574 locals[1]=(void**)&a2;
20575 locals[2]=(void**)&a3;
20576 se_dst=&ds;/*link*/
20577 (ds.p=106956292);
20578 (/*SFN*/C->_pointer/*12*/)=r51ext_make_color(&ds,a1,a2,a3);
20579 (ds.p=106956548);
20580 (/*SFN*/C->_to_integer/*4*/)=r51ext_convert_color(&ds,a1,a2,a3);
20581 (ds.p=106956804);
20582 (/*SFN*/C->_to_gfx_integer/*8*/)=((((((a1)*(256))*(256))*(256))+(((a2)*(256))*(256)))+((a3)*(256)))+(255);
20583 se_dst=caller;/*unlink*/
20584 }
20585
20586 T6 r51standard_is_equal(se_dump_stack*caller,T51* C,T0* a1){
20587 T6 R=0;
20588 void**locals[2];
20589 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R51%other%R51%Result%E6%",1};
20590 se_dump_stack ds;
20591 ds.fd=&fd;
20592 ds.current=((void**)&C);
20593 ds.p=2128406;
20594 ds.caller=caller;
20595 ds.locals=locals;
20596 locals[0]=(void**)&a1;
20597 locals[1]=(void**)&R;
20598 se_dst=&ds;/*link*/
20599 se_require_uppermost_flag=1;
20600 if(fd.assertion_flag){
20601 fd.assertion_flag=0;
20602 (ds.p=2129184);
20603 ac_req((a1)!=((void*)(NULL)),NULL);
20604 fd.assertion_flag=1;
20605 }
20606 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20607 fd.assertion_flag=0;
20608 (ds.p=2129976);
20609 ac_ens((!(R))||(r51standard_is_equal(&ds,((T51*)ci(51,a1,2129992)),(T0*)C)),"symmetric");
20610 fd.assertion_flag=1;
20611 }
20612 se_dst=caller;/*unlink*/
20613 return R;
20614 }
20615
20616 T8 r51to_external(se_dump_stack*caller,T51* C){
20617 T8 R=NULL;
20618 void**locals[1];
20619 static se_frame_descriptor fd={"to_external COLOR",1,1,"%R51%Result%E8%",1};
20620 se_dump_stack ds;
20621 ds.fd=&fd;
20622 ds.current=((void**)&C);
20623 ds.p=106958858;
20624 ds.caller=caller;
20625 ds.locals=locals;
20626 locals[0]=(void**)&R;
20627 se_dst=&ds;/*link*/
20628 (ds.p=106959364);
20629 R=(/*RF2*/(C)->_pointer/*12*/);
20630 se_dst=caller;/*unlink*/
20631 return R;
20632 }
20633
20634 T0* r51twin(se_dump_stack*caller,T51* C){
20635 T0* R=NULL;
20636 void**locals[1];
20637 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R51%Result%R51%",1};
20638 se_dump_stack ds;
20639 ds.fd=&fd;
20640 ds.current=((void**)&C);
20641 ds.p=2140182;
20642 ds.caller=caller;
20643 ds.locals=locals;
20644 locals[0]=(void**)&R;
20645 se_dst=&ds;/*link*/
20646 R=((void*)new51());
20647 *((T51*)R)=*C;
20648 if(fd.assertion_flag){
20649 fd.assertion_flag=0;
20650 (ds.p=2142256);
20651 ac_ens(r51is_equal(&ds,((T51*)ci(51,R,2142242)),(T0*)C),"equal");
20652 fd.assertion_flag=1;
20653 }
20654 se_dst=caller;/*unlink*/
20655 return R;
20656 }
20657
20658 void r97put_command(se_dump_stack*caller,T97* C,T0* a1,T2 a2){
20659 void**locals[2];
20660 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R97%c%R25%i%E2%",1};
20661 se_dump_stack ds;
20662 ds.fd=&fd;
20663 ds.current=((void**)&C);
20664 ds.p=62923274;
20665 ds.caller=caller;
20666 ds.locals=locals;
20667 locals[0]=(void**)&a1;
20668 locals[1]=(void**)&a2;
20669 se_dst=&ds;/*link*/
20670 (ds.p=62923806);
20671 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
20672 se_dst=caller;/*unlink*/
20673 }
20674
20675 void r97move_widget(se_dump_stack*caller,T97* C,T0* a1,T2 a2,T2 a3){
20676 void**locals[3];
20677 static se_frame_descriptor fd={"move_widget WINDOW",1,3,"%R97%w%R30%x%E2%y%E2%",1};
20678 se_dump_stack ds;
20679 ds.fd=&fd;
20680 ds.current=((void**)&C);
20681 ds.p=60835850;
20682 ds.caller=caller;
20683 ds.locals=locals;
20684 locals[0]=(void**)&a1;
20685 locals[1]=(void**)&a2;
20686 locals[2]=(void**)&a3;
20687 se_dst=&ds;/*link*/
20688 (ds.p=60836360);
20689 X30put_xy(&ds,60836356,a1,((X30offsetx(&ds,60836374,a1))-((/*RF2*/(C)->_offsetx/*9*/)))+(a2),((X30offsety(&ds,60836424,a1))-((/*RF2*/(C)->_offsety/*13*/)))+(a3));
20690 se_dst=caller;/*unlink*/
20691 }
20692
20693 void r97change_focus(se_dump_stack*caller,T97* C,T0* a1){
20694 void**locals[1];
20695 static se_frame_descriptor fd={"change_focus WINDOW",1,1,"%R97%w%R30%",1};
20696 se_dump_stack ds;
20697 ds.fd=&fd;
20698 ds.current=((void**)&C);
20699 ds.p=60832010;
20700 ds.caller=caller;
20701 ds.locals=locals;
20702 locals[0]=(void**)&a1;
20703 se_dst=&ds;/*link*/
20704 /*[IF*/
20705 if(((ds.p=60832548),((/*RF2*/(C)->_focus_widget/*29*/))!=((void*)(NULL)))){
20706 (ds.p=60832806);
20707 X30put_focus(&ds,60832780,(/*RF2*/(C)->_focus_widget/*29*/),0);
20708 }
20709 /*FI]*/
20710 (ds.p=60833284);
20711 (/*SFN*/C->_focus_widget/*29*/)=a1;
20712 (ds.p=60833566);
20713 X30put_focus(&ds,60833540,(/*RF2*/(C)->_focus_widget/*29*/),1);
20714 se_dst=caller;/*unlink*/
20715 }
20716
20717 void r97_30Pwidget_init(se_dump_stack*caller,T97* C){
20718 static se_frame_descriptor fd={"Precursor widget_init (widget_init WIDGET)",1,0,"%R97%",1};
20719 se_dump_stack ds;
20720 ds.fd=&fd;
20721 ds.current=((void**)&C);
20722 ds.p=62919434;
20723 ds.caller=caller;
20724 ds.locals=NULL;
20725 se_dst=&ds;/*link*/
20726 (ds.p=62919940);
20727 {T45*n=new45();
20728 r45make(&ds,n);
20729 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
20730 se_i45(&ds,n);}
20731 se_dst=caller;/*unlink*/
20732 }
20733
20734 T6 r97is_equal(se_dump_stack*caller,T97* C,T0* a1){
20735 T6 R=0;
20736 void**locals[2];
20737 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R97%other%R97%Result%E6%",1};
20738 se_dump_stack ds;
20739 ds.fd=&fd;
20740 ds.current=((void**)&C);
20741 ds.p=2120968;
20742 ds.caller=caller;
20743 ds.locals=locals;
20744 locals[0]=(void**)&a1;
20745 locals[1]=(void**)&R;
20746 se_dst=&ds;/*link*/
20747 se_require_uppermost_flag=1;
20748 if(fd.assertion_flag){
20749 fd.assertion_flag=0;
20750 (ds.p=2122048);
20751 ac_req((a1)!=((void*)(NULL)),"other_not_void");
20752 fd.assertion_flag=1;
20753 }
20754 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20755 fd.assertion_flag=0;
20756 (ds.p=2122846);
20757 ac_ens((!(r97standard_is_equal(&ds,C,a1)))||(R),"consistent");
20758 (ds.p=2123064);
20759 ac_ens((!(R))||(r97is_equal(&ds,((T97*)ci(97,a1,2123080)),(T0*)C)),"symmetric");
20760 fd.assertion_flag=1;
20761 }
20762 se_dst=caller;/*unlink*/
20763 return R;
20764 }
20765
20766 void r97_30Pput_xy(se_dump_stack*caller,T97* C,T2 a1,T2 a2){
20767 void**locals[2];
20768 static se_frame_descriptor fd={"Precursor put_xy (put_xy WIDGET)",1,2,"%R97%x%E2%y%E2%",1};
20769 se_dump_stack ds;
20770 ds.fd=&fd;
20771 ds.current=((void**)&C);
20772 ds.p=62927626;
20773 ds.caller=caller;
20774 ds.locals=locals;
20775 locals[0]=(void**)&a1;
20776 locals[1]=(void**)&a2;
20777 se_dst=&ds;/*link*/
20778 (ds.p=62928132);
20779 (/*SFN*/C->_offsetx/*9*/)=a1;
20780 (ds.p=62928388);
20781 (/*SFN*/C->_offsety/*13*/)=a2;
20782 se_dst=caller;/*unlink*/
20783 }
20784
20785 void r97add_widget(se_dump_stack*caller,T97* C,T0* a1,T2 a2,T2 a3){
20786 void**locals[3];
20787 static se_frame_descriptor fd={"add_widget WINDOW",1,3,"%R97%w%R30%x%E2%y%E2%",1};
20788 se_dump_stack ds;
20789 ds.fd=&fd;
20790 ds.current=((void**)&C);
20791 ds.p=60819978;
20792 ds.caller=caller;
20793 ds.locals=locals;
20794 locals[0]=(void**)&a1;
20795 locals[1]=(void**)&a2;
20796 locals[2]=(void**)&a3;
20797 se_dst=&ds;/*link*/
20798 (ds.p=60820488);
20799 X30put_xy(&ds,60820484,a1,((/*RF2*/(C)->_offsetx/*9*/))+(a2),((/*RF2*/(C)->_offsety/*13*/))+(a3));
20800 (ds.p=60820764);
20801 r39add_last(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60820740))),a1);
20802 se_dst=caller;/*unlink*/
20803 }
20804
20805 void r97widget_init(se_dump_stack*caller,T97* C){
20806 static se_frame_descriptor fd={"widget_init WINDOW",1,0,"%R97%",1};
20807 se_dump_stack ds;
20808 ds.fd=&fd;
20809 ds.current=((void**)&C);
20810 ds.p=60822026;
20811 ds.caller=caller;
20812 ds.locals=NULL;
20813 se_dst=&ds;/*link*/
20814 r97_30Pwidget_init(&ds,C);
20815 (ds.p=60822788);
20816 {T39*n=new39();
20817 r39make(&ds,n);
20818 (/*SFN*/C->_widget_list/*25*/)=((T0*)n);
20819 se_i39(&ds,n);}
20820 se_dst=caller;/*unlink*/
20821 }
20822
20823 void r97make(se_dump_stack*caller,T97* C){
20824 T0* _b=NULL;
20825 T0* _c=NULL;
20826 T0* _l=NULL;
20827 void**locals[3];
20828 static se_frame_descriptor fd={"make NEWHS_WINDOW",1,3,"%R97%b%R113%c%R25%l%R107%",1};
20829 se_dump_stack ds;
20830 ds.fd=&fd;
20831 ds.current=((void**)&C);
20832 ds.p=203425802;
20833 ds.caller=caller;
20834 ds.locals=locals;
20835 locals[0]=(void**)&_b;
20836 locals[1]=(void**)&_c;
20837 locals[2]=(void**)&_l;
20838 se_dst=&ds;/*link*/
20839 (ds.p=203427332);
20840 r97widget_init(&ds,C);
20841 (ds.p=203427844);
20842 r97put_size(&ds,C,200,100);
20843 (ds.p=203428100);
20844 {T113*n=new113();
20845 r113make(&ds,n,((T0*)se_ms(2,"Ok")));
20846 _b=((T0*)n);
20847 }
20848 (ds.p=203428360);
20849 r113put_size(&ds,((T113*)ci(113,_b,203428356)),60,20);
20850 (ds.p=203428612);
20851 {T114*n=new114();
20852 r114make(&ds,n,(T0*)C);
20853 _c=((T0*)n);
20854 }
20855 (ds.p=203428872);
20856 r113put_command(&ds,((T113*)ci(113,_b,203428868)),_c,1);
20857 (ds.p=203429124);
20858 r97add_widget(&ds,C,_b,30,75);
20859 (ds.p=203429636);
20860 {T107*n=new107();
20861 r107make(&ds,n,((T0*)se_ms(15,"New high score!")));
20862 _l=((T0*)n);
20863 }
20864 (ds.p=203429896);
20865 r107put_size(&ds,((T107*)ci(107,_l,203429892)),100,20);
20866 (ds.p=203430148);
20867 r97add_widget(&ds,C,_l,10,5);
20868 (ds.p=203430660);
20869 {T107*n=new107();
20870 r107make(&ds,n,((T0*)se_ms(4,"Name")));
20871 _l=((T0*)n);
20872 }
20873 (ds.p=203430920);
20874 r107put_size(&ds,((T107*)ci(107,_l,203430916)),50,20);
20875 (ds.p=203431172);
20876 r97add_widget(&ds,C,_l,10,30);
20877 (ds.p=203431428);
20878 {T98*n=new98();
20879 r98make(&ds,n);
20880 (/*SFN*/C->_name_tb/*33*/)=((T0*)n);
20881 }
20882 (ds.p=203431700);
20883 r98put_size(&ds,((T98*)ci(98,(/*RF2*/(C)->_name_tb/*33*/),203431684)),120,16);
20884 (ds.p=203431940);
20885 r97add_widget(&ds,C,(/*RF2*/(C)->_name_tb/*33*/),60,30);
20886 (ds.p=203432212);
20887 r98put_command(&ds,((T98*)ci(98,(/*RF2*/(C)->_name_tb/*33*/),203432196)),_c,1);
20888 se_dst=caller;/*unlink*/
20889 }
20890
20891 T6 r97contains(se_dump_stack*caller,T97* C,T2 a1,T2 a2){
20892 T6 R=0;
20893 void**locals[3];
20894 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R97%x%E2%y%E2%Result%E6%",1};
20895 se_dump_stack ds;
20896 ds.fd=&fd;
20897 ds.current=((void**)&C);
20898 ds.p=62930698;
20899 ds.caller=caller;
20900 ds.locals=locals;
20901 locals[0]=(void**)&a1;
20902 locals[1]=(void**)&a2;
20903 locals[2]=(void**)&R;
20904 se_dst=&ds;/*link*/
20905 (ds.p=62931204);
20906 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
20907 se_dst=caller;/*unlink*/
20908 return R;
20909 }
20910
20911 void r97fill_rect(se_dump_stack*caller,T97* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
20912 void**locals[5];
20913 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R97%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
20914 se_dump_stack ds;
20915 ds.fd=&fd;
20916 ds.current=((void**)&C);
20917 ds.p=62937354;
20918 ds.caller=caller;
20919 ds.locals=locals;
20920 locals[0]=(void**)&a1;
20921 locals[1]=(void**)&a2;
20922 locals[2]=(void**)&a3;
20923 locals[3]=(void**)&a4;
20924 locals[4]=(void**)&a5;
20925 se_dst=&ds;/*link*/
20926 (ds.p=62937860);
20927 r97ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
20928 se_dst=caller;/*unlink*/
20929 }
20930
20931 void r97put_xy(se_dump_stack*caller,T97* C,T2 a1,T2 a2){
20932 void**locals[2];
20933 static se_frame_descriptor fd={"put_xy WINDOW",1,2,"%R97%x%E2%y%E2%",1};
20934 se_dump_stack ds;
20935 ds.fd=&fd;
20936 ds.current=((void**)&C);
20937 ds.p=60834314;
20938 ds.caller=caller;
20939 ds.locals=locals;
20940 locals[0]=(void**)&a1;
20941 locals[1]=(void**)&a2;
20942 se_dst=&ds;/*link*/
20943 (ds.p=60834844);
20944 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60834820))),agent5(&ds,(T0*)C,a1,a2));
20945 r97_30Pput_xy(&ds,C,a1,a2);
20946 se_dst=caller;/*unlink*/
20947 }
20948
20949 T6 r97standard_is_equal(se_dump_stack*caller,T97* C,T0* a1){
20950 T6 R=0;
20951 void**locals[2];
20952 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R97%other%R97%Result%E6%",1};
20953 se_dump_stack ds;
20954 ds.fd=&fd;
20955 ds.current=((void**)&C);
20956 ds.p=2128406;
20957 ds.caller=caller;
20958 ds.locals=locals;
20959 locals[0]=(void**)&a1;
20960 locals[1]=(void**)&R;
20961 se_dst=&ds;/*link*/
20962 se_require_uppermost_flag=1;
20963 if(fd.assertion_flag){
20964 fd.assertion_flag=0;
20965 (ds.p=2129184);
20966 ac_req((a1)!=((void*)(NULL)),NULL);
20967 fd.assertion_flag=1;
20968 }
20969 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
20970 fd.assertion_flag=0;
20971 (ds.p=2129976);
20972 ac_ens((!(R))||(r97standard_is_equal(&ds,((T97*)ci(97,a1,2129992)),(T0*)C)),"symmetric");
20973 fd.assertion_flag=1;
20974 }
20975 se_dst=caller;/*unlink*/
20976 return R;
20977 }
20978
20979 void r97put_size(se_dump_stack*caller,T97* C,T2 a1,T2 a2){
20980 void**locals[2];
20981 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R97%w%E2%h%E2%",1};
20982 se_dump_stack ds;
20983 ds.fd=&fd;
20984 ds.current=((void**)&C);
20985 ds.p=62929162;
20986 ds.caller=caller;
20987 ds.locals=locals;
20988 locals[0]=(void**)&a1;
20989 locals[1]=(void**)&a2;
20990 se_dst=&ds;/*link*/
20991 (ds.p=62929668);
20992 (/*SFN*/C->_width/*17*/)=a1;
20993 (ds.p=62929924);
20994 (/*SFN*/C->_height/*21*/)=a2;
20995 se_dst=caller;/*unlink*/
20996 }
20997
20998 void r97ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
20999 void**locals[5];
21000 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
21001 se_dump_stack ds;
21002 ds.fd=&fd;
21003 ds.current=NULL;
21004 ds.p=62938634;
21005 ds.caller=caller;
21006 ds.locals=locals;
21007 locals[0]=(void**)&a1;
21008 locals[1]=(void**)&a2;
21009 locals[2]=(void**)&a3;
21010 locals[3]=(void**)&a4;
21011 locals[4]=(void**)&a5;
21012 se_dst=&ds;/*link*/
21013 /*[ from line 95 of ./widget.e:*/
21014 (ds.p=62938908);
21015 ext_fill_rect(a1,a2,a3,a4,a5);
21016 /* from line 95 of ./widget.e]*/
21017 se_dst=caller;/*unlink*/
21018 }
21019
21020 T0* r97green(se_dump_stack*caller){
21021 if(fBC18green==0){fBC18green=1;{
21022 void**locals[1];
21023 static se_frame_descriptor fd={"green COLOR_TABLE",0,1,"Result%R51%",1};
21024 se_dump_stack ds;
21025 ds.fd=&fd;
21026 ds.current=NULL;
21027 ds.p=37761034;
21028 ds.caller=caller;
21029 ds.locals=locals;
21030 locals[0]=(void**)&oBC18green;
21031 se_dst=&ds;/*link*/
21032 (ds.p=37761540);
21033 {T51*n=new51();
21034 oBC18green=((T0*)n);
21035 r51make(&ds,n,0,255,0);
21036 }
21037 se_dst=caller;/*unlink*/
21038 }}
21039 return oBC18green;
21040 }
21041
21042 void r97put_focus(se_dump_stack*caller,T97* C,T6 a1){
21043 void**locals[1];
21044 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R97%b%E6%",1};
21045 se_dump_stack ds;
21046 ds.fd=&fd;
21047 ds.current=((void**)&C);
21048 ds.p=62916874;
21049 ds.caller=caller;
21050 ds.locals=locals;
21051 locals[0]=(void**)&a1;
21052 se_dst=&ds;/*link*/
21053 (ds.p=62917380);
21054 (/*SFN*/C->_has_focus/*4*/)=a1;
21055 se_dst=caller;/*unlink*/
21056 }
21057
21058 void r97process_event(se_dump_stack*caller,T97* C,T0* a1){
21059 T0* _it=NULL;
21060 void**locals[2];
21061 static se_frame_descriptor fd={"process_event WINDOW",1,2,"%R97%e%R28%it%R32%",1};
21062 se_dump_stack ds;
21063 ds.fd=&fd;
21064 ds.current=((void**)&C);
21065 ds.p=60823562;
21066 ds.caller=caller;
21067 ds.locals=locals;
21068 locals[0]=(void**)&a1;
21069 locals[1]=(void**)&_it;
21070 se_dst=&ds;/*link*/
21071 /*[INSPECT*/
21072 {int z1=((ds.p=60824600),(/*RF2*/(((T28*)ci(28,a1,60824596)))->_type/*12*/));
21073 switch(z1){
21074 case 5:
21075 (ds.p=60825100);
21076 _it=r39get_new_iterator(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60825112))));
21077 (ds.p=60825372);
21078 r41start(&ds,((T41*)ci(41,_it,60825366)));
21079 while (!(((ds.p=60825630),r41is_off(&ds,((T41*)ci(41,_it,60825624))))))
21080 {
21081 /*[IF*/
21082 if(((ds.p=60826140),X30contains(&ds,60826130,r41item(&ds,((T41*)ci(41,_it,60826124))),(/*RF2*/(((T28*)ci(28,a1,60826158)))->_x/*8*/),(/*RF2*/(((T28*)ci(28,a1,60826168)))->_y/*4*/)))){
21083 (ds.p=60826382);
21084 r97change_focus(&ds,C,r41item(&ds,((T41*)ci(41,_it,60826408))));
21085 (ds.p=60826654);
21086 X30process_event(&ds,60826644,r41item(&ds,((T41*)ci(41,_it,60826638))),a1);
21087 }
21088 /*FI]*/
21089 (ds.p=60827148);
21090 r41next(&ds,((T41*)ci(41,_it,60827142)));
21091 }
21092 break;
21093 case 2:
21094 /*[IF*/
21095 if(((ds.p=60827932),((/*RF2*/(((T28*)ci(28,a1,60827922)))->_i1/*16*/))==(27))){
21096 (ds.p=60828166);
21097 r97raise_signal(&ds,C,2);
21098 }
21099 else if(((ds.p=60828468),((/*RF2*/(C)->_focus_widget/*29*/))!=((void*)(NULL)))){
21100 (ds.p=60828704);
21101 X30process_event(&ds,60828678,(/*RF2*/(C)->_focus_widget/*29*/),a1);
21102 }
21103 /*FI]*/
21104 break;
21105 }
21106 }/*INSPECT]*/
21107 se_dst=caller;/*unlink*/
21108 }
21109
21110 T0* r97twin(se_dump_stack*caller,T97* C){
21111 T0* R=NULL;
21112 void**locals[1];
21113 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R97%Result%R97%",1};
21114 se_dump_stack ds;
21115 ds.fd=&fd;
21116 ds.current=((void**)&C);
21117 ds.p=2140182;
21118 ds.caller=caller;
21119 ds.locals=locals;
21120 locals[0]=(void**)&R;
21121 se_dst=&ds;/*link*/
21122 R=((void*)new97());
21123 *((T97*)R)=*C;
21124 if(fd.assertion_flag){
21125 fd.assertion_flag=0;
21126 (ds.p=2142256);
21127 ac_ens(r97is_equal(&ds,((T97*)ci(97,R,2142242)),(T0*)C),"equal");
21128 fd.assertion_flag=1;
21129 }
21130 se_dst=caller;/*unlink*/
21131 return R;
21132 }
21133
21134 void r97raise_signal(se_dump_stack*caller,T97* C,T2 a1){
21135 void**locals[1];
21136 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R97%i%E2%",1};
21137 se_dump_stack ds;
21138 ds.fd=&fd;
21139 ds.current=((void**)&C);
21140 ds.p=62924554;
21141 ds.caller=caller;
21142 ds.locals=locals;
21143 locals[0]=(void**)&a1;
21144 se_dst=&ds;/*link*/
21145 /*[IF*/
21146 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
21147 (ds.p=62925362);
21148 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
21149 }
21150 /*FI]*/
21151 se_dst=caller;/*unlink*/
21152 }
21153
21154 void r97update(se_dump_stack*caller,T97* C){
21155 static se_frame_descriptor fd={"update WINDOW",1,0,"%R97%",1};
21156 se_dump_stack ds;
21157 ds.fd=&fd;
21158 ds.current=((void**)&C);
21159 ds.p=60830218;
21160 ds.caller=caller;
21161 ds.locals=NULL;
21162 se_dst=&ds;/*link*/
21163 (ds.p=60830724);
21164 r97fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r97green(&ds));
21165 (ds.p=60830980);
21166 r97fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r97black(&ds));
21167 (ds.p=60831260);
21168 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60831236))),agent9(&ds));
21169 se_dst=caller;/*unlink*/
21170 }
21171
21172 T0* r97black(se_dump_stack*caller){
21173 if(fBC18black==0){fBC18black=1;{
21174 void**locals[1];
21175 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
21176 se_dump_stack ds;
21177 ds.fd=&fd;
21178 ds.current=NULL;
21179 ds.p=37749514;
21180 ds.caller=caller;
21181 ds.locals=locals;
21182 locals[0]=(void**)&oBC18black;
21183 se_dst=&ds;/*link*/
21184 (ds.p=37750020);
21185 {T51*n=new51();
21186 oBC18black=((T0*)n);
21187 r51make(&ds,n,0,0,0);
21188 }
21189 se_dst=caller;/*unlink*/
21190 }}
21191 return oBC18black;
21192 }
21193
21194 void r99put_command(se_dump_stack*caller,T99* C,T0* a1,T2 a2){
21195 void**locals[2];
21196 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R99%c%R25%i%E2%",1};
21197 se_dump_stack ds;
21198 ds.fd=&fd;
21199 ds.current=((void**)&C);
21200 ds.p=62923274;
21201 ds.caller=caller;
21202 ds.locals=locals;
21203 locals[0]=(void**)&a1;
21204 locals[1]=(void**)&a2;
21205 se_dst=&ds;/*link*/
21206 (ds.p=62923806);
21207 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
21208 se_dst=caller;/*unlink*/
21209 }
21210
21211 void r99move_widget(se_dump_stack*caller,T99* C,T0* a1,T2 a2,T2 a3){
21212 void**locals[3];
21213 static se_frame_descriptor fd={"move_widget WINDOW",1,3,"%R99%w%R30%x%E2%y%E2%",1};
21214 se_dump_stack ds;
21215 ds.fd=&fd;
21216 ds.current=((void**)&C);
21217 ds.p=60835850;
21218 ds.caller=caller;
21219 ds.locals=locals;
21220 locals[0]=(void**)&a1;
21221 locals[1]=(void**)&a2;
21222 locals[2]=(void**)&a3;
21223 se_dst=&ds;/*link*/
21224 (ds.p=60836360);
21225 X30put_xy(&ds,60836356,a1,((X30offsetx(&ds,60836374,a1))-((/*RF2*/(C)->_offsetx/*9*/)))+(a2),((X30offsety(&ds,60836424,a1))-((/*RF2*/(C)->_offsety/*13*/)))+(a3));
21226 se_dst=caller;/*unlink*/
21227 }
21228
21229 void r99change_focus(se_dump_stack*caller,T99* C,T0* a1){
21230 void**locals[1];
21231 static se_frame_descriptor fd={"change_focus WINDOW",1,1,"%R99%w%R30%",1};
21232 se_dump_stack ds;
21233 ds.fd=&fd;
21234 ds.current=((void**)&C);
21235 ds.p=60832010;
21236 ds.caller=caller;
21237 ds.locals=locals;
21238 locals[0]=(void**)&a1;
21239 se_dst=&ds;/*link*/
21240 /*[IF*/
21241 if(((ds.p=60832548),((/*RF2*/(C)->_focus_widget/*29*/))!=((void*)(NULL)))){
21242 (ds.p=60832806);
21243 X30put_focus(&ds,60832780,(/*RF2*/(C)->_focus_widget/*29*/),0);
21244 }
21245 /*FI]*/
21246 (ds.p=60833284);
21247 (/*SFN*/C->_focus_widget/*29*/)=a1;
21248 (ds.p=60833566);
21249 X30put_focus(&ds,60833540,(/*RF2*/(C)->_focus_widget/*29*/),1);
21250 se_dst=caller;/*unlink*/
21251 }
21252
21253 void r99_30Pwidget_init(se_dump_stack*caller,T99* C){
21254 static se_frame_descriptor fd={"Precursor widget_init (widget_init WIDGET)",1,0,"%R99%",1};
21255 se_dump_stack ds;
21256 ds.fd=&fd;
21257 ds.current=((void**)&C);
21258 ds.p=62919434;
21259 ds.caller=caller;
21260 ds.locals=NULL;
21261 se_dst=&ds;/*link*/
21262 (ds.p=62919940);
21263 {T45*n=new45();
21264 r45make(&ds,n);
21265 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
21266 se_i45(&ds,n);}
21267 se_dst=caller;/*unlink*/
21268 }
21269
21270 T6 r99is_equal(se_dump_stack*caller,T99* C,T0* a1){
21271 T6 R=0;
21272 void**locals[2];
21273 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R99%other%R99%Result%E6%",1};
21274 se_dump_stack ds;
21275 ds.fd=&fd;
21276 ds.current=((void**)&C);
21277 ds.p=2120968;
21278 ds.caller=caller;
21279 ds.locals=locals;
21280 locals[0]=(void**)&a1;
21281 locals[1]=(void**)&R;
21282 se_dst=&ds;/*link*/
21283 se_require_uppermost_flag=1;
21284 if(fd.assertion_flag){
21285 fd.assertion_flag=0;
21286 (ds.p=2122048);
21287 ac_req((a1)!=((void*)(NULL)),"other_not_void");
21288 fd.assertion_flag=1;
21289 }
21290 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
21291 fd.assertion_flag=0;
21292 (ds.p=2122846);
21293 ac_ens((!(r99standard_is_equal(&ds,C,a1)))||(R),"consistent");
21294 (ds.p=2123064);
21295 ac_ens((!(R))||(r99is_equal(&ds,((T99*)ci(99,a1,2123080)),(T0*)C)),"symmetric");
21296 fd.assertion_flag=1;
21297 }
21298 se_dst=caller;/*unlink*/
21299 return R;
21300 }
21301
21302 void r99_30Pput_xy(se_dump_stack*caller,T99* C,T2 a1,T2 a2){
21303 void**locals[2];
21304 static se_frame_descriptor fd={"Precursor put_xy (put_xy WIDGET)",1,2,"%R99%x%E2%y%E2%",1};
21305 se_dump_stack ds;
21306 ds.fd=&fd;
21307 ds.current=((void**)&C);
21308 ds.p=62927626;
21309 ds.caller=caller;
21310 ds.locals=locals;
21311 locals[0]=(void**)&a1;
21312 locals[1]=(void**)&a2;
21313 se_dst=&ds;/*link*/
21314 (ds.p=62928132);
21315 (/*SFN*/C->_offsetx/*9*/)=a1;
21316 (ds.p=62928388);
21317 (/*SFN*/C->_offsety/*13*/)=a2;
21318 se_dst=caller;/*unlink*/
21319 }
21320
21321 void r99add_new_score(se_dump_stack*caller,T99* C,T0* a1){
21322 T0* _sc=NULL;
21323 T0* _sd=NULL;
21324 T2 _x=0;
21325 T2 _y=0;
21326 void**locals[5];
21327 static se_frame_descriptor fd={"add_new_score HS_WINDOW",1,5,"%R99%p%R65%sc%R96%sd%R104%x%E2%y%E2%",1};
21328 se_dump_stack ds;
21329 ds.fd=&fd;
21330 ds.current=((void**)&C);
21331 ds.p=207621898;
21332 ds.caller=caller;
21333 ds.locals=locals;
21334 locals[0]=(void**)&a1;
21335 locals[1]=(void**)&_sc;
21336 locals[2]=(void**)&_sd;
21337 locals[3]=(void**)&_x;
21338 locals[4]=(void**)&_y;
21339 se_dst=&ds;/*link*/
21340 (ds.p=207623428);
21341 _sc=(/*RF2*/(((T65*)ci(65,a1,207623440)))->_hiscore/*12*/);
21342 (ds.p=207623684);
21343 {T104*n=new104();
21344 r104make(&ds,n,(/*RF2*/(((T65*)ci(65,a1,207623704)))->_name/*4*/),_sc);
21345 _sd=((T0*)n);
21346 }
21347 (ds.p=207623940);
21348 _x=10;
21349 (ds.p=207624196);
21350 _y=(((/*RF2*/(C)->_row_count/*33*/))*(20))+(50);
21351 (ds.p=207624452);
21352 (/*SFN*/C->_row_count/*33*/)=((/*RF2*/(C)->_row_count/*33*/))+(1);
21353 (ds.p=207624708);
21354 r99add_widget(&ds,C,(/*RF2*/(((T104*)ci(104,_sd,207624730)))->_level_l/*8*/),_x,_y);
21355 (ds.p=207624964);
21356 r99add_widget(&ds,C,(/*RF2*/(((T104*)ci(104,_sd,207624986)))->_name_l/*12*/),(70)+(_x),_y);
21357 (ds.p=207625220);
21358 r99add_widget(&ds,C,(/*RF2*/(((T104*)ci(104,_sd,207625242)))->_score_l/*20*/),(120)+(_x),_y);
21359 (ds.p=207625476);
21360 r99add_widget(&ds,C,(/*RF2*/(((T104*)ci(104,_sd,207625498)))->_time_l/*16*/),(170)+(_x),_y);
21361 (ds.p=207625754);
21362 r105add_last(&ds,se_i105(&ds,((T105*)ci(105,(/*RF2*/(C)->_score_list/*37*/),207625732))),_sd);
21363 se_dst=caller;/*unlink*/
21364 }
21365
21366 void r99add_widget(se_dump_stack*caller,T99* C,T0* a1,T2 a2,T2 a3){
21367 void**locals[3];
21368 static se_frame_descriptor fd={"add_widget WINDOW",1,3,"%R99%w%R30%x%E2%y%E2%",1};
21369 se_dump_stack ds;
21370 ds.fd=&fd;
21371 ds.current=((void**)&C);
21372 ds.p=60819978;
21373 ds.caller=caller;
21374 ds.locals=locals;
21375 locals[0]=(void**)&a1;
21376 locals[1]=(void**)&a2;
21377 locals[2]=(void**)&a3;
21378 se_dst=&ds;/*link*/
21379 (ds.p=60820488);
21380 X30put_xy(&ds,60820484,a1,((/*RF2*/(C)->_offsetx/*9*/))+(a2),((/*RF2*/(C)->_offsety/*13*/))+(a3));
21381 (ds.p=60820764);
21382 r39add_last(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60820740))),a1);
21383 se_dst=caller;/*unlink*/
21384 }
21385
21386 void r99widget_init(se_dump_stack*caller,T99* C){
21387 static se_frame_descriptor fd={"widget_init WINDOW",1,0,"%R99%",1};
21388 se_dump_stack ds;
21389 ds.fd=&fd;
21390 ds.current=((void**)&C);
21391 ds.p=60822026;
21392 ds.caller=caller;
21393 ds.locals=NULL;
21394 se_dst=&ds;/*link*/
21395 r99_30Pwidget_init(&ds,C);
21396 (ds.p=60822788);
21397 {T39*n=new39();
21398 r39make(&ds,n);
21399 (/*SFN*/C->_widget_list/*25*/)=((T0*)n);
21400 se_i39(&ds,n);}
21401 se_dst=caller;/*unlink*/
21402 }
21403
21404 void r99update_score(se_dump_stack*caller,T99* C,T0* a1){
21405 T0* _it=NULL;
21406 T0* _sc=NULL;
21407 T0* _sd=NULL;
21408 void**locals[4];
21409 static se_frame_descriptor fd={"update_score HS_WINDOW",1,4,"%R99%p%R65%it%R150%sc%R96%sd%R104%",1};
21410 se_dump_stack ds;
21411 ds.fd=&fd;
21412 ds.current=((void**)&C);
21413 ds.p=207626506;
21414 ds.caller=caller;
21415 ds.locals=locals;
21416 locals[0]=(void**)&a1;
21417 locals[1]=(void**)&_it;
21418 locals[2]=(void**)&_sc;
21419 locals[3]=(void**)&_sd;
21420 se_dst=&ds;/*link*/
21421 (ds.p=207628036);
21422 _it=r105get_new_iterator(&ds,se_i105(&ds,((T105*)ci(105,(/*RF2*/(C)->_score_list/*37*/),207628048))));
21423 (ds.p=207628308);
21424 r151start(&ds,((T151*)ci(151,_it,207628302)));
21425 while (!(((ds.p=207628566),r151is_off(&ds,((T151*)ci(151,_it,207628560))))))
21426 {
21427 (ds.p=207629068);
21428 _sd=r151item(&ds,((T151*)ci(151,_it,207629080)));
21429 /*[IF*/
21430 if(((ds.p=207629346),r7is_equal(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(((T104*)ci(104,_sd,207629330)))->_name/*4*/),207629336))),(/*RF2*/(((T65*)ci(65,a1,207629364)))->_name/*4*/)))){
21431 (ds.p=207629574);
21432 _sc=(/*RF2*/(((T65*)ci(65,a1,207629586)))->_hiscore/*12*/);
21433 (ds.p=207629850);
21434 r107put_string(&ds,((T107*)ci(107,(/*RF2*/(((T104*)ci(104,_sd,207629830)))->_name_l/*12*/),207629836)),(/*RF2*/(((T96*)ci(96,_sc,207629872)))->_name/*4*/));
21435 (ds.p=207630106);
21436 r107put_string(&ds,((T107*)ci(107,(/*RF2*/(((T104*)ci(104,_sd,207630086)))->_time_l/*16*/),207630092)),r2to_string(&ds,(/*RF2*/(((T96*)ci(96,_sc,207630128)))->_time/*12*/)));
21437 (ds.p=207630364);
21438 r107put_string(&ds,((T107*)ci(107,(/*RF2*/(((T104*)ci(104,_sd,207630342)))->_score_l/*20*/),207630348)),r2to_string(&ds,(/*RF2*/(((T96*)ci(96,_sc,207630386)))->_score/*8*/)));
21439 }
21440 /*FI]*/
21441 (ds.p=207630866);
21442 r151next(&ds,((T151*)ci(151,_it,207630860)));
21443 }
21444 se_dst=caller;/*unlink*/
21445 }
21446
21447 void r99make(se_dump_stack*caller,T99* C){
21448 T0* _b=NULL;
21449 T0* _c=NULL;
21450 T0* _l=NULL;
21451 T2 _x=0;
21452 T2 _y=0;
21453 void**locals[5];
21454 static se_frame_descriptor fd={"make HS_WINDOW",1,5,"%R99%b%R113%c%R25%l%R107%x%E2%y%E2%",1};
21455 se_dump_stack ds;
21456 ds.fd=&fd;
21457 ds.current=((void**)&C);
21458 ds.p=207631882;
21459 ds.caller=caller;
21460 ds.locals=locals;
21461 locals[0]=(void**)&_b;
21462 locals[1]=(void**)&_c;
21463 locals[2]=(void**)&_l;
21464 locals[3]=(void**)&_x;
21465 locals[4]=(void**)&_y;
21466 se_dst=&ds;/*link*/
21467 (ds.p=207633668);
21468 r99widget_init(&ds,C);
21469 (ds.p=207634180);
21470 r99put_size(&ds,C,250,200);
21471 (ds.p=207634436);
21472 {T113*n=new113();
21473 r113make(&ds,n,((T0*)se_ms(2,"Ok")));
21474 _b=((T0*)n);
21475 }
21476 (ds.p=207634696);
21477 r113put_size(&ds,((T113*)ci(113,_b,207634692)),60,20);
21478 (ds.p=207634948);
21479 {T114*n=new114();
21480 r114make(&ds,n,(T0*)C);
21481 _c=((T0*)n);
21482 }
21483 (ds.p=207635208);
21484 r113put_command(&ds,((T113*)ci(113,_b,207635204)),_c,1);
21485 (ds.p=207635460);
21486 r99add_widget(&ds,C,_b,100,175);
21487 (ds.p=207635972);
21488 _x=10;
21489 (ds.p=207636228);
21490 _y=5;
21491 (ds.p=207636740);
21492 {T107*n=new107();
21493 r107make(&ds,n,((T0*)se_ms(5,"Level")));
21494 _l=((T0*)n);
21495 }
21496 (ds.p=207637000);
21497 r107put_size(&ds,((T107*)ci(107,_l,207636996)),70,20);
21498 (ds.p=207637252);
21499 r99add_widget(&ds,C,_l,_x,_y);
21500 (ds.p=207637764);
21501 {T107*n=new107();
21502 r107make(&ds,n,((T0*)se_ms(4,"Name")));
21503 _l=((T0*)n);
21504 }
21505 (ds.p=207638024);
21506 r107put_size(&ds,((T107*)ci(107,_l,207638020)),50,20);
21507 (ds.p=207638276);
21508 r99add_widget(&ds,C,_l,(70)+(_x),_y);
21509 (ds.p=207638788);
21510 {T107*n=new107();
21511 r107make(&ds,n,((T0*)se_ms(5,"Score")));
21512 _l=((T0*)n);
21513 }
21514 (ds.p=207639048);
21515 r107put_size(&ds,((T107*)ci(107,_l,207639044)),50,20);
21516 (ds.p=207639300);
21517 r99add_widget(&ds,C,_l,(120)+(_x),_y);
21518 (ds.p=207639812);
21519 {T107*n=new107();
21520 r107make(&ds,n,((T0*)se_ms(4,"Time")));
21521 _l=((T0*)n);
21522 }
21523 (ds.p=207640072);
21524 r107put_size(&ds,((T107*)ci(107,_l,207640068)),50,20);
21525 (ds.p=207640324);
21526 r99add_widget(&ds,C,_l,(170)+(_x),_y);
21527 se_dst=caller;/*unlink*/
21528 }
21529
21530 T6 r99contains(se_dump_stack*caller,T99* C,T2 a1,T2 a2){
21531 T6 R=0;
21532 void**locals[3];
21533 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R99%x%E2%y%E2%Result%E6%",1};
21534 se_dump_stack ds;
21535 ds.fd=&fd;
21536 ds.current=((void**)&C);
21537 ds.p=62930698;
21538 ds.caller=caller;
21539 ds.locals=locals;
21540 locals[0]=(void**)&a1;
21541 locals[1]=(void**)&a2;
21542 locals[2]=(void**)&R;
21543 se_dst=&ds;/*link*/
21544 (ds.p=62931204);
21545 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
21546 se_dst=caller;/*unlink*/
21547 return R;
21548 }
21549
21550 void r99fill_rect(se_dump_stack*caller,T99* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
21551 void**locals[5];
21552 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R99%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
21553 se_dump_stack ds;
21554 ds.fd=&fd;
21555 ds.current=((void**)&C);
21556 ds.p=62937354;
21557 ds.caller=caller;
21558 ds.locals=locals;
21559 locals[0]=(void**)&a1;
21560 locals[1]=(void**)&a2;
21561 locals[2]=(void**)&a3;
21562 locals[3]=(void**)&a4;
21563 locals[4]=(void**)&a5;
21564 se_dst=&ds;/*link*/
21565 (ds.p=62937860);
21566 r99ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
21567 se_dst=caller;/*unlink*/
21568 }
21569
21570 void r99put_xy(se_dump_stack*caller,T99* C,T2 a1,T2 a2){
21571 void**locals[2];
21572 static se_frame_descriptor fd={"put_xy WINDOW",1,2,"%R99%x%E2%y%E2%",1};
21573 se_dump_stack ds;
21574 ds.fd=&fd;
21575 ds.current=((void**)&C);
21576 ds.p=60834314;
21577 ds.caller=caller;
21578 ds.locals=locals;
21579 locals[0]=(void**)&a1;
21580 locals[1]=(void**)&a2;
21581 se_dst=&ds;/*link*/
21582 (ds.p=60834844);
21583 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60834820))),agent4(&ds,(T0*)C,a1,a2));
21584 r99_30Pput_xy(&ds,C,a1,a2);
21585 se_dst=caller;/*unlink*/
21586 }
21587
21588 void r99init_scores(se_dump_stack*caller,T99* C,T0* a1){
21589 void**locals[1];
21590 static se_frame_descriptor fd={"init_scores HS_WINDOW",1,1,"%R99%l%R66%",1};
21591 se_dump_stack ds;
21592 ds.fd=&fd;
21593 ds.current=((void**)&C);
21594 ds.p=207620362;
21595 ds.caller=caller;
21596 ds.locals=locals;
21597 locals[0]=(void**)&a1;
21598 se_dst=&ds;/*link*/
21599 (ds.p=207620868);
21600 {T105*n=new105();
21601 r105make(&ds,n);
21602 (/*SFN*/C->_score_list/*37*/)=((T0*)n);
21603 se_i105(&ds,n);}
21604 (ds.p=207621128);
21605 r66do_all(&ds,se_i66(&ds,((T66*)ci(66,a1,207621124))),agent3(&ds,(T0*)C));
21606 se_dst=caller;/*unlink*/
21607 }
21608
21609 T6 r99standard_is_equal(se_dump_stack*caller,T99* C,T0* a1){
21610 T6 R=0;
21611 void**locals[2];
21612 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R99%other%R99%Result%E6%",1};
21613 se_dump_stack ds;
21614 ds.fd=&fd;
21615 ds.current=((void**)&C);
21616 ds.p=2128406;
21617 ds.caller=caller;
21618 ds.locals=locals;
21619 locals[0]=(void**)&a1;
21620 locals[1]=(void**)&R;
21621 se_dst=&ds;/*link*/
21622 se_require_uppermost_flag=1;
21623 if(fd.assertion_flag){
21624 fd.assertion_flag=0;
21625 (ds.p=2129184);
21626 ac_req((a1)!=((void*)(NULL)),NULL);
21627 fd.assertion_flag=1;
21628 }
21629 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
21630 fd.assertion_flag=0;
21631 (ds.p=2129976);
21632 ac_ens((!(R))||(r99standard_is_equal(&ds,((T99*)ci(99,a1,2129992)),(T0*)C)),"symmetric");
21633 fd.assertion_flag=1;
21634 }
21635 se_dst=caller;/*unlink*/
21636 return R;
21637 }
21638
21639 void r99put_size(se_dump_stack*caller,T99* C,T2 a1,T2 a2){
21640 void**locals[2];
21641 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R99%w%E2%h%E2%",1};
21642 se_dump_stack ds;
21643 ds.fd=&fd;
21644 ds.current=((void**)&C);
21645 ds.p=62929162;
21646 ds.caller=caller;
21647 ds.locals=locals;
21648 locals[0]=(void**)&a1;
21649 locals[1]=(void**)&a2;
21650 se_dst=&ds;/*link*/
21651 (ds.p=62929668);
21652 (/*SFN*/C->_width/*17*/)=a1;
21653 (ds.p=62929924);
21654 (/*SFN*/C->_height/*21*/)=a2;
21655 se_dst=caller;/*unlink*/
21656 }
21657
21658 void r99ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
21659 void**locals[5];
21660 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
21661 se_dump_stack ds;
21662 ds.fd=&fd;
21663 ds.current=NULL;
21664 ds.p=62938634;
21665 ds.caller=caller;
21666 ds.locals=locals;
21667 locals[0]=(void**)&a1;
21668 locals[1]=(void**)&a2;
21669 locals[2]=(void**)&a3;
21670 locals[3]=(void**)&a4;
21671 locals[4]=(void**)&a5;
21672 se_dst=&ds;/*link*/
21673 /*[ from line 95 of ./widget.e:*/
21674 (ds.p=62938908);
21675 ext_fill_rect(a1,a2,a3,a4,a5);
21676 /* from line 95 of ./widget.e]*/
21677 se_dst=caller;/*unlink*/
21678 }
21679
21680 T0* r99green(se_dump_stack*caller){
21681 if(fBC18green==0){fBC18green=1;{
21682 void**locals[1];
21683 static se_frame_descriptor fd={"green COLOR_TABLE",0,1,"Result%R51%",1};
21684 se_dump_stack ds;
21685 ds.fd=&fd;
21686 ds.current=NULL;
21687 ds.p=37761034;
21688 ds.caller=caller;
21689 ds.locals=locals;
21690 locals[0]=(void**)&oBC18green;
21691 se_dst=&ds;/*link*/
21692 (ds.p=37761540);
21693 {T51*n=new51();
21694 oBC18green=((T0*)n);
21695 r51make(&ds,n,0,255,0);
21696 }
21697 se_dst=caller;/*unlink*/
21698 }}
21699 return oBC18green;
21700 }
21701
21702 void r99put_focus(se_dump_stack*caller,T99* C,T6 a1){
21703 void**locals[1];
21704 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R99%b%E6%",1};
21705 se_dump_stack ds;
21706 ds.fd=&fd;
21707 ds.current=((void**)&C);
21708 ds.p=62916874;
21709 ds.caller=caller;
21710 ds.locals=locals;
21711 locals[0]=(void**)&a1;
21712 se_dst=&ds;/*link*/
21713 (ds.p=62917380);
21714 (/*SFN*/C->_has_focus/*4*/)=a1;
21715 se_dst=caller;/*unlink*/
21716 }
21717
21718 void r99process_event(se_dump_stack*caller,T99* C,T0* a1){
21719 T0* _it=NULL;
21720 void**locals[2];
21721 static se_frame_descriptor fd={"process_event WINDOW",1,2,"%R99%e%R28%it%R32%",1};
21722 se_dump_stack ds;
21723 ds.fd=&fd;
21724 ds.current=((void**)&C);
21725 ds.p=60823562;
21726 ds.caller=caller;
21727 ds.locals=locals;
21728 locals[0]=(void**)&a1;
21729 locals[1]=(void**)&_it;
21730 se_dst=&ds;/*link*/
21731 /*[INSPECT*/
21732 {int z1=((ds.p=60824600),(/*RF2*/(((T28*)ci(28,a1,60824596)))->_type/*12*/));
21733 switch(z1){
21734 case 5:
21735 (ds.p=60825100);
21736 _it=r39get_new_iterator(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60825112))));
21737 (ds.p=60825372);
21738 r41start(&ds,((T41*)ci(41,_it,60825366)));
21739 while (!(((ds.p=60825630),r41is_off(&ds,((T41*)ci(41,_it,60825624))))))
21740 {
21741 /*[IF*/
21742 if(((ds.p=60826140),X30contains(&ds,60826130,r41item(&ds,((T41*)ci(41,_it,60826124))),(/*RF2*/(((T28*)ci(28,a1,60826158)))->_x/*8*/),(/*RF2*/(((T28*)ci(28,a1,60826168)))->_y/*4*/)))){
21743 (ds.p=60826382);
21744 r99change_focus(&ds,C,r41item(&ds,((T41*)ci(41,_it,60826408))));
21745 (ds.p=60826654);
21746 X30process_event(&ds,60826644,r41item(&ds,((T41*)ci(41,_it,60826638))),a1);
21747 }
21748 /*FI]*/
21749 (ds.p=60827148);
21750 r41next(&ds,((T41*)ci(41,_it,60827142)));
21751 }
21752 break;
21753 case 2:
21754 /*[IF*/
21755 if(((ds.p=60827932),((/*RF2*/(((T28*)ci(28,a1,60827922)))->_i1/*16*/))==(27))){
21756 (ds.p=60828166);
21757 r99raise_signal(&ds,C,2);
21758 }
21759 else if(((ds.p=60828468),((/*RF2*/(C)->_focus_widget/*29*/))!=((void*)(NULL)))){
21760 (ds.p=60828704);
21761 X30process_event(&ds,60828678,(/*RF2*/(C)->_focus_widget/*29*/),a1);
21762 }
21763 /*FI]*/
21764 break;
21765 }
21766 }/*INSPECT]*/
21767 se_dst=caller;/*unlink*/
21768 }
21769
21770 T0* r99twin(se_dump_stack*caller,T99* C){
21771 T0* R=NULL;
21772 void**locals[1];
21773 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R99%Result%R99%",1};
21774 se_dump_stack ds;
21775 ds.fd=&fd;
21776 ds.current=((void**)&C);
21777 ds.p=2140182;
21778 ds.caller=caller;
21779 ds.locals=locals;
21780 locals[0]=(void**)&R;
21781 se_dst=&ds;/*link*/
21782 R=((void*)new99());
21783 *((T99*)R)=*C;
21784 if(fd.assertion_flag){
21785 fd.assertion_flag=0;
21786 (ds.p=2142256);
21787 ac_ens(r99is_equal(&ds,((T99*)ci(99,R,2142242)),(T0*)C),"equal");
21788 fd.assertion_flag=1;
21789 }
21790 se_dst=caller;/*unlink*/
21791 return R;
21792 }
21793
21794 void r99raise_signal(se_dump_stack*caller,T99* C,T2 a1){
21795 void**locals[1];
21796 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R99%i%E2%",1};
21797 se_dump_stack ds;
21798 ds.fd=&fd;
21799 ds.current=((void**)&C);
21800 ds.p=62924554;
21801 ds.caller=caller;
21802 ds.locals=locals;
21803 locals[0]=(void**)&a1;
21804 se_dst=&ds;/*link*/
21805 /*[IF*/
21806 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
21807 (ds.p=62925362);
21808 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
21809 }
21810 /*FI]*/
21811 se_dst=caller;/*unlink*/
21812 }
21813
21814 void r99update(se_dump_stack*caller,T99* C){
21815 static se_frame_descriptor fd={"update WINDOW",1,0,"%R99%",1};
21816 se_dump_stack ds;
21817 ds.fd=&fd;
21818 ds.current=((void**)&C);
21819 ds.p=60830218;
21820 ds.caller=caller;
21821 ds.locals=NULL;
21822 se_dst=&ds;/*link*/
21823 (ds.p=60830724);
21824 r99fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r99green(&ds));
21825 (ds.p=60830980);
21826 r99fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r99black(&ds));
21827 (ds.p=60831260);
21828 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*25*/),60831236))),agent8(&ds));
21829 se_dst=caller;/*unlink*/
21830 }
21831
21832 T0* r99black(se_dump_stack*caller){
21833 if(fBC18black==0){fBC18black=1;{
21834 void**locals[1];
21835 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
21836 se_dump_stack ds;
21837 ds.fd=&fd;
21838 ds.current=NULL;
21839 ds.p=37749514;
21840 ds.caller=caller;
21841 ds.locals=locals;
21842 locals[0]=(void**)&oBC18black;
21843 se_dst=&ds;/*link*/
21844 (ds.p=37750020);
21845 {T51*n=new51();
21846 oBC18black=((T0*)n);
21847 r51make(&ds,n,0,0,0);
21848 }
21849 se_dst=caller;/*unlink*/
21850 }}
21851 return oBC18black;
21852 }
21853
21854 void r113put_command(se_dump_stack*caller,T113* C,T0* a1,T2 a2){
21855 void**locals[2];
21856 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R113%c%R25%i%E2%",1};
21857 se_dump_stack ds;
21858 ds.fd=&fd;
21859 ds.current=((void**)&C);
21860 ds.p=62923274;
21861 ds.caller=caller;
21862 ds.locals=locals;
21863 locals[0]=(void**)&a1;
21864 locals[1]=(void**)&a2;
21865 se_dst=&ds;/*link*/
21866 (ds.p=62923806);
21867 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
21868 se_dst=caller;/*unlink*/
21869 }
21870
21871 T0* r113config(se_dump_stack*caller){
21872 if(fBC17config==0){fBC17config=1;{
21873 void**locals[1];
21874 static se_frame_descriptor fd={"config CONFIG",0,1,"Result%R54%",1};
21875 se_dump_stack ds;
21876 ds.fd=&fd;
21877 ds.current=NULL;
21878 ds.p=35652362;
21879 ds.caller=caller;
21880 ds.locals=locals;
21881 locals[0]=(void**)&oBC17config;
21882 se_dst=&ds;/*link*/
21883 (ds.p=35652868);
21884 {T54*n=new54();
21885 oBC17config=((T0*)n);
21886 r54make(&ds,n);
21887 }
21888 se_dst=caller;/*unlink*/
21889 }}
21890 return oBC17config;
21891 }
21892
21893 T6 r113is_equal(se_dump_stack*caller,T113* C,T0* a1){
21894 T6 R=0;
21895 void**locals[2];
21896 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R113%other%R113%Result%E6%",1};
21897 se_dump_stack ds;
21898 ds.fd=&fd;
21899 ds.current=((void**)&C);
21900 ds.p=2120968;
21901 ds.caller=caller;
21902 ds.locals=locals;
21903 locals[0]=(void**)&a1;
21904 locals[1]=(void**)&R;
21905 se_dst=&ds;/*link*/
21906 se_require_uppermost_flag=1;
21907 if(fd.assertion_flag){
21908 fd.assertion_flag=0;
21909 (ds.p=2122048);
21910 ac_req((a1)!=((void*)(NULL)),"other_not_void");
21911 fd.assertion_flag=1;
21912 }
21913 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
21914 fd.assertion_flag=0;
21915 (ds.p=2122846);
21916 ac_ens((!(r113standard_is_equal(&ds,C,a1)))||(R),"consistent");
21917 (ds.p=2123064);
21918 ac_ens((!(R))||(r113is_equal(&ds,((T113*)ci(113,a1,2123080)),(T0*)C)),"symmetric");
21919 fd.assertion_flag=1;
21920 }
21921 se_dst=caller;/*unlink*/
21922 return R;
21923 }
21924
21925 void r113widget_init(se_dump_stack*caller,T113* C){
21926 static se_frame_descriptor fd={"widget_init WIDGET",1,0,"%R113%",1};
21927 se_dump_stack ds;
21928 ds.fd=&fd;
21929 ds.current=((void**)&C);
21930 ds.p=62919434;
21931 ds.caller=caller;
21932 ds.locals=NULL;
21933 se_dst=&ds;/*link*/
21934 (ds.p=62919940);
21935 {T45*n=new45();
21936 r45make(&ds,n);
21937 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
21938 se_i45(&ds,n);}
21939 se_dst=caller;/*unlink*/
21940 }
21941
21942 void r113update_image(se_dump_stack*caller,T113* C){
21943 static se_frame_descriptor fd={"update_image BUTTON",1,0,"%R113%",1};
21944 se_dump_stack ds;
21945 ds.fd=&fd;
21946 ds.current=((void**)&C);
21947 ds.p=236986890;
21948 ds.caller=caller;
21949 ds.locals=NULL;
21950 se_dst=&ds;/*link*/
21951 /*[IF*/
21952 if(((ds.p=236987410),(/*RF2*/(((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),236987402)))->_is_connected/*4*/))){
21953 (ds.p=236987668);
21954 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),236987660)));
21955 }
21956 /*FI]*/
21957 /*[IF*/
21958 if(((ds.p=236988196),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*25*/),236988170))))->_count/*8*/))>(0))){
21959 (ds.p=236988436);
21960 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),236988428)),(/*RF2*/(C)->_string/*25*/),r113font(&ds,C),r113white(&ds));
21961 }
21962 /*FI]*/
21963 se_dst=caller;/*unlink*/
21964 }
21965
21966 void r113make(se_dump_stack*caller,T113* C,T0* a1){
21967 void**locals[1];
21968 static se_frame_descriptor fd={"make BUTTON",1,1,"%R113%s%R7%",1};
21969 se_dump_stack ds;
21970 ds.fd=&fd;
21971 ds.current=((void**)&C);
21972 ds.p=236980234;
21973 ds.caller=caller;
21974 ds.locals=locals;
21975 locals[0]=(void**)&a1;
21976 se_dst=&ds;/*link*/
21977 (ds.p=236980740);
21978 r113widget_init(&ds,C);
21979 (ds.p=236980996);
21980 {T7*n=new7();
21981 r7copy(&ds,n,a1);
21982 (/*SFN*/C->_string/*25*/)=((T0*)n);
21983 se_i7(&ds,n);}
21984 (ds.p=236981252);
21985 {T50*n=new50();
21986 r50make(&ds,n);
21987 (/*SFN*/C->_img/*29*/)=((T0*)n);
21988 }
21989 (ds.p=236981508);
21990 r113update_image(&ds,C);
21991 se_dst=caller;/*unlink*/
21992 }
21993
21994 T6 r113contains(se_dump_stack*caller,T113* C,T2 a1,T2 a2){
21995 T6 R=0;
21996 void**locals[3];
21997 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R113%x%E2%y%E2%Result%E6%",1};
21998 se_dump_stack ds;
21999 ds.fd=&fd;
22000 ds.current=((void**)&C);
22001 ds.p=62930698;
22002 ds.caller=caller;
22003 ds.locals=locals;
22004 locals[0]=(void**)&a1;
22005 locals[1]=(void**)&a2;
22006 locals[2]=(void**)&R;
22007 se_dst=&ds;/*link*/
22008 (ds.p=62931204);
22009 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
22010 se_dst=caller;/*unlink*/
22011 return R;
22012 }
22013
22014 void r113fill_rect(se_dump_stack*caller,T113* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
22015 void**locals[5];
22016 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R113%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
22017 se_dump_stack ds;
22018 ds.fd=&fd;
22019 ds.current=((void**)&C);
22020 ds.p=62937354;
22021 ds.caller=caller;
22022 ds.locals=locals;
22023 locals[0]=(void**)&a1;
22024 locals[1]=(void**)&a2;
22025 locals[2]=(void**)&a3;
22026 locals[3]=(void**)&a4;
22027 locals[4]=(void**)&a5;
22028 se_dst=&ds;/*link*/
22029 (ds.p=62937860);
22030 r113ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
22031 se_dst=caller;/*unlink*/
22032 }
22033
22034 void r113put_xy(se_dump_stack*caller,T113* C,T2 a1,T2 a2){
22035 void**locals[2];
22036 static se_frame_descriptor fd={"put_xy WIDGET",1,2,"%R113%x%E2%y%E2%",1};
22037 se_dump_stack ds;
22038 ds.fd=&fd;
22039 ds.current=((void**)&C);
22040 ds.p=62927626;
22041 ds.caller=caller;
22042 ds.locals=locals;
22043 locals[0]=(void**)&a1;
22044 locals[1]=(void**)&a2;
22045 se_dst=&ds;/*link*/
22046 (ds.p=62928132);
22047 (/*SFN*/C->_offsetx/*9*/)=a1;
22048 (ds.p=62928388);
22049 (/*SFN*/C->_offsety/*13*/)=a2;
22050 se_dst=caller;/*unlink*/
22051 }
22052
22053 T6 r113standard_is_equal(se_dump_stack*caller,T113* C,T0* a1){
22054 T6 R=0;
22055 void**locals[2];
22056 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R113%other%R113%Result%E6%",1};
22057 se_dump_stack ds;
22058 ds.fd=&fd;
22059 ds.current=((void**)&C);
22060 ds.p=2128406;
22061 ds.caller=caller;
22062 ds.locals=locals;
22063 locals[0]=(void**)&a1;
22064 locals[1]=(void**)&R;
22065 se_dst=&ds;/*link*/
22066 se_require_uppermost_flag=1;
22067 if(fd.assertion_flag){
22068 fd.assertion_flag=0;
22069 (ds.p=2129184);
22070 ac_req((a1)!=((void*)(NULL)),NULL);
22071 fd.assertion_flag=1;
22072 }
22073 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
22074 fd.assertion_flag=0;
22075 (ds.p=2129976);
22076 ac_ens((!(R))||(r113standard_is_equal(&ds,((T113*)ci(113,a1,2129992)),(T0*)C)),"symmetric");
22077 fd.assertion_flag=1;
22078 }
22079 se_dst=caller;/*unlink*/
22080 return R;
22081 }
22082
22083 void r113put_size(se_dump_stack*caller,T113* C,T2 a1,T2 a2){
22084 void**locals[2];
22085 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R113%w%E2%h%E2%",1};
22086 se_dump_stack ds;
22087 ds.fd=&fd;
22088 ds.current=((void**)&C);
22089 ds.p=62929162;
22090 ds.caller=caller;
22091 ds.locals=locals;
22092 locals[0]=(void**)&a1;
22093 locals[1]=(void**)&a2;
22094 se_dst=&ds;/*link*/
22095 (ds.p=62929668);
22096 (/*SFN*/C->_width/*17*/)=a1;
22097 (ds.p=62929924);
22098 (/*SFN*/C->_height/*21*/)=a2;
22099 se_dst=caller;/*unlink*/
22100 }
22101
22102 void r113ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
22103 void**locals[5];
22104 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
22105 se_dump_stack ds;
22106 ds.fd=&fd;
22107 ds.current=NULL;
22108 ds.p=62938634;
22109 ds.caller=caller;
22110 ds.locals=locals;
22111 locals[0]=(void**)&a1;
22112 locals[1]=(void**)&a2;
22113 locals[2]=(void**)&a3;
22114 locals[3]=(void**)&a4;
22115 locals[4]=(void**)&a5;
22116 se_dst=&ds;/*link*/
22117 /*[ from line 95 of ./widget.e:*/
22118 (ds.p=62938908);
22119 ext_fill_rect(a1,a2,a3,a4,a5);
22120 /* from line 95 of ./widget.e]*/
22121 se_dst=caller;/*unlink*/
22122 }
22123
22124 T0* r113darkgreen(se_dump_stack*caller){
22125 if(fBC18darkgreen==0){fBC18darkgreen=1;{
22126 void**locals[1];
22127 static se_frame_descriptor fd={"darkgreen COLOR_TABLE",0,1,"Result%R51%",1};
22128 se_dump_stack ds;
22129 ds.fd=&fd;
22130 ds.current=NULL;
22131 ds.p=37762314;
22132 ds.caller=caller;
22133 ds.locals=locals;
22134 locals[0]=(void**)&oBC18darkgreen;
22135 se_dst=&ds;/*link*/
22136 (ds.p=37762820);
22137 {T51*n=new51();
22138 oBC18darkgreen=((T0*)n);
22139 r51make(&ds,n,0,127,0);
22140 }
22141 se_dst=caller;/*unlink*/
22142 }}
22143 return oBC18darkgreen;
22144 }
22145
22146 void r113put_focus(se_dump_stack*caller,T113* C,T6 a1){
22147 void**locals[1];
22148 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R113%b%E6%",1};
22149 se_dump_stack ds;
22150 ds.fd=&fd;
22151 ds.current=((void**)&C);
22152 ds.p=62916874;
22153 ds.caller=caller;
22154 ds.locals=locals;
22155 locals[0]=(void**)&a1;
22156 se_dst=&ds;/*link*/
22157 (ds.p=62917380);
22158 (/*SFN*/C->_has_focus/*4*/)=a1;
22159 se_dst=caller;/*unlink*/
22160 }
22161
22162 void r113blit(se_dump_stack*caller,T113* C,T0* a1,T2 a2,T2 a3){
22163 void**locals[3];
22164 static se_frame_descriptor fd={"blit WIDGET",1,3,"%R113%img%R50%x%E2%y%E2%",1};
22165 se_dump_stack ds;
22166 ds.fd=&fd;
22167 ds.current=((void**)&C);
22168 ds.p=62939658;
22169 ds.caller=caller;
22170 ds.locals=locals;
22171 locals[0]=(void**)&a1;
22172 locals[1]=(void**)&a2;
22173 locals[2]=(void**)&a3;
22174 se_dst=&ds;/*link*/
22175 (ds.p=62940172);
22176 r50blit(&ds,((T50*)ci(50,a1,62940164)),(a2)+((/*RF2*/(C)->_offsetx/*9*/)),(a3)+((/*RF2*/(C)->_offsety/*13*/)));
22177 se_dst=caller;/*unlink*/
22178 }
22179
22180 void r113process_event(se_dump_stack*caller,T113* C,T0* a1){
22181 void**locals[1];
22182 static se_frame_descriptor fd={"process_event BUTTON",1,1,"%R113%e%R28%",1};
22183 se_dump_stack ds;
22184 ds.fd=&fd;
22185 ds.current=((void**)&C);
22186 ds.p=236982282;
22187 ds.caller=caller;
22188 ds.locals=locals;
22189 locals[0]=(void**)&a1;
22190 se_dst=&ds;/*link*/
22191 /*[IF*/
22192 if(((ds.p=236982808),((/*RF2*/(((T28*)ci(28,a1,236982794)))->_type/*12*/))==(5))){
22193 (ds.p=236983052);
22194 r113raise_signal(&ds,C,1);
22195 }
22196 /*FI]*/
22197 se_dst=caller;/*unlink*/
22198 }
22199
22200 T0* r113twin(se_dump_stack*caller,T113* C){
22201 T0* R=NULL;
22202 void**locals[1];
22203 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R113%Result%R113%",1};
22204 se_dump_stack ds;
22205 ds.fd=&fd;
22206 ds.current=((void**)&C);
22207 ds.p=2140182;
22208 ds.caller=caller;
22209 ds.locals=locals;
22210 locals[0]=(void**)&R;
22211 se_dst=&ds;/*link*/
22212 R=((void*)new113());
22213 *((T113*)R)=*C;
22214 if(fd.assertion_flag){
22215 fd.assertion_flag=0;
22216 (ds.p=2142256);
22217 ac_ens(r113is_equal(&ds,((T113*)ci(113,R,2142242)),(T0*)C),"equal");
22218 fd.assertion_flag=1;
22219 }
22220 se_dst=caller;/*unlink*/
22221 return R;
22222 }
22223
22224 T0* r113white(se_dump_stack*caller){
22225 if(fBC18white==0){fBC18white=1;{
22226 void**locals[1];
22227 static se_frame_descriptor fd={"white COLOR_TABLE",0,1,"Result%R51%",1};
22228 se_dump_stack ds;
22229 ds.fd=&fd;
22230 ds.current=NULL;
22231 ds.p=37752074;
22232 ds.caller=caller;
22233 ds.locals=locals;
22234 locals[0]=(void**)&oBC18white;
22235 se_dst=&ds;/*link*/
22236 (ds.p=37752580);
22237 {T51*n=new51();
22238 oBC18white=((T0*)n);
22239 r51make(&ds,n,255,255,255);
22240 }
22241 se_dst=caller;/*unlink*/
22242 }}
22243 return oBC18white;
22244 }
22245
22246 void r113raise_signal(se_dump_stack*caller,T113* C,T2 a1){
22247 void**locals[1];
22248 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R113%i%E2%",1};
22249 se_dump_stack ds;
22250 ds.fd=&fd;
22251 ds.current=((void**)&C);
22252 ds.p=62924554;
22253 ds.caller=caller;
22254 ds.locals=locals;
22255 locals[0]=(void**)&a1;
22256 se_dst=&ds;/*link*/
22257 /*[IF*/
22258 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
22259 (ds.p=62925362);
22260 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
22261 }
22262 /*FI]*/
22263 se_dst=caller;/*unlink*/
22264 }
22265
22266 T0* r113font(se_dump_stack*caller,T113* C){
22267 T0* R=NULL;
22268 void**locals[1];
22269 static se_frame_descriptor fd={"font WIDGET",1,1,"%R113%Result%R53%",1};
22270 se_dump_stack ds;
22271 ds.fd=&fd;
22272 ds.current=((void**)&C);
22273 ds.p=62918154;
22274 ds.caller=caller;
22275 ds.locals=locals;
22276 locals[0]=(void**)&R;
22277 se_dst=&ds;/*link*/
22278 (ds.p=62918660);
22279 R=(/*RF2*/(((T54*)ci(54,r113config(&ds),62918680)))->_mainfont/*20*/);
22280 se_dst=caller;/*unlink*/
22281 return R;
22282 }
22283
22284 void r113update(se_dump_stack*caller,T113* C){
22285 static se_frame_descriptor fd={"update BUTTON",1,0,"%R113%",1};
22286 se_dump_stack ds;
22287 ds.fd=&fd;
22288 ds.current=((void**)&C);
22289 ds.p=236984074;
22290 ds.caller=caller;
22291 ds.locals=NULL;
22292 se_dst=&ds;/*link*/
22293 (ds.p=236984580);
22294 r113fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r113darkgreen(&ds));
22295 (ds.p=236984836);
22296 r113fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r113black(&ds));
22297 /*[IF*/
22298 if(((ds.p=236985106),(/*RF2*/(((T50*)ci(50,(/*RF2*/(C)->_img/*29*/),236985098)))->_is_connected/*4*/))){
22299 (ds.p=236985356);
22300 r113blit(&ds,C,(/*RF2*/(C)->_img/*29*/),2,2);
22301 }
22302 /*FI]*/
22303 se_dst=caller;/*unlink*/
22304 }
22305
22306 T0* r113black(se_dump_stack*caller){
22307 if(fBC18black==0){fBC18black=1;{
22308 void**locals[1];
22309 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
22310 se_dump_stack ds;
22311 ds.fd=&fd;
22312 ds.current=NULL;
22313 ds.p=37749514;
22314 ds.caller=caller;
22315 ds.locals=locals;
22316 locals[0]=(void**)&oBC18black;
22317 se_dst=&ds;/*link*/
22318 (ds.p=37750020);
22319 {T51*n=new51();
22320 oBC18black=((T0*)n);
22321 r51make(&ds,n,0,0,0);
22322 }
22323 se_dst=caller;/*unlink*/
22324 }}
22325 return oBC18black;
22326 }
22327
22328 void r55disconnect(se_dump_stack*caller,T55* C){
22329 static se_frame_descriptor fd={"disconnect TEXT_FILE_READ",1,0,"%R55%",1};
22330 se_dump_stack ds;
22331 ds.fd=&fd;
22332 ds.current=((void**)&C);
22333 ds.p=115357448;
22334 ds.caller=caller;
22335 ds.locals=NULL;
22336 se_dst=&ds;/*link*/
22337 se_require_uppermost_flag=1;
22338 if(fd.assertion_flag){
22339 fd.assertion_flag=0;
22340 (ds.p=115357972);
22341 ac_req(r55is_connected(&ds,C),NULL);
22342 fd.assertion_flag=1;
22343 }
22344 (ds.p=115358484);
22345 basic_io_fclose((/*RF2*/(C)->_input_stream/*9*/));
22346 (ds.p=115358740);
22347 (/*SFN*/C->_path/*5*/)=NULL;
22348 se_dst=caller;/*unlink*/
22349 }
22350
22351 T6 r55is_equal(se_dump_stack*caller,T55* C,T0* a1){
22352 T6 R=0;
22353 void**locals[2];
22354 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R55%other%R55%Result%E6%",1};
22355 se_dump_stack ds;
22356 ds.fd=&fd;
22357 ds.current=((void**)&C);
22358 ds.p=2120968;
22359 ds.caller=caller;
22360 ds.locals=locals;
22361 locals[0]=(void**)&a1;
22362 locals[1]=(void**)&R;
22363 se_dst=&ds;/*link*/
22364 se_require_uppermost_flag=1;
22365 if(fd.assertion_flag){
22366 fd.assertion_flag=0;
22367 (ds.p=2122048);
22368 ac_req((a1)!=((void*)(NULL)),"other_not_void");
22369 fd.assertion_flag=1;
22370 }
22371 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
22372 fd.assertion_flag=0;
22373 (ds.p=2122846);
22374 ac_ens((!(r55standard_is_equal(&ds,C,a1)))||(R),"consistent");
22375 (ds.p=2123064);
22376 ac_ens((!(R))||(r55is_equal(&ds,((T55*)ci(55,a1,2123080)),(T0*)C)),"symmetric");
22377 fd.assertion_flag=1;
22378 }
22379 se_dst=caller;/*unlink*/
22380 return R;
22381 }
22382
22383 T6 r55is_connected(se_dump_stack*caller,T55* C){
22384 T6 R=0;
22385 void**locals[1];
22386 static se_frame_descriptor fd={"is_connected TEXT_FILE_READ",1,1,"%R55%Result%E6%",1};
22387 se_dump_stack ds;
22388 ds.fd=&fd;
22389 ds.current=((void**)&C);
22390 ds.p=115351048;
22391 ds.caller=caller;
22392 ds.locals=locals;
22393 locals[0]=(void**)&R;
22394 se_dst=&ds;/*link*/
22395 (ds.p=115351572);
22396 R=((/*RF2*/(C)->_path/*5*/))!=((void*)(NULL));
22397 if(fd.assertion_flag){
22398 fd.assertion_flag=0;
22399 (ds.p=115352108);
22400 ac_ens((R)==(((/*RF2*/(C)->_path/*5*/))!=((void*)(NULL))),"definition");
22401 fd.assertion_flag=1;
22402 }
22403 se_dst=caller;/*unlink*/
22404 return R;
22405 }
22406
22407 void r55read_character(se_dump_stack*caller,T55* C){
22408 static se_frame_descriptor fd={"read_character TEXT_FILE_READ",1,0,"%R55%",1};
22409 se_dump_stack ds;
22410 ds.fd=&fd;
22411 ds.current=((void**)&C);
22412 ds.p=115359496;
22413 ds.caller=caller;
22414 ds.locals=NULL;
22415 se_dst=&ds;/*link*/
22416 se_require_uppermost_flag=1;
22417 if(fd.assertion_flag){
22418 fd.assertion_flag=0;
22419 (ds.p=117450516);
22420 ac_req(r6_ix_not(&ds,r55end_of_input(&ds,C)),NULL);
22421 fd.assertion_flag=1;
22422 }
22423 /*[IF*/
22424 if(((ds.p=115360026),(/*RF2*/(C)->_push_back_flag/*4*/))){
22425 (ds.p=115360282);
22426 (/*SFN*/C->_push_back_flag/*4*/)=0;
22427 }
22428 else{
22429 (ds.p=115360794);
22430 (/*SFN*/C->_memory/*13*/)=basic_io_getc((/*RF2*/(C)->_input_stream/*9*/));
22431 }
22432 /*FI]*/
22433 if(fd.assertion_flag){
22434 fd.assertion_flag=0;
22435 (ds.p=117451284);
22436 ac_ens(r6_ix_not(&ds,(/*RF2*/(C)->_push_back_flag/*4*/)),NULL);
22437 fd.assertion_flag=1;
22438 }
22439 se_dst=caller;/*unlink*/
22440 }
22441
22442 void r55skip_separators(se_dump_stack*caller,T55* C){
22443 static se_frame_descriptor fd={"skip_separators INPUT_STREAM",1,0,"%R55%",1};
22444 se_dump_stack ds;
22445 ds.fd=&fd;
22446 ds.current=((void**)&C);
22447 ds.p=117457416;
22448 ds.caller=caller;
22449 ds.locals=NULL;
22450 se_dst=&ds;/*link*/
22451 while (!(((ds.p=117460020),(r55end_of_input(&ds,C))||(r6_ix_not(&ds,r3is_separator(&ds,r55last_character(&ds,C)))))))
22452 {
22453 (ds.p=117460506);
22454 r55read_character(&ds,C);
22455 }
22456 /*[IF*/
22457 if(((ds.p=117461052),(r6_ix_not(&ds,r55end_of_input(&ds,C)))&&(r6_ix_not(&ds,(/*RF2*/(C)->_push_back_flag/*4*/))))){
22458 (ds.p=117461274);
22459 r55unread_character(&ds,C);
22460 }
22461 /*FI]*/
22462 se_dst=caller;/*unlink*/
22463 }
22464
22465 void r55read_line_in(se_dump_stack*caller,T55* C,T0* a1){
22466 T2 _idx=0;
22467 T2 _remainder=0;
22468 T9 _storage=NULL;
22469 T2 _m=0;
22470 void**locals[5];
22471 static se_frame_descriptor fd={"read_line_in TEXT_FILE_READ",1,5,"%R55%buffer%R7%idx%E2%remainder%E2%storage%E9%m%E2%",1};
22472 se_dump_stack ds;
22473 ds.fd=&fd;
22474 ds.current=((void**)&C);
22475 ds.p=115366152;
22476 ds.caller=caller;
22477 ds.locals=locals;
22478 locals[0]=(void**)&a1;
22479 locals[1]=(void**)&_idx;
22480 locals[2]=(void**)&_remainder;
22481 locals[3]=(void**)&_storage;
22482 locals[4]=(void**)&_m;
22483 se_dst=&ds;/*link*/
22484 se_require_uppermost_flag=1;
22485 if(fd.assertion_flag){
22486 fd.assertion_flag=0;
22487 (ds.p=117555988);
22488 ac_req(r6_ix_not(&ds,r55end_of_input(&ds,C)),NULL);
22489 (ds.p=117556244);
22490 ac_req((a1)!=((void*)(NULL)),NULL);
22491 fd.assertion_flag=1;
22492 }
22493 (ds.p=115367430);
22494 _storage=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,115367452))))->_storage/*4*/);
22495 (ds.p=115367686);
22496 _idx=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,115367700))))->_count/*8*/);
22497 (ds.p=115367942);
22498 _remainder=((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,115367968))))->_capacity/*12*/))-(_idx);
22499 (ds.p=115368474);
22500 r55read_character(&ds,C);
22501 (ds.p=115368716);
22502 _m=(/*RF2*/(C)->_memory/*13*/);
22503 while (!(((ds.p=115369324),(((_m)==(basic_io_eof))||((_m)==(T3code(((T3)'\n')))))||((_m)==(T3code(((T3)'\15')))))))
22504 {
22505 /*[IF*/
22506 if(((ds.p=115369766),(_remainder)>(0))){
22507 (ds.p=115370018);
22508 (_storage)[_idx]=(((T3)(_m)));
22509 (ds.p=115370258);
22510 _idx=(_idx)+(1);
22511 (ds.p=115370514);
22512 _remainder=(_remainder)-(1);
22513 }
22514 else{
22515 (ds.p=115371040);
22516 r7set_count(&ds,se_i7(&ds,((T7*)ci(7,a1,115371026))),_idx);
22517 (ds.p=115371296);
22518 r7extend(&ds,se_i7(&ds,((T7*)ci(7,a1,115371282))),((T3)(_m)));
22519 (ds.p=115371538);
22520 _storage=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,115371560))))->_storage/*4*/);
22521 (ds.p=115371794);
22522 _idx=(/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,115371808))))->_count/*8*/);
22523 (ds.p=115372050);
22524 _remainder=((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,115372076))))->_capacity/*12*/))-(_idx);
22525 }
22526 /*FI]*/
22527 (ds.p=115372570);
22528 _m=basic_io_getc((/*RF2*/(C)->_input_stream/*9*/));
22529 }
22530 (ds.p=115373076);
22531 r7set_count(&ds,se_i7(&ds,((T7*)ci(7,a1,115373062))),_idx);
22532 (ds.p=115373318);
22533 (/*SFN*/C->_memory/*13*/)=_m;
22534 /*[IF*/
22535 if(((ds.p=115373598),(_m)==(T3code(((T3)'\15'))))){
22536 (ds.p=115373850);
22537 r55read_character(&ds,C);
22538 /*[IF*/
22539 if(((ds.p=115374126),((/*RF2*/(C)->_memory/*13*/))!=(T3code(((T3)'\n'))))){
22540 (ds.p=115374166);
22541 (/*SFN*/C->_push_back_flag/*4*/)=1;
22542 }
22543 /*FI]*/
22544 }
22545 /*FI]*/
22546 se_dst=caller;/*unlink*/
22547 }
22548
22549 T6 r55standard_is_equal(se_dump_stack*caller,T55* C,T0* a1){
22550 T6 R=0;
22551 void**locals[2];
22552 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R55%other%R55%Result%E6%",1};
22553 se_dump_stack ds;
22554 ds.fd=&fd;
22555 ds.current=((void**)&C);
22556 ds.p=2128406;
22557 ds.caller=caller;
22558 ds.locals=locals;
22559 locals[0]=(void**)&a1;
22560 locals[1]=(void**)&R;
22561 se_dst=&ds;/*link*/
22562 se_require_uppermost_flag=1;
22563 if(fd.assertion_flag){
22564 fd.assertion_flag=0;
22565 (ds.p=2129184);
22566 ac_req((a1)!=((void*)(NULL)),NULL);
22567 fd.assertion_flag=1;
22568 }
22569 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
22570 fd.assertion_flag=0;
22571 (ds.p=2129976);
22572 ac_ens((!(R))||(r55standard_is_equal(&ds,((T55*)ci(55,a1,2129992)),(T0*)C)),"symmetric");
22573 fd.assertion_flag=1;
22574 }
22575 se_dst=caller;/*unlink*/
22576 return R;
22577 }
22578
22579 T6 r55end_of_input(se_dump_stack*caller,T55* C){
22580 T6 R=0;
22581 void**locals[1];
22582 static se_frame_descriptor fd={"end_of_input TEXT_FILE_READ",1,1,"%R55%Result%E6%",1};
22583 se_dump_stack ds;
22584 ds.fd=&fd;
22585 ds.current=((void**)&C);
22586 ds.p=115364360;
22587 ds.caller=caller;
22588 ds.locals=locals;
22589 locals[0]=(void**)&R;
22590 se_dst=&ds;/*link*/
22591 se_require_uppermost_flag=1;
22592 if(fd.assertion_flag){
22593 fd.assertion_flag=0;
22594 (ds.p=117448212);
22595 ac_req(r55is_connected(&ds,C),NULL);
22596 fd.assertion_flag=1;
22597 }
22598 /*[IF*/
22599 if(((ds.p=115364890),r6_ix_not(&ds,(/*RF2*/(C)->_push_back_flag/*4*/)))){
22600 (ds.p=115365146);
22601 R=((/*RF2*/(C)->_memory/*13*/))==(basic_io_eof);
22602 }
22603 /*FI]*/
22604 se_dst=caller;/*unlink*/
22605 return R;
22606 }
22607
22608 void r55connect_to(se_dump_stack*caller,T55* C,T0* a1){
22609 T8 _p=NULL;
22610 void**locals[2];
22611 static se_frame_descriptor fd={"connect_to TEXT_FILE_READ",1,2,"%R55%new_path%R7%p%E8%",1};
22612 se_dump_stack ds;
22613 ds.fd=&fd;
22614 ds.current=((void**)&C);
22615 ds.p=115352840;
22616 ds.caller=caller;
22617 ds.locals=locals;
22618 locals[0]=(void**)&a1;
22619 locals[1]=(void**)&_p;
22620 se_dst=&ds;/*link*/
22621 se_require_uppermost_flag=1;
22622 if(fd.assertion_flag){
22623 fd.assertion_flag=0;
22624 (ds.p=115353876);
22625 ac_req(r6_ix_not(&ds,r55is_connected(&ds,C)),NULL);
22626 (ds.p=115354132);
22627 ac_req(r6_ix_not(&ds,r7is_empty(&ds,se_i7(&ds,((T7*)ci(7,a1,115354140))))),NULL);
22628 fd.assertion_flag=1;
22629 }
22630 (ds.p=115355156);
22631 _p=r7to_external(&ds,se_i7(&ds,((T7*)ci(7,a1,115355166))));
22632 (ds.p=115355412);
22633 (/*SFN*/C->_input_stream/*9*/)=basic_io_text_file_read_open(_p);
22634 /*[IF*/
22635 if(((ds.p=115355700),(NULL!=(/*RF2*/(C)->_input_stream/*9*/)))){
22636 (ds.p=115355930);
22637 (/*SFN*/C->_push_back_flag/*4*/)=0;
22638 (ds.p=115356186);
22639 (/*SFN*/C->_memory/*13*/)=T3code(((T3)'\40'));
22640 (ds.p=115356442);
22641 (/*SFN*/C->_path/*5*/)=a1;
22642 }
22643 /*FI]*/
22644 se_dst=caller;/*unlink*/
22645 }
22646
22647 void r55read_line(se_dump_stack*caller,T55* C){
22648 static se_frame_descriptor fd={"read_line INPUT_STREAM",1,0,"%R55%",1};
22649 se_dump_stack ds;
22650 ds.fd=&fd;
22651 ds.current=((void**)&C);
22652 ds.p=117523720;
22653 ds.caller=caller;
22654 ds.locals=NULL;
22655 se_dst=&ds;/*link*/
22656 se_require_uppermost_flag=1;
22657 if(fd.assertion_flag){
22658 fd.assertion_flag=0;
22659 (ds.p=117525012);
22660 ac_req(r6_ix_not(&ds,r55end_of_input(&ds,C)),NULL);
22661 fd.assertion_flag=1;
22662 }
22663 (ds.p=117525548);
22664 r7clear(&ds,se_i7(&ds,((T7*)ci(7,r55last_string(&ds),117525524))));
22665 (ds.p=117525780);
22666 r55read_line_in(&ds,C,r55last_string(&ds));
22667 se_dst=caller;/*unlink*/
22668 }
22669
22670 T3 r55last_character(se_dump_stack*caller,T55* C){
22671 T3 R=0;
22672 void**locals[1];
22673 static se_frame_descriptor fd={"last_character TEXT_FILE_READ",1,1,"%R55%Result%E3%",1};
22674 se_dump_stack ds;
22675 ds.fd=&fd;
22676 ds.current=((void**)&C);
22677 ds.p=115361800;
22678 ds.caller=caller;
22679 ds.locals=locals;
22680 locals[0]=(void**)&R;
22681 se_dst=&ds;/*link*/
22682 se_require_uppermost_flag=1;
22683 if(fd.assertion_flag){
22684 fd.assertion_flag=0;
22685 (ds.p=117452820);
22686 ac_req(r55is_connected(&ds,C),NULL);
22687 fd.assertion_flag=1;
22688 }
22689 (ds.p=115362324);
22690 R=((T3)((/*RF2*/(C)->_memory/*13*/)));
22691 se_dst=caller;/*unlink*/
22692 return R;
22693 }
22694
22695 void r55read_word(se_dump_stack*caller,T55* C){
22696 static se_frame_descriptor fd={"read_word INPUT_STREAM",1,0,"%R55%",1};
22697 se_dump_stack ds;
22698 ds.fd=&fd;
22699 ds.current=((void**)&C);
22700 ds.p=117526536;
22701 ds.caller=caller;
22702 ds.locals=NULL;
22703 se_dst=&ds;/*link*/
22704 se_require_uppermost_flag=1;
22705 if(fd.assertion_flag){
22706 fd.assertion_flag=0;
22707 (ds.p=117528340);
22708 ac_req(r6_ix_not(&ds,r55end_of_input(&ds,C)),NULL);
22709 fd.assertion_flag=1;
22710 }
22711 (ds.p=117528852);
22712 r55skip_separators(&ds,C);
22713 /*[IF*/
22714 if(((ds.p=117529114),r6_ix_not(&ds,r55end_of_input(&ds,C)))){
22715 (ds.p=117529370);
22716 r55read_character(&ds,C);
22717 }
22718 /*FI]*/
22719 (ds.p=117530162);
22720 r7clear(&ds,se_i7(&ds,((T7*)ci(7,r55last_string(&ds),117530138))));
22721 while (!(((ds.p=117530676),(r55end_of_input(&ds,C))||(r3is_separator(&ds,r55last_character(&ds,C))))))
22722 {
22723 (ds.p=117531442);
22724 r7extend(&ds,se_i7(&ds,((T7*)ci(7,r55last_string(&ds),117531418))),r55last_character(&ds,C));
22725 (ds.p=117531674);
22726 r55read_character(&ds,C);
22727 }
22728 se_dst=caller;/*unlink*/
22729 }
22730
22731 T0* r55twin(se_dump_stack*caller,T55* C){
22732 T0* R=NULL;
22733 void**locals[1];
22734 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R55%Result%R55%",1};
22735 se_dump_stack ds;
22736 ds.fd=&fd;
22737 ds.current=((void**)&C);
22738 ds.p=2140182;
22739 ds.caller=caller;
22740 ds.locals=locals;
22741 locals[0]=(void**)&R;
22742 se_dst=&ds;/*link*/
22743 R=((void*)new55());
22744 *((T55*)R)=*C;
22745 if(fd.assertion_flag){
22746 fd.assertion_flag=0;
22747 (ds.p=2142256);
22748 ac_ens(r55is_equal(&ds,((T55*)ci(55,R,2142242)),(T0*)C),"equal");
22749 fd.assertion_flag=1;
22750 }
22751 se_dst=caller;/*unlink*/
22752 return R;
22753 }
22754 T0*oBC56last_string=NULL;
22755 int fBC56last_string=0;
22756
22757 T0* r55last_string(se_dump_stack*caller){
22758 if(fBC56last_string==0){fBC56last_string=1;{
22759 void**locals[1];
22760 static se_frame_descriptor fd={"last_string INPUT_STREAM",0,1,"Result%R7%",1};
22761 se_dump_stack ds;
22762 ds.fd=&fd;
22763 ds.current=NULL;
22764 ds.p=117521672;
22765 ds.caller=caller;
22766 ds.locals=locals;
22767 locals[0]=(void**)&oBC56last_string;
22768 se_dst=&ds;/*link*/
22769 (ds.p=117522964);
22770 {T7*n=new7();
22771 oBC56last_string=((T0*)n);
22772 r7make(&ds,n,1024);
22773 se_i7(&ds,n);}
22774 se_dst=caller;/*unlink*/
22775 }}
22776 return oBC56last_string;
22777 }
22778
22779 void r55unread_character(se_dump_stack*caller,T55* C){
22780 static se_frame_descriptor fd={"unread_character TEXT_FILE_READ",1,0,"%R55%",1};
22781 se_dump_stack ds;
22782 ds.fd=&fd;
22783 ds.current=((void**)&C);
22784 ds.p=115363080;
22785 ds.caller=caller;
22786 ds.locals=NULL;
22787 se_dst=&ds;/*link*/
22788 se_require_uppermost_flag=1;
22789 if(fd.assertion_flag){
22790 fd.assertion_flag=0;
22791 (ds.p=117455380);
22792 ac_req(r6_ix_not(&ds,(/*RF2*/(C)->_push_back_flag/*4*/)),NULL);
22793 fd.assertion_flag=1;
22794 }
22795 (ds.p=115363604);
22796 (/*SFN*/C->_push_back_flag/*4*/)=1;
22797 if(fd.assertion_flag){
22798 fd.assertion_flag=0;
22799 (ds.p=117456148);
22800 ac_ens((/*RF2*/(C)->_push_back_flag/*4*/),NULL);
22801 fd.assertion_flag=1;
22802 }
22803 se_dst=caller;/*unlink*/
22804 }
22805
22806 T6 r65is_equal(se_dump_stack*caller,T65* C,T0* a1){
22807 T6 R=0;
22808 void**locals[2];
22809 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R65%other%R65%Result%E6%",1};
22810 se_dump_stack ds;
22811 ds.fd=&fd;
22812 ds.current=((void**)&C);
22813 ds.p=2120968;
22814 ds.caller=caller;
22815 ds.locals=locals;
22816 locals[0]=(void**)&a1;
22817 locals[1]=(void**)&R;
22818 se_dst=&ds;/*link*/
22819 se_require_uppermost_flag=1;
22820 if(fd.assertion_flag){
22821 fd.assertion_flag=0;
22822 (ds.p=2122048);
22823 ac_req((a1)!=((void*)(NULL)),"other_not_void");
22824 fd.assertion_flag=1;
22825 }
22826 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
22827 fd.assertion_flag=0;
22828 (ds.p=2122846);
22829 ac_ens((!(r65standard_is_equal(&ds,C,a1)))||(R),"consistent");
22830 (ds.p=2123064);
22831 ac_ens((!(R))||(r65is_equal(&ds,((T65*)ci(65,a1,2123080)),(T0*)C)),"symmetric");
22832 fd.assertion_flag=1;
22833 }
22834 se_dst=caller;/*unlink*/
22835 return R;
22836 }
22837
22838 void r65make(se_dump_stack*caller,T65* C,T0* a1,T2 a2,T2 a3,T6 a4){
22839 void**locals[4];
22840 static se_frame_descriptor fd={"make PRESET",1,4,"%R65%s%R7%w%E2%h%E2%wrap%E6%",1};
22841 se_dump_stack ds;
22842 ds.fd=&fd;
22843 ds.current=((void**)&C);
22844 ds.p=136316682;
22845 ds.caller=caller;
22846 ds.locals=locals;
22847 locals[0]=(void**)&a1;
22848 locals[1]=(void**)&a2;
22849 locals[2]=(void**)&a3;
22850 locals[3]=(void**)&a4;
22851 se_dst=&ds;/*link*/
22852 (ds.p=136317188);
22853 {T7*n=new7();
22854 r7copy(&ds,n,a1);
22855 (/*SFN*/C->_name/*4*/)=((T0*)n);
22856 se_i7(&ds,n);}
22857 (ds.p=136317444);
22858 {T68*n=new68();
22859 r68make(&ds,n);
22860 (/*SFN*/C->_setting/*8*/)=((T0*)n);
22861 }
22862 (ds.p=136317716);
22863 r68put_width(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*8*/),136317700)),a2);
22864 (ds.p=136317972);
22865 r68put_height(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*8*/),136317956)),a3);
22866 (ds.p=136318228);
22867 r68put_wrap(&ds,((T68*)ci(68,(/*RF2*/(C)->_setting/*8*/),136318212)),a4);
22868 se_dst=caller;/*unlink*/
22869 }
22870
22871 void r65put_hiscore(se_dump_stack*caller,T65* C,T0* a1){
22872 void**locals[1];
22873 static se_frame_descriptor fd={"put_hiscore PRESET",1,1,"%R65%s%R96%",1};
22874 se_dump_stack ds;
22875 ds.fd=&fd;
22876 ds.current=((void**)&C);
22877 ds.p=136319242;
22878 ds.caller=caller;
22879 ds.locals=locals;
22880 locals[0]=(void**)&a1;
22881 se_dst=&ds;/*link*/
22882 (ds.p=136319748);
22883 (/*SFN*/C->_hiscore/*12*/)=a1;
22884 se_dst=caller;/*unlink*/
22885 }
22886
22887 T6 r65standard_is_equal(se_dump_stack*caller,T65* C,T0* a1){
22888 T6 R=0;
22889 void**locals[2];
22890 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R65%other%R65%Result%E6%",1};
22891 se_dump_stack ds;
22892 ds.fd=&fd;
22893 ds.current=((void**)&C);
22894 ds.p=2128406;
22895 ds.caller=caller;
22896 ds.locals=locals;
22897 locals[0]=(void**)&a1;
22898 locals[1]=(void**)&R;
22899 se_dst=&ds;/*link*/
22900 se_require_uppermost_flag=1;
22901 if(fd.assertion_flag){
22902 fd.assertion_flag=0;
22903 (ds.p=2129184);
22904 ac_req((a1)!=((void*)(NULL)),NULL);
22905 fd.assertion_flag=1;
22906 }
22907 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
22908 fd.assertion_flag=0;
22909 (ds.p=2129976);
22910 ac_ens((!(R))||(r65standard_is_equal(&ds,((T65*)ci(65,a1,2129992)),(T0*)C)),"symmetric");
22911 fd.assertion_flag=1;
22912 }
22913 se_dst=caller;/*unlink*/
22914 return R;
22915 }
22916
22917 T0* r65twin(se_dump_stack*caller,T65* C){
22918 T0* R=NULL;
22919 void**locals[1];
22920 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R65%Result%R65%",1};
22921 se_dump_stack ds;
22922 ds.fd=&fd;
22923 ds.current=((void**)&C);
22924 ds.p=2140182;
22925 ds.caller=caller;
22926 ds.locals=locals;
22927 locals[0]=(void**)&R;
22928 se_dst=&ds;/*link*/
22929 R=((void*)new65());
22930 *((T65*)R)=*C;
22931 if(fd.assertion_flag){
22932 fd.assertion_flag=0;
22933 (ds.p=2142256);
22934 ac_ens(r65is_equal(&ds,((T65*)ci(65,R,2142242)),(T0*)C),"equal");
22935 fd.assertion_flag=1;
22936 }
22937 se_dst=caller;/*unlink*/
22938 return R;
22939 }
22940
22941 T6 r128is_equal(se_dump_stack*caller,T128* C,T0* a1){
22942 T6 R=0;
22943 void**locals[2];
22944 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R128%other%R128%Result%E6%",1};
22945 se_dump_stack ds;
22946 ds.fd=&fd;
22947 ds.current=((void**)&C);
22948 ds.p=2120968;
22949 ds.caller=caller;
22950 ds.locals=locals;
22951 locals[0]=(void**)&a1;
22952 locals[1]=(void**)&R;
22953 se_dst=&ds;/*link*/
22954 se_require_uppermost_flag=1;
22955 if(fd.assertion_flag){
22956 fd.assertion_flag=0;
22957 (ds.p=2122048);
22958 ac_req((a1)!=((void*)(NULL)),"other_not_void");
22959 fd.assertion_flag=1;
22960 }
22961 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
22962 fd.assertion_flag=0;
22963 (ds.p=2122846);
22964 ac_ens((!(r128standard_is_equal(&ds,C,a1)))||(R),"consistent");
22965 (ds.p=2123064);
22966 ac_ens((!(R))||(r128is_equal(&ds,((T128*)ci(128,a1,2123080)),(T0*)C)),"symmetric");
22967 fd.assertion_flag=1;
22968 }
22969 se_dst=caller;/*unlink*/
22970 return R;
22971 }
22972
22973 void r128make(se_dump_stack*caller,T128* C,T0* a1){
22974 void**locals[1];
22975 static se_frame_descriptor fd={"make COMMAND_PRESET_CHANGE",1,1,"%R128%m%R117%",1};
22976 se_dump_stack ds;
22977 ds.fd=&fd;
22978 ds.current=((void**)&C);
22979 ds.p=268437258;
22980 ds.caller=caller;
22981 ds.locals=locals;
22982 locals[0]=(void**)&a1;
22983 se_dst=&ds;/*link*/
22984 (ds.p=268437764);
22985 (/*SFN*/C->_main/*4*/)=a1;
22986 se_dst=caller;/*unlink*/
22987 }
22988
22989 T6 r128standard_is_equal(se_dump_stack*caller,T128* C,T0* a1){
22990 T6 R=0;
22991 void**locals[2];
22992 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R128%other%R128%Result%E6%",1};
22993 se_dump_stack ds;
22994 ds.fd=&fd;
22995 ds.current=((void**)&C);
22996 ds.p=2128406;
22997 ds.caller=caller;
22998 ds.locals=locals;
22999 locals[0]=(void**)&a1;
23000 locals[1]=(void**)&R;
23001 se_dst=&ds;/*link*/
23002 se_require_uppermost_flag=1;
23003 if(fd.assertion_flag){
23004 fd.assertion_flag=0;
23005 (ds.p=2129184);
23006 ac_req((a1)!=((void*)(NULL)),NULL);
23007 fd.assertion_flag=1;
23008 }
23009 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23010 fd.assertion_flag=0;
23011 (ds.p=2129976);
23012 ac_ens((!(R))||(r128standard_is_equal(&ds,((T128*)ci(128,a1,2129992)),(T0*)C)),"symmetric");
23013 fd.assertion_flag=1;
23014 }
23015 se_dst=caller;/*unlink*/
23016 return R;
23017 }
23018
23019 void r128execute(se_dump_stack*caller,T128* C){
23020 static se_frame_descriptor fd={"execute COMMAND_PRESET_CHANGE",1,0,"%R128%",1};
23021 se_dump_stack ds;
23022 ds.fd=&fd;
23023 ds.current=((void**)&C);
23024 ds.p=268438538;
23025 ds.caller=caller;
23026 ds.locals=NULL;
23027 se_dst=&ds;/*link*/
23028 (ds.p=268439054);
23029 r117preset_change(&ds,((T117*)ci(117,(/*RF2*/(C)->_main/*4*/),268439044)));
23030 se_dst=caller;/*unlink*/
23031 }
23032
23033 T0* r128twin(se_dump_stack*caller,T128* C){
23034 T0* R=NULL;
23035 void**locals[1];
23036 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R128%Result%R128%",1};
23037 se_dump_stack ds;
23038 ds.fd=&fd;
23039 ds.current=((void**)&C);
23040 ds.p=2140182;
23041 ds.caller=caller;
23042 ds.locals=locals;
23043 locals[0]=(void**)&R;
23044 se_dst=&ds;/*link*/
23045 R=((void*)new128());
23046 *((T128*)R)=*C;
23047 if(fd.assertion_flag){
23048 fd.assertion_flag=0;
23049 (ds.p=2142256);
23050 ac_ens(r128is_equal(&ds,((T128*)ci(128,R,2142242)),(T0*)C),"equal");
23051 fd.assertion_flag=1;
23052 }
23053 se_dst=caller;/*unlink*/
23054 return R;
23055 }
23056
23057 void r68copy(se_dump_stack*caller,T68* C,T0* a1){
23058 void**locals[1];
23059 static se_frame_descriptor fd={"copy SETTING",1,1,"%R68%o%R68%",1};
23060 se_dump_stack ds;
23061 ds.fd=&fd;
23062 ds.current=((void**)&C);
23063 ds.p=142619402;
23064 ds.caller=caller;
23065 ds.locals=locals;
23066 locals[0]=(void**)&a1;
23067 se_dst=&ds;/*link*/
23068 se_require_uppermost_flag=1;
23069 if(fd.assertion_flag){
23070 fd.assertion_flag=0;
23071 (ds.p=2144064);
23072 ac_req((a1)!=((void*)(NULL)),"other_not_void");
23073 fd.assertion_flag=1;
23074 }
23075 (ds.p=142619908);
23076 r68put_height(&ds,C,(/*RF2*/(((T68*)ci(68,a1,142619930)))->_height/*8*/));
23077 (ds.p=142620164);
23078 r68put_width(&ds,C,(/*RF2*/(((T68*)ci(68,a1,142620184)))->_width/*4*/));
23079 (ds.p=142620420);
23080 r68put_wrap(&ds,C,(/*RF2*/(((T68*)ci(68,a1,142620438)))->_wrap/*12*/));
23081 if(fd.assertion_flag){
23082 fd.assertion_flag=0;
23083 (ds.p=2144808);
23084 ac_ens(r68is_equal(&ds,C,a1),"is_equal");
23085 fd.assertion_flag=1;
23086 }
23087 se_dst=caller;/*unlink*/
23088 }
23089
23090 void r68put_height(se_dump_stack*caller,T68* C,T2 a1){
23091 void**locals[1];
23092 static se_frame_descriptor fd={"put_height SETTING",1,1,"%R68%i%E2%",1};
23093 se_dump_stack ds;
23094 ds.fd=&fd;
23095 ds.current=((void**)&C);
23096 ds.p=142613514;
23097 ds.caller=caller;
23098 ds.locals=locals;
23099 locals[0]=(void**)&a1;
23100 se_dst=&ds;/*link*/
23101 se_require_uppermost_flag=1;
23102 if(fd.assertion_flag){
23103 fd.assertion_flag=0;
23104 (ds.p=142614024);
23105 ac_req((a1)>=(4),NULL);
23106 (ds.p=142614280);
23107 ac_req((a1)<=(13),NULL);
23108 fd.assertion_flag=1;
23109 }
23110 (ds.p=142614788);
23111 (/*SFN*/C->_height/*8*/)=a1;
23112 se_dst=caller;/*unlink*/
23113 }
23114
23115 T6 r68is_equal(se_dump_stack*caller,T68* C,T0* a1){
23116 T6 R=0;
23117 void**locals[2];
23118 static se_frame_descriptor fd={"is_equal SETTING",1,2,"%R68%o%R68%Result%E6%",1};
23119 se_dump_stack ds;
23120 ds.fd=&fd;
23121 ds.current=((void**)&C);
23122 ds.p=142617098;
23123 ds.caller=caller;
23124 ds.locals=locals;
23125 locals[0]=(void**)&a1;
23126 locals[1]=(void**)&R;
23127 se_dst=&ds;/*link*/
23128 se_require_uppermost_flag=1;
23129 if(fd.assertion_flag){
23130 fd.assertion_flag=0;
23131 (ds.p=2122048);
23132 ac_req((a1)!=((void*)(NULL)),"other_not_void");
23133 fd.assertion_flag=1;
23134 }
23135 /*[IF*/
23136 if(((ds.p=142617894),((((/*RF2*/(C)->_height/*8*/))==((/*RF2*/(((T68*)ci(68,a1,142617628)))->_height/*8*/)))&&(((/*RF2*/(C)->_width/*4*/))==((/*RF2*/(((T68*)ci(68,a1,142617878)))->_width/*4*/))))&&(((/*RF2*/(C)->_wrap/*12*/))==((/*RF2*/(((T68*)ci(68,a1,142618132)))->_wrap/*12*/))))){
23137 (ds.p=142618380);
23138 R=1;
23139 }
23140 /*FI]*/
23141 if(fd.assertion_flag){
23142 fd.assertion_flag=0;
23143 (ds.p=2122846);
23144 ac_ens((!(r68standard_is_equal(&ds,C,a1)))||(R),"consistent");
23145 (ds.p=2123064);
23146 ac_ens((!(R))||(r68is_equal(&ds,((T68*)ci(68,a1,2123080)),(T0*)C)),"symmetric");
23147 fd.assertion_flag=1;
23148 }
23149 se_dst=caller;/*unlink*/
23150 return R;
23151 }
23152
23153 T2 r68clip_height(se_dump_stack*caller,T68* C,T2 a1){
23154 T2 R=0;
23155 void**locals[2];
23156 static se_frame_descriptor fd={"clip_height SETTING",1,2,"%R68%i%E2%Result%E2%",1};
23157 se_dump_stack ds;
23158 ds.fd=&fd;
23159 ds.current=((void**)&C);
23160 ds.p=142625802;
23161 ds.caller=caller;
23162 ds.locals=locals;
23163 locals[0]=(void**)&a1;
23164 locals[1]=(void**)&R;
23165 se_dst=&ds;/*link*/
23166 /*[IF*/
23167 if(((ds.p=142626318),(a1)<(4))){
23168 (ds.p=142626572);
23169 R=4;
23170 }
23171 else if(((ds.p=142626838),(a1)>(13))){
23172 (ds.p=142627084);
23173 R=13;
23174 }
23175 else{
23176 (ds.p=142627596);
23177 R=a1;
23178 }
23179 /*FI]*/
23180 se_dst=caller;/*unlink*/
23181 return R;
23182 }
23183
23184 void r68make(se_dump_stack*caller,T68* C){
23185 static se_frame_descriptor fd={"make SETTING",1,0,"%R68%",1};
23186 se_dump_stack ds;
23187 ds.fd=&fd;
23188 ds.current=((void**)&C);
23189 ds.p=142621194;
23190 ds.caller=caller;
23191 ds.locals=NULL;
23192 se_dst=&ds;/*link*/
23193 (ds.p=142621700);
23194 r68put_height(&ds,C,9);
23195 (ds.p=142621956);
23196 r68put_width(&ds,C,10);
23197 se_dst=caller;/*unlink*/
23198 }
23199
23200 T6 r68standard_is_equal(se_dump_stack*caller,T68* C,T0* a1){
23201 T6 R=0;
23202 void**locals[2];
23203 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R68%other%R68%Result%E6%",1};
23204 se_dump_stack ds;
23205 ds.fd=&fd;
23206 ds.current=((void**)&C);
23207 ds.p=2128406;
23208 ds.caller=caller;
23209 ds.locals=locals;
23210 locals[0]=(void**)&a1;
23211 locals[1]=(void**)&R;
23212 se_dst=&ds;/*link*/
23213 se_require_uppermost_flag=1;
23214 if(fd.assertion_flag){
23215 fd.assertion_flag=0;
23216 (ds.p=2129184);
23217 ac_req((a1)!=((void*)(NULL)),NULL);
23218 fd.assertion_flag=1;
23219 }
23220 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23221 fd.assertion_flag=0;
23222 (ds.p=2129976);
23223 ac_ens((!(R))||(r68standard_is_equal(&ds,((T68*)ci(68,a1,2129992)),(T0*)C)),"symmetric");
23224 fd.assertion_flag=1;
23225 }
23226 se_dst=caller;/*unlink*/
23227 return R;
23228 }
23229
23230 void r68put_wrap(se_dump_stack*caller,T68* C,T6 a1){
23231 void**locals[1];
23232 static se_frame_descriptor fd={"put_wrap SETTING",1,1,"%R68%b%E6%",1};
23233 se_dump_stack ds;
23234 ds.fd=&fd;
23235 ds.current=((void**)&C);
23236 ds.p=142615818;
23237 ds.caller=caller;
23238 ds.locals=locals;
23239 locals[0]=(void**)&a1;
23240 se_dst=&ds;/*link*/
23241 (ds.p=142616324);
23242 (/*SFN*/C->_wrap/*12*/)=a1;
23243 se_dst=caller;/*unlink*/
23244 }
23245
23246 T2 r68clip_width(se_dump_stack*caller,T68* C,T2 a1){
23247 T2 R=0;
23248 void**locals[2];
23249 static se_frame_descriptor fd={"clip_width SETTING",1,2,"%R68%i%E2%Result%E2%",1};
23250 se_dump_stack ds;
23251 ds.fd=&fd;
23252 ds.current=((void**)&C);
23253 ds.p=142622986;
23254 ds.caller=caller;
23255 ds.locals=locals;
23256 locals[0]=(void**)&a1;
23257 locals[1]=(void**)&R;
23258 se_dst=&ds;/*link*/
23259 /*[IF*/
23260 if(((ds.p=142623502),(a1)<(4))){
23261 (ds.p=142623756);
23262 R=4;
23263 }
23264 else if(((ds.p=142624022),(a1)>(15))){
23265 (ds.p=142624268);
23266 R=15;
23267 }
23268 else{
23269 (ds.p=142624780);
23270 R=a1;
23271 }
23272 /*FI]*/
23273 se_dst=caller;/*unlink*/
23274 return R;
23275 }
23276
23277 T0* r68twin(se_dump_stack*caller,T68* C){
23278 T0* R=NULL;
23279 void**locals[1];
23280 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R68%Result%R68%",1};
23281 se_dump_stack ds;
23282 ds.fd=&fd;
23283 ds.current=((void**)&C);
23284 ds.p=2140182;
23285 ds.caller=caller;
23286 ds.locals=locals;
23287 locals[0]=(void**)&R;
23288 se_dst=&ds;/*link*/
23289 R=((void*)new68());
23290 r68copy(&ds,((T68*)R),((T0*)C));
23291 if(fd.assertion_flag){
23292 fd.assertion_flag=0;
23293 (ds.p=2142256);
23294 ac_ens(r68is_equal(&ds,((T68*)ci(68,R,2142242)),(T0*)C),"equal");
23295 fd.assertion_flag=1;
23296 }
23297 se_dst=caller;/*unlink*/
23298 return R;
23299 }
23300
23301 void r68put_width(se_dump_stack*caller,T68* C,T2 a1){
23302 void**locals[1];
23303 static se_frame_descriptor fd={"put_width SETTING",1,1,"%R68%i%E2%",1};
23304 se_dump_stack ds;
23305 ds.fd=&fd;
23306 ds.current=((void**)&C);
23307 ds.p=142611210;
23308 ds.caller=caller;
23309 ds.locals=locals;
23310 locals[0]=(void**)&a1;
23311 se_dst=&ds;/*link*/
23312 se_require_uppermost_flag=1;
23313 if(fd.assertion_flag){
23314 fd.assertion_flag=0;
23315 (ds.p=142611720);
23316 ac_req((a1)>=(4),NULL);
23317 (ds.p=142611976);
23318 ac_req((a1)<=(15),NULL);
23319 fd.assertion_flag=1;
23320 }
23321 (ds.p=142612484);
23322 (/*SFN*/C->_width/*4*/)=a1;
23323 se_dst=caller;/*unlink*/
23324 }
23325
23326 T6 r129is_equal(se_dump_stack*caller,T129* C,T0* a1){
23327 T6 R=0;
23328 void**locals[2];
23329 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R129%other%R129%Result%E6%",1};
23330 se_dump_stack ds;
23331 ds.fd=&fd;
23332 ds.current=((void**)&C);
23333 ds.p=2120968;
23334 ds.caller=caller;
23335 ds.locals=locals;
23336 locals[0]=(void**)&a1;
23337 locals[1]=(void**)&R;
23338 se_dst=&ds;/*link*/
23339 se_require_uppermost_flag=1;
23340 if(fd.assertion_flag){
23341 fd.assertion_flag=0;
23342 (ds.p=2122048);
23343 ac_req((a1)!=((void*)(NULL)),"other_not_void");
23344 fd.assertion_flag=1;
23345 }
23346 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23347 fd.assertion_flag=0;
23348 (ds.p=2122846);
23349 ac_ens((!(r129standard_is_equal(&ds,C,a1)))||(R),"consistent");
23350 (ds.p=2123064);
23351 ac_ens((!(R))||(r129is_equal(&ds,((T129*)ci(129,a1,2123080)),(T0*)C)),"symmetric");
23352 fd.assertion_flag=1;
23353 }
23354 se_dst=caller;/*unlink*/
23355 return R;
23356 }
23357
23358 void r129make(se_dump_stack*caller,T129* C,T0* a1){
23359 void**locals[1];
23360 static se_frame_descriptor fd={"make COMMAND_CANCEL",1,1,"%R129%m%R30%",1};
23361 se_dump_stack ds;
23362 ds.fd=&fd;
23363 ds.current=((void**)&C);
23364 ds.p=270534410;
23365 ds.caller=caller;
23366 ds.locals=locals;
23367 locals[0]=(void**)&a1;
23368 se_dst=&ds;/*link*/
23369 (ds.p=270534916);
23370 (/*SFN*/C->_main/*4*/)=a1;
23371 se_dst=caller;/*unlink*/
23372 }
23373
23374 T6 r129standard_is_equal(se_dump_stack*caller,T129* C,T0* a1){
23375 T6 R=0;
23376 void**locals[2];
23377 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R129%other%R129%Result%E6%",1};
23378 se_dump_stack ds;
23379 ds.fd=&fd;
23380 ds.current=((void**)&C);
23381 ds.p=2128406;
23382 ds.caller=caller;
23383 ds.locals=locals;
23384 locals[0]=(void**)&a1;
23385 locals[1]=(void**)&R;
23386 se_dst=&ds;/*link*/
23387 se_require_uppermost_flag=1;
23388 if(fd.assertion_flag){
23389 fd.assertion_flag=0;
23390 (ds.p=2129184);
23391 ac_req((a1)!=((void*)(NULL)),NULL);
23392 fd.assertion_flag=1;
23393 }
23394 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23395 fd.assertion_flag=0;
23396 (ds.p=2129976);
23397 ac_ens((!(R))||(r129standard_is_equal(&ds,((T129*)ci(129,a1,2129992)),(T0*)C)),"symmetric");
23398 fd.assertion_flag=1;
23399 }
23400 se_dst=caller;/*unlink*/
23401 return R;
23402 }
23403
23404 void r129execute(se_dump_stack*caller,T129* C){
23405 static se_frame_descriptor fd={"execute COMMAND_CANCEL",1,0,"%R129%",1};
23406 se_dump_stack ds;
23407 ds.fd=&fd;
23408 ds.current=((void**)&C);
23409 ds.p=270535690;
23410 ds.caller=caller;
23411 ds.locals=NULL;
23412 se_dst=&ds;/*link*/
23413 (ds.p=270536206);
23414 X30raise_signal(&ds,270536196,(/*RF2*/(C)->_main/*4*/),X30signal_cancel(&ds,270536232,(/*RF2*/(C)->_main/*4*/)));
23415 se_dst=caller;/*unlink*/
23416 }
23417
23418 T0* r129twin(se_dump_stack*caller,T129* C){
23419 T0* R=NULL;
23420 void**locals[1];
23421 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R129%Result%R129%",1};
23422 se_dump_stack ds;
23423 ds.fd=&fd;
23424 ds.current=((void**)&C);
23425 ds.p=2140182;
23426 ds.caller=caller;
23427 ds.locals=locals;
23428 locals[0]=(void**)&R;
23429 se_dst=&ds;/*link*/
23430 R=((void*)new129());
23431 *((T129*)R)=*C;
23432 if(fd.assertion_flag){
23433 fd.assertion_flag=0;
23434 (ds.p=2142256);
23435 ac_ens(r129is_equal(&ds,((T129*)ci(129,R,2142242)),(T0*)C),"equal");
23436 fd.assertion_flag=1;
23437 }
23438 se_dst=caller;/*unlink*/
23439 return R;
23440 }
23441
23442 T6 r96is_equal(se_dump_stack*caller,T96* C,T0* a1){
23443 T6 R=0;
23444 void**locals[2];
23445 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R96%other%R96%Result%E6%",1};
23446 se_dump_stack ds;
23447 ds.fd=&fd;
23448 ds.current=((void**)&C);
23449 ds.p=2120968;
23450 ds.caller=caller;
23451 ds.locals=locals;
23452 locals[0]=(void**)&a1;
23453 locals[1]=(void**)&R;
23454 se_dst=&ds;/*link*/
23455 se_require_uppermost_flag=1;
23456 if(fd.assertion_flag){
23457 fd.assertion_flag=0;
23458 (ds.p=2122048);
23459 ac_req((a1)!=((void*)(NULL)),"other_not_void");
23460 fd.assertion_flag=1;
23461 }
23462 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23463 fd.assertion_flag=0;
23464 (ds.p=2122846);
23465 ac_ens((!(r96standard_is_equal(&ds,C,a1)))||(R),"consistent");
23466 (ds.p=2123064);
23467 ac_ens((!(R))||(r96is_equal(&ds,((T96*)ci(96,a1,2123080)),(T0*)C)),"symmetric");
23468 fd.assertion_flag=1;
23469 }
23470 se_dst=caller;/*unlink*/
23471 return R;
23472 }
23473
23474 void r96make(se_dump_stack*caller,T96* C,T0* a1,T2 a2,T2 a3){
23475 void**locals[3];
23476 static se_frame_descriptor fd={"make SCORE",1,3,"%R96%n%R7%s%E2%t%E2%",1};
23477 se_dump_stack ds;
23478 ds.fd=&fd;
23479 ds.current=((void**)&C);
23480 ds.p=201327626;
23481 ds.caller=caller;
23482 ds.locals=locals;
23483 locals[0]=(void**)&a1;
23484 locals[1]=(void**)&a2;
23485 locals[2]=(void**)&a3;
23486 se_dst=&ds;/*link*/
23487 (ds.p=201328132);
23488 {T7*n=new7();
23489 r7copy(&ds,n,a1);
23490 (/*SFN*/C->_name/*4*/)=((T0*)n);
23491 se_i7(&ds,n);}
23492 (ds.p=201328388);
23493 (/*SFN*/C->_score/*8*/)=a2;
23494 (ds.p=201328644);
23495 (/*SFN*/C->_time/*12*/)=a3;
23496 se_dst=caller;/*unlink*/
23497 }
23498
23499 T6 r96standard_is_equal(se_dump_stack*caller,T96* C,T0* a1){
23500 T6 R=0;
23501 void**locals[2];
23502 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R96%other%R96%Result%E6%",1};
23503 se_dump_stack ds;
23504 ds.fd=&fd;
23505 ds.current=((void**)&C);
23506 ds.p=2128406;
23507 ds.caller=caller;
23508 ds.locals=locals;
23509 locals[0]=(void**)&a1;
23510 locals[1]=(void**)&R;
23511 se_dst=&ds;/*link*/
23512 se_require_uppermost_flag=1;
23513 if(fd.assertion_flag){
23514 fd.assertion_flag=0;
23515 (ds.p=2129184);
23516 ac_req((a1)!=((void*)(NULL)),NULL);
23517 fd.assertion_flag=1;
23518 }
23519 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23520 fd.assertion_flag=0;
23521 (ds.p=2129976);
23522 ac_ens((!(R))||(r96standard_is_equal(&ds,((T96*)ci(96,a1,2129992)),(T0*)C)),"symmetric");
23523 fd.assertion_flag=1;
23524 }
23525 se_dst=caller;/*unlink*/
23526 return R;
23527 }
23528
23529 T0* r96twin(se_dump_stack*caller,T96* C){
23530 T0* R=NULL;
23531 void**locals[1];
23532 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R96%Result%R96%",1};
23533 se_dump_stack ds;
23534 ds.fd=&fd;
23535 ds.current=((void**)&C);
23536 ds.p=2140182;
23537 ds.caller=caller;
23538 ds.locals=locals;
23539 locals[0]=(void**)&R;
23540 se_dst=&ds;/*link*/
23541 R=((void*)new96());
23542 *((T96*)R)=*C;
23543 if(fd.assertion_flag){
23544 fd.assertion_flag=0;
23545 (ds.p=2142256);
23546 ac_ens(r96is_equal(&ds,((T96*)ci(96,R,2142242)),(T0*)C),"equal");
23547 fd.assertion_flag=1;
23548 }
23549 se_dst=caller;/*unlink*/
23550 return R;
23551 }
23552
23553 void r96put_name(se_dump_stack*caller,T96* C,T0* a1){
23554 void**locals[1];
23555 static se_frame_descriptor fd={"put_name SCORE",1,1,"%R96%n%R7%",1};
23556 se_dump_stack ds;
23557 ds.fd=&fd;
23558 ds.current=((void**)&C);
23559 ds.p=201329674;
23560 ds.caller=caller;
23561 ds.locals=locals;
23562 locals[0]=(void**)&a1;
23563 se_dst=&ds;/*link*/
23564 (ds.p=201330180);
23565 {T7*n=new7();
23566 r7copy(&ds,n,a1);
23567 (/*SFN*/C->_name/*4*/)=((T0*)n);
23568 se_i7(&ds,n);}
23569 se_dst=caller;/*unlink*/
23570 }
23571
23572 T6 r127is_equal(se_dump_stack*caller,T127* C,T0* a1){
23573 T6 R=0;
23574 void**locals[2];
23575 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R127%other%R127%Result%E6%",1};
23576 se_dump_stack ds;
23577 ds.fd=&fd;
23578 ds.current=((void**)&C);
23579 ds.p=2120968;
23580 ds.caller=caller;
23581 ds.locals=locals;
23582 locals[0]=(void**)&a1;
23583 locals[1]=(void**)&R;
23584 se_dst=&ds;/*link*/
23585 se_require_uppermost_flag=1;
23586 if(fd.assertion_flag){
23587 fd.assertion_flag=0;
23588 (ds.p=2122048);
23589 ac_req((a1)!=((void*)(NULL)),"other_not_void");
23590 fd.assertion_flag=1;
23591 }
23592 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23593 fd.assertion_flag=0;
23594 (ds.p=2122846);
23595 ac_ens((!(r127standard_is_equal(&ds,C,a1)))||(R),"consistent");
23596 (ds.p=2123064);
23597 ac_ens((!(R))||(r127is_equal(&ds,((T127*)ci(127,a1,2123080)),(T0*)C)),"symmetric");
23598 fd.assertion_flag=1;
23599 }
23600 se_dst=caller;/*unlink*/
23601 return R;
23602 }
23603
23604 void r127make(se_dump_stack*caller,T127* C,T0* a1){
23605 void**locals[1];
23606 static se_frame_descriptor fd={"make COMMAND_CUSTOM_CHANGE",1,1,"%R127%m%R117%",1};
23607 se_dump_stack ds;
23608 ds.fd=&fd;
23609 ds.current=((void**)&C);
23610 ds.p=266340106;
23611 ds.caller=caller;
23612 ds.locals=locals;
23613 locals[0]=(void**)&a1;
23614 se_dst=&ds;/*link*/
23615 (ds.p=266340612);
23616 (/*SFN*/C->_main/*4*/)=a1;
23617 se_dst=caller;/*unlink*/
23618 }
23619
23620 T6 r127standard_is_equal(se_dump_stack*caller,T127* C,T0* a1){
23621 T6 R=0;
23622 void**locals[2];
23623 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R127%other%R127%Result%E6%",1};
23624 se_dump_stack ds;
23625 ds.fd=&fd;
23626 ds.current=((void**)&C);
23627 ds.p=2128406;
23628 ds.caller=caller;
23629 ds.locals=locals;
23630 locals[0]=(void**)&a1;
23631 locals[1]=(void**)&R;
23632 se_dst=&ds;/*link*/
23633 se_require_uppermost_flag=1;
23634 if(fd.assertion_flag){
23635 fd.assertion_flag=0;
23636 (ds.p=2129184);
23637 ac_req((a1)!=((void*)(NULL)),NULL);
23638 fd.assertion_flag=1;
23639 }
23640 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23641 fd.assertion_flag=0;
23642 (ds.p=2129976);
23643 ac_ens((!(R))||(r127standard_is_equal(&ds,((T127*)ci(127,a1,2129992)),(T0*)C)),"symmetric");
23644 fd.assertion_flag=1;
23645 }
23646 se_dst=caller;/*unlink*/
23647 return R;
23648 }
23649
23650 void r127execute(se_dump_stack*caller,T127* C){
23651 static se_frame_descriptor fd={"execute COMMAND_CUSTOM_CHANGE",1,0,"%R127%",1};
23652 se_dump_stack ds;
23653 ds.fd=&fd;
23654 ds.current=((void**)&C);
23655 ds.p=266341386;
23656 ds.caller=caller;
23657 ds.locals=NULL;
23658 se_dst=&ds;/*link*/
23659 (ds.p=266341902);
23660 r117custom_change(&ds,((T117*)ci(117,(/*RF2*/(C)->_main/*4*/),266341892)));
23661 se_dst=caller;/*unlink*/
23662 }
23663
23664 T0* r127twin(se_dump_stack*caller,T127* C){
23665 T0* R=NULL;
23666 void**locals[1];
23667 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R127%Result%R127%",1};
23668 se_dump_stack ds;
23669 ds.fd=&fd;
23670 ds.current=((void**)&C);
23671 ds.p=2140182;
23672 ds.caller=caller;
23673 ds.locals=locals;
23674 locals[0]=(void**)&R;
23675 se_dst=&ds;/*link*/
23676 R=((void*)new127());
23677 *((T127*)R)=*C;
23678 if(fd.assertion_flag){
23679 fd.assertion_flag=0;
23680 (ds.p=2142256);
23681 ac_ens(r127is_equal(&ds,((T127*)ci(127,R,2142242)),(T0*)C),"equal");
23682 fd.assertion_flag=1;
23683 }
23684 se_dst=caller;/*unlink*/
23685 return R;
23686 }
23687
23688 void r98put_command(se_dump_stack*caller,T98* C,T0* a1,T2 a2){
23689 void**locals[2];
23690 static se_frame_descriptor fd={"put_command WIDGET",1,2,"%R98%c%R25%i%E2%",1};
23691 se_dump_stack ds;
23692 ds.fd=&fd;
23693 ds.current=((void**)&C);
23694 ds.p=62923274;
23695 ds.caller=caller;
23696 ds.locals=locals;
23697 locals[0]=(void**)&a1;
23698 locals[1]=(void**)&a2;
23699 se_dst=&ds;/*link*/
23700 (ds.p=62923806);
23701 r45put(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62923780))),a1,a2);
23702 se_dst=caller;/*unlink*/
23703 }
23704
23705 void r98process_key(se_dump_stack*caller,T98* C,T0* a1){
23706 T2 _k=0;
23707 void**locals[2];
23708 static se_frame_descriptor fd={"process_key TEXTBOX",1,2,"%R98%e%R28%k%E2%",1};
23709 se_dump_stack ds;
23710 ds.fd=&fd;
23711 ds.current=((void**)&C);
23712 ds.p=205538826;
23713 ds.caller=caller;
23714 ds.locals=locals;
23715 locals[0]=(void**)&a1;
23716 locals[1]=(void**)&_k;
23717 se_dst=&ds;/*link*/
23718 (ds.p=205539844);
23719 _k=(/*RF2*/(((T28*)ci(28,a1,205539854)))->_i1/*16*/);
23720 /*[IF*/
23721 if(((ds.p=205540122),((_k)<(256))&&(r98is_normal_key(&ds,C,_k)))){
23722 /*[IF*/
23723 if(((ds.p=205540370),r98is_kmod(&ds,(/*RF2*/(((T28*)ci(28,a1,205540386)))->_kmod/*20*/),3))){
23724 (ds.p=205540614);
23725 r98text_insert(&ds,C,r98shifted_key(&ds,C,_k));
23726 }
23727 else{
23728 (ds.p=205541126);
23729 r98text_insert(&ds,C,((T3)(_k)));
23730 }
23731 /*FI]*/
23732 (ds.p=205541644);
23733 (/*SFN*/C->_cursor/*37*/)=((/*RF2*/(C)->_cursor/*37*/))+(1);
23734 }
23735 else if(((ds.p=205541910),(_k)==(275))){
23736 (ds.p=205542156);
23737 (/*SFN*/C->_cursor/*37*/)=((/*RF2*/(C)->_cursor/*37*/))+(1);
23738 /*[IF*/
23739 if(((ds.p=205542432),((/*RF2*/(C)->_cursor/*37*/))>(((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205542436))))->_count/*8*/))+(1)))){
23740 (ds.p=205542662);
23741 (/*SFN*/C->_cursor/*37*/)=((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205542682))))->_count/*8*/))+(1);
23742 }
23743 /*FI]*/
23744 }
23745 else if(((ds.p=205543190),(_k)==(276))){
23746 (ds.p=205543436);
23747 (/*SFN*/C->_cursor/*37*/)=((/*RF2*/(C)->_cursor/*37*/))-(1);
23748 /*[IF*/
23749 if(((ds.p=205543712),((/*RF2*/(C)->_cursor/*37*/))<(1))){
23750 (ds.p=205543942);
23751 (/*SFN*/C->_cursor/*37*/)=1;
23752 }
23753 /*FI]*/
23754 }
23755 else if(((ds.p=205544470),(_k)==(8))){
23756 (ds.p=205544716);
23757 r98text_backspace(&ds,C);
23758 }
23759 else if(((ds.p=205544982),(_k)==(127))){
23760 (ds.p=205545228);
23761 r98text_delete(&ds,C);
23762 }
23763 else if(((ds.p=205545494),(_k)==(13))){
23764 (ds.p=205545740);
23765 r98raise_signal(&ds,C,1);
23766 }
23767 /*FI]*/
23768 se_dst=caller;/*unlink*/
23769 }
23770
23771 T0* r98config(se_dump_stack*caller){
23772 if(fBC17config==0){fBC17config=1;{
23773 void**locals[1];
23774 static se_frame_descriptor fd={"config CONFIG",0,1,"Result%R54%",1};
23775 se_dump_stack ds;
23776 ds.fd=&fd;
23777 ds.current=NULL;
23778 ds.p=35652362;
23779 ds.caller=caller;
23780 ds.locals=locals;
23781 locals[0]=(void**)&oBC17config;
23782 se_dst=&ds;/*link*/
23783 (ds.p=35652868);
23784 {T54*n=new54();
23785 oBC17config=((T0*)n);
23786 r54make(&ds,n);
23787 }
23788 se_dst=caller;/*unlink*/
23789 }}
23790 return oBC17config;
23791 }
23792
23793 T6 r98is_kmod(se_dump_stack*caller,T2 a1,T2 a2){
23794 T6 R=0;
23795 void**locals[3];
23796 static se_frame_descriptor fd={"is_kmod SDL_CONSTANT",0,3,"mod%E2%k%E2%Result%E6%",1};
23797 se_dump_stack ds;
23798 ds.fd=&fd;
23799 ds.current=NULL;
23800 ds.p=39915268;
23801 ds.caller=caller;
23802 ds.locals=locals;
23803 locals[0]=(void**)&a1;
23804 locals[1]=(void**)&a2;
23805 locals[2]=(void**)&R;
23806 se_dst=&ds;/*link*/
23807 /*[ from line 272 of ./sdl_constant.e:*/
23808 (ds.p=39915542);
23809 R=(is_kmod(a1,a2));
23810 /* from line 272 of ./sdl_constant.e]*/
23811 se_dst=caller;/*unlink*/
23812 return R;
23813 }
23814
23815 T6 r98is_equal(se_dump_stack*caller,T98* C,T0* a1){
23816 T6 R=0;
23817 void**locals[2];
23818 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R98%other%R98%Result%E6%",1};
23819 se_dump_stack ds;
23820 ds.fd=&fd;
23821 ds.current=((void**)&C);
23822 ds.p=2120968;
23823 ds.caller=caller;
23824 ds.locals=locals;
23825 locals[0]=(void**)&a1;
23826 locals[1]=(void**)&R;
23827 se_dst=&ds;/*link*/
23828 se_require_uppermost_flag=1;
23829 if(fd.assertion_flag){
23830 fd.assertion_flag=0;
23831 (ds.p=2122048);
23832 ac_req((a1)!=((void*)(NULL)),"other_not_void");
23833 fd.assertion_flag=1;
23834 }
23835 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
23836 fd.assertion_flag=0;
23837 (ds.p=2122846);
23838 ac_ens((!(r98standard_is_equal(&ds,C,a1)))||(R),"consistent");
23839 (ds.p=2123064);
23840 ac_ens((!(R))||(r98is_equal(&ds,((T98*)ci(98,a1,2123080)),(T0*)C)),"symmetric");
23841 fd.assertion_flag=1;
23842 }
23843 se_dst=caller;/*unlink*/
23844 return R;
23845 }
23846
23847 T6 r98is_normal_key(se_dump_stack*caller,T98* C,T2 a1){
23848 T6 R=0;
23849 void**locals[2];
23850 static se_frame_descriptor fd={"is_normal_key TEXTBOX",1,2,"%R98%k%E2%Result%E6%",1};
23851 se_dump_stack ds;
23852 ds.fd=&fd;
23853 ds.current=((void**)&C);
23854 ds.p=205559050;
23855 ds.caller=caller;
23856 ds.locals=locals;
23857 locals[0]=(void**)&a1;
23858 locals[1]=(void**)&R;
23859 se_dst=&ds;/*link*/
23860 /*[IF*/
23861 if(((ds.p=205559614),(r153item(&ds,se_i153(&ds,((T153*)ci(153,r98shifted_key_table(&ds),205559562))),a1))!=(((T3)'\0')))){
23862 (ds.p=205559820);
23863 R=1;
23864 }
23865 /*FI]*/
23866 se_dst=caller;/*unlink*/
23867 return R;
23868 }
23869
23870 void r98text_backspace(se_dump_stack*caller,T98* C){
23871 static se_frame_descriptor fd={"text_backspace TEXTBOX",1,0,"%R98%",1};
23872 se_dump_stack ds;
23873 ds.fd=&fd;
23874 ds.current=((void**)&C);
23875 ds.p=205527050;
23876 ds.caller=caller;
23877 ds.locals=NULL;
23878 se_dst=&ds;/*link*/
23879 /*[IF*/
23880 if(((ds.p=205527596),(((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205527562))))->_count/*8*/))>(0))&&(((/*RF2*/(C)->_cursor/*37*/))>(1)))){
23881 (ds.p=205527820);
23882 (/*SFN*/C->_cursor/*37*/)=((/*RF2*/(C)->_cursor/*37*/))-(1);
23883 (ds.p=205528090);
23884 r7remove(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205528076))),(/*RF2*/(C)->_cursor/*37*/));
23885 (ds.p=205528332);
23886 r98raise_signal(&ds,C,3);
23887 (ds.p=205528588);
23888 r98update_image(&ds,C);
23889 }
23890 /*FI]*/
23891 se_dst=caller;/*unlink*/
23892 }
23893
23894 void r98widget_init(se_dump_stack*caller,T98* C){
23895 static se_frame_descriptor fd={"widget_init WIDGET",1,0,"%R98%",1};
23896 se_dump_stack ds;
23897 ds.fd=&fd;
23898 ds.current=((void**)&C);
23899 ds.p=62919434;
23900 ds.caller=caller;
23901 ds.locals=NULL;
23902 se_dst=&ds;/*link*/
23903 (ds.p=62919940);
23904 {T45*n=new45();
23905 r45make(&ds,n);
23906 (/*SFN*/C->_signal_table/*5*/)=((T0*)n);
23907 se_i45(&ds,n);}
23908 se_dst=caller;/*unlink*/
23909 }
23910
23911 void r98update_image(se_dump_stack*caller,T98* C){
23912 static se_frame_descriptor fd={"update_image TEXTBOX",1,0,"%R98%",1};
23913 se_dump_stack ds;
23914 ds.fd=&fd;
23915 ds.current=((void**)&C);
23916 ds.p=205567498;
23917 ds.caller=caller;
23918 ds.locals=NULL;
23919 se_dst=&ds;/*link*/
23920 /*[IF*/
23921 if(((ds.p=205568026),(/*RF2*/(((T50*)ci(50,(/*RF2*/(C)->_textimg/*41*/),205568010)))->_is_connected/*4*/))){
23922 (ds.p=205568284);
23923 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_textimg/*41*/),205568268)));
23924 }
23925 /*FI]*/
23926 /*[IF*/
23927 if(((ds.p=205568804),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205568778))))->_count/*8*/))>(0))){
23928 (ds.p=205569052);
23929 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_textimg/*41*/),205569036)),(/*RF2*/(C)->_string/*33*/),r98font(&ds,C),r98white(&ds));
23930 }
23931 /*FI]*/
23932 se_dst=caller;/*unlink*/
23933 }
23934
23935 void r98make(se_dump_stack*caller,T98* C){
23936 static se_frame_descriptor fd={"make TEXTBOX",1,0,"%R98%",1};
23937 se_dump_stack ds;
23938 ds.fd=&fd;
23939 ds.current=((void**)&C);
23940 ds.p=205534986;
23941 ds.caller=caller;
23942 ds.locals=NULL;
23943 se_dst=&ds;/*link*/
23944 (ds.p=205535492);
23945 r98widget_init(&ds,C);
23946 (ds.p=205535748);
23947 {T7*n=new7();
23948 r7make(&ds,n,128);
23949 (/*SFN*/C->_string/*33*/)=((T0*)n);
23950 se_i7(&ds,n);}
23951 (ds.p=205536004);
23952 (/*SFN*/C->_cursor/*37*/)=1;
23953 (ds.p=205536260);
23954 {T50*n=new50();
23955 r50make(&ds,n);
23956 (/*SFN*/C->_textimg/*41*/)=((T0*)n);
23957 }
23958 se_dst=caller;/*unlink*/
23959 }
23960
23961 T6 r98contains(se_dump_stack*caller,T98* C,T2 a1,T2 a2){
23962 T6 R=0;
23963 void**locals[3];
23964 static se_frame_descriptor fd={"contains WIDGET",1,3,"%R98%x%E2%y%E2%Result%E6%",1};
23965 se_dump_stack ds;
23966 ds.fd=&fd;
23967 ds.current=((void**)&C);
23968 ds.p=62930698;
23969 ds.caller=caller;
23970 ds.locals=locals;
23971 locals[0]=(void**)&a1;
23972 locals[1]=(void**)&a2;
23973 locals[2]=(void**)&R;
23974 se_dst=&ds;/*link*/
23975 (ds.p=62931204);
23976 R=((((a1)>=((/*RF2*/(C)->_offsetx/*9*/)))&&((a1)<(((/*RF2*/(C)->_offsetx/*9*/))+((/*RF2*/(C)->_width/*17*/)))))&&((a2)>=((/*RF2*/(C)->_offsety/*13*/))))&&((a2)<(((/*RF2*/(C)->_offsety/*13*/))+((/*RF2*/(C)->_height/*21*/))));
23977 se_dst=caller;/*unlink*/
23978 return R;
23979 }
23980
23981 void r98fill_rect(se_dump_stack*caller,T98* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
23982 void**locals[5];
23983 static se_frame_descriptor fd={"fill_rect WIDGET",1,5,"%R98%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
23984 se_dump_stack ds;
23985 ds.fd=&fd;
23986 ds.current=((void**)&C);
23987 ds.p=62937354;
23988 ds.caller=caller;
23989 ds.locals=locals;
23990 locals[0]=(void**)&a1;
23991 locals[1]=(void**)&a2;
23992 locals[2]=(void**)&a3;
23993 locals[3]=(void**)&a4;
23994 locals[4]=(void**)&a5;
23995 se_dst=&ds;/*link*/
23996 (ds.p=62937860);
23997 r98ext_fill_rect(&ds,(a1)+((/*RF2*/(C)->_offsetx/*9*/)),(a2)+((/*RF2*/(C)->_offsety/*13*/)),a3,a4,(/*RF2*/(((T51*)ci(51,a5,62937952)))->_to_integer/*4*/));
23998 se_dst=caller;/*unlink*/
23999 }
24000
24001 void r98put_xy(se_dump_stack*caller,T98* C,T2 a1,T2 a2){
24002 void**locals[2];
24003 static se_frame_descriptor fd={"put_xy WIDGET",1,2,"%R98%x%E2%y%E2%",1};
24004 se_dump_stack ds;
24005 ds.fd=&fd;
24006 ds.current=((void**)&C);
24007 ds.p=62927626;
24008 ds.caller=caller;
24009 ds.locals=locals;
24010 locals[0]=(void**)&a1;
24011 locals[1]=(void**)&a2;
24012 se_dst=&ds;/*link*/
24013 (ds.p=62928132);
24014 (/*SFN*/C->_offsetx/*9*/)=a1;
24015 (ds.p=62928388);
24016 (/*SFN*/C->_offsety/*13*/)=a2;
24017 se_dst=caller;/*unlink*/
24018 }
24019
24020 T2 r98ext_get_tsh(se_dump_stack*caller){
24021 T2 R=0;
24022 void**locals[1];
24023 static se_frame_descriptor fd={"ext_get_tsh WIDGET",0,1,"Result%E2%",1};
24024 se_dump_stack ds;
24025 ds.fd=&fd;
24026 ds.current=NULL;
24027 ds.p=62951946;
24028 ds.caller=caller;
24029 ds.locals=locals;
24030 locals[0]=(void**)&R;
24031 se_dst=&ds;/*link*/
24032 /*[ from line 147 of ./widget.e:*/
24033 (ds.p=62952220);
24034 R=(ext_get_tsh());
24035 /* from line 147 of ./widget.e]*/
24036 se_dst=caller;/*unlink*/
24037 return R;
24038 }
24039
24040 T6 r98standard_is_equal(se_dump_stack*caller,T98* C,T0* a1){
24041 T6 R=0;
24042 void**locals[2];
24043 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R98%other%R98%Result%E6%",1};
24044 se_dump_stack ds;
24045 ds.fd=&fd;
24046 ds.current=((void**)&C);
24047 ds.p=2128406;
24048 ds.caller=caller;
24049 ds.locals=locals;
24050 locals[0]=(void**)&a1;
24051 locals[1]=(void**)&R;
24052 se_dst=&ds;/*link*/
24053 se_require_uppermost_flag=1;
24054 if(fd.assertion_flag){
24055 fd.assertion_flag=0;
24056 (ds.p=2129184);
24057 ac_req((a1)!=((void*)(NULL)),NULL);
24058 fd.assertion_flag=1;
24059 }
24060 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24061 fd.assertion_flag=0;
24062 (ds.p=2129976);
24063 ac_ens((!(R))||(r98standard_is_equal(&ds,((T98*)ci(98,a1,2129992)),(T0*)C)),"symmetric");
24064 fd.assertion_flag=1;
24065 }
24066 se_dst=caller;/*unlink*/
24067 return R;
24068 }
24069
24070 void r98put_size(se_dump_stack*caller,T98* C,T2 a1,T2 a2){
24071 void**locals[2];
24072 static se_frame_descriptor fd={"put_size WIDGET",1,2,"%R98%w%E2%h%E2%",1};
24073 se_dump_stack ds;
24074 ds.fd=&fd;
24075 ds.current=((void**)&C);
24076 ds.p=62929162;
24077 ds.caller=caller;
24078 ds.locals=locals;
24079 locals[0]=(void**)&a1;
24080 locals[1]=(void**)&a2;
24081 se_dst=&ds;/*link*/
24082 (ds.p=62929668);
24083 (/*SFN*/C->_width/*17*/)=a1;
24084 (ds.p=62929924);
24085 (/*SFN*/C->_height/*21*/)=a2;
24086 se_dst=caller;/*unlink*/
24087 }
24088
24089 void r98ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
24090 void**locals[5];
24091 static se_frame_descriptor fd={"ext_fill_rect WIDGET",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
24092 se_dump_stack ds;
24093 ds.fd=&fd;
24094 ds.current=NULL;
24095 ds.p=62938634;
24096 ds.caller=caller;
24097 ds.locals=locals;
24098 locals[0]=(void**)&a1;
24099 locals[1]=(void**)&a2;
24100 locals[2]=(void**)&a3;
24101 locals[3]=(void**)&a4;
24102 locals[4]=(void**)&a5;
24103 se_dst=&ds;/*link*/
24104 /*[ from line 95 of ./widget.e:*/
24105 (ds.p=62938908);
24106 ext_fill_rect(a1,a2,a3,a4,a5);
24107 /* from line 95 of ./widget.e]*/
24108 se_dst=caller;/*unlink*/
24109 }
24110
24111 void r98text_insert(se_dump_stack*caller,T98* C,T3 a1){
24112 void**locals[1];
24113 static se_frame_descriptor fd={"text_insert TEXTBOX",1,1,"%R98%c%E3%",1};
24114 se_dump_stack ds;
24115 ds.fd=&fd;
24116 ds.current=((void**)&C);
24117 ds.p=205525258;
24118 ds.caller=caller;
24119 ds.locals=locals;
24120 locals[0]=(void**)&a1;
24121 se_dst=&ds;/*link*/
24122 (ds.p=205525778);
24123 r7insert_character(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205525764))),a1,(/*RF2*/(C)->_cursor/*37*/));
24124 (ds.p=205526020);
24125 r98raise_signal(&ds,C,3);
24126 (ds.p=205526276);
24127 r98update_image(&ds,C);
24128 se_dst=caller;/*unlink*/
24129 }
24130
24131 T2 r98ext_get_tsw(se_dump_stack*caller){
24132 T2 R=0;
24133 void**locals[1];
24134 static se_frame_descriptor fd={"ext_get_tsw WIDGET",0,1,"Result%E2%",1};
24135 se_dump_stack ds;
24136 ds.fd=&fd;
24137 ds.current=NULL;
24138 ds.p=62950922;
24139 ds.caller=caller;
24140 ds.locals=locals;
24141 locals[0]=(void**)&R;
24142 se_dst=&ds;/*link*/
24143 /*[ from line 143 of ./widget.e:*/
24144 (ds.p=62951196);
24145 R=(ext_get_tsw());
24146 /* from line 143 of ./widget.e]*/
24147 se_dst=caller;/*unlink*/
24148 return R;
24149 }
24150
24151 T0* r98grey(se_dump_stack*caller){
24152 if(fBC18grey==0){fBC18grey=1;{
24153 void**locals[1];
24154 static se_frame_descriptor fd={"grey COLOR_TABLE",0,1,"Result%R51%",1};
24155 se_dump_stack ds;
24156 ds.fd=&fd;
24157 ds.current=NULL;
24158 ds.p=37750794;
24159 ds.caller=caller;
24160 ds.locals=locals;
24161 locals[0]=(void**)&oBC18grey;
24162 se_dst=&ds;/*link*/
24163 (ds.p=37751300);
24164 {T51*n=new51();
24165 oBC18grey=((T0*)n);
24166 r51make(&ds,n,127,127,127);
24167 }
24168 se_dst=caller;/*unlink*/
24169 }}
24170 return oBC18grey;
24171 }
24172
24173 void r98put_focus(se_dump_stack*caller,T98* C,T6 a1){
24174 void**locals[1];
24175 static se_frame_descriptor fd={"put_focus WIDGET",1,1,"%R98%b%E6%",1};
24176 se_dump_stack ds;
24177 ds.fd=&fd;
24178 ds.current=((void**)&C);
24179 ds.p=62916874;
24180 ds.caller=caller;
24181 ds.locals=locals;
24182 locals[0]=(void**)&a1;
24183 se_dst=&ds;/*link*/
24184 (ds.p=62917380);
24185 (/*SFN*/C->_has_focus/*4*/)=a1;
24186 se_dst=caller;/*unlink*/
24187 }
24188
24189 void r98blit(se_dump_stack*caller,T98* C,T0* a1,T2 a2,T2 a3){
24190 void**locals[3];
24191 static se_frame_descriptor fd={"blit WIDGET",1,3,"%R98%img%R50%x%E2%y%E2%",1};
24192 se_dump_stack ds;
24193 ds.fd=&fd;
24194 ds.current=((void**)&C);
24195 ds.p=62939658;
24196 ds.caller=caller;
24197 ds.locals=locals;
24198 locals[0]=(void**)&a1;
24199 locals[1]=(void**)&a2;
24200 locals[2]=(void**)&a3;
24201 se_dst=&ds;/*link*/
24202 (ds.p=62940172);
24203 r50blit(&ds,((T50*)ci(50,a1,62940164)),(a2)+((/*RF2*/(C)->_offsetx/*9*/)),(a3)+((/*RF2*/(C)->_offsety/*13*/)));
24204 se_dst=caller;/*unlink*/
24205 }
24206
24207 void r98process_event(se_dump_stack*caller,T98* C,T0* a1){
24208 void**locals[1];
24209 static se_frame_descriptor fd={"process_event TEXTBOX",1,1,"%R98%e%R28%",1};
24210 se_dump_stack ds;
24211 ds.fd=&fd;
24212 ds.current=((void**)&C);
24213 ds.p=205537034;
24214 ds.caller=caller;
24215 ds.locals=locals;
24216 locals[0]=(void**)&a1;
24217 se_dst=&ds;/*link*/
24218 /*[IF*/
24219 if(((ds.p=205537560),((/*RF2*/(((T28*)ci(28,a1,205537546)))->_type/*12*/))==(2))){
24220 (ds.p=205537804);
24221 r98process_key(&ds,C,a1);
24222 }
24223 /*FI]*/
24224 se_dst=caller;/*unlink*/
24225 }
24226
24227 void r98ext_get_text_size(se_dump_stack*caller,T8 a1,T8 a2){
24228 void**locals[2];
24229 static se_frame_descriptor fd={"ext_get_text_size WIDGET",0,2,"f%E8%s%E8%",1};
24230 se_dump_stack ds;
24231 ds.fd=&fd;
24232 ds.current=NULL;
24233 ds.p=62949898;
24234 ds.caller=caller;
24235 ds.locals=locals;
24236 locals[0]=(void**)&a1;
24237 locals[1]=(void**)&a2;
24238 se_dst=&ds;/*link*/
24239 /*[ from line 139 of ./widget.e:*/
24240 (ds.p=62950172);
24241 ext_get_text_size(a1,a2);
24242 /* from line 139 of ./widget.e]*/
24243 se_dst=caller;/*unlink*/
24244 }
24245
24246 T0* r98twin(se_dump_stack*caller,T98* C){
24247 T0* R=NULL;
24248 void**locals[1];
24249 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R98%Result%R98%",1};
24250 se_dump_stack ds;
24251 ds.fd=&fd;
24252 ds.current=((void**)&C);
24253 ds.p=2140182;
24254 ds.caller=caller;
24255 ds.locals=locals;
24256 locals[0]=(void**)&R;
24257 se_dst=&ds;/*link*/
24258 R=((void*)new98());
24259 *((T98*)R)=*C;
24260 if(fd.assertion_flag){
24261 fd.assertion_flag=0;
24262 (ds.p=2142256);
24263 ac_ens(r98is_equal(&ds,((T98*)ci(98,R,2142242)),(T0*)C),"equal");
24264 fd.assertion_flag=1;
24265 }
24266 se_dst=caller;/*unlink*/
24267 return R;
24268 }
24269
24270 T0* r98white(se_dump_stack*caller){
24271 if(fBC18white==0){fBC18white=1;{
24272 void**locals[1];
24273 static se_frame_descriptor fd={"white COLOR_TABLE",0,1,"Result%R51%",1};
24274 se_dump_stack ds;
24275 ds.fd=&fd;
24276 ds.current=NULL;
24277 ds.p=37752074;
24278 ds.caller=caller;
24279 ds.locals=locals;
24280 locals[0]=(void**)&oBC18white;
24281 se_dst=&ds;/*link*/
24282 (ds.p=37752580);
24283 {T51*n=new51();
24284 oBC18white=((T0*)n);
24285 r51make(&ds,n,255,255,255);
24286 }
24287 se_dst=caller;/*unlink*/
24288 }}
24289 return oBC18white;
24290 }
24291 T0*oBC98shifted_key_table=NULL;
24292 int fBC98shifted_key_table=0;
24293
24294 T0* r98shifted_key_table(se_dump_stack*caller){
24295 if(fBC98shifted_key_table==0){fBC98shifted_key_table=1;{
24296 T2 _i=0;
24297 void**locals[2];
24298 static se_frame_descriptor fd={"shifted_key_table TEXTBOX",0,2,"Result%R153%i%E2%",1};
24299 se_dump_stack ds;
24300 ds.fd=&fd;
24301 ds.current=NULL;
24302 ds.p=205546762;
24303 ds.caller=caller;
24304 ds.locals=locals;
24305 locals[0]=(void**)&oBC98shifted_key_table;
24306 locals[1]=(void**)&_i;
24307 se_dst=&ds;/*link*/
24308 (ds.p=205547780);
24309 {T153*n=new153();
24310 oBC98shifted_key_table=((T0*)n);
24311 r153make(&ds,n,0,127);
24312 se_i153(&ds,n);}
24313 (ds.p=205548046);
24314 _i=97;
24315 while (!(((ds.p=205548308),(_i)>(122))))
24316 {
24317 (ds.p=205548826);
24318 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205548812))),((T3)((_i)-(32))),_i);
24319 (ds.p=205549068);
24320 _i=(_i)+(1);
24321 }
24322 (ds.p=205549586);
24323 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205549572))),((T3)'\176'),96);
24324 (ds.p=205549842);
24325 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205549828))),((T3)'\41'),49);
24326 (ds.p=205550098);
24327 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205550084))),((T3)'\100'),50);
24328 (ds.p=205550354);
24329 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205550340))),((T3)'\43'),51);
24330 (ds.p=205550610);
24331 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205550596))),((T3)'\44'),52);
24332 (ds.p=205550866);
24333 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205550852))),((T3)'\45'),53);
24334 (ds.p=205551122);
24335 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205551108))),((T3)'\136'),54);
24336 (ds.p=205551378);
24337 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205551364))),((T3)'\46'),55);
24338 (ds.p=205551634);
24339 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205551620))),((T3)'\52'),56);
24340 (ds.p=205551890);
24341 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205551876))),((T3)'\50'),57);
24342 (ds.p=205552146);
24343 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205552132))),((T3)'\51'),48);
24344 (ds.p=205552402);
24345 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205552388))),((T3)'\137'),45);
24346 (ds.p=205552658);
24347 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205552644))),((T3)'\53'),61);
24348 (ds.p=205552914);
24349 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205552900))),((T3)'\174'),92);
24350 (ds.p=205553426);
24351 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205553412))),((T3)'\173'),91);
24352 (ds.p=205553682);
24353 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205553668))),((T3)'\175'),93);
24354 (ds.p=205554194);
24355 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205554180))),((T3)'\72'),59);
24356 (ds.p=205554450);
24357 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205554436))),((T3)'\42'),39);
24358 (ds.p=205554962);
24359 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205554948))),((T3)'\74'),44);
24360 (ds.p=205555218);
24361 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205555204))),((T3)'\76'),46);
24362 (ds.p=205555474);
24363 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205555460))),((T3)'\77'),47);
24364 (ds.p=205555986);
24365 r153put(&ds,se_i153(&ds,((T153*)ci(153,oBC98shifted_key_table,205555972))),((T3)'\40'),32);
24366 se_dst=caller;/*unlink*/
24367 }}
24368 return oBC98shifted_key_table;
24369 }
24370
24371 void r98raise_signal(se_dump_stack*caller,T98* C,T2 a1){
24372 void**locals[1];
24373 static se_frame_descriptor fd={"raise_signal WIDGET",1,1,"%R98%i%E2%",1};
24374 se_dump_stack ds;
24375 ds.fd=&fd;
24376 ds.current=((void**)&C);
24377 ds.p=62924554;
24378 ds.caller=caller;
24379 ds.locals=locals;
24380 locals[0]=(void**)&a1;
24381 se_dst=&ds;/*link*/
24382 /*[IF*/
24383 if(((ds.p=62925092),r45has(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925066))),a1))){
24384 (ds.p=62925362);
24385 X25execute(&ds,62925350,r45at(&ds,se_i45(&ds,((T45*)ci(45,(/*RF2*/(C)->_signal_table/*5*/),62925324))),a1));
24386 }
24387 /*FI]*/
24388 se_dst=caller;/*unlink*/
24389 }
24390
24391 T0* r98font(se_dump_stack*caller,T98* C){
24392 T0* R=NULL;
24393 void**locals[1];
24394 static se_frame_descriptor fd={"font WIDGET",1,1,"%R98%Result%R53%",1};
24395 se_dump_stack ds;
24396 ds.fd=&fd;
24397 ds.current=((void**)&C);
24398 ds.p=62918154;
24399 ds.caller=caller;
24400 ds.locals=locals;
24401 locals[0]=(void**)&R;
24402 se_dst=&ds;/*link*/
24403 (ds.p=62918660);
24404 R=(/*RF2*/(((T54*)ci(54,r98config(&ds),62918680)))->_mainfont/*20*/);
24405 se_dst=caller;/*unlink*/
24406 return R;
24407 }
24408
24409 T3 r98shifted_key(se_dump_stack*caller,T98* C,T2 a1){
24410 T3 R=0;
24411 void**locals[2];
24412 static se_frame_descriptor fd={"shifted_key TEXTBOX",1,2,"%R98%k%E2%Result%E3%",1};
24413 se_dump_stack ds;
24414 ds.fd=&fd;
24415 ds.current=((void**)&C);
24416 ds.p=205556746;
24417 ds.caller=caller;
24418 ds.locals=locals;
24419 locals[0]=(void**)&a1;
24420 locals[1]=(void**)&R;
24421 se_dst=&ds;/*link*/
24422 /*[IF*/
24423 if(((ds.p=205557310),(r153item(&ds,se_i153(&ds,((T153*)ci(153,r98shifted_key_table(&ds),205557258))),a1))!=(((T3)'\0')))){
24424 (ds.p=205557516);
24425 R=r153item(&ds,se_i153(&ds,((T153*)ci(153,r98shifted_key_table(&ds),205557536))),a1);
24426 }
24427 else{
24428 (ds.p=205558028);
24429 R=((T3)(a1));
24430 }
24431 /*FI]*/
24432 se_dst=caller;/*unlink*/
24433 return R;
24434 }
24435
24436 void r98measure_text_size(se_dump_stack*caller,T98* C,T0* a1){
24437 void**locals[1];
24438 static se_frame_descriptor fd={"measure_text_size WIDGET",1,1,"%R98%s%R7%",1};
24439 se_dump_stack ds;
24440 ds.fd=&fd;
24441 ds.current=((void**)&C);
24442 ds.p=62948106;
24443 ds.caller=caller;
24444 ds.locals=locals;
24445 locals[0]=(void**)&a1;
24446 se_dst=&ds;/*link*/
24447 (ds.p=62948612);
24448 r98ext_get_text_size(&ds,r53to_external(&ds,((T53*)ci(53,r98font(&ds,C),62948648))),r7to_external(&ds,se_i7(&ds,((T7*)ci(7,a1,62948684)))));
24449 (ds.p=62948868);
24450 (/*SFN*/C->_text_width/*25*/)=r98ext_get_tsw(&ds);
24451 (ds.p=62949124);
24452 (/*SFN*/C->_text_height/*29*/)=r98ext_get_tsh(&ds);
24453 se_dst=caller;/*unlink*/
24454 }
24455
24456 void r98text_delete(se_dump_stack*caller,T98* C){
24457 static se_frame_descriptor fd={"text_delete TEXTBOX",1,0,"%R98%",1};
24458 se_dump_stack ds;
24459 ds.fd=&fd;
24460 ds.current=((void**)&C);
24461 ds.p=205529610;
24462 ds.caller=caller;
24463 ds.locals=NULL;
24464 se_dst=&ds;/*link*/
24465 /*[IF*/
24466 if(((ds.p=205530156),(((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205530122))))->_count/*8*/))>(0))&&(((/*RF2*/(C)->_cursor/*37*/))<=(r7upper(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205530194)))))))){
24467 (ds.p=205530394);
24468 r7remove(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205530380))),(/*RF2*/(C)->_cursor/*37*/));
24469 (ds.p=205530636);
24470 r98raise_signal(&ds,C,3);
24471 (ds.p=205530892);
24472 r98update_image(&ds,C);
24473 }
24474 /*FI]*/
24475 se_dst=caller;/*unlink*/
24476 }
24477
24478 void r98put_string(se_dump_stack*caller,T98* C,T0* a1){
24479 void**locals[1];
24480 static se_frame_descriptor fd={"put_string TEXTBOX",1,1,"%R98%s%R7%",1};
24481 se_dump_stack ds;
24482 ds.fd=&fd;
24483 ds.current=((void**)&C);
24484 ds.p=205522954;
24485 ds.caller=caller;
24486 ds.locals=locals;
24487 locals[0]=(void**)&a1;
24488 se_dst=&ds;/*link*/
24489 (ds.p=205523460);
24490 {T7*n=new7();
24491 r7copy(&ds,n,a1);
24492 (/*SFN*/C->_string/*33*/)=((T0*)n);
24493 se_i7(&ds,n);}
24494 (ds.p=205523716);
24495 (/*SFN*/C->_cursor/*37*/)=((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205523736))))->_count/*8*/))+(1);
24496 (ds.p=205523972);
24497 r98update_image(&ds,C);
24498 se_dst=caller;/*unlink*/
24499 }
24500
24501 void r98update(se_dump_stack*caller,T98* C){
24502 T2 _x=0;
24503 void**locals[1];
24504 static se_frame_descriptor fd={"update TEXTBOX",1,1,"%R98%x%E2%",1};
24505 se_dump_stack ds;
24506 ds.fd=&fd;
24507 ds.current=((void**)&C);
24508 ds.p=205560842;
24509 ds.caller=caller;
24510 ds.locals=locals;
24511 locals[0]=(void**)&_x;
24512 se_dst=&ds;/*link*/
24513 /*[IF*/
24514 if(((ds.p=205561866),(/*RF2*/(C)->_has_focus/*4*/))){
24515 (ds.p=205562124);
24516 r98fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r98white(&ds));
24517 }
24518 else{
24519 (ds.p=205562636);
24520 r98fill_rect(&ds,C,0,0,(/*RF2*/(C)->_width/*17*/),(/*RF2*/(C)->_height/*21*/),r98grey(&ds));
24521 }
24522 /*FI]*/
24523 (ds.p=205563140);
24524 r98fill_rect(&ds,C,1,1,((/*RF2*/(C)->_width/*17*/))-(2),((/*RF2*/(C)->_height/*21*/))-(2),r98black(&ds));
24525 /*[IF*/
24526 if(((ds.p=205563428),((/*RF2*/(se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205563402))))->_count/*8*/))>(0))){
24527 (ds.p=205563660);
24528 r98blit(&ds,C,(/*RF2*/(C)->_textimg/*41*/),2,2);
24529 }
24530 /*FI]*/
24531 /*[IF*/
24532 if(((ds.p=205564184),((/*RF2*/(C)->_cursor/*37*/))==(1))){
24533 (ds.p=205564428);
24534 _x=2;
24535 }
24536 else{
24537 (ds.p=205564940);
24538 r98measure_text_size(&ds,C,r7substring(&ds,se_i7(&ds,((T7*)ci(7,(/*RF2*/(C)->_string/*33*/),205564976))),1,((/*RF2*/(C)->_cursor/*37*/))-(1)));
24539 (ds.p=205565196);
24540 _x=(2)+((/*RF2*/(C)->_text_width/*25*/));
24541 }
24542 /*FI]*/
24543 /*[IF*/
24544 if(((ds.p=205565706),(/*RF2*/(C)->_has_focus/*4*/))){
24545 (ds.p=205565964);
24546 r98fill_rect(&ds,C,_x,2,1,((/*RF2*/(C)->_height/*21*/))-(4),r98white(&ds));
24547 }
24548 /*FI]*/
24549 se_dst=caller;/*unlink*/
24550 }
24551
24552 T0* r98black(se_dump_stack*caller){
24553 if(fBC18black==0){fBC18black=1;{
24554 void**locals[1];
24555 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
24556 se_dump_stack ds;
24557 ds.fd=&fd;
24558 ds.current=NULL;
24559 ds.p=37749514;
24560 ds.caller=caller;
24561 ds.locals=locals;
24562 locals[0]=(void**)&oBC18black;
24563 se_dst=&ds;/*link*/
24564 (ds.p=37750020);
24565 {T51*n=new51();
24566 oBC18black=((T0*)n);
24567 r51make(&ds,n,0,0,0);
24568 }
24569 se_dst=caller;/*unlink*/
24570 }}
24571 return oBC18black;
24572 }
24573
24574 T6 r104is_equal(se_dump_stack*caller,T104* C,T0* a1){
24575 T6 R=0;
24576 void**locals[2];
24577 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R104%other%R104%Result%E6%",1};
24578 se_dump_stack ds;
24579 ds.fd=&fd;
24580 ds.current=((void**)&C);
24581 ds.p=2120968;
24582 ds.caller=caller;
24583 ds.locals=locals;
24584 locals[0]=(void**)&a1;
24585 locals[1]=(void**)&R;
24586 se_dst=&ds;/*link*/
24587 se_require_uppermost_flag=1;
24588 if(fd.assertion_flag){
24589 fd.assertion_flag=0;
24590 (ds.p=2122048);
24591 ac_req((a1)!=((void*)(NULL)),"other_not_void");
24592 fd.assertion_flag=1;
24593 }
24594 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24595 fd.assertion_flag=0;
24596 (ds.p=2122846);
24597 ac_ens((!(r104standard_is_equal(&ds,C,a1)))||(R),"consistent");
24598 (ds.p=2123064);
24599 ac_ens((!(R))||(r104is_equal(&ds,((T104*)ci(104,a1,2123080)),(T0*)C)),"symmetric");
24600 fd.assertion_flag=1;
24601 }
24602 se_dst=caller;/*unlink*/
24603 return R;
24604 }
24605
24606 void r104make(se_dump_stack*caller,T104* C,T0* a1,T0* a2){
24607 void**locals[2];
24608 static se_frame_descriptor fd={"make SCORE_DISPLAY",1,2,"%R104%n%R7%s%R96%",1};
24609 se_dump_stack ds;
24610 ds.fd=&fd;
24611 ds.current=((void**)&C);
24612 ds.p=218106378;
24613 ds.caller=caller;
24614 ds.locals=locals;
24615 locals[0]=(void**)&a1;
24616 locals[1]=(void**)&a2;
24617 se_dst=&ds;/*link*/
24618 (ds.p=218106884);
24619 {T7*n=new7();
24620 r7copy(&ds,n,a1);
24621 (/*SFN*/C->_name/*4*/)=((T0*)n);
24622 se_i7(&ds,n);}
24623 (ds.p=218107140);
24624 {T107*n=new107();
24625 r107make(&ds,n,a1);
24626 (/*SFN*/C->_level_l/*8*/)=((T0*)n);
24627 }
24628 (ds.p=218107412);
24629 r107put_size(&ds,((T107*)ci(107,(/*RF2*/(C)->_level_l/*8*/),218107396)),70,20);
24630 /*[IF*/
24631 if(((ds.p=218107918),(a2)!=((void*)(NULL)))){
24632 (ds.p=218108172);
24633 {T107*n=new107();
24634 r107make(&ds,n,(/*RF2*/(((T96*)ci(96,a2,218108200)))->_name/*4*/));
24635 (/*SFN*/C->_name_l/*12*/)=((T0*)n);
24636 }
24637 (ds.p=218108428);
24638 {T107*n=new107();
24639 r107make(&ds,n,r2to_string(&ds,(/*RF2*/(((T96*)ci(96,a2,218108456)))->_time/*12*/)));
24640 (/*SFN*/C->_time_l/*16*/)=((T0*)n);
24641 }
24642 (ds.p=218108684);
24643 {T107*n=new107();
24644 r107make(&ds,n,r2to_string(&ds,(/*RF2*/(((T96*)ci(96,a2,218108714)))->_score/*8*/)));
24645 (/*SFN*/C->_score_l/*20*/)=((T0*)n);
24646 }
24647 }
24648 else{
24649 (ds.p=218109196);
24650 {T107*n=new107();
24651 r107make(&ds,n,((T0*)se_ms(4,"none")));
24652 (/*SFN*/C->_name_l/*12*/)=((T0*)n);
24653 }
24654 (ds.p=218109452);
24655 {T107*n=new107();
24656 r107make(&ds,n,((T0*)se_ms(4,"none")));
24657 (/*SFN*/C->_time_l/*16*/)=((T0*)n);
24658 }
24659 (ds.p=218109708);
24660 {T107*n=new107();
24661 r107make(&ds,n,((T0*)se_ms(4,"none")));
24662 (/*SFN*/C->_score_l/*20*/)=((T0*)n);
24663 }
24664 }
24665 /*FI]*/
24666 (ds.p=218110226);
24667 r107put_size(&ds,((T107*)ci(107,(/*RF2*/(C)->_name_l/*12*/),218110212)),50,20);
24668 (ds.p=218110482);
24669 r107put_size(&ds,((T107*)ci(107,(/*RF2*/(C)->_time_l/*16*/),218110468)),50,20);
24670 (ds.p=218110740);
24671 r107put_size(&ds,((T107*)ci(107,(/*RF2*/(C)->_score_l/*20*/),218110724)),50,20);
24672 se_dst=caller;/*unlink*/
24673 }
24674
24675 T6 r104standard_is_equal(se_dump_stack*caller,T104* C,T0* a1){
24676 T6 R=0;
24677 void**locals[2];
24678 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R104%other%R104%Result%E6%",1};
24679 se_dump_stack ds;
24680 ds.fd=&fd;
24681 ds.current=((void**)&C);
24682 ds.p=2128406;
24683 ds.caller=caller;
24684 ds.locals=locals;
24685 locals[0]=(void**)&a1;
24686 locals[1]=(void**)&R;
24687 se_dst=&ds;/*link*/
24688 se_require_uppermost_flag=1;
24689 if(fd.assertion_flag){
24690 fd.assertion_flag=0;
24691 (ds.p=2129184);
24692 ac_req((a1)!=((void*)(NULL)),NULL);
24693 fd.assertion_flag=1;
24694 }
24695 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24696 fd.assertion_flag=0;
24697 (ds.p=2129976);
24698 ac_ens((!(R))||(r104standard_is_equal(&ds,((T104*)ci(104,a1,2129992)),(T0*)C)),"symmetric");
24699 fd.assertion_flag=1;
24700 }
24701 se_dst=caller;/*unlink*/
24702 return R;
24703 }
24704
24705 T0* r104twin(se_dump_stack*caller,T104* C){
24706 T0* R=NULL;
24707 void**locals[1];
24708 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R104%Result%R104%",1};
24709 se_dump_stack ds;
24710 ds.fd=&fd;
24711 ds.current=((void**)&C);
24712 ds.p=2140182;
24713 ds.caller=caller;
24714 ds.locals=locals;
24715 locals[0]=(void**)&R;
24716 se_dst=&ds;/*link*/
24717 R=((void*)new104());
24718 *((T104*)R)=*C;
24719 if(fd.assertion_flag){
24720 fd.assertion_flag=0;
24721 (ds.p=2142256);
24722 ac_ens(r104is_equal(&ds,((T104*)ci(104,R,2142242)),(T0*)C),"equal");
24723 fd.assertion_flag=1;
24724 }
24725 se_dst=caller;/*unlink*/
24726 return R;
24727 }
24728
24729 void r28put_type(se_dump_stack*caller,T28* C,T2 a1){
24730 void**locals[1];
24731 static se_frame_descriptor fd={"put_type EVENT",1,1,"%R28%i%E2%",1};
24732 se_dump_stack ds;
24733 ds.fd=&fd;
24734 ds.current=((void**)&C);
24735 ds.p=58725124;
24736 ds.caller=caller;
24737 ds.locals=locals;
24738 locals[0]=(void**)&a1;
24739 se_dst=&ds;/*link*/
24740 (ds.p=58725638);
24741 (/*SFN*/C->_type/*12*/)=a1;
24742 se_dst=caller;/*unlink*/
24743 }
24744
24745 T6 r28is_equal(se_dump_stack*caller,T28* C,T0* a1){
24746 T6 R=0;
24747 void**locals[2];
24748 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R28%other%R28%Result%E6%",1};
24749 se_dump_stack ds;
24750 ds.fd=&fd;
24751 ds.current=((void**)&C);
24752 ds.p=2120968;
24753 ds.caller=caller;
24754 ds.locals=locals;
24755 locals[0]=(void**)&a1;
24756 locals[1]=(void**)&R;
24757 se_dst=&ds;/*link*/
24758 se_require_uppermost_flag=1;
24759 if(fd.assertion_flag){
24760 fd.assertion_flag=0;
24761 (ds.p=2122048);
24762 ac_req((a1)!=((void*)(NULL)),"other_not_void");
24763 fd.assertion_flag=1;
24764 }
24765 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24766 fd.assertion_flag=0;
24767 (ds.p=2122846);
24768 ac_ens((!(r28standard_is_equal(&ds,C,a1)))||(R),"consistent");
24769 (ds.p=2123064);
24770 ac_ens((!(R))||(r28is_equal(&ds,((T28*)ci(28,a1,2123080)),(T0*)C)),"symmetric");
24771 fd.assertion_flag=1;
24772 }
24773 se_dst=caller;/*unlink*/
24774 return R;
24775 }
24776
24777 void r28make(se_dump_stack*caller,T28* C){
24778 static se_frame_descriptor fd={"make EVENT",1,0,"%R28%",1};
24779 se_dump_stack ds;
24780 ds.fd=&fd;
24781 ds.current=((void**)&C);
24782 ds.p=58722564;
24783 ds.caller=caller;
24784 ds.locals=NULL;
24785 se_dst=&ds;/*link*/
24786 se_dst=caller;/*unlink*/
24787 }
24788
24789 void r28put_xy(se_dump_stack*caller,T28* C,T2 a1,T2 a2){
24790 void**locals[2];
24791 static se_frame_descriptor fd={"put_xy EVENT",1,2,"%R28%x0%E2%y0%E2%",1};
24792 se_dump_stack ds;
24793 ds.fd=&fd;
24794 ds.current=((void**)&C);
24795 ds.p=58723588;
24796 ds.caller=caller;
24797 ds.locals=locals;
24798 locals[0]=(void**)&a1;
24799 locals[1]=(void**)&a2;
24800 se_dst=&ds;/*link*/
24801 (ds.p=58724102);
24802 (/*SFN*/C->_x/*8*/)=a1;
24803 (ds.p=58724358);
24804 (/*SFN*/C->_y/*4*/)=a2;
24805 se_dst=caller;/*unlink*/
24806 }
24807
24808 T6 r28standard_is_equal(se_dump_stack*caller,T28* C,T0* a1){
24809 T6 R=0;
24810 void**locals[2];
24811 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R28%other%R28%Result%E6%",1};
24812 se_dump_stack ds;
24813 ds.fd=&fd;
24814 ds.current=((void**)&C);
24815 ds.p=2128406;
24816 ds.caller=caller;
24817 ds.locals=locals;
24818 locals[0]=(void**)&a1;
24819 locals[1]=(void**)&R;
24820 se_dst=&ds;/*link*/
24821 se_require_uppermost_flag=1;
24822 if(fd.assertion_flag){
24823 fd.assertion_flag=0;
24824 (ds.p=2129184);
24825 ac_req((a1)!=((void*)(NULL)),NULL);
24826 fd.assertion_flag=1;
24827 }
24828 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24829 fd.assertion_flag=0;
24830 (ds.p=2129976);
24831 ac_ens((!(R))||(r28standard_is_equal(&ds,((T28*)ci(28,a1,2129992)),(T0*)C)),"symmetric");
24832 fd.assertion_flag=1;
24833 }
24834 se_dst=caller;/*unlink*/
24835 return R;
24836 }
24837
24838 void r28put_kmod(se_dump_stack*caller,T28* C,T2 a1){
24839 void**locals[1];
24840 static se_frame_descriptor fd={"put_kmod EVENT",1,1,"%R28%i%E2%",1};
24841 se_dump_stack ds;
24842 ds.fd=&fd;
24843 ds.current=((void**)&C);
24844 ds.p=58728964;
24845 ds.caller=caller;
24846 ds.locals=locals;
24847 locals[0]=(void**)&a1;
24848 se_dst=&ds;/*link*/
24849 (ds.p=58729478);
24850 (/*SFN*/C->_kmod/*20*/)=a1;
24851 se_dst=caller;/*unlink*/
24852 }
24853
24854 void r28put_i1(se_dump_stack*caller,T28* C,T2 a1){
24855 void**locals[1];
24856 static se_frame_descriptor fd={"put_i1 EVENT",1,1,"%R28%i%E2%",1};
24857 se_dump_stack ds;
24858 ds.fd=&fd;
24859 ds.current=((void**)&C);
24860 ds.p=58726404;
24861 ds.caller=caller;
24862 ds.locals=locals;
24863 locals[0]=(void**)&a1;
24864 se_dst=&ds;/*link*/
24865 (ds.p=58726918);
24866 (/*SFN*/C->_i1/*16*/)=a1;
24867 se_dst=caller;/*unlink*/
24868 }
24869
24870 T0* r28twin(se_dump_stack*caller,T28* C){
24871 T0* R=NULL;
24872 void**locals[1];
24873 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R28%Result%R28%",1};
24874 se_dump_stack ds;
24875 ds.fd=&fd;
24876 ds.current=((void**)&C);
24877 ds.p=2140182;
24878 ds.caller=caller;
24879 ds.locals=locals;
24880 locals[0]=(void**)&R;
24881 se_dst=&ds;/*link*/
24882 R=((void*)new28());
24883 *((T28*)R)=*C;
24884 if(fd.assertion_flag){
24885 fd.assertion_flag=0;
24886 (ds.p=2142256);
24887 ac_ens(r28is_equal(&ds,((T28*)ci(28,R,2142242)),(T0*)C),"equal");
24888 fd.assertion_flag=1;
24889 }
24890 se_dst=caller;/*unlink*/
24891 return R;
24892 }
24893
24894 T6 r112is_equal(se_dump_stack*caller,T112* C,T0* a1){
24895 T6 R=0;
24896 void**locals[2];
24897 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R112%other%R112%Result%E6%",1};
24898 se_dump_stack ds;
24899 ds.fd=&fd;
24900 ds.current=((void**)&C);
24901 ds.p=2120968;
24902 ds.caller=caller;
24903 ds.locals=locals;
24904 locals[0]=(void**)&a1;
24905 locals[1]=(void**)&R;
24906 se_dst=&ds;/*link*/
24907 se_require_uppermost_flag=1;
24908 if(fd.assertion_flag){
24909 fd.assertion_flag=0;
24910 (ds.p=2122048);
24911 ac_req((a1)!=((void*)(NULL)),"other_not_void");
24912 fd.assertion_flag=1;
24913 }
24914 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24915 fd.assertion_flag=0;
24916 (ds.p=2122846);
24917 ac_ens((!(r112standard_is_equal(&ds,C,a1)))||(R),"consistent");
24918 (ds.p=2123064);
24919 ac_ens((!(R))||(r112is_equal(&ds,((T112*)ci(112,a1,2123080)),(T0*)C)),"symmetric");
24920 fd.assertion_flag=1;
24921 }
24922 se_dst=caller;/*unlink*/
24923 return R;
24924 }
24925
24926 void r112make(se_dump_stack*caller,T112* C,T0* a1){
24927 void**locals[1];
24928 static se_frame_descriptor fd={"make COMMAND_CLOSE_CURRENT",1,1,"%R112%m%R16%",1};
24929 se_dump_stack ds;
24930 ds.fd=&fd;
24931 ds.current=((void**)&C);
24932 ds.p=234882826;
24933 ds.caller=caller;
24934 ds.locals=locals;
24935 locals[0]=(void**)&a1;
24936 se_dst=&ds;/*link*/
24937 (ds.p=234883332);
24938 (/*SFN*/C->_main/*4*/)=a1;
24939 se_dst=caller;/*unlink*/
24940 }
24941
24942 T6 r112standard_is_equal(se_dump_stack*caller,T112* C,T0* a1){
24943 T6 R=0;
24944 void**locals[2];
24945 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R112%other%R112%Result%E6%",1};
24946 se_dump_stack ds;
24947 ds.fd=&fd;
24948 ds.current=((void**)&C);
24949 ds.p=2128406;
24950 ds.caller=caller;
24951 ds.locals=locals;
24952 locals[0]=(void**)&a1;
24953 locals[1]=(void**)&R;
24954 se_dst=&ds;/*link*/
24955 se_require_uppermost_flag=1;
24956 if(fd.assertion_flag){
24957 fd.assertion_flag=0;
24958 (ds.p=2129184);
24959 ac_req((a1)!=((void*)(NULL)),NULL);
24960 fd.assertion_flag=1;
24961 }
24962 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
24963 fd.assertion_flag=0;
24964 (ds.p=2129976);
24965 ac_ens((!(R))||(r112standard_is_equal(&ds,((T112*)ci(112,a1,2129992)),(T0*)C)),"symmetric");
24966 fd.assertion_flag=1;
24967 }
24968 se_dst=caller;/*unlink*/
24969 return R;
24970 }
24971
24972 void r112execute(se_dump_stack*caller,T112* C){
24973 static se_frame_descriptor fd={"execute COMMAND_CLOSE_CURRENT",1,0,"%R112%",1};
24974 se_dump_stack ds;
24975 ds.fd=&fd;
24976 ds.current=((void**)&C);
24977 ds.p=234884106;
24978 ds.caller=caller;
24979 ds.locals=NULL;
24980 se_dst=&ds;/*link*/
24981 (ds.p=234884622);
24982 r16close_current_window(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),234884612)));
24983 se_dst=caller;/*unlink*/
24984 }
24985
24986 T0* r112twin(se_dump_stack*caller,T112* C){
24987 T0* R=NULL;
24988 void**locals[1];
24989 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R112%Result%R112%",1};
24990 se_dump_stack ds;
24991 ds.fd=&fd;
24992 ds.current=((void**)&C);
24993 ds.p=2140182;
24994 ds.caller=caller;
24995 ds.locals=locals;
24996 locals[0]=(void**)&R;
24997 se_dst=&ds;/*link*/
24998 R=((void*)new112());
24999 *((T112*)R)=*C;
25000 if(fd.assertion_flag){
25001 fd.assertion_flag=0;
25002 (ds.p=2142256);
25003 ac_ens(r112is_equal(&ds,((T112*)ci(112,R,2142242)),(T0*)C),"equal");
25004 fd.assertion_flag=1;
25005 }
25006 se_dst=caller;/*unlink*/
25007 return R;
25008 }
25009
25010 T6 r137is_equal(se_dump_stack*caller,T137* C,T0* a1){
25011 T6 R=0;
25012 void**locals[2];
25013 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R137%other%R137%Result%E6%",1};
25014 se_dump_stack ds;
25015 ds.fd=&fd;
25016 ds.current=((void**)&C);
25017 ds.p=2120968;
25018 ds.caller=caller;
25019 ds.locals=locals;
25020 locals[0]=(void**)&a1;
25021 locals[1]=(void**)&R;
25022 se_dst=&ds;/*link*/
25023 se_require_uppermost_flag=1;
25024 if(fd.assertion_flag){
25025 fd.assertion_flag=0;
25026 (ds.p=2122048);
25027 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25028 fd.assertion_flag=1;
25029 }
25030 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25031 fd.assertion_flag=0;
25032 (ds.p=2122846);
25033 ac_ens((!(r137standard_is_equal(&ds,C,a1)))||(R),"consistent");
25034 (ds.p=2123064);
25035 ac_ens((!(R))||(r137is_equal(&ds,((T137*)ci(137,a1,2123080)),(T0*)C)),"symmetric");
25036 fd.assertion_flag=1;
25037 }
25038 se_dst=caller;/*unlink*/
25039 return R;
25040 }
25041
25042 void r137make(se_dump_stack*caller,T137* C,T0* a1){
25043 void**locals[1];
25044 static se_frame_descriptor fd={"make COMMAND_OPTIONS",1,1,"%R137%m%R16%",1};
25045 se_dump_stack ds;
25046 ds.fd=&fd;
25047 ds.current=((void**)&C);
25048 ds.p=287311626;
25049 ds.caller=caller;
25050 ds.locals=locals;
25051 locals[0]=(void**)&a1;
25052 se_dst=&ds;/*link*/
25053 (ds.p=287312132);
25054 (/*SFN*/C->_main/*4*/)=a1;
25055 se_dst=caller;/*unlink*/
25056 }
25057
25058 T6 r137standard_is_equal(se_dump_stack*caller,T137* C,T0* a1){
25059 T6 R=0;
25060 void**locals[2];
25061 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R137%other%R137%Result%E6%",1};
25062 se_dump_stack ds;
25063 ds.fd=&fd;
25064 ds.current=((void**)&C);
25065 ds.p=2128406;
25066 ds.caller=caller;
25067 ds.locals=locals;
25068 locals[0]=(void**)&a1;
25069 locals[1]=(void**)&R;
25070 se_dst=&ds;/*link*/
25071 se_require_uppermost_flag=1;
25072 if(fd.assertion_flag){
25073 fd.assertion_flag=0;
25074 (ds.p=2129184);
25075 ac_req((a1)!=((void*)(NULL)),NULL);
25076 fd.assertion_flag=1;
25077 }
25078 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25079 fd.assertion_flag=0;
25080 (ds.p=2129976);
25081 ac_ens((!(R))||(r137standard_is_equal(&ds,((T137*)ci(137,a1,2129992)),(T0*)C)),"symmetric");
25082 fd.assertion_flag=1;
25083 }
25084 se_dst=caller;/*unlink*/
25085 return R;
25086 }
25087
25088 void r137execute(se_dump_stack*caller,T137* C){
25089 static se_frame_descriptor fd={"execute COMMAND_OPTIONS",1,0,"%R137%",1};
25090 se_dump_stack ds;
25091 ds.fd=&fd;
25092 ds.current=((void**)&C);
25093 ds.p=287312906;
25094 ds.caller=caller;
25095 ds.locals=NULL;
25096 se_dst=&ds;/*link*/
25097 (ds.p=287313422);
25098 r16options(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),287313412)));
25099 se_dst=caller;/*unlink*/
25100 }
25101
25102 T0* r137twin(se_dump_stack*caller,T137* C){
25103 T0* R=NULL;
25104 void**locals[1];
25105 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R137%Result%R137%",1};
25106 se_dump_stack ds;
25107 ds.fd=&fd;
25108 ds.current=((void**)&C);
25109 ds.p=2140182;
25110 ds.caller=caller;
25111 ds.locals=locals;
25112 locals[0]=(void**)&R;
25113 se_dst=&ds;/*link*/
25114 R=((void*)new137());
25115 *((T137*)R)=*C;
25116 if(fd.assertion_flag){
25117 fd.assertion_flag=0;
25118 (ds.p=2142256);
25119 ac_ens(r137is_equal(&ds,((T137*)ci(137,R,2142242)),(T0*)C),"equal");
25120 fd.assertion_flag=1;
25121 }
25122 se_dst=caller;/*unlink*/
25123 return R;
25124 }
25125
25126 void r74disconnect(se_dump_stack*caller,T74* C){
25127 static se_frame_descriptor fd={"disconnect TILE",1,0,"%R74%",1};
25128 se_dump_stack ds;
25129 ds.fd=&fd;
25130 ds.current=((void**)&C);
25131 ds.p=155196682;
25132 ds.caller=caller;
25133 ds.locals=NULL;
25134 se_dst=&ds;/*link*/
25135 (ds.p=155197188);
25136 (/*SFN*/C->_is_connected/*20*/)=0;
25137 se_dst=caller;/*unlink*/
25138 }
25139
25140 T6 r74is_equal(se_dump_stack*caller,T74* C,T0* a1){
25141 T6 R=0;
25142 void**locals[2];
25143 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R74%other%R74%Result%E6%",1};
25144 se_dump_stack ds;
25145 ds.fd=&fd;
25146 ds.current=((void**)&C);
25147 ds.p=2120968;
25148 ds.caller=caller;
25149 ds.locals=locals;
25150 locals[0]=(void**)&a1;
25151 locals[1]=(void**)&R;
25152 se_dst=&ds;/*link*/
25153 se_require_uppermost_flag=1;
25154 if(fd.assertion_flag){
25155 fd.assertion_flag=0;
25156 (ds.p=2122048);
25157 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25158 fd.assertion_flag=1;
25159 }
25160 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25161 fd.assertion_flag=0;
25162 (ds.p=2122846);
25163 ac_ens((!(r74standard_is_equal(&ds,C,a1)))||(R),"consistent");
25164 (ds.p=2123064);
25165 ac_ens((!(R))||(r74is_equal(&ds,((T74*)ci(74,a1,2123080)),(T0*)C)),"symmetric");
25166 fd.assertion_flag=1;
25167 }
25168 se_dst=caller;/*unlink*/
25169 return R;
25170 }
25171
25172 T6 r74is_symmetric(se_dump_stack*caller,T74* C){
25173 T6 R=0;
25174 void**locals[1];
25175 static se_frame_descriptor fd={"is_symmetric TILE",1,1,"%R74%Result%E6%",1};
25176 se_dump_stack ds;
25177 ds.fd=&fd;
25178 ds.current=((void**)&C);
25179 ds.p=155207946;
25180 ds.caller=caller;
25181 ds.locals=locals;
25182 locals[0]=(void**)&R;
25183 se_dst=&ds;/*link*/
25184 (ds.p=155208452);
25185 R=((r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(C)->_neighbour/*8*/),155208472))),1))==(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(C)->_neighbour/*8*/),155208522))),3)))&&((r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(C)->_neighbour/*8*/),155208728))),4))==(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(C)->_neighbour/*8*/),155208782))),2)));
25186 se_dst=caller;/*unlink*/
25187 return R;
25188 }
25189
25190 void r74make(se_dump_stack*caller,T74* C){
25191 static se_frame_descriptor fd={"make TILE",1,0,"%R74%",1};
25192 se_dump_stack ds;
25193 ds.fd=&fd;
25194 ds.current=((void**)&C);
25195 ds.p=155203338;
25196 ds.caller=caller;
25197 ds.locals=NULL;
25198 se_dst=&ds;/*link*/
25199 (ds.p=155203844);
25200 (/*SFN*/C->_type/*4*/)=3;
25201 (ds.p=155204100);
25202 {T80*n=new80();
25203 r80make(&ds,n,1,4);
25204 (/*SFN*/C->_neighbour/*8*/)=((T0*)n);
25205 se_i80(&ds,n);}
25206 se_dst=caller;/*unlink*/
25207 }
25208
25209 void r74put_xy(se_dump_stack*caller,T74* C,T2 a1,T2 a2){
25210 void**locals[2];
25211 static se_frame_descriptor fd={"put_xy TILE",1,2,"%R74%new_x%E2%new_y%E2%",1};
25212 se_dump_stack ds;
25213 ds.fd=&fd;
25214 ds.current=((void**)&C);
25215 ds.p=155193354;
25216 ds.caller=caller;
25217 ds.locals=locals;
25218 locals[0]=(void**)&a1;
25219 locals[1]=(void**)&a2;
25220 se_dst=&ds;/*link*/
25221 (ds.p=155193860);
25222 (/*SFN*/C->_x/*16*/)=a1;
25223 (ds.p=155194116);
25224 (/*SFN*/C->_y/*12*/)=a2;
25225 se_dst=caller;/*unlink*/
25226 }
25227
25228 T6 r74standard_is_equal(se_dump_stack*caller,T74* C,T0* a1){
25229 T6 R=0;
25230 void**locals[2];
25231 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R74%other%R74%Result%E6%",1};
25232 se_dump_stack ds;
25233 ds.fd=&fd;
25234 ds.current=((void**)&C);
25235 ds.p=2128406;
25236 ds.caller=caller;
25237 ds.locals=locals;
25238 locals[0]=(void**)&a1;
25239 locals[1]=(void**)&R;
25240 se_dst=&ds;/*link*/
25241 se_require_uppermost_flag=1;
25242 if(fd.assertion_flag){
25243 fd.assertion_flag=0;
25244 (ds.p=2129184);
25245 ac_req((a1)!=((void*)(NULL)),NULL);
25246 fd.assertion_flag=1;
25247 }
25248 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25249 fd.assertion_flag=0;
25250 (ds.p=2129976);
25251 ac_ens((!(R))||(r74standard_is_equal(&ds,((T74*)ci(74,a1,2129992)),(T0*)C)),"symmetric");
25252 fd.assertion_flag=1;
25253 }
25254 se_dst=caller;/*unlink*/
25255 return R;
25256 }
25257
25258 void r74make_server_bottom(se_dump_stack*caller,T74* C){
25259 static se_frame_descriptor fd={"make_server_bottom TILE",1,0,"%R74%",1};
25260 se_dump_stack ds;
25261 ds.fd=&fd;
25262 ds.current=((void**)&C);
25263 ds.p=155204874;
25264 ds.caller=caller;
25265 ds.locals=NULL;
25266 se_dst=&ds;/*link*/
25267 (ds.p=155205380);
25268 (/*SFN*/C->_type/*4*/)=2;
25269 (ds.p=155205636);
25270 {T80*n=new80();
25271 r80make(&ds,n,1,4);
25272 (/*SFN*/C->_neighbour/*8*/)=((T0*)n);
25273 se_i80(&ds,n);}
25274 se_dst=caller;/*unlink*/
25275 }
25276
25277 void r74count_neighbours(se_dump_stack*caller,T74* C){
25278 T2 _dir=0;
25279 void**locals[1];
25280 static se_frame_descriptor fd={"count_neighbours TILE",1,1,"%R74%dir%E2%",1};
25281 se_dump_stack ds;
25282 ds.fd=&fd;
25283 ds.current=((void**)&C);
25284 ds.p=155198474;
25285 ds.caller=caller;
25286 ds.locals=locals;
25287 locals[0]=(void**)&_dir;
25288 se_dst=&ds;/*link*/
25289 (ds.p=155199502);
25290 _dir=1;
25291 while (!(((ds.p=155199768),(_dir)>(4))))
25292 {
25293 /*[IF*/
25294 if(((ds.p=155200294),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(C)->_neighbour/*8*/),155200274))),_dir))){
25295 (ds.p=155200518);
25296 (/*SFN*/C->_neighbour_count/*21*/)=((/*RF2*/(C)->_neighbour_count/*21*/))+(1);
25297 }
25298 /*FI]*/
25299 (ds.p=155201036);
25300 _dir=(_dir)+(1);
25301 }
25302 /*[IF*/
25303 if(((ds.p=155201842),(((/*RF2*/(C)->_neighbour_count/*21*/))==(1))&&(((/*RF2*/(C)->_type/*4*/))==(3)))){
25304 (ds.p=155202316);
25305 (/*SFN*/C->_type/*4*/)=4;
25306 }
25307 /*FI]*/
25308 se_dst=caller;/*unlink*/
25309 }
25310
25311 T0* r74twin(se_dump_stack*caller,T74* C){
25312 T0* R=NULL;
25313 void**locals[1];
25314 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R74%Result%R74%",1};
25315 se_dump_stack ds;
25316 ds.fd=&fd;
25317 ds.current=((void**)&C);
25318 ds.p=2140182;
25319 ds.caller=caller;
25320 ds.locals=locals;
25321 locals[0]=(void**)&R;
25322 se_dst=&ds;/*link*/
25323 R=((void*)new74());
25324 *((T74*)R)=*C;
25325 if(fd.assertion_flag){
25326 fd.assertion_flag=0;
25327 (ds.p=2142256);
25328 ac_ens(r74is_equal(&ds,((T74*)ci(74,R,2142242)),(T0*)C),"equal");
25329 fd.assertion_flag=1;
25330 }
25331 se_dst=caller;/*unlink*/
25332 return R;
25333 }
25334
25335 void r74connect(se_dump_stack*caller,T74* C){
25336 static se_frame_descriptor fd={"connect TILE",1,0,"%R74%",1};
25337 se_dump_stack ds;
25338 ds.fd=&fd;
25339 ds.current=((void**)&C);
25340 ds.p=155195402;
25341 ds.caller=caller;
25342 ds.locals=NULL;
25343 se_dst=&ds;/*link*/
25344 (ds.p=155195908);
25345 (/*SFN*/C->_is_connected/*20*/)=1;
25346 se_dst=caller;/*unlink*/
25347 }
25348
25349 void r74make_server_top(se_dump_stack*caller,T74* C){
25350 static se_frame_descriptor fd={"make_server_top TILE",1,0,"%R74%",1};
25351 se_dump_stack ds;
25352 ds.fd=&fd;
25353 ds.current=((void**)&C);
25354 ds.p=155206410;
25355 ds.caller=caller;
25356 ds.locals=NULL;
25357 se_dst=&ds;/*link*/
25358 (ds.p=155206916);
25359 (/*SFN*/C->_type/*4*/)=1;
25360 (ds.p=155207172);
25361 {T80*n=new80();
25362 r80make(&ds,n,1,4);
25363 (/*SFN*/C->_neighbour/*8*/)=((T0*)n);
25364 se_i80(&ds,n);}
25365 se_dst=caller;/*unlink*/
25366 }
25367
25368 T6 r125is_equal(se_dump_stack*caller,T125* C,T0* a1){
25369 T6 R=0;
25370 void**locals[2];
25371 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R125%other%R125%Result%E6%",1};
25372 se_dump_stack ds;
25373 ds.fd=&fd;
25374 ds.current=((void**)&C);
25375 ds.p=2120968;
25376 ds.caller=caller;
25377 ds.locals=locals;
25378 locals[0]=(void**)&a1;
25379 locals[1]=(void**)&R;
25380 se_dst=&ds;/*link*/
25381 se_require_uppermost_flag=1;
25382 if(fd.assertion_flag){
25383 fd.assertion_flag=0;
25384 (ds.p=2122048);
25385 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25386 fd.assertion_flag=1;
25387 }
25388 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25389 fd.assertion_flag=0;
25390 (ds.p=2122846);
25391 ac_ens((!(r125standard_is_equal(&ds,C,a1)))||(R),"consistent");
25392 (ds.p=2123064);
25393 ac_ens((!(R))||(r125is_equal(&ds,((T125*)ci(125,a1,2123080)),(T0*)C)),"symmetric");
25394 fd.assertion_flag=1;
25395 }
25396 se_dst=caller;/*unlink*/
25397 return R;
25398 }
25399
25400 void r125make(se_dump_stack*caller,T125* C,T0* a1){
25401 void**locals[1];
25402 static se_frame_descriptor fd={"make COMMAND_OPTIONS_OK",1,1,"%R125%m%R16%",1};
25403 se_dump_stack ds;
25404 ds.fd=&fd;
25405 ds.current=((void**)&C);
25406 ds.p=262145802;
25407 ds.caller=caller;
25408 ds.locals=locals;
25409 locals[0]=(void**)&a1;
25410 se_dst=&ds;/*link*/
25411 (ds.p=262146308);
25412 (/*SFN*/C->_main/*4*/)=a1;
25413 se_dst=caller;/*unlink*/
25414 }
25415
25416 T6 r125standard_is_equal(se_dump_stack*caller,T125* C,T0* a1){
25417 T6 R=0;
25418 void**locals[2];
25419 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R125%other%R125%Result%E6%",1};
25420 se_dump_stack ds;
25421 ds.fd=&fd;
25422 ds.current=((void**)&C);
25423 ds.p=2128406;
25424 ds.caller=caller;
25425 ds.locals=locals;
25426 locals[0]=(void**)&a1;
25427 locals[1]=(void**)&R;
25428 se_dst=&ds;/*link*/
25429 se_require_uppermost_flag=1;
25430 if(fd.assertion_flag){
25431 fd.assertion_flag=0;
25432 (ds.p=2129184);
25433 ac_req((a1)!=((void*)(NULL)),NULL);
25434 fd.assertion_flag=1;
25435 }
25436 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25437 fd.assertion_flag=0;
25438 (ds.p=2129976);
25439 ac_ens((!(R))||(r125standard_is_equal(&ds,((T125*)ci(125,a1,2129992)),(T0*)C)),"symmetric");
25440 fd.assertion_flag=1;
25441 }
25442 se_dst=caller;/*unlink*/
25443 return R;
25444 }
25445
25446 void r125execute(se_dump_stack*caller,T125* C){
25447 static se_frame_descriptor fd={"execute COMMAND_OPTIONS_OK",1,0,"%R125%",1};
25448 se_dump_stack ds;
25449 ds.fd=&fd;
25450 ds.current=((void**)&C);
25451 ds.p=262147082;
25452 ds.caller=caller;
25453 ds.locals=NULL;
25454 se_dst=&ds;/*link*/
25455 (ds.p=262147598);
25456 r16options_ok(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),262147588)));
25457 se_dst=caller;/*unlink*/
25458 }
25459
25460 T0* r125twin(se_dump_stack*caller,T125* C){
25461 T0* R=NULL;
25462 void**locals[1];
25463 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R125%Result%R125%",1};
25464 se_dump_stack ds;
25465 ds.fd=&fd;
25466 ds.current=((void**)&C);
25467 ds.p=2140182;
25468 ds.caller=caller;
25469 ds.locals=locals;
25470 locals[0]=(void**)&R;
25471 se_dst=&ds;/*link*/
25472 R=((void*)new125());
25473 *((T125*)R)=*C;
25474 if(fd.assertion_flag){
25475 fd.assertion_flag=0;
25476 (ds.p=2142256);
25477 ac_ens(r125is_equal(&ds,((T125*)ci(125,R,2142242)),(T0*)C),"equal");
25478 fd.assertion_flag=1;
25479 }
25480 se_dst=caller;/*unlink*/
25481 return R;
25482 }
25483
25484 T6 r138is_equal(se_dump_stack*caller,T138* C,T0* a1){
25485 T6 R=0;
25486 void**locals[2];
25487 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R138%other%R138%Result%E6%",1};
25488 se_dump_stack ds;
25489 ds.fd=&fd;
25490 ds.current=((void**)&C);
25491 ds.p=2120968;
25492 ds.caller=caller;
25493 ds.locals=locals;
25494 locals[0]=(void**)&a1;
25495 locals[1]=(void**)&R;
25496 se_dst=&ds;/*link*/
25497 se_require_uppermost_flag=1;
25498 if(fd.assertion_flag){
25499 fd.assertion_flag=0;
25500 (ds.p=2122048);
25501 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25502 fd.assertion_flag=1;
25503 }
25504 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25505 fd.assertion_flag=0;
25506 (ds.p=2122846);
25507 ac_ens((!(r138standard_is_equal(&ds,C,a1)))||(R),"consistent");
25508 (ds.p=2123064);
25509 ac_ens((!(R))||(r138is_equal(&ds,((T138*)ci(138,a1,2123080)),(T0*)C)),"symmetric");
25510 fd.assertion_flag=1;
25511 }
25512 se_dst=caller;/*unlink*/
25513 return R;
25514 }
25515
25516 void r138make(se_dump_stack*caller,T138* C,T0* a1){
25517 void**locals[1];
25518 static se_frame_descriptor fd={"make COMMAND_NEW_GAME",1,1,"%R138%m%R16%",1};
25519 se_dump_stack ds;
25520 ds.fd=&fd;
25521 ds.current=((void**)&C);
25522 ds.p=289408778;
25523 ds.caller=caller;
25524 ds.locals=locals;
25525 locals[0]=(void**)&a1;
25526 se_dst=&ds;/*link*/
25527 (ds.p=289409284);
25528 (/*SFN*/C->_main/*4*/)=a1;
25529 se_dst=caller;/*unlink*/
25530 }
25531
25532 T6 r138standard_is_equal(se_dump_stack*caller,T138* C,T0* a1){
25533 T6 R=0;
25534 void**locals[2];
25535 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R138%other%R138%Result%E6%",1};
25536 se_dump_stack ds;
25537 ds.fd=&fd;
25538 ds.current=((void**)&C);
25539 ds.p=2128406;
25540 ds.caller=caller;
25541 ds.locals=locals;
25542 locals[0]=(void**)&a1;
25543 locals[1]=(void**)&R;
25544 se_dst=&ds;/*link*/
25545 se_require_uppermost_flag=1;
25546 if(fd.assertion_flag){
25547 fd.assertion_flag=0;
25548 (ds.p=2129184);
25549 ac_req((a1)!=((void*)(NULL)),NULL);
25550 fd.assertion_flag=1;
25551 }
25552 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25553 fd.assertion_flag=0;
25554 (ds.p=2129976);
25555 ac_ens((!(R))||(r138standard_is_equal(&ds,((T138*)ci(138,a1,2129992)),(T0*)C)),"symmetric");
25556 fd.assertion_flag=1;
25557 }
25558 se_dst=caller;/*unlink*/
25559 return R;
25560 }
25561
25562 void r138execute(se_dump_stack*caller,T138* C){
25563 static se_frame_descriptor fd={"execute COMMAND_NEW_GAME",1,0,"%R138%",1};
25564 se_dump_stack ds;
25565 ds.fd=&fd;
25566 ds.current=((void**)&C);
25567 ds.p=289410058;
25568 ds.caller=caller;
25569 ds.locals=NULL;
25570 se_dst=&ds;/*link*/
25571 (ds.p=289410574);
25572 r16new_game(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),289410564)));
25573 se_dst=caller;/*unlink*/
25574 }
25575
25576 T0* r138twin(se_dump_stack*caller,T138* C){
25577 T0* R=NULL;
25578 void**locals[1];
25579 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R138%Result%R138%",1};
25580 se_dump_stack ds;
25581 ds.fd=&fd;
25582 ds.current=((void**)&C);
25583 ds.p=2140182;
25584 ds.caller=caller;
25585 ds.locals=locals;
25586 locals[0]=(void**)&R;
25587 se_dst=&ds;/*link*/
25588 R=((void*)new138());
25589 *((T138*)R)=*C;
25590 if(fd.assertion_flag){
25591 fd.assertion_flag=0;
25592 (ds.p=2142256);
25593 ac_ens(r138is_equal(&ds,((T138*)ci(138,R,2142242)),(T0*)C),"equal");
25594 fd.assertion_flag=1;
25595 }
25596 se_dst=caller;/*unlink*/
25597 return R;
25598 }
25599
25600 void r146disconnect(se_dump_stack*caller,T146* C){
25601 static se_frame_descriptor fd={"disconnect TEXT_FILE_WRITE",1,0,"%R146%",1};
25602 se_dump_stack ds;
25603 ds.fd=&fd;
25604 ds.current=((void**)&C);
25605 ds.p=306201608;
25606 ds.caller=caller;
25607 ds.locals=NULL;
25608 se_dst=&ds;/*link*/
25609 se_require_uppermost_flag=1;
25610 if(fd.assertion_flag){
25611 fd.assertion_flag=0;
25612 (ds.p=306202132);
25613 ac_req(r146is_connected(&ds,C),NULL);
25614 fd.assertion_flag=1;
25615 }
25616 (ds.p=306202644);
25617 basic_io_fclose((/*RF2*/(C)->_output_stream/*8*/));
25618 (ds.p=306202900);
25619 (/*SFN*/C->_path/*4*/)=NULL;
25620 se_dst=caller;/*unlink*/
25621 }
25622
25623 T6 r146is_equal(se_dump_stack*caller,T146* C,T0* a1){
25624 T6 R=0;
25625 void**locals[2];
25626 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R146%other%R146%Result%E6%",1};
25627 se_dump_stack ds;
25628 ds.fd=&fd;
25629 ds.current=((void**)&C);
25630 ds.p=2120968;
25631 ds.caller=caller;
25632 ds.locals=locals;
25633 locals[0]=(void**)&a1;
25634 locals[1]=(void**)&R;
25635 se_dst=&ds;/*link*/
25636 se_require_uppermost_flag=1;
25637 if(fd.assertion_flag){
25638 fd.assertion_flag=0;
25639 (ds.p=2122048);
25640 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25641 fd.assertion_flag=1;
25642 }
25643 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25644 fd.assertion_flag=0;
25645 (ds.p=2122846);
25646 ac_ens((!(r146standard_is_equal(&ds,C,a1)))||(R),"consistent");
25647 (ds.p=2123064);
25648 ac_ens((!(R))||(r146is_equal(&ds,((T146*)ci(146,a1,2123080)),(T0*)C)),"symmetric");
25649 fd.assertion_flag=1;
25650 }
25651 se_dst=caller;/*unlink*/
25652 return R;
25653 }
25654
25655 T6 r146is_connected(se_dump_stack*caller,T146* C){
25656 T6 R=0;
25657 void**locals[1];
25658 static se_frame_descriptor fd={"is_connected TEXT_FILE_WRITE",1,1,"%R146%Result%E6%",1};
25659 se_dump_stack ds;
25660 ds.fd=&fd;
25661 ds.current=((void**)&C);
25662 ds.p=306192136;
25663 ds.caller=caller;
25664 ds.locals=locals;
25665 locals[0]=(void**)&R;
25666 se_dst=&ds;/*link*/
25667 (ds.p=306192660);
25668 R=((/*RF2*/(C)->_path/*4*/))!=((void*)(NULL));
25669 se_dst=caller;/*unlink*/
25670 return R;
25671 }
25672
25673 T6 r146standard_is_equal(se_dump_stack*caller,T146* C,T0* a1){
25674 T6 R=0;
25675 void**locals[2];
25676 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R146%other%R146%Result%E6%",1};
25677 se_dump_stack ds;
25678 ds.fd=&fd;
25679 ds.current=((void**)&C);
25680 ds.p=2128406;
25681 ds.caller=caller;
25682 ds.locals=locals;
25683 locals[0]=(void**)&a1;
25684 locals[1]=(void**)&R;
25685 se_dst=&ds;/*link*/
25686 se_require_uppermost_flag=1;
25687 if(fd.assertion_flag){
25688 fd.assertion_flag=0;
25689 (ds.p=2129184);
25690 ac_req((a1)!=((void*)(NULL)),NULL);
25691 fd.assertion_flag=1;
25692 }
25693 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25694 fd.assertion_flag=0;
25695 (ds.p=2129976);
25696 ac_ens((!(R))||(r146standard_is_equal(&ds,((T146*)ci(146,a1,2129992)),(T0*)C)),"symmetric");
25697 fd.assertion_flag=1;
25698 }
25699 se_dst=caller;/*unlink*/
25700 return R;
25701 }
25702
25703 void r146connect_to(se_dump_stack*caller,T146* C,T0* a1){
25704 T8 _p=NULL;
25705 void**locals[2];
25706 static se_frame_descriptor fd={"connect_to TEXT_FILE_WRITE",1,2,"%R146%new_path%R7%p%E8%",1};
25707 se_dump_stack ds;
25708 ds.fd=&fd;
25709 ds.current=((void**)&C);
25710 ds.p=306193416;
25711 ds.caller=caller;
25712 ds.locals=locals;
25713 locals[0]=(void**)&a1;
25714 locals[1]=(void**)&_p;
25715 se_dst=&ds;/*link*/
25716 se_require_uppermost_flag=1;
25717 if(fd.assertion_flag){
25718 fd.assertion_flag=0;
25719 (ds.p=306194452);
25720 ac_req(r6_ix_not(&ds,r146is_connected(&ds,C)),NULL);
25721 (ds.p=306194708);
25722 ac_req(r6_ix_not(&ds,r7is_empty(&ds,se_i7(&ds,((T7*)ci(7,a1,306194716))))),NULL);
25723 fd.assertion_flag=1;
25724 }
25725 (ds.p=306195732);
25726 _p=r7to_external(&ds,se_i7(&ds,((T7*)ci(7,a1,306195742))));
25727 (ds.p=306195988);
25728 (/*SFN*/C->_output_stream/*8*/)=basic_io_text_file_write_open(_p);
25729 /*[IF*/
25730 if(((ds.p=306196278),(NULL!=(/*RF2*/(C)->_output_stream/*8*/)))){
25731 (ds.p=306196506);
25732 (/*SFN*/C->_path/*4*/)=a1;
25733 }
25734 /*FI]*/
25735 se_dst=caller;/*unlink*/
25736 }
25737
25738 T0* r146twin(se_dump_stack*caller,T146* C){
25739 T0* R=NULL;
25740 void**locals[1];
25741 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R146%Result%R146%",1};
25742 se_dump_stack ds;
25743 ds.fd=&fd;
25744 ds.current=((void**)&C);
25745 ds.p=2140182;
25746 ds.caller=caller;
25747 ds.locals=locals;
25748 locals[0]=(void**)&R;
25749 se_dst=&ds;/*link*/
25750 R=((void*)new146());
25751 *((T146*)R)=*C;
25752 if(fd.assertion_flag){
25753 fd.assertion_flag=0;
25754 (ds.p=2142256);
25755 ac_ens(r146is_equal(&ds,((T146*)ci(146,R,2142242)),(T0*)C),"equal");
25756 fd.assertion_flag=1;
25757 }
25758 se_dst=caller;/*unlink*/
25759 return R;
25760 }
25761
25762 void r146put_character(se_dump_stack*caller,T146* C,T3 a1){
25763 void**locals[1];
25764 static se_frame_descriptor fd={"put_character TEXT_FILE_WRITE",1,1,"%R146%c%E3%",1};
25765 se_dump_stack ds;
25766 ds.fd=&fd;
25767 ds.current=((void**)&C);
25768 ds.p=306204936;
25769 ds.caller=caller;
25770 ds.locals=locals;
25771 locals[0]=(void**)&a1;
25772 se_dst=&ds;/*link*/
25773 se_require_uppermost_flag=1;
25774 if(fd.assertion_flag){
25775 fd.assertion_flag=0;
25776 (ds.p=123739156);
25777 ac_req(r146is_connected(&ds,C),NULL);
25778 fd.assertion_flag=1;
25779 }
25780 (ds.p=306205460);
25781 basic_io_putc(a1,(/*RF2*/(C)->_output_stream/*8*/));
25782 se_dst=caller;/*unlink*/
25783 }
25784
25785 void r146put_string(se_dump_stack*caller,T146* C,T0* a1){
25786 T2 _i=0;
25787 void**locals[2];
25788 static se_frame_descriptor fd={"put_string OUTPUT_STREAM",1,2,"%R146%s%R7%i%E2%",1};
25789 se_dump_stack ds;
25790 ds.fd=&fd;
25791 ds.current=((void**)&C);
25792 ds.p=123740680;
25793 ds.caller=caller;
25794 ds.locals=locals;
25795 locals[0]=(void**)&a1;
25796 locals[1]=(void**)&_i;
25797 se_dst=&ds;/*link*/
25798 se_require_uppermost_flag=1;
25799 if(fd.assertion_flag){
25800 fd.assertion_flag=0;
25801 (ds.p=123741460);
25802 ac_req(r146is_connected(&ds,C),NULL);
25803 (ds.p=123741720);
25804 ac_req((a1)!=((void*)(NULL)),NULL);
25805 fd.assertion_flag=1;
25806 }
25807 (ds.p=123743002);
25808 _i=1;
25809 while (!(((ds.p=123743518),(_i)>((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,123743522))))->_count/*8*/)))))
25810 {
25811 (ds.p=123744026);
25812 r146put_character(&ds,C,r7item(&ds,se_i7(&ds,((T7*)ci(7,a1,123744054))),_i));
25813 (ds.p=123744282);
25814 _i=(_i)+(1);
25815 }
25816 se_dst=caller;/*unlink*/
25817 }
25818
25819 T6 r116is_equal(se_dump_stack*caller,T116* C,T0* a1){
25820 T6 R=0;
25821 void**locals[2];
25822 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R116%other%R116%Result%E6%",1};
25823 se_dump_stack ds;
25824 ds.fd=&fd;
25825 ds.current=((void**)&C);
25826 ds.p=2120968;
25827 ds.caller=caller;
25828 ds.locals=locals;
25829 locals[0]=(void**)&a1;
25830 locals[1]=(void**)&R;
25831 se_dst=&ds;/*link*/
25832 se_require_uppermost_flag=1;
25833 if(fd.assertion_flag){
25834 fd.assertion_flag=0;
25835 (ds.p=2122048);
25836 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25837 fd.assertion_flag=1;
25838 }
25839 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25840 fd.assertion_flag=0;
25841 (ds.p=2122846);
25842 ac_ens((!(r116standard_is_equal(&ds,C,a1)))||(R),"consistent");
25843 (ds.p=2123064);
25844 ac_ens((!(R))||(r116is_equal(&ds,((T116*)ci(116,a1,2123080)),(T0*)C)),"symmetric");
25845 fd.assertion_flag=1;
25846 }
25847 se_dst=caller;/*unlink*/
25848 return R;
25849 }
25850
25851 void r116make(se_dump_stack*caller,T116* C,T0* a1){
25852 void**locals[1];
25853 static se_frame_descriptor fd={"make COMMAND_NEWHS_OK",1,1,"%R116%m%R16%",1};
25854 se_dump_stack ds;
25855 ds.fd=&fd;
25856 ds.current=((void**)&C);
25857 ds.p=243271434;
25858 ds.caller=caller;
25859 ds.locals=locals;
25860 locals[0]=(void**)&a1;
25861 se_dst=&ds;/*link*/
25862 (ds.p=243271940);
25863 (/*SFN*/C->_main/*4*/)=a1;
25864 se_dst=caller;/*unlink*/
25865 }
25866
25867 T6 r116standard_is_equal(se_dump_stack*caller,T116* C,T0* a1){
25868 T6 R=0;
25869 void**locals[2];
25870 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R116%other%R116%Result%E6%",1};
25871 se_dump_stack ds;
25872 ds.fd=&fd;
25873 ds.current=((void**)&C);
25874 ds.p=2128406;
25875 ds.caller=caller;
25876 ds.locals=locals;
25877 locals[0]=(void**)&a1;
25878 locals[1]=(void**)&R;
25879 se_dst=&ds;/*link*/
25880 se_require_uppermost_flag=1;
25881 if(fd.assertion_flag){
25882 fd.assertion_flag=0;
25883 (ds.p=2129184);
25884 ac_req((a1)!=((void*)(NULL)),NULL);
25885 fd.assertion_flag=1;
25886 }
25887 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25888 fd.assertion_flag=0;
25889 (ds.p=2129976);
25890 ac_ens((!(R))||(r116standard_is_equal(&ds,((T116*)ci(116,a1,2129992)),(T0*)C)),"symmetric");
25891 fd.assertion_flag=1;
25892 }
25893 se_dst=caller;/*unlink*/
25894 return R;
25895 }
25896
25897 void r116execute(se_dump_stack*caller,T116* C){
25898 static se_frame_descriptor fd={"execute COMMAND_NEWHS_OK",1,0,"%R116%",1};
25899 se_dump_stack ds;
25900 ds.fd=&fd;
25901 ds.current=((void**)&C);
25902 ds.p=243272714;
25903 ds.caller=caller;
25904 ds.locals=NULL;
25905 se_dst=&ds;/*link*/
25906 (ds.p=243273230);
25907 r16newhs_ok(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),243273220)));
25908 se_dst=caller;/*unlink*/
25909 }
25910
25911 T0* r116twin(se_dump_stack*caller,T116* C){
25912 T0* R=NULL;
25913 void**locals[1];
25914 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R116%Result%R116%",1};
25915 se_dump_stack ds;
25916 ds.fd=&fd;
25917 ds.current=((void**)&C);
25918 ds.p=2140182;
25919 ds.caller=caller;
25920 ds.locals=locals;
25921 locals[0]=(void**)&R;
25922 se_dst=&ds;/*link*/
25923 R=((void*)new116());
25924 *((T116*)R)=*C;
25925 if(fd.assertion_flag){
25926 fd.assertion_flag=0;
25927 (ds.p=2142256);
25928 ac_ens(r116is_equal(&ds,((T116*)ci(116,R,2142242)),(T0*)C),"equal");
25929 fd.assertion_flag=1;
25930 }
25931 se_dst=caller;/*unlink*/
25932 return R;
25933 }
25934
25935 T6 r136is_equal(se_dump_stack*caller,T136* C,T0* a1){
25936 T6 R=0;
25937 void**locals[2];
25938 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R136%other%R136%Result%E6%",1};
25939 se_dump_stack ds;
25940 ds.fd=&fd;
25941 ds.current=((void**)&C);
25942 ds.p=2120968;
25943 ds.caller=caller;
25944 ds.locals=locals;
25945 locals[0]=(void**)&a1;
25946 locals[1]=(void**)&R;
25947 se_dst=&ds;/*link*/
25948 se_require_uppermost_flag=1;
25949 if(fd.assertion_flag){
25950 fd.assertion_flag=0;
25951 (ds.p=2122048);
25952 ac_req((a1)!=((void*)(NULL)),"other_not_void");
25953 fd.assertion_flag=1;
25954 }
25955 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
25956 fd.assertion_flag=0;
25957 (ds.p=2122846);
25958 ac_ens((!(r136standard_is_equal(&ds,C,a1)))||(R),"consistent");
25959 (ds.p=2123064);
25960 ac_ens((!(R))||(r136is_equal(&ds,((T136*)ci(136,a1,2123080)),(T0*)C)),"symmetric");
25961 fd.assertion_flag=1;
25962 }
25963 se_dst=caller;/*unlink*/
25964 return R;
25965 }
25966
25967 void r136make(se_dump_stack*caller,T136* C,T0* a1){
25968 void**locals[1];
25969 static se_frame_descriptor fd={"make COMMAND_SHOW_HS",1,1,"%R136%m%R16%",1};
25970 se_dump_stack ds;
25971 ds.fd=&fd;
25972 ds.current=((void**)&C);
25973 ds.p=285214474;
25974 ds.caller=caller;
25975 ds.locals=locals;
25976 locals[0]=(void**)&a1;
25977 se_dst=&ds;/*link*/
25978 (ds.p=285214980);
25979 (/*SFN*/C->_main/*4*/)=a1;
25980 se_dst=caller;/*unlink*/
25981 }
25982
25983 T6 r136standard_is_equal(se_dump_stack*caller,T136* C,T0* a1){
25984 T6 R=0;
25985 void**locals[2];
25986 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R136%other%R136%Result%E6%",1};
25987 se_dump_stack ds;
25988 ds.fd=&fd;
25989 ds.current=((void**)&C);
25990 ds.p=2128406;
25991 ds.caller=caller;
25992 ds.locals=locals;
25993 locals[0]=(void**)&a1;
25994 locals[1]=(void**)&R;
25995 se_dst=&ds;/*link*/
25996 se_require_uppermost_flag=1;
25997 if(fd.assertion_flag){
25998 fd.assertion_flag=0;
25999 (ds.p=2129184);
26000 ac_req((a1)!=((void*)(NULL)),NULL);
26001 fd.assertion_flag=1;
26002 }
26003 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
26004 fd.assertion_flag=0;
26005 (ds.p=2129976);
26006 ac_ens((!(R))||(r136standard_is_equal(&ds,((T136*)ci(136,a1,2129992)),(T0*)C)),"symmetric");
26007 fd.assertion_flag=1;
26008 }
26009 se_dst=caller;/*unlink*/
26010 return R;
26011 }
26012
26013 void r136execute(se_dump_stack*caller,T136* C){
26014 static se_frame_descriptor fd={"execute COMMAND_SHOW_HS",1,0,"%R136%",1};
26015 se_dump_stack ds;
26016 ds.fd=&fd;
26017 ds.current=((void**)&C);
26018 ds.p=285215754;
26019 ds.caller=caller;
26020 ds.locals=NULL;
26021 se_dst=&ds;/*link*/
26022 (ds.p=285216270);
26023 r16show_hs(&ds,((T16*)ci(16,(/*RF2*/(C)->_main/*4*/),285216260)));
26024 se_dst=caller;/*unlink*/
26025 }
26026
26027 T0* r136twin(se_dump_stack*caller,T136* C){
26028 T0* R=NULL;
26029 void**locals[1];
26030 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R136%Result%R136%",1};
26031 se_dump_stack ds;
26032 ds.fd=&fd;
26033 ds.current=((void**)&C);
26034 ds.p=2140182;
26035 ds.caller=caller;
26036 ds.locals=locals;
26037 locals[0]=(void**)&R;
26038 se_dst=&ds;/*link*/
26039 R=((void*)new136());
26040 *((T136*)R)=*C;
26041 if(fd.assertion_flag){
26042 fd.assertion_flag=0;
26043 (ds.p=2142256);
26044 ac_ens(r136is_equal(&ds,((T136*)ci(136,R,2142242)),(T0*)C),"equal");
26045 fd.assertion_flag=1;
26046 }
26047 se_dst=caller;/*unlink*/
26048 return R;
26049 }
26050
26051 T6 r57is_equal(se_dump_stack*caller,T57* C,T0* a1){
26052 T6 R=0;
26053 void**locals[2];
26054 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R57%other%R57%Result%E6%",1};
26055 se_dump_stack ds;
26056 ds.fd=&fd;
26057 ds.current=((void**)&C);
26058 ds.p=2120968;
26059 ds.caller=caller;
26060 ds.locals=locals;
26061 locals[0]=(void**)&a1;
26062 locals[1]=(void**)&R;
26063 se_dst=&ds;/*link*/
26064 se_require_uppermost_flag=1;
26065 if(fd.assertion_flag){
26066 fd.assertion_flag=0;
26067 (ds.p=2122048);
26068 ac_req((a1)!=((void*)(NULL)),"other_not_void");
26069 fd.assertion_flag=1;
26070 }
26071 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
26072 fd.assertion_flag=0;
26073 (ds.p=2122846);
26074 ac_ens((!(r57standard_is_equal(&ds,C,a1)))||(R),"consistent");
26075 (ds.p=2123064);
26076 ac_ens((!(R))||(r57is_equal(&ds,((T57*)ci(57,a1,2123080)),(T0*)C)),"symmetric");
26077 fd.assertion_flag=1;
26078 }
26079 se_dst=caller;/*unlink*/
26080 return R;
26081 }
26082
26083 void r57make(se_dump_stack*caller,T57* C){
26084 static se_frame_descriptor fd={"make STD_OUTPUT",1,0,"%R57%",1};
26085 se_dump_stack ds;
26086 ds.fd=&fd;
26087 ds.current=((void**)&C);
26088 ds.p=121643272;
26089 ds.caller=caller;
26090 ds.locals=NULL;
26091 se_dst=&ds;/*link*/
26092 se_dst=caller;/*unlink*/
26093 }
26094
26095 T6 r57standard_is_equal(se_dump_stack*caller,T57* C,T0* a1){
26096 T6 R=0;
26097 void**locals[2];
26098 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R57%other%R57%Result%E6%",1};
26099 se_dump_stack ds;
26100 ds.fd=&fd;
26101 ds.current=((void**)&C);
26102 ds.p=2128406;
26103 ds.caller=caller;
26104 ds.locals=locals;
26105 locals[0]=(void**)&a1;
26106 locals[1]=(void**)&R;
26107 se_dst=&ds;/*link*/
26108 se_require_uppermost_flag=1;
26109 if(fd.assertion_flag){
26110 fd.assertion_flag=0;
26111 (ds.p=2129184);
26112 ac_req((a1)!=((void*)(NULL)),NULL);
26113 fd.assertion_flag=1;
26114 }
26115 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
26116 fd.assertion_flag=0;
26117 (ds.p=2129976);
26118 ac_ens((!(R))||(r57standard_is_equal(&ds,((T57*)ci(57,a1,2129992)),(T0*)C)),"symmetric");
26119 fd.assertion_flag=1;
26120 }
26121 se_dst=caller;/*unlink*/
26122 return R;
26123 }
26124
26125 T0* r57twin(se_dump_stack*caller,T57* C){
26126 T0* R=NULL;
26127 void**locals[1];
26128 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R57%Result%R57%",1};
26129 se_dump_stack ds;
26130 ds.fd=&fd;
26131 ds.current=((void**)&C);
26132 ds.p=2140182;
26133 ds.caller=caller;
26134 ds.locals=locals;
26135 locals[0]=(void**)&R;
26136 se_dst=&ds;/*link*/
26137 R=((void*)new57());
26138 *((T57*)R)=*C;
26139 if(fd.assertion_flag){
26140 fd.assertion_flag=0;
26141 (ds.p=2142256);
26142 ac_ens(r57is_equal(&ds,((T57*)ci(57,R,2142242)),(T0*)C),"equal");
26143 fd.assertion_flag=1;
26144 }
26145 se_dst=caller;/*unlink*/
26146 return R;
26147 }
26148
26149 void r57put_character(se_dump_stack*caller,T57* C,T3 a1){
26150 void**locals[1];
26151 static se_frame_descriptor fd={"put_character STD_OUTPUT",1,1,"%R57%c%E3%",1};
26152 se_dump_stack ds;
26153 ds.fd=&fd;
26154 ds.current=((void**)&C);
26155 ds.p=121644808;
26156 ds.caller=caller;
26157 ds.locals=locals;
26158 locals[0]=(void**)&a1;
26159 se_dst=&ds;/*link*/
26160 se_require_uppermost_flag=1;
26161 (ds.p=121645332);
26162 basic_io_putc(a1,basic_io_stdout);
26163 se_dst=caller;/*unlink*/
26164 }
26165
26166 void r57put_string(se_dump_stack*caller,T57* C,T0* a1){
26167 T2 _i=0;
26168 void**locals[2];
26169 static se_frame_descriptor fd={"put_string OUTPUT_STREAM",1,2,"%R57%s%R7%i%E2%",1};
26170 se_dump_stack ds;
26171 ds.fd=&fd;
26172 ds.current=((void**)&C);
26173 ds.p=123740680;
26174 ds.caller=caller;
26175 ds.locals=locals;
26176 locals[0]=(void**)&a1;
26177 locals[1]=(void**)&_i;
26178 se_dst=&ds;/*link*/
26179 se_require_uppermost_flag=1;
26180 if(fd.assertion_flag){
26181 fd.assertion_flag=0;
26182 (ds.p=123741720);
26183 ac_req((a1)!=((void*)(NULL)),NULL);
26184 fd.assertion_flag=1;
26185 }
26186 (ds.p=123743002);
26187 _i=1;
26188 while (!(((ds.p=123743518),(_i)>((/*RF2*/(se_i7(&ds,((T7*)ci(7,a1,123743522))))->_count/*8*/)))))
26189 {
26190 (ds.p=123744026);
26191 r57put_character(&ds,C,r7item(&ds,se_i7(&ds,((T7*)ci(7,a1,123744054))),_i));
26192 (ds.p=123744282);
26193 _i=(_i)+(1);
26194 }
26195 se_dst=caller;/*unlink*/
26196 }
26197
26198 T0* r89make_quit(se_dump_stack*caller){
26199 T0* R=NULL;
26200 void**locals[1];
26201 static se_frame_descriptor fd={"make_quit EVENTMAKER",0,1,"Result%R28%",1};
26202 se_dump_stack ds;
26203 ds.fd=&fd;
26204 ds.current=NULL;
26205 ds.p=186651914;
26206 ds.caller=caller;
26207 ds.locals=locals;
26208 locals[0]=(void**)&R;
26209 se_dst=&ds;/*link*/
26210 (ds.p=186652420);
26211 {T28*n=new28();
26212 r28make(&ds,n);
26213 R=((T0*)n);
26214 }
26215 (ds.p=186652690);
26216 r28put_type(&ds,((T28*)ci(28,R,186652676)),12);
26217 se_dst=caller;/*unlink*/
26218 return R;
26219 }
26220
26221 T0* r89make_keydown(se_dump_stack*caller,T2 a1,T2 a2){
26222 T0* R=NULL;
26223 void**locals[3];
26224 static se_frame_descriptor fd={"make_keydown EVENTMAKER",0,3,"key%E2%kmod%E2%Result%R28%",1};
26225 se_dump_stack ds;
26226 ds.fd=&fd;
26227 ds.current=NULL;
26228 ds.p=186647562;
26229 ds.caller=caller;
26230 ds.locals=locals;
26231 locals[0]=(void**)&a1;
26232 locals[1]=(void**)&a2;
26233 locals[2]=(void**)&R;
26234 se_dst=&ds;/*link*/
26235 (ds.p=186648068);
26236 {T28*n=new28();
26237 r28make(&ds,n);
26238 R=((T0*)n);
26239 }
26240 (ds.p=186648338);
26241 r28put_type(&ds,((T28*)ci(28,R,186648324)),2);
26242 (ds.p=186648594);
26243 r28put_i1(&ds,((T28*)ci(28,R,186648580)),a1);
26244 (ds.p=186648850);
26245 r28put_kmod(&ds,((T28*)ci(28,R,186648836)),a2);
26246 se_dst=caller;/*unlink*/
26247 return R;
26248 }
26249
26250 T0* r89make_mbdown(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4){
26251 T0* R=NULL;
26252 void**locals[5];
26253 static se_frame_descriptor fd={"make_mbdown EVENTMAKER",0,5,"b%E2%kmod%E2%x%E2%y%E2%Result%R28%",1};
26254 se_dump_stack ds;
26255 ds.fd=&fd;
26256 ds.current=NULL;
26257 ds.p=186649610;
26258 ds.caller=caller;
26259 ds.locals=locals;
26260 locals[0]=(void**)&a1;
26261 locals[1]=(void**)&a2;
26262 locals[2]=(void**)&a3;
26263 locals[3]=(void**)&a4;
26264 locals[4]=(void**)&R;
26265 se_dst=&ds;/*link*/
26266 (ds.p=186650116);
26267 {T28*n=new28();
26268 r28make(&ds,n);
26269 R=((T0*)n);
26270 }
26271 (ds.p=186650386);
26272 r28put_type(&ds,((T28*)ci(28,R,186650372)),5);
26273 (ds.p=186650642);
26274 r28put_i1(&ds,((T28*)ci(28,R,186650628)),a1);
26275 (ds.p=186650898);
26276 r28put_kmod(&ds,((T28*)ci(28,R,186650884)),a2);
26277 (ds.p=186651154);
26278 r28put_xy(&ds,((T28*)ci(28,R,186651140)),a3,a4);
26279 se_dst=caller;/*unlink*/
26280 return R;
26281 }
26282
26283 T2 r108prime_number_ceiling(se_dump_stack*caller,T2 a1){
26284 T2 R=0;
26285 void**locals[2];
26286 static se_frame_descriptor fd={"prime_number_ceiling HASH_TABLE_SIZE",0,2,"integer%E2%Result%E2%",1};
26287 se_dump_stack ds;
26288 ds.fd=&fd;
26289 ds.current=NULL;
26290 ds.p=226497800;
26291 ds.caller=caller;
26292 ds.locals=locals;
26293 locals[0]=(void**)&a1;
26294 locals[1]=(void**)&R;
26295 se_dst=&ds;/*link*/
26296 /*[IF*/
26297 if(((ds.p=226498588),(a1)<=(53))){
26298 (ds.p=226499084);
26299 R=53;
26300 }
26301 else if(((ds.p=226499364),(a1)<=(97))){
26302 (ds.p=226499596);
26303 R=97;
26304 }
26305 else if(((ds.p=226499876),(a1)<=(193))){
26306 (ds.p=226500108);
26307 R=193;
26308 }
26309 else if(((ds.p=226500388),(a1)<=(389))){
26310 (ds.p=226500620);
26311 R=389;
26312 }
26313 else if(((ds.p=226500900),(a1)<=(769))){
26314 (ds.p=226501132);
26315 R=769;
26316 }
26317 else if(((ds.p=226501412),(a1)<=(1543))){
26318 (ds.p=226501644);
26319 R=1543;
26320 }
26321 else if(((ds.p=226501924),(a1)<=(3079))){
26322 (ds.p=226502156);
26323 R=3079;
26324 }
26325 else if(((ds.p=226502436),(a1)<=(6151))){
26326 (ds.p=226502668);
26327 R=6151;
26328 }
26329 else if(((ds.p=226502948),(a1)<=(12289))){
26330 (ds.p=226503180);
26331 R=12289;
26332 }
26333 else if(((ds.p=226503460),(a1)<=(24593))){
26334 (ds.p=226503692);
26335 R=24593;
26336 }
26337 else if(((ds.p=226503972),(a1)<=(49157))){
26338 (ds.p=226504204);
26339 R=49157;
26340 }
26341 else if(((ds.p=226504484),(a1)<=(98317))){
26342 (ds.p=226504716);
26343 R=98317;
26344 }
26345 else if(((ds.p=226504996),(a1)<=(196613))){
26346 (ds.p=226505228);
26347 R=196613;
26348 }
26349 else if(((ds.p=226505508),(a1)<=(393241))){
26350 (ds.p=226505740);
26351 R=393241;
26352 }
26353 else if(((ds.p=226506020),(a1)<=(786433))){
26354 (ds.p=226506252);
26355 R=786433;
26356 }
26357 else if(((ds.p=226506532),(a1)<=(1572869))){
26358 (ds.p=226506764);
26359 R=1572869;
26360 }
26361 else if(((ds.p=226507044),(a1)<=(3145739))){
26362 (ds.p=226507276);
26363 R=3145739;
26364 }
26365 else if(((ds.p=226507556),(a1)<=(6291469))){
26366 (ds.p=226507788);
26367 R=6291469;
26368 }
26369 else if(((ds.p=226508068),(a1)<=(12582917))){
26370 (ds.p=226508300);
26371 R=12582917;
26372 }
26373 else if(((ds.p=226508580),(a1)<=(25165843))){
26374 (ds.p=226508812);
26375 R=25165843;
26376 }
26377 else if(((ds.p=226509092),(a1)<=(50331653))){
26378 (ds.p=226509324);
26379 R=50331653;
26380 }
26381 else if(((ds.p=226509604),(a1)<=(100663319))){
26382 (ds.p=226509836);
26383 R=100663319;
26384 }
26385 else if(((ds.p=226510116),(a1)<=(201326611))){
26386 (ds.p=226510348);
26387 R=201326611;
26388 }
26389 else if(((ds.p=226510628),(a1)<=(402653189))){
26390 (ds.p=226510860);
26391 R=402653189;
26392 }
26393 else if(((ds.p=226511140),(a1)<=(805306457))){
26394 (ds.p=226511372);
26395 R=805306457;
26396 }
26397 else{
26398 (ds.p=226511884);
26399 R=1610612741;
26400 }
26401 /*FI]*/
26402 if(fd.assertion_flag){
26403 fd.assertion_flag=0;
26404 (ds.p=226512916);
26405 ac_ens((R)>=(a1),NULL);
26406 fd.assertion_flag=1;
26407 }
26408 se_dst=caller;/*unlink*/
26409 return R;
26410 }
26411
26412 void r102set_first(se_dump_stack*caller,T102* C,T0* a1){
26413 void**locals[1];
26414 static se_frame_descriptor fd={"set_first TUPLE",1,1,"%R102%item%R65%",1};
26415 se_dump_stack ds;
26416 ds.fd=&fd;
26417 ds.current=((void**)&C);
26418 ds.p=77594882;
26419 ds.caller=caller;
26420 ds.locals=locals;
26421 locals[0]=(void**)&a1;
26422 se_dst=&ds;/*link*/
26423 (ds.p=77594882);
26424 (/*SFN*/C->_first/*4*/)=a1;
26425 se_dst=caller;/*unlink*/
26426 }
26427
26428 T2 r22hour(se_dump_stack*caller,T22* C){
26429 T2 R=0;
26430 void**locals[1];
26431 static se_frame_descriptor fd={"hour TIME",1,1,"%E22%Result%E2%",1};
26432 se_dump_stack ds;
26433 ds.fd=&fd;
26434 ds.current=((void**)&C);
26435 ds.p=46153736;
26436 ds.caller=caller;
26437 ds.locals=locals;
26438 locals[0]=(void**)&R;
26439 se_dst=&ds;/*link*/
26440 (ds.p=46154516);
26441 R=basic_time_gethour((/*RF2*/(*C)._time_memory/*0*/),r22time_mode(&ds));
26442 if(fd.assertion_flag){
26443 fd.assertion_flag=0;
26444 (ds.p=46155042);
26445 ac_ens(r2in_range(&ds,R,0,23),NULL);
26446 fd.assertion_flag=1;
26447 }
26448 se_dst=caller;/*unlink*/
26449 return R;
26450 }
26451
26452 T2 r22time_mode(se_dump_stack*caller){
26453 T2 R=0;
26454 void**locals[1];
26455 static se_frame_descriptor fd={"time_mode TIME",0,1,"Result%E2%",1};
26456 se_dump_stack ds;
26457 ds.fd=&fd;
26458 ds.current=NULL;
26459 ds.p=46194696;
26460 ds.caller=caller;
26461 ds.locals=locals;
26462 locals[0]=(void**)&R;
26463 se_dst=&ds;/*link*/
26464 (ds.p=46195220);
26465 R=(/*RF2*/(((T140*)ci(140,r22time_mode_memo(&ds),46195240)))->_item/*4*/);
26466 if(fd.assertion_flag){
26467 fd.assertion_flag=0;
26468 (ds.p=46195754);
26469 ac_ens(r6_px_or(&ds,(R)==(0),(R)==(1)),NULL);
26470 fd.assertion_flag=1;
26471 }
26472 se_dst=caller;/*unlink*/
26473 return R;
26474 }
26475 T0*oBC22time_mode_memo=NULL;
26476 int fBC22time_mode_memo=0;
26477
26478 T0* r22time_mode_memo(se_dump_stack*caller){
26479 if(fBC22time_mode_memo==0){fBC22time_mode_memo=1;{
26480 void**locals[1];
26481 static se_frame_descriptor fd={"time_mode_memo TIME",0,1,"Result%R140%",1};
26482 se_dump_stack ds;
26483 ds.fd=&fd;
26484 ds.current=NULL;
26485 ds.p=46193160;
26486 ds.caller=caller;
26487 ds.locals=locals;
26488 locals[0]=(void**)&oBC22time_mode_memo;
26489 se_dst=&ds;/*link*/
26490 (ds.p=46193940);
26491 {T140*n=new140();
26492 oBC22time_mode_memo=((T0*)n);
26493 }
26494 se_dst=caller;/*unlink*/
26495 }}
26496 return oBC22time_mode_memo;
26497 }
26498
26499 T2 r22minute(se_dump_stack*caller,T22* C){
26500 T2 R=0;
26501 void**locals[1];
26502 static se_frame_descriptor fd={"minute TIME",1,1,"%E22%Result%E2%",1};
26503 se_dump_stack ds;
26504 ds.fd=&fd;
26505 ds.current=((void**)&C);
26506 ds.p=46155784;
26507 ds.caller=caller;
26508 ds.locals=locals;
26509 locals[0]=(void**)&R;
26510 se_dst=&ds;/*link*/
26511 (ds.p=46156564);
26512 R=basic_time_getminute((/*RF2*/(*C)._time_memory/*0*/),r22time_mode(&ds));
26513 if(fd.assertion_flag){
26514 fd.assertion_flag=0;
26515 (ds.p=46157090);
26516 ac_ens(r2in_range(&ds,R,0,59),NULL);
26517 fd.assertion_flag=1;
26518 }
26519 se_dst=caller;/*unlink*/
26520 return R;
26521 }
26522
26523 void r22update(se_dump_stack*caller,T22* C){
26524 static se_frame_descriptor fd={"update TIME",1,0,"%E22%",1};
26525 se_dump_stack ds;
26526 ds.fd=&fd;
26527 ds.current=((void**)&C);
26528 ds.p=46165512;
26529 ds.caller=caller;
26530 ds.locals=NULL;
26531 se_dst=&ds;/*link*/
26532 (ds.p=46166292);
26533 (/*SFN*/C->_time_memory/*0*/)=basic_time_time;
26534 se_dst=caller;/*unlink*/
26535 }
26536
26537 T2 r22second(se_dump_stack*caller,T22* C){
26538 T2 R=0;
26539 void**locals[1];
26540 static se_frame_descriptor fd={"second TIME",1,1,"%E22%Result%E2%",1};
26541 se_dump_stack ds;
26542 ds.fd=&fd;
26543 ds.current=((void**)&C);
26544 ds.p=46157832;
26545 ds.caller=caller;
26546 ds.locals=locals;
26547 locals[0]=(void**)&R;
26548 se_dst=&ds;/*link*/
26549 (ds.p=46158612);
26550 R=basic_time_getsecond((/*RF2*/(*C)._time_memory/*0*/),r22time_mode(&ds));
26551 if(fd.assertion_flag){
26552 fd.assertion_flag=0;
26553 (ds.p=46159138);
26554 ac_ens(r2in_range(&ds,R,0,59),NULL);
26555 fd.assertion_flag=1;
26556 }
26557 se_dst=caller;/*unlink*/
26558 return R;
26559 }
26560
26561 void r16make_options_window(se_dump_stack*caller,T16* C){
26562 T0* _c=NULL;
26563 void**locals[1];
26564 static se_frame_descriptor fd={"make_options_window NETWALK",1,1,"%R16%c%R25%",1};
26565 se_dump_stack ds;
26566 ds.fd=&fd;
26567 ds.current=((void**)&C);
26568 ds.p=33592586;
26569 ds.caller=caller;
26570 ds.locals=locals;
26571 locals[0]=(void**)&_c;
26572 se_dst=&ds;/*link*/
26573 (ds.p=33593604);
26574 {T117*n=new117();
26575 r117make(&ds,n);
26576 (/*SFN*/C->_options_window/*44*/)=((T0*)n);
26577 }
26578 (ds.p=33593860);
26579 {T125*n=new125();
26580 r125make(&ds,n,(T0*)C);
26581 _c=((T0*)n);
26582 }
26583 (ds.p=33594146);
26584 r117put_command(&ds,((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33594116)),_c,1);
26585 (ds.p=33594372);
26586 {T112*n=new112();
26587 r112make(&ds,n,(T0*)C);
26588 _c=((T0*)n);
26589 }
26590 (ds.p=33594658);
26591 r117put_command(&ds,((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33594628)),_c,2);
26592 (ds.p=33594914);
26593 r117put_xy(&ds,((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33594884)),200,100);
26594 (ds.p=33595170);
26595 r117put_preset_list(&ds,((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33595140)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33595202)))->_preset_list/*8*/));
26596 se_dst=caller;/*unlink*/
26597 }
26598
26599 void r16reset_score(se_dump_stack*caller,T16* C){
26600 static se_frame_descriptor fd={"reset_score NETWALK",1,0,"%R16%",1};
26601 se_dump_stack ds;
26602 ds.fd=&fd;
26603 ds.current=((void**)&C);
26604 ds.p=33654538;
26605 ds.caller=caller;
26606 ds.locals=NULL;
26607 se_dst=&ds;/*link*/
26608 (ds.p=33655044);
26609 (/*SFN*/C->_move_count/*24*/)=0;
26610 (ds.p=33655322);
26611 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_move_image/*80*/),33655300)));
26612 (ds.p=33655578);
26613 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_move_image/*80*/),33655556)),r7_px_43(&ds,se_ms(7,"moves: "),r2to_string(&ds,(/*RF2*/(C)->_move_count/*24*/))),r16mainfont(&ds,C),r16white(&ds));
26614 se_dst=caller;/*unlink*/
26615 }
26616 T0*oBC18blue=NULL;
26617 int fBC18blue=0;
26618
26619 T0* r16blue(se_dump_stack*caller){
26620 if(fBC18blue==0){fBC18blue=1;{
26621 void**locals[1];
26622 static se_frame_descriptor fd={"blue COLOR_TABLE",0,1,"Result%R51%",1};
26623 se_dump_stack ds;
26624 ds.fd=&fd;
26625 ds.current=NULL;
26626 ds.p=37759754;
26627 ds.caller=caller;
26628 ds.locals=locals;
26629 locals[0]=(void**)&oBC18blue;
26630 se_dst=&ds;/*link*/
26631 (ds.p=37760260);
26632 {T51*n=new51();
26633 oBC18blue=((T0*)n);
26634 r51make(&ds,n,0,0,255);
26635 }
26636 se_dst=caller;/*unlink*/
26637 }}
26638 return oBC18blue;
26639 }
26640
26641 T0* r16poll_event(se_dump_stack*caller,T16* C){
26642 T0* R=NULL;
26643 int _em=0;
26644 void**locals[2];
26645 static se_frame_descriptor fd={"poll_event NETWALK",1,2,"%R16%Result%R28%em%E89%",1};
26646 se_dump_stack ds;
26647 ds.fd=&fd;
26648 ds.current=((void**)&C);
26649 ds.p=33786890;
26650 ds.caller=caller;
26651 ds.locals=locals;
26652 locals[0]=(void**)&R;
26653 locals[1]=(void**)&_em;
26654 se_dst=&ds;/*link*/
26655 (ds.p=33787908);
26656 R=r16ext_poll_event(&ds,_em);
26657 se_dst=caller;/*unlink*/
26658 return R;
26659 }
26660
26661 void r16make_newhs_window(se_dump_stack*caller,T16* C){
26662 T0* _c=NULL;
26663 void**locals[1];
26664 static se_frame_descriptor fd={"make_newhs_window NETWALK",1,1,"%R16%c%R25%",1};
26665 se_dump_stack ds;
26666 ds.fd=&fd;
26667 ds.current=((void**)&C);
26668 ds.p=33595914;
26669 ds.caller=caller;
26670 ds.locals=locals;
26671 locals[0]=(void**)&_c;
26672 se_dst=&ds;/*link*/
26673 (ds.p=33596932);
26674 {T97*n=new97();
26675 r97make(&ds,n);
26676 (/*SFN*/C->_newhs_window/*48*/)=((T0*)n);
26677 }
26678 (ds.p=33597188);
26679 {T116*n=new116();
26680 r116make(&ds,n,(T0*)C);
26681 _c=((T0*)n);
26682 }
26683 (ds.p=33597470);
26684 r97put_command(&ds,((T97*)ci(97,(/*RF2*/(C)->_newhs_window/*48*/),33597444)),_c,1);
26685 (ds.p=33597726);
26686 r97put_xy(&ds,((T97*)ci(97,(/*RF2*/(C)->_newhs_window/*48*/),33597700)),200,100);
26687 se_dst=caller;/*unlink*/
26688 }
26689
26690 void r16use_setting(se_dump_stack*caller,T16* C,T0* a1){
26691 void**locals[1];
26692 static se_frame_descriptor fd={"use_setting NETWALK",1,1,"%R16%s%R68%",1};
26693 se_dump_stack ds;
26694 ds.fd=&fd;
26695 ds.current=((void**)&C);
26696 ds.p=33562890;
26697 ds.caller=caller;
26698 ds.locals=locals;
26699 locals[0]=(void**)&a1;
26700 se_dst=&ds;/*link*/
26701 (ds.p=33563396);
26702 {T68*n=new68();
26703 r68make(&ds,n);
26704 (/*SFN*/C->_current_setting/*16*/)=((T0*)n);
26705 }
26706 (ds.p=33563684);
26707 r68copy(&ds,((T68*)ci(68,(/*RF2*/(C)->_current_setting/*16*/),33563652)),a1);
26708 se_dst=caller;/*unlink*/
26709 }
26710
26711 void r16scramble_board(se_dump_stack*caller,T16* C){
26712 T2 _i=0;
26713 T2 _j=0;
26714 T6 _sym2=0;
26715 T6 _sym4=0;
26716 void**locals[4];
26717 static se_frame_descriptor fd={"scramble_board NETWALK",1,4,"%R16%i%E2%j%E2%sym2%E6%sym4%E6%",1};
26718 se_dump_stack ds;
26719 ds.fd=&fd;
26720 ds.current=((void**)&C);
26721 ds.p=33747466;
26722 ds.caller=caller;
26723 ds.locals=locals;
26724 locals[0]=(void**)&_i;
26725 locals[1]=(void**)&_j;
26726 locals[2]=(void**)&_sym2;
26727 locals[3]=(void**)&_sym4;
26728 se_dst=&ds;/*link*/
26729 (ds.p=33748740);
26730 (/*SFN*/C->_best/*124*/)=0;
26731 (ds.p=33749006);
26732 _i=1;
26733 while (!(((ds.p=33749268),(_i)>(r16width(&ds,C)))))
26734 {
26735 (ds.p=33749782);
26736 _j=1;
26737 while (!(((ds.p=33750044),(_j)>(r16height(&ds,C)))))
26738 {
26739 /*[IF*/
26740 if(((ds.p=33750574),(r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33750540))),_i,_j))!=((void*)((/*RF2*/(C)->_server_top/*96*/))))){
26741 (ds.p=33750798);
26742 _sym2=0;
26743 (ds.p=33751054);
26744 _sym4=0;
26745 /*[IF*/
26746 if(((ds.p=33751704),(((r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33751316))),_i,_j))==((void*)((/*RF2*/(C)->_server_bottom/*92*/))))&&((r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33751554)))->_neighbour/*8*/),33751576))),1))==(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33751626)))->_neighbour/*8*/),33751654))),3))))&&((r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33751810)))->_neighbour/*8*/),33751838))),4))==(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33751892)))->_neighbour/*8*/),33751920))),2))))){
26747 (ds.p=33752072);
26748 _sym2=1;
26749 /*[IF*/
26750 if(((ds.p=33752402),(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33752334)))->_neighbour/*8*/),33752356))),1))==(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33752406)))->_neighbour/*8*/),33752434))),2)))){
26751 (ds.p=33752592);
26752 _sym4=1;
26753 }
26754 /*FI]*/
26755 }
26756 else if(((ds.p=33753150),r74is_symmetric(&ds,((T74*)ci(74,r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33753116))),_i,_j),33753128))))){
26757 (ds.p=33753352);
26758 _sym2=1;
26759 }
26760 /*FI]*/
26761 (ds.p=33754136);
26762 r77next(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33754126))));
26763 /*[INSPECT*/
26764 {int z1=((ds.p=33754408),r77last_integer(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33754398))),4));
26765 switch(z1){
26766 case 1:
26767 (ds.p=33754888);
26768 r16rotateccw(&ds,C,_i,_j);
26769 /*[IF*/
26770 if(((ds.p=33755150),r6_ix_not(&ds,_sym4))){
26771 (ds.p=33755408);
26772 (/*SFN*/C->_best/*124*/)=((/*RF2*/(C)->_best/*124*/))+(1);
26773 }
26774 /*FI]*/
26775 break;
26776 case 2:
26777 (ds.p=33756168);
26778 r16rotatecw(&ds,C,_i,_j);
26779 /*[IF*/
26780 if(((ds.p=33756430),r6_ix_not(&ds,_sym4))){
26781 (ds.p=33756688);
26782 (/*SFN*/C->_best/*124*/)=((/*RF2*/(C)->_best/*124*/))+(1);
26783 }
26784 /*FI]*/
26785 break;
26786 case 3:
26787 (ds.p=33757448);
26788 r16rotatecw(&ds,C,_i,_j);
26789 (ds.p=33757704);
26790 r16rotatecw(&ds,C,_i,_j);
26791 /*[IF*/
26792 if(((ds.p=33757966),r6_ix_not(&ds,_sym2))){
26793 (ds.p=33758224);
26794 (/*SFN*/C->_best/*124*/)=((/*RF2*/(C)->_best/*124*/))+(2);
26795 }
26796 /*FI]*/
26797 break;
26798 }
26799 }/*INSPECT]*/
26800 }
26801 /*FI]*/
26802 (ds.p=33759494);
26803 _j=(_j)+(1);
26804 }
26805 (ds.p=33760012);
26806 _i=(_i)+(1);
26807 }
26808 se_dst=caller;/*unlink*/
26809 }
26810
26811 void r16check_connections(se_dump_stack*caller,T16* C){
26812 T0* _check_list=NULL;
26813 T2 _i=0;
26814 T2 _j=0;
26815 T2 _dir=0;
26816 T0* _t=NULL;
26817 T0* _t2=NULL;
26818 void**locals[6];
26819 static se_frame_descriptor fd={"check_connections NETWALK",1,6,"%R16%check_list%R86%i%E2%j%E2%dir%E2%t%R74%t2%R74%",1};
26820 se_dump_stack ds;
26821 ds.fd=&fd;
26822 ds.current=((void**)&C);
26823 ds.p=33692938;
26824 ds.caller=caller;
26825 ds.locals=locals;
26826 locals[0]=(void**)&_check_list;
26827 locals[1]=(void**)&_i;
26828 locals[2]=(void**)&_j;
26829 locals[3]=(void**)&_dir;
26830 locals[4]=(void**)&_t;
26831 locals[5]=(void**)&_t2;
26832 se_dst=&ds;/*link*/
26833 (ds.p=33694734);
26834 _i=1;
26835 while (!(((ds.p=33694996),(_i)>(r16width(&ds,C)))))
26836 {
26837 (ds.p=33695510);
26838 _j=1;
26839 while (!(((ds.p=33695772),(_j)>(r16height(&ds,C)))))
26840 {
26841 (ds.p=33696262);
26842 _t=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33696272))),_i,_j);
26843 /*[IF*/
26844 if(((ds.p=33696528),(_t)!=((void*)(NULL)))){
26845 (ds.p=33696786);
26846 r74disconnect(&ds,((T74*)ci(74,_t,33696782)));
26847 }
26848 /*FI]*/
26849 (ds.p=33697286);
26850 _j=(_j)+(1);
26851 }
26852 (ds.p=33697804);
26853 _i=(_i)+(1);
26854 }
26855 (ds.p=33698564);
26856 {T86*n=new86();
26857 r86make(&ds,n);
26858 _check_list=((T0*)n);
26859 se_i86(&ds,n);}
26860 (ds.p=33698842);
26861 r86add_last(&ds,se_i86(&ds,((T86*)ci(86,_check_list,33698820))),(/*RF2*/(C)->_server_top/*96*/));
26862 (ds.p=33699098);
26863 r86add_last(&ds,se_i86(&ds,((T86*)ci(86,_check_list,33699076))),(/*RF2*/(C)->_server_bottom/*92*/));
26864 (ds.p=33699354);
26865 r74connect(&ds,((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33699332)));
26866 (ds.p=33699616);
26867 r74connect(&ds,((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33699588)));
26868 while (!(((ds.p=33700390),r86is_empty(&ds,se_i86(&ds,((T86*)ci(86,_check_list,33700368)))))))
26869 {
26870 (ds.p=33700876);
26871 _t=r86first(&ds,se_i86(&ds,((T86*)ci(86,_check_list,33700886))));
26872 (ds.p=33701154);
26873 r86remove_first(&ds,se_i86(&ds,((T86*)ci(86,_check_list,33701132))));
26874 (ds.p=33701398);
26875 _dir=1;
26876 while (!(((ds.p=33701664),(_dir)>(4))))
26877 {
26878 /*[IF*/
26879 if(((ds.p=33702180),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33702156)))->_neighbour/*8*/),33702160))),_dir))){
26880 (ds.p=33702414);
26881 _t2=r16get_neighbour(&ds,C,_t,_dir);
26882 /*[IF*/
26883 if(((ds.p=33703002),(((_t2)!=((void*)(NULL)))&&(r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t2,33702928)))->_neighbour/*8*/),33702934))),r16dir_opposite(&ds,C,_dir))))&&(r6_ix_not(&ds,(/*RF2*/(((T74*)ci(74,_t2,33703192)))->_is_connected/*20*/))))){
26884 (ds.p=33703438);
26885 r74connect(&ds,((T74*)ci(74,_t2,33703432)));
26886 (ds.p=33703710);
26887 r86add_last(&ds,se_i86(&ds,((T86*)ci(86,_check_list,33703688))),_t2);
26888 }
26889 /*FI]*/
26890 }
26891 /*FI]*/
26892 (ds.p=33704454);
26893 _dir=(_dir)+(1);
26894 }
26895 }
26896 se_dst=caller;/*unlink*/
26897 }
26898
26899 void r16handle_event(se_dump_stack*caller,T16* C,T0* a1){
26900 void**locals[1];
26901 static se_frame_descriptor fd={"handle_event NETWALK",1,1,"%R16%e%R28%",1};
26902 se_dump_stack ds;
26903 ds.fd=&fd;
26904 ds.current=((void**)&C);
26905 ds.p=33642250;
26906 ds.caller=caller;
26907 ds.locals=locals;
26908 locals[0]=(void**)&a1;
26909 se_dst=&ds;/*link*/
26910 /*[INSPECT*/
26911 {int z1=((ds.p=33642776),(/*RF2*/(((T28*)ci(28,a1,33642772)))->_type/*12*/));
26912 switch(z1){
26913 case 2:
26914 /*[INSPECT*/
26915 {int z2=((ds.p=33643296),(/*RF2*/(((T28*)ci(28,a1,33643292)))->_i1/*16*/));
26916 switch(z2){
26917 case 283:
26918 (ds.p=33643782);
26919 r16new_game(&ds,C);
26920 break;
26921 }
26922 }/*INSPECT]*/
26923 break;
26924 case 5:
26925 (ds.p=33644812);
26926 r16handle_mbdown(&ds,C,a1);
26927 break;
26928 case 12:
26929 (ds.p=33645324);
26930 r16quit(&ds,C);
26931 break;
26932 }
26933 }/*INSPECT]*/
26934 se_dst=caller;/*unlink*/
26935 }
26936
26937 void r16close_current_window(se_dump_stack*caller,T16* C){
26938 static se_frame_descriptor fd={"close_current_window NETWALK",1,0,"%R16%",1};
26939 se_dump_stack ds;
26940 ds.fd=&fd;
26941 ds.current=((void**)&C);
26942 ds.p=33601290;
26943 ds.caller=caller;
26944 ds.locals=NULL;
26945 se_dst=&ds;/*link*/
26946 se_require_uppermost_flag=1;
26947 if(fd.assertion_flag){
26948 fd.assertion_flag=0;
26949 (ds.p=33601826);
26950 ac_req(((/*RF2*/(C)->_current_window/*76*/))!=((void*)(NULL)),NULL);
26951 fd.assertion_flag=1;
26952 }
26953 (ds.p=33602308);
26954 (/*SFN*/C->_current_window/*76*/)=NULL;
26955 se_dst=caller;/*unlink*/
26956 }
26957
26958 void r16new_game(se_dump_stack*caller,T16* C){
26959 static se_frame_descriptor fd={"new_game NETWALK",1,0,"%R16%",1};
26960 se_dump_stack ds;
26961 ds.fd=&fd;
26962 ds.current=((void**)&C);
26963 ds.p=33612554;
26964 ds.caller=caller;
26965 ds.locals=NULL;
26966 se_dst=&ds;/*link*/
26967 (ds.p=33613070);
26968 r77with_seed(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33613060))),(/*RF2*/(C)->_seed/*20*/));
26969 (ds.p=33613316);
26970 {T75*n=new75();
26971 r75make(&ds,n,1,r16width(&ds,C),1,r16height(&ds,C));
26972 (/*SFN*/C->_board/*8*/)=((T0*)n);
26973 se_i75(&ds,n);}
26974 (ds.p=33613572);
26975 r16generate_board(&ds,C);
26976 (ds.p=33613828);
26977 r16preprocess_board(&ds,C);
26978 (ds.p=33614084);
26979 r16reset_score(&ds,C);
26980 (ds.p=33614340);
26981 r16scramble_board(&ds,C);
26982 (ds.p=33614596);
26983 r16update_best_image(&ds,C);
26984 (ds.p=33614852);
26985 r16reset_score(&ds,C);
26986 (ds.p=33615108);
26987 (/*SFN*/C->_game_state/*72*/)=1;
26988 (ds.p=33615364);
26989 (/*SFN*/C->_last_ticks/*68*/)=r16get_ticks(&ds);
26990 (ds.p=33615620);
26991 (/*SFN*/C->_elapsed_seconds/*60*/)=0;
26992 (ds.p=33615876);
26993 r16update_time_image(&ds,C);
26994 (ds.p=33616132);
26995 (/*SFN*/C->_elapsed_ticks/*64*/)=0;
26996 se_dst=caller;/*unlink*/
26997 }
26998
26999 void r16main_loop(se_dump_stack*caller,T16* C){
27000 T0* _e=NULL;
27001 T2 _i=0;
27002 void**locals[2];
27003 static se_frame_descriptor fd={"main_loop NETWALK",1,2,"%R16%e%R28%i%E2%",1};
27004 se_dump_stack ds;
27005 ds.fd=&fd;
27006 ds.current=((void**)&C);
27007 ds.p=33620490;
27008 ds.caller=caller;
27009 ds.locals=locals;
27010 locals[0]=(void**)&_e;
27011 locals[1]=(void**)&_i;
27012 se_dst=&ds;/*link*/
27013 while (!(((ds.p=33622054),((/*RF2*/(C)->_game_state/*72*/))==(3))))
27014 {
27015 (ds.p=33622540);
27016 (/*SFN*/C->_seed/*20*/)=((/*RF2*/(C)->_seed/*20*/))+(1);
27017 (ds.p=33622796);
27018 r16blank_screen(&ds,C);
27019 (ds.p=33623332);
27020 r39do_all(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*56*/),33623308))),agent2(&ds));
27021 (ds.p=33623564);
27022 r16draw_border(&ds,C);
27023 /*[IF*/
27024 if(((ds.p=33623848),((/*RF2*/(C)->_game_state/*72*/))==(1))){
27025 (ds.p=33624070);
27026 _i=r16get_ticks(&ds);
27027 (ds.p=33624326);
27028 (/*SFN*/C->_elapsed_ticks/*64*/)=(((/*RF2*/(C)->_elapsed_ticks/*64*/))+(_i))-((/*RF2*/(C)->_last_ticks/*68*/));
27029 (ds.p=33624582);
27030 (/*SFN*/C->_last_ticks/*68*/)=_i;
27031 (ds.p=33624838);
27032 _i=((/*RF2*/(C)->_elapsed_ticks/*64*/))/(1000);
27033 /*[IF*/
27034 if(((ds.p=33625104),(_i)>((/*RF2*/(C)->_elapsed_seconds/*60*/)))){
27035 (ds.p=33625358);
27036 (/*SFN*/C->_elapsed_seconds/*60*/)=_i;
27037 (ds.p=33625614);
27038 r16update_time_image(&ds,C);
27039 }
27040 /*FI]*/
27041 (ds.p=33626374);
27042 r16draw_board(&ds,C);
27043 (ds.p=33626630);
27044 r16check_connections(&ds,C);
27045 /*[IF*/
27046 if(((ds.p=33626892),r16is_victorious(&ds,C))){
27047 (ds.p=33627150);
27048 (/*SFN*/C->_game_state/*72*/)=2;
27049 (ds.p=33627406);
27050 r16hiscore_check(&ds,C);
27051 }
27052 /*FI]*/
27053 }
27054 /*FI]*/
27055 /*[IF*/
27056 if(((ds.p=33628200),((/*RF2*/(C)->_game_state/*72*/))==(2))){
27057 (ds.p=33628422);
27058 r16draw_board(&ds,C);
27059 (ds.p=33628698);
27060 r50blit(&ds,((T50*)ci(50,r16win_image(&ds,C),33628678)),10,0);
27061 }
27062 /*FI]*/
27063 (ds.p=33629474);
27064 r50blit(&ds,((T50*)ci(50,(/*RF2*/(C)->_best_image/*84*/),33629452)),10,420);
27065 (ds.p=33629730);
27066 r50blit(&ds,((T50*)ci(50,(/*RF2*/(C)->_move_image/*80*/),33629708)),10,440);
27067 (ds.p=33629986);
27068 r50blit(&ds,((T50*)ci(50,(/*RF2*/(C)->_time_image/*88*/),33629964)),10,460);
27069 /*[IF*/
27070 if(((ds.p=33630512),((/*RF2*/(C)->_current_window/*76*/))!=((void*)(NULL)))){
27071 (ds.p=33630756);
27072 X29update(&ds,33630726,(/*RF2*/(C)->_current_window/*76*/));
27073 }
27074 /*FI]*/
27075 (ds.p=33631500);
27076 r16ext_update_screen(&ds);
27077 (ds.p=33631756);
27078 _e=r16poll_event(&ds,C);
27079 /*[IF*/
27080 if(((ds.p=33632022),(_e)!=((void*)(NULL)))){
27081 /*[IF*/
27082 if(((ds.p=33632298),((/*RF2*/(C)->_current_window/*76*/))!=((void*)(NULL)))){
27083 (ds.p=33632556);
27084 X29process_event(&ds,33632526,(/*RF2*/(C)->_current_window/*76*/),_e);
27085 }
27086 else{
27087 (ds.p=33633038);
27088 r16handle_event(&ds,C,_e);
27089 }
27090 /*FI]*/
27091 }
27092 /*FI]*/
27093 }
27094 se_dst=caller;/*unlink*/
27095 }
27096
27097 T6 r16is_surrounded(se_dump_stack*caller,T16* C,T0* a1){
27098 T6 R=0;
27099 T2 _dir=0;
27100 T2 _x=0;
27101 T2 _y=0;
27102 T2 _x1=0;
27103 T2 _y1=0;
27104 T2 _count=0;
27105 void**locals[8];
27106 static se_frame_descriptor fd={"is_surrounded NETWALK",1,8,"%R16%t%R74%Result%E6%dir%E2%x%E2%y%E2%x1%E2%y1%E2%count%E2%",1};
27107 se_dump_stack ds;
27108 ds.fd=&fd;
27109 ds.current=((void**)&C);
27110 ds.p=33772810;
27111 ds.caller=caller;
27112 ds.locals=locals;
27113 locals[0]=(void**)&a1;
27114 locals[1]=(void**)&R;
27115 locals[2]=(void**)&_dir;
27116 locals[3]=(void**)&_x;
27117 locals[4]=(void**)&_y;
27118 locals[5]=(void**)&_x1;
27119 locals[6]=(void**)&_y1;
27120 locals[7]=(void**)&_count;
27121 se_dst=&ds;/*link*/
27122 (ds.p=33774596);
27123 R=1;
27124 (ds.p=33774862);
27125 _dir=1;
27126 while (!(((ds.p=33775128),(_dir)>(4))))
27127 {
27128 /*[IF*/
27129 if(((ds.p=33775658),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,a1,33775634)))->_neighbour/*8*/),33775638))),_dir))){
27130 (ds.p=33775878);
27131 _count=(_count)+(1);
27132 }
27133 /*FI]*/
27134 (ds.p=33776396);
27135 _y1=0;
27136 /*[IF*/
27137 if(((ds.p=33776666),(_dir)==(1))){
27138 (ds.p=33776902);
27139 _y1=-(1);
27140 }
27141 else if(((ds.p=33777186),(_dir)==(3))){
27142 (ds.p=33777414);
27143 _y1=1;
27144 }
27145 /*FI]*/
27146 (ds.p=33778188);
27147 _x1=0;
27148 /*[IF*/
27149 if(((ds.p=33778458),(_dir)==(4))){
27150 (ds.p=33778694);
27151 _x1=-(1);
27152 }
27153 else if(((ds.p=33778978),(_dir)==(2))){
27154 (ds.p=33779206);
27155 _x1=1;
27156 }
27157 /*FI]*/
27158 (ds.p=33779980);
27159 _x=r16maybe_wrapx(&ds,C,((/*RF2*/(((T74*)ci(74,a1,33780014)))->_x/*16*/))+(_x1));
27160 (ds.p=33780236);
27161 _y=r16maybe_wrapy(&ds,C,((/*RF2*/(((T74*)ci(74,a1,33780270)))->_y/*12*/))+(_y1));
27162 /*[IF*/
27163 if(((ds.p=33780754),r16on_board(&ds,C,_x,_y))){
27164 /*[IF*/
27165 if(((ds.p=33781038),(r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33781004))),_x,_y))==((void*)(NULL)))){
27166 /*[IF*/
27167 if(((ds.p=33781272),(a1)==((void*)((/*RF2*/(C)->_server_top/*96*/))))){
27168 /*[IF*/
27169 if(((ds.p=33781550),((_dir)!=(4))&&((_dir)!=(2)))){
27170 (ds.p=33781776);
27171 R=0;
27172 }
27173 /*FI]*/
27174 }
27175 else{
27176 (ds.p=33782536);
27177 R=0;
27178 }
27179 /*FI]*/
27180 }
27181 /*FI]*/
27182 }
27183 /*FI]*/
27184 (ds.p=33783564);
27185 _dir=(_dir)+(1);
27186 }
27187 /*[IF*/
27188 if(((ds.p=33784086),(_count)>=(3))){
27189 (ds.p=33784332);
27190 R=1;
27191 }
27192 /*FI]*/
27193 se_dst=caller;/*unlink*/
27194 return R;
27195 }
27196
27197 void r16options_ok(se_dump_stack*caller,T16* C){
27198 static se_frame_descriptor fd={"options_ok NETWALK",1,0,"%R16%",1};
27199 se_dump_stack ds;
27200 ds.fd=&fd;
27201 ds.current=((void**)&C);
27202 ds.p=33608458;
27203 ds.caller=caller;
27204 ds.locals=NULL;
27205 se_dst=&ds;/*link*/
27206 se_require_uppermost_flag=1;
27207 if(fd.assertion_flag){
27208 fd.assertion_flag=0;
27209 (ds.p=33608994);
27210 ac_req(((/*RF2*/(C)->_current_window/*76*/))==((void*)((/*RF2*/(C)->_options_window/*44*/))),NULL);
27211 fd.assertion_flag=1;
27212 }
27213 (ds.p=33609476);
27214 (/*SFN*/C->_current_window/*76*/)=NULL;
27215 (ds.p=33609762);
27216 r117update_setting(&ds,((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33609732)));
27217 /*[IF*/
27218 if(((ds.p=33610024),((/*RF2*/(C)->_current_preset/*12*/))!=((void*)((/*RF2*/(((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33610030)))->_preset/*53*/))))){
27219 (ds.p=33610252);
27220 (/*SFN*/C->_current_preset/*12*/)=(/*RF2*/(((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33610288)))->_preset/*53*/);
27221 (ds.p=33610508);
27222 r16use_setting(&ds,C,(/*RF2*/(((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33610532)))->_setting/*49*/));
27223 (ds.p=33610764);
27224 r16new_game(&ds,C);
27225 }
27226 else if(((ds.p=33611026),r6_ix_not(&ds,r68is_equal(&ds,((T68*)ci(68,(/*RF2*/(C)->_current_setting/*16*/),33611034)),(/*RF2*/(((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33611084)))->_setting/*49*/))))){
27227 (ds.p=33611276);
27228 r16use_setting(&ds,C,(/*RF2*/(((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33611300)))->_setting/*49*/));
27229 (ds.p=33611532);
27230 r16new_game(&ds,C);
27231 }
27232 /*FI]*/
27233 se_dst=caller;/*unlink*/
27234 }
27235
27236 T0* r16config(se_dump_stack*caller){
27237 if(fBC17config==0){fBC17config=1;{
27238 void**locals[1];
27239 static se_frame_descriptor fd={"config CONFIG",0,1,"Result%R54%",1};
27240 se_dump_stack ds;
27241 ds.fd=&fd;
27242 ds.current=NULL;
27243 ds.p=35652362;
27244 ds.caller=caller;
27245 ds.locals=locals;
27246 locals[0]=(void**)&oBC17config;
27247 se_dst=&ds;/*link*/
27248 (ds.p=35652868);
27249 {T54*n=new54();
27250 oBC17config=((T0*)n);
27251 r54make(&ds,n);
27252 }
27253 se_dst=caller;/*unlink*/
27254 }}
27255 return oBC17config;
27256 }
27257
27258 T6 r16is_equal(se_dump_stack*caller,T16* C,T0* a1){
27259 T6 R=0;
27260 void**locals[2];
27261 static se_frame_descriptor fd={"is_equal GENERAL",1,2,"%R16%other%R16%Result%E6%",1};
27262 se_dump_stack ds;
27263 ds.fd=&fd;
27264 ds.current=((void**)&C);
27265 ds.p=2120968;
27266 ds.caller=caller;
27267 ds.locals=locals;
27268 locals[0]=(void**)&a1;
27269 locals[1]=(void**)&R;
27270 se_dst=&ds;/*link*/
27271 se_require_uppermost_flag=1;
27272 if(fd.assertion_flag){
27273 fd.assertion_flag=0;
27274 (ds.p=2122048);
27275 ac_req((a1)!=((void*)(NULL)),"other_not_void");
27276 fd.assertion_flag=1;
27277 }
27278 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
27279 fd.assertion_flag=0;
27280 (ds.p=2122846);
27281 ac_ens((!(r16standard_is_equal(&ds,C,a1)))||(R),"consistent");
27282 (ds.p=2123064);
27283 ac_ens((!(R))||(r16is_equal(&ds,((T16*)ci(16,a1,2123080)),(T0*)C)),"symmetric");
27284 fd.assertion_flag=1;
27285 }
27286 se_dst=caller;/*unlink*/
27287 return R;
27288 }
27289
27290 T2 r16maybe_wrapx(se_dump_stack*caller,T16* C,T2 a1){
27291 T2 R=0;
27292 void**locals[2];
27293 static se_frame_descriptor fd={"maybe_wrapx NETWALK",1,2,"%R16%i%E2%Result%E2%",1};
27294 se_dump_stack ds;
27295 ds.fd=&fd;
27296 ds.current=((void**)&C);
27297 ds.p=33711370;
27298 ds.caller=caller;
27299 ds.locals=locals;
27300 locals[0]=(void**)&a1;
27301 locals[1]=(void**)&R;
27302 se_dst=&ds;/*link*/
27303 (ds.p=33711876);
27304 R=a1;
27305 /*[IF*/
27306 if(((ds.p=33712138),r16allow_wrap(&ds,C))){
27307 /*[IF*/
27308 if(((ds.p=33712406),(a1)<(1))){
27309 (ds.p=33712646);
27310 R=(a1)+(r16width(&ds,C));
27311 }
27312 else if(((ds.p=33712926),(a1)>(r16width(&ds,C)))){
27313 (ds.p=33713158);
27314 R=(a1)-(r16width(&ds,C));
27315 }
27316 /*FI]*/
27317 }
27318 /*FI]*/
27319 se_dst=caller;/*unlink*/
27320 return R;
27321 }
27322
27323 void r16draw_board(se_dump_stack*caller,T16* C){
27324 T2 _i=0;
27325 T2 _j=0;
27326 void**locals[2];
27327 static se_frame_descriptor fd={"draw_board NETWALK",1,2,"%R16%i%E2%j%E2%",1};
27328 se_dump_stack ds;
27329 ds.fd=&fd;
27330 ds.current=((void**)&C);
27331 ds.p=33681418;
27332 ds.caller=caller;
27333 ds.locals=locals;
27334 locals[0]=(void**)&_i;
27335 locals[1]=(void**)&_j;
27336 se_dst=&ds;/*link*/
27337 (ds.p=33682446);
27338 _i=1;
27339 while (!(((ds.p=33682708),(_i)>(r16width(&ds,C)))))
27340 {
27341 (ds.p=33683222);
27342 _j=1;
27343 while (!(((ds.p=33683484),(_j)>(r16height(&ds,C)))))
27344 {
27345 (ds.p=33683974);
27346 r16draw_tile(&ds,C,r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33683994))),_i,_j));
27347 (ds.p=33684230);
27348 _j=(_j)+(1);
27349 }
27350 (ds.p=33684748);
27351 _i=(_i)+(1);
27352 }
27353 se_dst=caller;/*unlink*/
27354 }
27355
27356 void r16handle_mbdown(se_dump_stack*caller,T16* C,T0* a1){
27357 T2 _i=0;
27358 T2 _j=0;
27359 T0* _it=NULL;
27360 void**locals[4];
27361 static se_frame_descriptor fd={"handle_mbdown NETWALK",1,4,"%R16%e%R28%i%E2%j%E2%it%R32%",1};
27362 se_dump_stack ds;
27363 ds.fd=&fd;
27364 ds.current=((void**)&C);
27365 ds.p=33646602;
27366 ds.caller=caller;
27367 ds.locals=locals;
27368 locals[0]=(void**)&a1;
27369 locals[1]=(void**)&_i;
27370 locals[2]=(void**)&_j;
27371 locals[3]=(void**)&_it;
27372 se_dst=&ds;/*link*/
27373 (ds.p=33647876);
27374 _it=r39get_new_iterator(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*56*/),33647888))));
27375 (ds.p=33648148);
27376 r41start(&ds,((T41*)ci(41,_it,33648142)));
27377 while (!(((ds.p=33648406),r41is_off(&ds,((T41*)ci(41,_it,33648400))))))
27378 {
27379 /*[IF*/
27380 if(((ds.p=33648930),X30contains(&ds,33648920,r41item(&ds,((T41*)ci(41,_it,33648914))),(/*RF2*/(((T28*)ci(28,a1,33648948)))->_x/*8*/),(/*RF2*/(((T28*)ci(28,a1,33648958)))->_y/*4*/)))){
27381 (ds.p=33649174);
27382 X30process_event(&ds,33649164,r41item(&ds,((T41*)ci(41,_it,33649158))),a1);
27383 }
27384 /*FI]*/
27385 (ds.p=33649682);
27386 r41next(&ds,((T41*)ci(41,_it,33649676)));
27387 }
27388 /*[IF*/
27389 if(((ds.p=33650208),((/*RF2*/(C)->_game_state/*72*/))==(1))){
27390 (ds.p=33650444);
27391 _i=((/*RF2*/(((T28*)ci(28,a1,33650454)))->_x/*8*/))/(32);
27392 (ds.p=33650700);
27393 _j=((/*RF2*/(((T28*)ci(28,a1,33650710)))->_y/*4*/))/(32);
27394 /*[IF*/
27395 if(((ds.p=33650962),r16on_board(&ds,C,_i,_j))){
27396 /*[IF*/
27397 if(((ds.p=33651222),((/*RF2*/(((T28*)ci(28,a1,33651212)))->_i1/*16*/))==(1))){
27398 (ds.p=33651470);
27399 r16rotateccw(&ds,C,_i,_j);
27400 }
27401 else{
27402 (ds.p=33651982);
27403 r16rotatecw(&ds,C,_i,_j);
27404 }
27405 /*FI]*/
27406 }
27407 /*FI]*/
27408 }
27409 /*FI]*/
27410 se_dst=caller;/*unlink*/
27411 }
27412
27413 T2 r16maybe_wrapy(se_dump_stack*caller,T16* C,T2 a1){
27414 T2 R=0;
27415 void**locals[2];
27416 static se_frame_descriptor fd={"maybe_wrapy NETWALK",1,2,"%R16%i%E2%Result%E2%",1};
27417 se_dump_stack ds;
27418 ds.fd=&fd;
27419 ds.current=((void**)&C);
27420 ds.p=33714442;
27421 ds.caller=caller;
27422 ds.locals=locals;
27423 locals[0]=(void**)&a1;
27424 locals[1]=(void**)&R;
27425 se_dst=&ds;/*link*/
27426 (ds.p=33714948);
27427 R=a1;
27428 /*[IF*/
27429 if(((ds.p=33715210),r16allow_wrap(&ds,C))){
27430 /*[IF*/
27431 if(((ds.p=33715478),(a1)<(1))){
27432 (ds.p=33715718);
27433 R=(a1)+(r16height(&ds,C));
27434 }
27435 else if(((ds.p=33715998),(a1)>(r16height(&ds,C)))){
27436 (ds.p=33716230);
27437 R=(a1)-(r16height(&ds,C));
27438 }
27439 /*FI]*/
27440 }
27441 /*FI]*/
27442 se_dst=caller;/*unlink*/
27443 return R;
27444 }
27445
27446 void r16draw_tile(se_dump_stack*caller,T16* C,T0* a1){
27447 T2 _x=0;
27448 T2 _y=0;
27449 T0* _c=NULL;
27450 T0* _c2=NULL;
27451 void**locals[5];
27452 static se_frame_descriptor fd={"draw_tile NETWALK",1,5,"%R16%tile%R74%x%E2%y%E2%c%R51%c2%R51%",1};
27453 se_dump_stack ds;
27454 ds.fd=&fd;
27455 ds.current=((void**)&C);
27456 ds.p=33726218;
27457 ds.caller=caller;
27458 ds.locals=locals;
27459 locals[0]=(void**)&a1;
27460 locals[1]=(void**)&_x;
27461 locals[2]=(void**)&_y;
27462 locals[3]=(void**)&_c;
27463 locals[4]=(void**)&_c2;
27464 se_dst=&ds;/*link*/
27465 /*[IF*/
27466 if(((ds.p=33727764),(a1)!=((void*)(NULL)))){
27467 (ds.p=33728012);
27468 _x=((/*RF2*/(((T74*)ci(74,a1,33728022)))->_x/*16*/))*(32);
27469 (ds.p=33728268);
27470 _y=((/*RF2*/(((T74*)ci(74,a1,33728278)))->_y/*12*/))*(32);
27471 /*[IF*/
27472 if(((ds.p=33728540),(/*RF2*/(((T74*)ci(74,a1,33728530)))->_is_connected/*20*/))){
27473 (ds.p=33728774);
27474 _c=(/*RF2*/(C)->_connected_pipe_color/*100*/);
27475 (ds.p=33729030);
27476 _c2=(/*RF2*/(C)->_connected_terminal_color/*108*/);
27477 }
27478 else{
27479 (ds.p=33729542);
27480 _c=(/*RF2*/(C)->_disconnected_pipe_color/*104*/);
27481 (ds.p=33729798);
27482 _c2=(/*RF2*/(C)->_disconnected_terminal_color/*112*/);
27483 }
27484 /*FI]*/
27485 /*[IF*/
27486 if(((ds.p=33730608),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,a1,33730578)))->_neighbour/*8*/),33730588))),1))){
27487 (ds.p=33730822);
27488 r16fill_rect(&ds,C,(_x)+(13),_y,6,19,_c);
27489 }
27490 /*FI]*/
27491 /*[IF*/
27492 if(((ds.p=33731376),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,a1,33731346)))->_neighbour/*8*/),33731356))),4))){
27493 (ds.p=33731590);
27494 r16fill_rect(&ds,C,_x,(_y)+(13),19,6,_c);
27495 }
27496 /*FI]*/
27497 /*[IF*/
27498 if(((ds.p=33732144),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,a1,33732114)))->_neighbour/*8*/),33732124))),2))){
27499 (ds.p=33732358);
27500 r16fill_rect(&ds,C,(_x)+(13),(_y)+(13),19,6,_c);
27501 }
27502 /*FI]*/
27503 /*[IF*/
27504 if(((ds.p=33732912),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,a1,33732882)))->_neighbour/*8*/),33732892))),3))){
27505 (ds.p=33733126);
27506 r16fill_rect(&ds,C,(_x)+(13),(_y)+(13),6,19,_c);
27507 }
27508 /*FI]*/
27509 /*[INSPECT*/
27510 {int z1=((ds.p=33733926),(/*RF2*/(((T74*)ci(74,a1,33733916)))->_type/*4*/));
27511 switch(z1){
27512 case 1:
27513 (ds.p=33734406);
27514 r16fill_rect(&ds,C,(_x)+(7),(_y)+(7),(32)-(12),(32)-(6),r16blue(&ds));
27515 break;
27516 case 2:
27517 (ds.p=33734918);
27518 r16fill_rect(&ds,C,(_x)+(7),_y,(32)-(12),(32)-(6),r16blue(&ds));
27519 break;
27520 case 4:
27521 (ds.p=33735430);
27522 r16fill_rect(&ds,C,(_x)+(8),(_y)+(8),16,16,_c2);
27523 break;
27524 }
27525 }/*INSPECT]*/
27526 }
27527 /*FI]*/
27528 se_dst=caller;/*unlink*/
27529 }
27530
27531 T6 r16is_victorious(se_dump_stack*caller,T16* C){
27532 T6 R=0;
27533 T2 _i=0;
27534 T2 _j=0;
27535 T0* _t=NULL;
27536 void**locals[4];
27537 static se_frame_descriptor fd={"is_victorious NETWALK",1,4,"%R16%Result%E6%i%E2%j%E2%t%R74%",1};
27538 se_dump_stack ds;
27539 ds.fd=&fd;
27540 ds.current=((void**)&C);
27541 ds.p=33705738;
27542 ds.caller=caller;
27543 ds.locals=locals;
27544 locals[0]=(void**)&R;
27545 locals[1]=(void**)&_i;
27546 locals[2]=(void**)&_j;
27547 locals[3]=(void**)&_t;
27548 se_dst=&ds;/*link*/
27549 (ds.p=33707012);
27550 R=1;
27551 (ds.p=33707278);
27552 _i=1;
27553 while (!(((ds.p=33707556),((_i)>(r16width(&ds,C)))||(r6_ix_not(&ds,R)))))
27554 {
27555 (ds.p=33708054);
27556 _j=1;
27557 while (!(((ds.p=33708334),((_j)>(r16height(&ds,C)))||(r6_ix_not(&ds,R)))))
27558 {
27559 (ds.p=33708806);
27560 _t=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33708816))),_i,_j);
27561 /*[IF*/
27562 if(((ds.p=33709088),((_t)!=((void*)(NULL)))&&(r6_ix_not(&ds,(/*RF2*/(((T74*)ci(74,_t,33709114)))->_is_connected/*20*/))))){
27563 (ds.p=33709326);
27564 R=0;
27565 }
27566 /*FI]*/
27567 (ds.p=33709830);
27568 _j=(_j)+(1);
27569 }
27570 (ds.p=33710348);
27571 _i=(_i)+(1);
27572 }
27573 se_dst=caller;/*unlink*/
27574 return R;
27575 }
27576
27577 void r16blank_screen(se_dump_stack*caller,T16* C){
27578 static se_frame_descriptor fd={"blank_screen NETWALK",1,0,"%R16%",1};
27579 se_dump_stack ds;
27580 ds.fd=&fd;
27581 ds.current=((void**)&C);
27582 ds.p=33794314;
27583 ds.caller=caller;
27584 ds.locals=NULL;
27585 se_dst=&ds;/*link*/
27586 (ds.p=33794820);
27587 r16fill_rect(&ds,C,0,0,640,480,r16black(&ds));
27588 se_dst=caller;/*unlink*/
27589 }
27590
27591 void r16add_widget(se_dump_stack*caller,T16* C,T0* a1,T2 a2,T2 a3){
27592 void**locals[3];
27593 static se_frame_descriptor fd={"add_widget NETWALK",1,3,"%R16%w%R30%x%E2%y%E2%",1};
27594 se_dump_stack ds;
27595 ds.fd=&fd;
27596 ds.current=((void**)&C);
27597 ds.p=33574410;
27598 ds.caller=caller;
27599 ds.locals=locals;
27600 locals[0]=(void**)&a1;
27601 locals[1]=(void**)&a2;
27602 locals[2]=(void**)&a3;
27603 se_dst=&ds;/*link*/
27604 (ds.p=33574940);
27605 r39add_last(&ds,se_i39(&ds,((T39*)ci(39,(/*RF2*/(C)->_widget_list/*56*/),33574916))),a1);
27606 (ds.p=33575176);
27607 X30put_xy(&ds,33575172,a1,a2,a3);
27608 se_dst=caller;/*unlink*/
27609 }
27610
27611 void r16show_hs(se_dump_stack*caller,T16* C){
27612 static se_frame_descriptor fd={"show_hs NETWALK",1,0,"%R16%",1};
27613 se_dump_stack ds;
27614 ds.fd=&fd;
27615 ds.current=((void**)&C);
27616 ds.p=33603082;
27617 ds.caller=caller;
27618 ds.locals=NULL;
27619 se_dst=&ds;/*link*/
27620 se_require_uppermost_flag=1;
27621 if(fd.assertion_flag){
27622 fd.assertion_flag=0;
27623 (ds.p=33603618);
27624 ac_req(((/*RF2*/(C)->_current_window/*76*/))==((void*)(NULL)),NULL);
27625 fd.assertion_flag=1;
27626 }
27627 (ds.p=33604100);
27628 (/*SFN*/C->_current_window/*76*/)=(/*RF2*/(C)->_hs_window/*52*/);
27629 se_dst=caller;/*unlink*/
27630 }
27631
27632 void r16make_hs_window(se_dump_stack*caller,T16* C){
27633 T0* _c=NULL;
27634 void**locals[1];
27635 static se_frame_descriptor fd={"make_hs_window NETWALK",1,1,"%R16%c%R25%",1};
27636 se_dump_stack ds;
27637 ds.fd=&fd;
27638 ds.current=((void**)&C);
27639 ds.p=33598474;
27640 ds.caller=caller;
27641 ds.locals=locals;
27642 locals[0]=(void**)&_c;
27643 se_dst=&ds;/*link*/
27644 (ds.p=33599492);
27645 {T99*n=new99();
27646 r99make(&ds,n);
27647 (/*SFN*/C->_hs_window/*52*/)=((T0*)n);
27648 }
27649 (ds.p=33599748);
27650 {T112*n=new112();
27651 r112make(&ds,n,(T0*)C);
27652 _c=((T0*)n);
27653 }
27654 (ds.p=33600024);
27655 r99put_command(&ds,((T99*)ci(99,(/*RF2*/(C)->_hs_window/*52*/),33600004)),_c,1);
27656 (ds.p=33600280);
27657 r99put_xy(&ds,((T99*)ci(99,(/*RF2*/(C)->_hs_window/*52*/),33600260)),200,100);
27658 (ds.p=33600536);
27659 r99init_scores(&ds,((T99*)ci(99,(/*RF2*/(C)->_hs_window/*52*/),33600516)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33600560)))->_preset_list/*8*/));
27660 se_dst=caller;/*unlink*/
27661 }
27662
27663 void r16update_best_image(se_dump_stack*caller,T16* C){
27664 static se_frame_descriptor fd={"update_best_image NETWALK",1,0,"%R16%",1};
27665 se_dump_stack ds;
27666 ds.fd=&fd;
27667 ds.current=((void**)&C);
27668 ds.p=33658122;
27669 ds.caller=caller;
27670 ds.locals=NULL;
27671 se_dst=&ds;/*link*/
27672 (ds.p=33658650);
27673 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_best_image/*84*/),33658628)));
27674 (ds.p=33658906);
27675 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_best_image/*84*/),33658884)),r7_px_43(&ds,se_ms(5,"par: "),r2to_string(&ds,(/*RF2*/(C)->_best/*124*/))),r16mainfont(&ds,C),r16white(&ds));
27676 se_dst=caller;/*unlink*/
27677 }
27678 T0*oBC18darkpurple=NULL;
27679 int fBC18darkpurple=0;
27680
27681 T0* r16darkpurple(se_dump_stack*caller){
27682 if(fBC18darkpurple==0){fBC18darkpurple=1;{
27683 void**locals[1];
27684 static se_frame_descriptor fd={"darkpurple COLOR_TABLE",0,1,"Result%R51%",1};
27685 se_dump_stack ds;
27686 ds.fd=&fd;
27687 ds.current=NULL;
27688 ds.p=37763594;
27689 ds.caller=caller;
27690 ds.locals=locals;
27691 locals[0]=(void**)&oBC18darkpurple;
27692 se_dst=&ds;/*link*/
27693 (ds.p=37764100);
27694 {T51*n=new51();
27695 oBC18darkpurple=((T0*)n);
27696 r51make(&ds,n,127,0,127);
27697 }
27698 se_dst=caller;/*unlink*/
27699 }}
27700 return oBC18darkpurple;
27701 }
27702
27703 void r16options(se_dump_stack*caller,T16* C){
27704 static se_frame_descriptor fd={"options NETWALK",1,0,"%R16%",1};
27705 se_dump_stack ds;
27706 ds.fd=&fd;
27707 ds.current=((void**)&C);
27708 ds.p=33616906;
27709 ds.caller=caller;
27710 ds.locals=NULL;
27711 se_dst=&ds;/*link*/
27712 (ds.p=33617412);
27713 (/*SFN*/C->_current_window/*76*/)=(/*RF2*/(C)->_options_window/*44*/);
27714 (ds.p=33617698);
27715 r117put_info(&ds,((T117*)ci(117,(/*RF2*/(C)->_options_window/*44*/),33617668)),(/*RF2*/(C)->_current_preset/*12*/),(/*RF2*/(C)->_current_setting/*16*/));
27716 se_dst=caller;/*unlink*/
27717 }
27718
27719 void r16try_extend(se_dump_stack*caller,T16* C,T0* a1,T2 a2){
27720 T2 _x=0;
27721 T2 _y=0;
27722 T2 _x1=0;
27723 T2 _y1=0;
27724 T0* _t2=NULL;
27725 T2 _i=0;
27726 void**locals[8];
27727 static se_frame_descriptor fd={"try_extend NETWALK",1,8,"%R16%t%R74%dir%E2%x%E2%y%E2%x1%E2%y1%E2%t2%R74%i%E2%",1};
27728 se_dump_stack ds;
27729 ds.fd=&fd;
27730 ds.current=((void**)&C);
27731 ds.p=33761034;
27732 ds.caller=caller;
27733 ds.locals=locals;
27734 locals[0]=(void**)&a1;
27735 locals[1]=(void**)&a2;
27736 locals[2]=(void**)&_x;
27737 locals[3]=(void**)&_y;
27738 locals[4]=(void**)&_x1;
27739 locals[5]=(void**)&_y1;
27740 locals[6]=(void**)&_t2;
27741 locals[7]=(void**)&_i;
27742 se_dst=&ds;/*link*/
27743 /*[IF*/
27744 if(((ds.p=33762834),(a2)==(1))){
27745 (ds.p=33763084);
27746 _y1=-(1);
27747 }
27748 else if(((ds.p=33763354),(a2)==(3))){
27749 (ds.p=33763596);
27750 _y1=1;
27751 }
27752 /*FI]*/
27753 /*[IF*/
27754 if(((ds.p=33764370),(a2)==(4))){
27755 (ds.p=33764620);
27756 _x1=-(1);
27757 }
27758 else if(((ds.p=33764890),(a2)==(2))){
27759 (ds.p=33765132);
27760 _x1=1;
27761 }
27762 /*FI]*/
27763 (ds.p=33765892);
27764 _x=r16maybe_wrapx(&ds,C,((/*RF2*/(((T74*)ci(74,a1,33765926)))->_x/*16*/))+(_x1));
27765 (ds.p=33766148);
27766 _y=r16maybe_wrapy(&ds,C,((/*RF2*/(((T74*)ci(74,a1,33766182)))->_y/*12*/))+(_y1));
27767 /*[IF*/
27768 if(((ds.p=33766666),r16on_board(&ds,C,_x,_y))){
27769 (ds.p=33766924);
27770 _t2=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33766936))),_x,_y);
27771 /*[IF*/
27772 if(((ds.p=33767216),((a1)==((void*)((/*RF2*/(C)->_server_top/*96*/))))&&(((a2)==(4))||((a2)==(2))))){
27773 }
27774 else if(((ds.p=33767456),(_t2)!=((void*)(NULL)))){
27775 }
27776 else{
27777 (ds.p=33767942);
27778 {T74*n=new74();
27779 r74make(&ds,n);
27780 _t2=((T0*)n);
27781 }
27782 (ds.p=33768198);
27783 r16place_tile(&ds,C,_t2,_x,_y);
27784 (ds.p=33768478);
27785 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,a1,33768454)))->_neighbour/*8*/),33768458))),1,a2);
27786 (ds.p=33768736);
27787 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t2,33768710)))->_neighbour/*8*/),33768716))),1,r16dir_opposite(&ds,C,a2));
27788 (ds.p=33768986);
27789 r86add_last(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33768966))),_t2);
27790 (ds.p=33769488);
27791 _i=1;
27792 while (!(((ds.p=33769750),(_i)>((/*RF2*/(se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33769754))))->_upper/*4*/)))))
27793 {
27794 /*[IF*/
27795 if(((ds.p=33770260),r16is_surrounded(&ds,C,r86_px_64(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33770288))),_i)))){
27796 (ds.p=33770524);
27797 r86remove(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33770504))),_i);
27798 }
27799 else{
27800 (ds.p=33771016);
27801 _i=(_i)+(1);
27802 }
27803 /*FI]*/
27804 }
27805 }
27806 /*FI]*/
27807 }
27808 /*FI]*/
27809 se_dst=caller;/*unlink*/
27810 }
27811
27812 T2 r16servertopi(se_dump_stack*caller,T16* C){
27813 T2 R=0;
27814 void**locals[1];
27815 static se_frame_descriptor fd={"servertopi NETWALK",1,1,"%R16%Result%E2%",1};
27816 se_dump_stack ds;
27817 ds.fd=&fd;
27818 ds.current=((void**)&C);
27819 ds.p=33564426;
27820 ds.caller=caller;
27821 ds.locals=locals;
27822 locals[0]=(void**)&R;
27823 se_dst=&ds;/*link*/
27824 (ds.p=33564932);
27825 R=(r16width(&ds,C))/(2);
27826 se_dst=caller;/*unlink*/
27827 return R;
27828 }
27829
27830 T2 r16servertopj(se_dump_stack*caller,T16* C){
27831 T2 R=0;
27832 void**locals[1];
27833 static se_frame_descriptor fd={"servertopj NETWALK",1,1,"%R16%Result%E2%",1};
27834 se_dump_stack ds;
27835 ds.fd=&fd;
27836 ds.current=((void**)&C);
27837 ds.p=33565450;
27838 ds.caller=caller;
27839 ds.locals=locals;
27840 locals[0]=(void**)&R;
27841 se_dst=&ds;/*link*/
27842 (ds.p=33565956);
27843 R=((r16height(&ds,C))/(2))+(1);
27844 se_dst=caller;/*unlink*/
27845 return R;
27846 }
27847
27848 void r16make(se_dump_stack*caller,T16* C){
27849 T0* _c=NULL;
27850 T22 _time={0};
27851 void**locals[2];
27852 static se_frame_descriptor fd={"make NETWALK",1,2,"%R16%c%R25%time%E22%",1};
27853 se_dump_stack ds;
27854 ds.fd=&fd;
27855 ds.current=((void**)&C);
27856 ds.p=33576970;
27857 ds.caller=caller;
27858 ds.locals=locals;
27859 locals[0]=(void**)&_c;
27860 locals[1]=(void**)&_time;
27861 se_dst=&ds;/*link*/
27862 (ds.p=33578244);
27863 {T39*n=new39();
27864 r39make(&ds,n);
27865 (/*SFN*/C->_widget_list/*56*/)=((T0*)n);
27866 se_i39(&ds,n);}
27867 (ds.p=33578510);
27868 r22update(&ds,&_time);
27869 (ds.p=33578756);
27870 (/*SFN*/C->_seed/*20*/)=(((r22hour(&ds,&_time))*(3600))+((r22minute(&ds,&_time))*(60)))+(r22second(&ds,&_time));
27871 (ds.p=33579012);
27872 {T77*n=new77();
27873 r77with_seed(&ds,n,(/*RF2*/(C)->_seed/*20*/));
27874 (/*SFN*/C->_rand/*120*/)=((T0*)n);
27875 se_i77(&ds,n);}
27876 (ds.p=33579268);
27877 r16ext_init(&ds);
27878 (ds.p=33579524);
27879 (/*SFN*/C->_connected_pipe_color/*100*/)=r16green(&ds);
27880 (ds.p=33579780);
27881 (/*SFN*/C->_disconnected_pipe_color/*104*/)=r16darkred(&ds);
27882 (ds.p=33580036);
27883 (/*SFN*/C->_connected_terminal_color/*108*/)=r16cyan(&ds);
27884 (ds.p=33580292);
27885 (/*SFN*/C->_disconnected_terminal_color/*112*/)=r16darkpurple(&ds);
27886 (ds.p=33580548);
27887 (/*SFN*/C->_current_preset/*12*/)=r54get_preset(&ds,((T54*)ci(54,r16config(&ds),33580584)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33580620)))->_default_preset/*28*/));
27888 (ds.p=33580804);
27889 r16use_setting(&ds,C,(/*RF2*/(((T65*)ci(65,(/*RF2*/(C)->_current_preset/*12*/),33580828)))->_setting/*8*/));
27890 (ds.p=33581060);
27891 {T50*n=new50();
27892 r50make(&ds,n);
27893 (/*SFN*/C->_move_image/*80*/)=((T0*)n);
27894 }
27895 (ds.p=33581338);
27896 r50new_dummy(&ds,((T50*)ci(50,(/*RF2*/(C)->_move_image/*80*/),33581316)));
27897 (ds.p=33581828);
27898 {T50*n=new50();
27899 r50make(&ds,n);
27900 (/*SFN*/C->_best_image/*84*/)=((T0*)n);
27901 }
27902 (ds.p=33582106);
27903 r50new_dummy(&ds,((T50*)ci(50,(/*RF2*/(C)->_best_image/*84*/),33582084)));
27904 (ds.p=33582596);
27905 {T50*n=new50();
27906 r50make(&ds,n);
27907 (/*SFN*/C->_time_image/*88*/)=((T0*)n);
27908 }
27909 (ds.p=33582874);
27910 r50new_dummy(&ds,((T50*)ci(50,(/*RF2*/(C)->_time_image/*88*/),33582852)));
27911 (ds.p=33583364);
27912 {T113*n=new113();
27913 r113make(&ds,n,((T0*)se_ms(8,"New Game")));
27914 (/*SFN*/C->_new_game_button/*28*/)=((T0*)n);
27915 }
27916 (ds.p=33583652);
27917 r113put_size(&ds,((T113*)ci(113,(/*RF2*/(C)->_new_game_button/*28*/),33583620)),80,20);
27918 (ds.p=33583876);
27919 {T138*n=new138();
27920 r138make(&ds,n,(T0*)C);
27921 _c=((T0*)n);
27922 }
27923 (ds.p=33584164);
27924 r113put_command(&ds,((T113*)ci(113,(/*RF2*/(C)->_new_game_button/*28*/),33584132)),_c,1);
27925 (ds.p=33584388);
27926 r16add_widget(&ds,C,(/*RF2*/(C)->_new_game_button/*28*/),550,20);
27927 (ds.p=33584900);
27928 {T113*n=new113();
27929 r113make(&ds,n,((T0*)se_ms(7,"Options")));
27930 (/*SFN*/C->_options_button/*32*/)=((T0*)n);
27931 }
27932 (ds.p=33585186);
27933 r113put_size(&ds,((T113*)ci(113,(/*RF2*/(C)->_options_button/*32*/),33585156)),80,20);
27934 (ds.p=33585412);
27935 {T137*n=new137();
27936 r137make(&ds,n,(T0*)C);
27937 _c=((T0*)n);
27938 }
27939 (ds.p=33585698);
27940 r113put_command(&ds,((T113*)ci(113,(/*RF2*/(C)->_options_button/*32*/),33585668)),_c,1);
27941 (ds.p=33585924);
27942 r16add_widget(&ds,C,(/*RF2*/(C)->_options_button/*32*/),550,60);
27943 (ds.p=33586436);
27944 {T113*n=new113();
27945 r113make(&ds,n,((T0*)se_ms(11,"High Scores")));
27946 (/*SFN*/C->_hs_button/*36*/)=((T0*)n);
27947 }
27948 (ds.p=33586712);
27949 r113put_size(&ds,((T113*)ci(113,(/*RF2*/(C)->_hs_button/*36*/),33586692)),80,20);
27950 (ds.p=33586948);
27951 {T136*n=new136();
27952 r136make(&ds,n,(T0*)C);
27953 _c=((T0*)n);
27954 }
27955 (ds.p=33587224);
27956 r113put_command(&ds,((T113*)ci(113,(/*RF2*/(C)->_hs_button/*36*/),33587204)),_c,1);
27957 (ds.p=33587460);
27958 r16add_widget(&ds,C,(/*RF2*/(C)->_hs_button/*36*/),550,100);
27959 (ds.p=33587972);
27960 {T113*n=new113();
27961 r113make(&ds,n,((T0*)se_ms(4,"Quit")));
27962 (/*SFN*/C->_quit_button/*40*/)=((T0*)n);
27963 }
27964 (ds.p=33588252);
27965 r113put_size(&ds,((T113*)ci(113,(/*RF2*/(C)->_quit_button/*40*/),33588228)),80,20);
27966 (ds.p=33588484);
27967 {T135*n=new135();
27968 r135make(&ds,n,(T0*)C);
27969 _c=((T0*)n);
27970 }
27971 (ds.p=33588764);
27972 r113put_command(&ds,((T113*)ci(113,(/*RF2*/(C)->_quit_button/*40*/),33588740)),_c,1);
27973 (ds.p=33588996);
27974 r16add_widget(&ds,C,(/*RF2*/(C)->_quit_button/*40*/),550,140);
27975 (ds.p=33589508);
27976 {T130*n=new130();
27977 r130make(&ds,n);
27978 (/*SFN*/C->_io_score/*4*/)=((T0*)n);
27979 }
27980 (ds.p=33589782);
27981 r130load(&ds,((T130*)ci(130,(/*RF2*/(C)->_io_score/*4*/),33589764)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33589792)))->_score_file/*4*/));
27982 (ds.p=33590038);
27983 r130into_preset_list(&ds,((T130*)ci(130,(/*RF2*/(C)->_io_score/*4*/),33590020)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33590072)))->_preset_list/*8*/));
27984 (ds.p=33590532);
27985 r16make_options_window(&ds,C);
27986 (ds.p=33590788);
27987 r16make_newhs_window(&ds,C);
27988 (ds.p=33591044);
27989 r16make_hs_window(&ds,C);
27990 (ds.p=33591556);
27991 r16new_game(&ds,C);
27992 (ds.p=33591812);
27993 r16main_loop(&ds,C);
27994 se_dst=caller;/*unlink*/
27995 }
27996
27997 void r16fill_rect(se_dump_stack*caller,T16* C,T2 a1,T2 a2,T2 a3,T2 a4,T0* a5){
27998 void**locals[5];
27999 static se_frame_descriptor fd={"fill_rect NETWALK",1,5,"%R16%x%E2%y%E2%w%E2%h%E2%c%R51%",1};
28000 se_dump_stack ds;
28001 ds.fd=&fd;
28002 ds.current=((void**)&C);
28003 ds.p=33792778;
28004 ds.caller=caller;
28005 ds.locals=locals;
28006 locals[0]=(void**)&a1;
28007 locals[1]=(void**)&a2;
28008 locals[2]=(void**)&a3;
28009 locals[3]=(void**)&a4;
28010 locals[4]=(void**)&a5;
28011 se_dst=&ds;/*link*/
28012 (ds.p=33793540);
28013 r16ext_fill_rect(&ds,a1,a2,a3,a4,(/*RF2*/(((T51*)ci(51,a5,33793592)))->_to_integer/*4*/));
28014 se_dst=caller;/*unlink*/
28015 }
28016
28017 void r16rotatecw(se_dump_stack*caller,T16* C,T2 a1,T2 a2){
28018 T0* _t=NULL;
28019 T2 _dir=0;
28020 T6 _bak=0;
28021 void**locals[5];
28022 static se_frame_descriptor fd={"rotatecw NETWALK",1,5,"%R16%i%E2%j%E2%t%R74%dir%E2%bak%E6%",1};
28023 se_dump_stack ds;
28024 ds.fd=&fd;
28025 ds.current=((void**)&C);
28026 ds.p=33661194;
28027 ds.caller=caller;
28028 ds.locals=locals;
28029 locals[0]=(void**)&a1;
28030 locals[1]=(void**)&a2;
28031 locals[2]=(void**)&_t;
28032 locals[3]=(void**)&_dir;
28033 locals[4]=(void**)&_bak;
28034 se_dst=&ds;/*link*/
28035 (ds.p=33662724);
28036 _t=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33662734))),a1,a2);
28037 /*[IF*/
28038 if(((ds.p=33662990),(_t)!=((void*)(NULL)))){
28039 /*[IF*/
28040 if(((ds.p=33663280),((_t)==((void*)((/*RF2*/(C)->_server_top/*96*/))))||((_t)==((void*)((/*RF2*/(C)->_server_bottom/*92*/)))))){
28041 (ds.p=33663494);
28042 _bak=r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33663508)))->_neighbour/*8*/),33663530))),1);
28043 (ds.p=33663792);
28044 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33663750)))->_neighbour/*8*/),33663772))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33663800)))->_neighbour/*8*/),33663828))),4),1);
28045 (ds.p=33664054);
28046 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33664006)))->_neighbour/*8*/),33664034))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33664062)))->_neighbour/*8*/),33664090))),3),4);
28047 (ds.p=33664310);
28048 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33664262)))->_neighbour/*8*/),33664290))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33664318)))->_neighbour/*8*/),33664346))),2),3);
28049 (ds.p=33664566);
28050 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33664518)))->_neighbour/*8*/),33664546))),_bak,2);
28051 }
28052 else{
28053 (ds.p=33665030);
28054 _bak=r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33665044)))->_neighbour/*8*/),33665048))),4);
28055 (ds.p=33665296);
28056 _dir=4;
28057 while (!(((ds.p=33665562),(_dir)==(1))))
28058 {
28059 (ds.p=33666086);
28060 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33666062)))->_neighbour/*8*/),33666066))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33666094)))->_neighbour/*8*/),33666098))),(_dir)-(1)),_dir);
28061 (ds.p=33666318);
28062 _dir=(_dir)-(1);
28063 }
28064 (ds.p=33666846);
28065 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33666822)))->_neighbour/*8*/),33666826))),_bak,_dir);
28066 }
28067 /*FI]*/
28068 (ds.p=33667340);
28069 r16tally_move(&ds,C);
28070 }
28071 /*FI]*/
28072 se_dst=caller;/*unlink*/
28073 }
28074
28075 void r16ext_init(se_dump_stack*caller){
28076 static se_frame_descriptor fd={"ext_init NETWALK",0,0,"",1};
28077 se_dump_stack ds;
28078 ds.fd=&fd;
28079 ds.current=NULL;
28080 ds.p=33788682;
28081 ds.caller=caller;
28082 ds.locals=NULL;
28083 se_dst=&ds;/*link*/
28084 /*[ from line 916 of ./netwalk.e:*/
28085 (ds.p=33788956);
28086 ext_init();
28087 /* from line 916 of ./netwalk.e]*/
28088 se_dst=caller;/*unlink*/
28089 }
28090
28091 T0* r16ext_poll_event(se_dump_stack*caller,int a1){
28092 T0* R=NULL;
28093 void**locals[2];
28094 static se_frame_descriptor fd={"ext_poll_event NETWALK",0,2,"em%E89%Result%R28%",1};
28095 se_dump_stack ds;
28096 ds.fd=&fd;
28097 ds.current=NULL;
28098 ds.p=33789706;
28099 ds.caller=caller;
28100 ds.locals=locals;
28101 locals[0]=(void**)&a1;
28102 locals[1]=(void**)&R;
28103 se_dst=&ds;/*link*/
28104 /*[ from line 920 of ./netwalk.e:*/
28105 (ds.p=33789980);
28106 R=(ext_poll_event(a1));
28107 /* from line 920 of ./netwalk.e]*/
28108 se_dst=caller;/*unlink*/
28109 return R;
28110 }
28111
28112 T6 r16standard_is_equal(se_dump_stack*caller,T16* C,T0* a1){
28113 T6 R=0;
28114 void**locals[2];
28115 static se_frame_descriptor fd={"standard_is_equal GENERAL",1,2,"%R16%other%R16%Result%E6%",1};
28116 se_dump_stack ds;
28117 ds.fd=&fd;
28118 ds.current=((void**)&C);
28119 ds.p=2128406;
28120 ds.caller=caller;
28121 ds.locals=locals;
28122 locals[0]=(void**)&a1;
28123 locals[1]=(void**)&R;
28124 se_dst=&ds;/*link*/
28125 se_require_uppermost_flag=1;
28126 if(fd.assertion_flag){
28127 fd.assertion_flag=0;
28128 (ds.p=2129184);
28129 ac_req((a1)!=((void*)(NULL)),NULL);
28130 fd.assertion_flag=1;
28131 }
28132 R=((C->id==a1->id)?!memcmp(C,a1,sizeof(*C)):0);if(fd.assertion_flag){
28133 fd.assertion_flag=0;
28134 (ds.p=2129976);
28135 ac_ens((!(R))||(r16standard_is_equal(&ds,((T16*)ci(16,a1,2129992)),(T0*)C)),"symmetric");
28136 fd.assertion_flag=1;
28137 }
28138 se_dst=caller;/*unlink*/
28139 return R;
28140 }
28141
28142 T2 r16get_ticks(se_dump_stack*caller){
28143 T2 R=0;
28144 void**locals[1];
28145 static se_frame_descriptor fd={"get_ticks NETWALK",0,1,"Result%E2%",1};
28146 se_dump_stack ds;
28147 ds.fd=&fd;
28148 ds.current=NULL;
28149 ds.p=33790730;
28150 ds.caller=caller;
28151 ds.locals=locals;
28152 locals[0]=(void**)&R;
28153 se_dst=&ds;/*link*/
28154 /*[ from line 924 of ./netwalk.e:*/
28155 (ds.p=33791004);
28156 R=(ext_get_ticks());
28157 /* from line 924 of ./netwalk.e]*/
28158 se_dst=caller;/*unlink*/
28159 return R;
28160 }
28161
28162 void r16ext_fill_rect(se_dump_stack*caller,T2 a1,T2 a2,T2 a3,T2 a4,T2 a5){
28163 void**locals[5];
28164 static se_frame_descriptor fd={"ext_fill_rect NETWALK",0,5,"x%E2%y%E2%w%E2%h%E2%c%E2%",1};
28165 se_dump_stack ds;
28166 ds.fd=&fd;
28167 ds.current=NULL;
28168 ds.p=33737226;
28169 ds.caller=caller;
28170 ds.locals=locals;
28171 locals[0]=(void**)&a1;
28172 locals[1]=(void**)&a2;
28173 locals[2]=(void**)&a3;
28174 locals[3]=(void**)&a4;
28175 locals[4]=(void**)&a5;
28176 se_dst=&ds;/*link*/
28177 /*[ from line 715 of ./netwalk.e:*/
28178 (ds.p=33737500);
28179 ext_fill_rect(a1,a2,a3,a4,a5);
28180 /* from line 715 of ./netwalk.e]*/
28181 se_dst=caller;/*unlink*/
28182 }
28183
28184 void r16place_tile(se_dump_stack*caller,T16* C,T0* a1,T2 a2,T2 a3){
28185 void**locals[3];
28186 static se_frame_descriptor fd={"place_tile NETWALK",1,3,"%R16%tile%R74%x%E2%y%E2%",1};
28187 se_dump_stack ds;
28188 ds.fd=&fd;
28189 ds.current=((void**)&C);
28190 ds.p=33785354;
28191 ds.caller=caller;
28192 ds.locals=locals;
28193 locals[0]=(void**)&a1;
28194 locals[1]=(void**)&a2;
28195 locals[2]=(void**)&a3;
28196 se_dst=&ds;/*link*/
28197 (ds.p=33785870);
28198 r74put_xy(&ds,((T74*)ci(74,a1,33785860)),a2,a3);
28199 (ds.p=33786128);
28200 r75put(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33786116))),a1,a2,a3);
28201 se_dst=caller;/*unlink*/
28202 }
28203
28204 T0* r16mainfont(se_dump_stack*caller,T16* C){
28205 T0* R=NULL;
28206 void**locals[1];
28207 static se_frame_descriptor fd={"mainfont NETWALK",1,1,"%R16%Result%R53%",1};
28208 se_dump_stack ds;
28209 ds.fd=&fd;
28210 ds.current=((void**)&C);
28211 ds.p=33568010;
28212 ds.caller=caller;
28213 ds.locals=locals;
28214 locals[0]=(void**)&R;
28215 se_dst=&ds;/*link*/
28216 (ds.p=33568516);
28217 R=(/*RF2*/(((T54*)ci(54,r16config(&ds),33568536)))->_mainfont/*20*/);
28218 se_dst=caller;/*unlink*/
28219 return R;
28220 }
28221
28222 T2 r16dir_opposite(se_dump_stack*caller,T16* C,T2 a1){
28223 T2 R=0;
28224 void**locals[2];
28225 static se_frame_descriptor fd={"dir_opposite DIR_CONSTANT",1,2,"%R16%dir%E2%Result%E2%",1};
28226 se_dump_stack ds;
28227 ds.fd=&fd;
28228 ds.current=((void**)&C);
28229 ds.p=41945098;
28230 ds.caller=caller;
28231 ds.locals=locals;
28232 locals[0]=(void**)&a1;
28233 locals[1]=(void**)&R;
28234 se_dst=&ds;/*link*/
28235 /*[INSPECT*/
28236 {int z1=((ds.p=41945620),a1);
28237 switch(z1){
28238 case 1:
28239 (ds.p=41946124);
28240 R=3;
28241 break;
28242 case 3:
28243 (ds.p=41946636);
28244 R=1;
28245 break;
28246 case 4:
28247 (ds.p=41947148);
28248 R=2;
28249 break;
28250 case 2:
28251 (ds.p=41947660);
28252 R=4;
28253 break;
28254 default:;
28255 error1("Invalid inspect (nothing selected).",41945604);
28256 }
28257 }/*INSPECT]*/
28258 se_dst=caller;/*unlink*/
28259 return R;
28260 }
28261
28262 void r16generate_board(se_dump_stack*caller,T16* C){
28263 T2 _i=0;
28264 T0* _t=NULL;
28265 void**locals[2];
28266 static se_frame_descriptor fd={"generate_board NETWALK",1,2,"%R16%i%E2%t%R74%",1};
28267 se_dump_stack ds;
28268 ds.fd=&fd;
28269 ds.current=((void**)&C);
28270 ds.p=33739786;
28271 ds.caller=caller;
28272 ds.locals=locals;
28273 locals[0]=(void**)&_i;
28274 locals[1]=(void**)&_t;
28275 se_dst=&ds;/*link*/
28276 (ds.p=33741316);
28277 {T74*n=new74();
28278 r74make_server_bottom(&ds,n);
28279 (/*SFN*/C->_server_bottom/*92*/)=((T0*)n);
28280 }
28281 (ds.p=33741572);
28282 r16place_tile(&ds,C,(/*RF2*/(C)->_server_bottom/*92*/),r16servertopi(&ds,C),(r16servertopj(&ds,C))+(1));
28283 (ds.p=33741828);
28284 {T74*n=new74();
28285 r74make_server_top(&ds,n);
28286 (/*SFN*/C->_server_top/*96*/)=((T0*)n);
28287 }
28288 (ds.p=33742084);
28289 r16place_tile(&ds,C,(/*RF2*/(C)->_server_top/*96*/),r16servertopi(&ds,C),r16servertopj(&ds,C));
28290 (ds.p=33742852);
28291 {T86*n=new86();
28292 r86make(&ds,n);
28293 (/*SFN*/C->_open_list/*116*/)=((T0*)n);
28294 se_i86(&ds,n);}
28295 (ds.p=33743128);
28296 r86add_last(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33743108))),(/*RF2*/(C)->_server_top/*96*/));
28297 (ds.p=33743384);
28298 r86add_last(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33743364))),(/*RF2*/(C)->_server_bottom/*92*/));
28299 while (!(((ds.p=33744164),r86is_empty(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33744144)))))))
28300 {
28301 (ds.p=33744662);
28302 r77next(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33744652))));
28303 (ds.p=33744908);
28304 _i=r77last_integer(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33744918))),r86count(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33744954)))));
28305 (ds.p=33745164);
28306 _t=r86_px_64(&ds,se_i86(&ds,((T86*)ci(86,(/*RF2*/(C)->_open_list/*116*/),33745174))),_i);
28307 (ds.p=33745430);
28308 r77next(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33745420))));
28309 (ds.p=33745676);
28310 _i=r77last_integer(&ds,se_i77(&ds,((T77*)ci(77,(/*RF2*/(C)->_rand/*120*/),33745686))),4);
28311 (ds.p=33745932);
28312 r16try_extend(&ds,C,_t,_i);
28313 }
28314 se_dst=caller;/*unlink*/
28315 }
28316
28317 T0* r16green(se_dump_stack*caller){
28318 if(fBC18green==0){fBC18green=1;{
28319 void**locals[1];
28320 static se_frame_descriptor fd={"green COLOR_TABLE",0,1,"Result%R51%",1};
28321 se_dump_stack ds;
28322 ds.fd=&fd;
28323 ds.current=NULL;
28324 ds.p=37761034;
28325 ds.caller=caller;
28326 ds.locals=locals;
28327 locals[0]=(void**)&oBC18green;
28328 se_dst=&ds;/*link*/
28329 (ds.p=37761540);
28330 {T51*n=new51();
28331 oBC18green=((T0*)n);
28332 r51make(&ds,n,0,255,0);
28333 }
28334 se_dst=caller;/*unlink*/
28335 }}
28336 return oBC18green;
28337 }
28338
28339 T2 r16height(se_dump_stack*caller,T16* C){
28340 T2 R=0;
28341 void**locals[1];
28342 static se_frame_descriptor fd={"height NETWALK",1,1,"%R16%Result%E2%",1};
28343 se_dump_stack ds;
28344 ds.fd=&fd;
28345 ds.current=((void**)&C);
28346 ds.p=33559562;
28347 ds.caller=caller;
28348 ds.locals=locals;
28349 locals[0]=(void**)&R;
28350 se_dst=&ds;/*link*/
28351 (ds.p=33560068);
28352 R=(/*RF2*/(((T68*)ci(68,(/*RF2*/(C)->_current_setting/*16*/),33560088)))->_height/*8*/);
28353 se_dst=caller;/*unlink*/
28354 return R;
28355 }
28356
28357 T0* r16get_neighbour(se_dump_stack*caller,T16* C,T0* a1,T2 a2){
28358 T0* R=NULL;
28359 T2 _x=0;
28360 T2 _y=0;
28361 T2 _x1=0;
28362 T2 _y1=0;
28363 void**locals[7];
28364 static se_frame_descriptor fd={"get_neighbour NETWALK",1,7,"%R16%t%R74%dir%E2%Result%R74%x%E2%y%E2%x1%E2%y1%E2%",1};
28365 se_dump_stack ds;
28366 ds.fd=&fd;
28367 ds.current=((void**)&C);
28368 ds.p=33717514;
28369 ds.caller=caller;
28370 ds.locals=locals;
28371 locals[0]=(void**)&a1;
28372 locals[1]=(void**)&a2;
28373 locals[2]=(void**)&R;
28374 locals[3]=(void**)&_x;
28375 locals[4]=(void**)&_y;
28376 locals[5]=(void**)&_x1;
28377 locals[6]=(void**)&_y1;
28378 se_dst=&ds;/*link*/
28379 /*[IF*/
28380 if(((ds.p=33718802),(a2)==(1))){
28381 (ds.p=33719052);
28382 _y1=-(1);
28383 }
28384 else if(((ds.p=33719322),(a2)==(3))){
28385 (ds.p=33719564);
28386 _y1=1;
28387 }
28388 /*FI]*/
28389 /*[IF*/
28390 if(((ds.p=33720338),(a2)==(4))){
28391 (ds.p=33720588);
28392 _x1=-(1);
28393 }
28394 else if(((ds.p=33720858),(a2)==(2))){
28395 (ds.p=33721100);
28396 _x1=1;
28397 }
28398 /*FI]*/
28399 (ds.p=33721604);
28400 _x=r16maybe_wrapx(&ds,C,((/*RF2*/(((T74*)ci(74,a1,33721638)))->_x/*16*/))+(_x1));
28401 (ds.p=33721860);
28402 _y=r16maybe_wrapy(&ds,C,((/*RF2*/(((T74*)ci(74,a1,33721894)))->_y/*12*/))+(_y1));
28403 /*[IF*/
28404 if(((ds.p=33722122),r16on_board(&ds,C,_x,_y))){
28405 (ds.p=33722380);
28406 R=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33722400))),_x,_y);
28407 }
28408 /*FI]*/
28409 se_dst=caller;/*unlink*/
28410 return R;
28411 }
28412
28413 void r16quit(se_dump_stack*caller,T16* C){
28414 static se_frame_descriptor fd={"quit NETWALK",1,0,"%R16%",1};
28415 se_dump_stack ds;
28416 ds.fd=&fd;
28417 ds.current=((void**)&C);
28418 ds.p=33640970;
28419 ds.caller=caller;
28420 ds.locals=NULL;
28421 se_dst=&ds;/*link*/
28422 (ds.p=33641476);
28423 (/*SFN*/C->_game_state/*72*/)=3;
28424 se_dst=caller;/*unlink*/
28425 }
28426
28427 void r16ext_update_screen(se_dump_stack*caller){
28428 static se_frame_descriptor fd={"ext_update_screen NETWALK",0,0,"",1};
28429 se_dump_stack ds;
28430 ds.fd=&fd;
28431 ds.current=NULL;
28432 ds.p=33791754;
28433 ds.caller=caller;
28434 ds.locals=NULL;
28435 se_dst=&ds;/*link*/
28436 /*[ from line 928 of ./netwalk.e:*/
28437 (ds.p=33792028);
28438 ext_update_screen();
28439 /* from line 928 of ./netwalk.e]*/
28440 se_dst=caller;/*unlink*/
28441 }
28442
28443 void r16rotateccw(se_dump_stack*caller,T16* C,T2 a1,T2 a2){
28444 T0* _t=NULL;
28445 T2 _dir=0;
28446 T6 _bak=0;
28447 void**locals[5];
28448 static se_frame_descriptor fd={"rotateccw NETWALK",1,5,"%R16%i%E2%j%E2%t%R74%dir%E2%bak%E6%",1};
28449 se_dump_stack ds;
28450 ds.fd=&fd;
28451 ds.current=((void**)&C);
28452 ds.p=33668362;
28453 ds.caller=caller;
28454 ds.locals=locals;
28455 locals[0]=(void**)&a1;
28456 locals[1]=(void**)&a2;
28457 locals[2]=(void**)&_t;
28458 locals[3]=(void**)&_dir;
28459 locals[4]=(void**)&_bak;
28460 se_dst=&ds;/*link*/
28461 (ds.p=33669892);
28462 _t=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33669902))),a1,a2);
28463 /*[IF*/
28464 if(((ds.p=33670158),(_t)!=((void*)(NULL)))){
28465 /*[IF*/
28466 if(((ds.p=33670448),((_t)==((void*)((/*RF2*/(C)->_server_top/*96*/))))||((_t)==((void*)((/*RF2*/(C)->_server_bottom/*92*/)))))){
28467 (ds.p=33670662);
28468 _bak=r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33670676)))->_neighbour/*8*/),33670698))),1);
28469 (ds.p=33670960);
28470 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_top/*96*/),33670918)))->_neighbour/*8*/),33670940))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33670968)))->_neighbour/*8*/),33670996))),2),1);
28471 (ds.p=33671222);
28472 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33671174)))->_neighbour/*8*/),33671202))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33671230)))->_neighbour/*8*/),33671258))),3),2);
28473 (ds.p=33671478);
28474 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33671430)))->_neighbour/*8*/),33671458))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33671486)))->_neighbour/*8*/),33671514))),4),3);
28475 (ds.p=33671734);
28476 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,(/*RF2*/(C)->_server_bottom/*92*/),33671686)))->_neighbour/*8*/),33671714))),_bak,4);
28477 }
28478 else{
28479 (ds.p=33672198);
28480 _bak=r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33672212)))->_neighbour/*8*/),33672216))),1);
28481 (ds.p=33672464);
28482 _dir=1;
28483 while (!(((ds.p=33672730),(_dir)==(4))))
28484 {
28485 (ds.p=33673254);
28486 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33673230)))->_neighbour/*8*/),33673234))),r80item(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33673262)))->_neighbour/*8*/),33673266))),(_dir)+(1)),_dir);
28487 (ds.p=33673486);
28488 _dir=(_dir)+(1);
28489 }
28490 (ds.p=33674014);
28491 r80put(&ds,se_i80(&ds,((T80*)ci(80,(/*RF2*/(((T74*)ci(74,_t,33673990)))->_neighbour/*8*/),33673994))),_bak,_dir);
28492 }
28493 /*FI]*/
28494 (ds.p=33674508);
28495 r16tally_move(&ds,C);
28496 }
28497 /*FI]*/
28498 se_dst=caller;/*unlink*/
28499 }
28500
28501 void r16preprocess_board(se_dump_stack*caller,T16* C){
28502 T2 _i=0;
28503 T2 _j=0;
28504 T0* _t=NULL;
28505 void**locals[3];
28506 static se_frame_descriptor fd={"preprocess_board NETWALK",1,3,"%R16%i%E2%j%E2%t%R74%",1};
28507 se_dump_stack ds;
28508 ds.fd=&fd;
28509 ds.current=((void**)&C);
28510 ds.p=33676042;
28511 ds.caller=caller;
28512 ds.locals=locals;
28513 locals[0]=(void**)&_i;
28514 locals[1]=(void**)&_j;
28515 locals[2]=(void**)&_t;
28516 se_dst=&ds;/*link*/
28517 (ds.p=33677326);
28518 _i=1;
28519 while (!(((ds.p=33677588),(_i)>(r16width(&ds,C)))))
28520 {
28521 (ds.p=33678102);
28522 _j=1;
28523 while (!(((ds.p=33678364),(_j)>(r16height(&ds,C)))))
28524 {
28525 (ds.p=33678854);
28526 _t=r75item(&ds,se_i75(&ds,((T75*)ci(75,(/*RF2*/(C)->_board/*8*/),33678864))),_i,_j);
28527 /*[IF*/
28528 if(((ds.p=33679120),(_t)!=((void*)(NULL)))){
28529 (ds.p=33679378);
28530 r74count_neighbours(&ds,((T74*)ci(74,_t,33679374)));
28531 }
28532 /*FI]*/
28533 (ds.p=33679878);
28534 _j=(_j)+(1);
28535 }
28536 (ds.p=33680396);
28537 _i=(_i)+(1);
28538 }
28539 se_dst=caller;/*unlink*/
28540 }
28541
28542 void r16update_time_image(se_dump_stack*caller,T16* C){
28543 static se_frame_descriptor fd={"update_time_image NETWALK",1,0,"%R16%",1};
28544 se_dump_stack ds;
28545 ds.fd=&fd;
28546 ds.current=((void**)&C);
28547 ds.p=33659658;
28548 ds.caller=caller;
28549 ds.locals=NULL;
28550 se_dst=&ds;/*link*/
28551 (ds.p=33660186);
28552 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_time_image/*88*/),33660164)));
28553 (ds.p=33660442);
28554 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_time_image/*88*/),33660420)),r7_px_43(&ds,se_ms(6,"time: "),r2to_string(&ds,(/*RF2*/(C)->_elapsed_seconds/*60*/))),r16mainfont(&ds,C),r16white(&ds));
28555 se_dst=caller;/*unlink*/
28556 }
28557
28558 void r16draw_border(se_dump_stack*caller,T16* C){
28559 T2 _i=0;
28560 void**locals[1];
28561 static se_frame_descriptor fd={"draw_border NETWALK",1,1,"%R16%i%E2%",1};
28562 se_dump_stack ds;
28563 ds.fd=&fd;
28564 ds.current=((void**)&C);
28565 ds.p=33685770;
28566 ds.caller=caller;
28567 ds.locals=locals;
28568 locals[0]=(void**)&_i;
28569 se_dst=&ds;/*link*/
28570 (ds.p=33686798);
28571 _i=1;
28572 while (!(((ds.p=33687060),(_i)>((r16width(&ds,C))+(1)))))
28573 {
28574 (ds.p=33687564);
28575 r16fill_rect(&ds,C,(_i)*(32),32,1,(r16height(&ds,C))*(32),r16blue(&ds));
28576 (ds.p=33687820);
28577 _i=(_i)+(1);
28578 }
28579 (ds.p=33688590);
28580 _i=1;
28581 while (!(((ds.p=33688852),(_i)>((r16height(&ds,C))+(1)))))
28582 {
28583 (ds.p=33689356);
28584 r16fill_rect(&ds,C,32,(_i)*(32),(r16width(&ds,C))*(32),1,r16blue(&ds));
28585 (ds.p=33689612);
28586 _i=(_i)+(1);
28587 }
28588 se_dst=caller;/*unlink*/
28589 }
28590 T0*oBC18darkred=NULL;
28591 int fBC18darkred=0;
28592
28593 T0* r16darkred(se_dump_stack*caller){
28594 if(fBC18darkred==0){fBC18darkred=1;{
28595 void**locals[1];
28596 static se_frame_descriptor fd={"darkred COLOR_TABLE",0,1,"Result%R51%",1};
28597 se_dump_stack ds;
28598 ds.fd=&fd;
28599 ds.current=NULL;
28600 ds.p=37753354;
28601 ds.caller=caller;
28602 ds.locals=locals;
28603 locals[0]=(void**)&oBC18darkred;
28604 se_dst=&ds;/*link*/
28605 (ds.p=37753860);
28606 {T51*n=new51();
28607 oBC18darkred=((T0*)n);
28608 r51make(&ds,n,127,0,0);
28609 }
28610 se_dst=caller;/*unlink*/
28611 }}
28612 return oBC18darkred;
28613 }
28614
28615 void r16newhs_ok(se_dump_stack*caller,T16* C){
28616 T0* _s=NULL;
28617 void**locals[1];
28618 static se_frame_descriptor fd={"newhs_ok NETWALK",1,1,"%R16%s%R7%",1};
28619 se_dump_stack ds;
28620 ds.fd=&fd;
28621 ds.current=((void**)&C);
28622 ds.p=33604874;
28623 ds.caller=caller;
28624 ds.locals=locals;
28625 locals[0]=(void**)&_s;
28626 se_dst=&ds;/*link*/
28627 se_require_uppermost_flag=1;
28628 if(fd.assertion_flag){
28629 fd.assertion_flag=0;
28630 (ds.p=33605410);
28631 ac_req(((/*RF2*/(C)->_current_window/*76*/))==((void*)((/*RF2*/(C)->_newhs_window/*48*/))),NULL);
28632 fd.assertion_flag=1;
28633 }
28634 (ds.p=33606404);
28635 (/*SFN*/C->_current_window/*76*/)=NULL;
28636 (ds.p=33606660);
28637 _s=(/*RF2*/(((T98*)ci(98,(/*RF2*/(((T97*)ci(97,(/*RF2*/(C)->_newhs_window/*48*/),33606670)))->_name_tb/*33*/),33606696)))->_string/*33*/);
28638 (ds.p=33606962);
28639 r96put_name(&ds,((T96*)ci(96,(/*RF2*/(((T65*)ci(65,(/*RF2*/(C)->_current_preset/*12*/),33606916)))->_hiscore/*12*/),33606946)),_s);
28640 (ds.p=33607192);
28641 r99update_score(&ds,((T99*)ci(99,(/*RF2*/(C)->_hs_window/*52*/),33607172)),(/*RF2*/(C)->_current_preset/*12*/));
28642 (ds.p=33607446);
28643 r130from_preset_list(&ds,((T130*)ci(130,(/*RF2*/(C)->_io_score/*4*/),33607428)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33607480)))->_preset_list/*8*/));
28644 (ds.p=33607702);
28645 r130save(&ds,((T130*)ci(130,(/*RF2*/(C)->_io_score/*4*/),33607684)),(/*RF2*/(((T54*)ci(54,r16config(&ds),33607712)))->_score_file/*4*/));
28646 se_dst=caller;/*unlink*/
28647 }
28648
28649 T0* r16twin(se_dump_stack*caller,T16* C){
28650 T0* R=NULL;
28651 void**locals[1];
28652 static se_frame_descriptor fd={"twin GENERAL",1,1,"%R16%Result%R16%",1};
28653 se_dump_stack ds;
28654 ds.fd=&fd;
28655 ds.current=((void**)&C);
28656 ds.p=2140182;
28657 ds.caller=caller;
28658 ds.locals=locals;
28659 locals[0]=(void**)&R;
28660 se_dst=&ds;/*link*/
28661 R=((void*)new16());
28662 *((T16*)R)=*C;
28663 if(fd.assertion_flag){
28664 fd.assertion_flag=0;
28665 (ds.p=2142256);
28666 ac_ens(r16is_equal(&ds,((T16*)ci(16,R,2142242)),(T0*)C),"equal");
28667 fd.assertion_flag=1;
28668 }
28669 se_dst=caller;/*unlink*/
28670 return R;
28671 }
28672
28673 void r16hiscore_check(se_dump_stack*caller,T16* C){
28674 T6 _newhi=0;
28675 T2 _score=0;
28676 T0* _hiscore=NULL;
28677 void**locals[3];
28678 static se_frame_descriptor fd={"hiscore_check NETWALK",1,3,"%R16%newhi%E6%score%E2%hiscore%R96%",1};
28679 se_dump_stack ds;
28680 ds.fd=&fd;
28681 ds.current=((void**)&C);
28682 ds.p=33634570;
28683 ds.caller=caller;
28684 ds.locals=locals;
28685 locals[0]=(void**)&_newhi;
28686 locals[1]=(void**)&_score;
28687 locals[2]=(void**)&_hiscore;
28688 se_dst=&ds;/*link*/
28689 (ds.p=33636100);
28690 _score=((/*RF2*/(C)->_move_count/*24*/))-((/*RF2*/(C)->_best/*124*/));
28691 /*[IF*/
28692 if(((ds.p=33636392),((/*RF2*/(C)->_current_preset/*12*/))!=((void*)(NULL)))){
28693 (ds.p=33636620);
28694 _hiscore=(/*RF2*/(((T65*)ci(65,(/*RF2*/(C)->_current_preset/*12*/),33636642)))->_hiscore/*12*/);
28695 /*[IF*/
28696 if(((ds.p=33636898),(_hiscore)==((void*)(NULL)))){
28697 (ds.p=33637126);
28698 _newhi=1;
28699 }
28700 else if(((ds.p=33637428),((/*RF2*/(((T96*)ci(96,_hiscore,33637402)))->_time/*12*/))>((/*RF2*/(C)->_elapsed_seconds/*60*/)))){
28701 (ds.p=33637638);
28702 _newhi=1;
28703 }
28704 else if(((ds.p=33637976),(((/*RF2*/(((T96*)ci(96,_hiscore,33637914)))->_time/*12*/))==((/*RF2*/(C)->_elapsed_seconds/*60*/)))&&(((/*RF2*/(((T96*)ci(96,_hiscore,33637994)))->_score/*8*/))>(_score)))){
28705 (ds.p=33638150);
28706 _newhi=1;
28707 }
28708 /*FI]*/
28709 /*[IF*/
28710 if(_newhi){
28711 (ds.p=33638918);
28712 {T96*n=new96();
28713 r96make(&ds,n,((T0*)se_ms(9,"Anonymous")),_score,(/*RF2*/(C)->_elapsed_seconds/*60*/));
28714 _hiscore=((T0*)n);
28715 }
28716 (ds.p=33639204);
28717 r65put_hiscore(&ds,((T65*)ci(65,(/*RF2*/(C)->_current_preset/*12*/),33639174)),_hiscore);
28718 (ds.p=33639430);
28719 (/*SFN*/C->_current_window/*76*/)=(/*RF2*/(C)->_newhs_window/*48*/);
28720 (ds.p=33639728);
28721 r98put_string(&ds,((T98*)ci(98,(/*RF2*/(((T97*)ci(97,(/*RF2*/(C)->_newhs_window/*48*/),33639686)))->_name_tb/*33*/),33639712)),(/*RF2*/(((T96*)ci(96,_hiscore,33639750)))->_name/*4*/));
28722 }
28723 /*FI]*/
28724 }
28725 /*FI]*/
28726 se_dst=caller;/*unlink*/
28727 }
28728
28729 T0* r16white(se_dump_stack*caller){
28730 if(fBC18white==0){fBC18white=1;{
28731 void**locals[1];
28732 static se_frame_descriptor fd={"white COLOR_TABLE",0,1,"Result%R51%",1};
28733 se_dump_stack ds;
28734 ds.fd=&fd;
28735 ds.current=NULL;
28736 ds.p=37752074;
28737 ds.caller=caller;
28738 ds.locals=locals;
28739 locals[0]=(void**)&oBC18white;
28740 se_dst=&ds;/*link*/
28741 (ds.p=37752580);
28742 {T51*n=new51();
28743 oBC18white=((T0*)n);
28744 r51make(&ds,n,255,255,255);
28745 }
28746 se_dst=caller;/*unlink*/
28747 }}
28748 return oBC18white;
28749 }
28750
28751 T2 r16width(se_dump_stack*caller,T16* C){
28752 T2 R=0;
28753 void**locals[1];
28754 static se_frame_descriptor fd={"width NETWALK",1,1,"%R16%Result%E2%",1};
28755 se_dump_stack ds;
28756 ds.fd=&fd;
28757 ds.current=((void**)&C);
28758 ds.p=33558282;
28759 ds.caller=caller;
28760 ds.locals=locals;
28761 locals[0]=(void**)&R;
28762 se_dst=&ds;/*link*/
28763 (ds.p=33558788);
28764 R=(/*RF2*/(((T68*)ci(68,(/*RF2*/(C)->_current_setting/*16*/),33558808)))->_width/*4*/);
28765 se_dst=caller;/*unlink*/
28766 return R;
28767 }
28768 T0*oBC18cyan=NULL;
28769 int fBC18cyan=0;
28770
28771 T0* r16cyan(se_dump_stack*caller){
28772 if(fBC18cyan==0){fBC18cyan=1;{
28773 void**locals[1];
28774 static se_frame_descriptor fd={"cyan COLOR_TABLE",0,1,"Result%R51%",1};
28775 se_dump_stack ds;
28776 ds.fd=&fd;
28777 ds.current=NULL;
28778 ds.p=37755914;
28779 ds.caller=caller;
28780 ds.locals=locals;
28781 locals[0]=(void**)&oBC18cyan;
28782 se_dst=&ds;/*link*/
28783 (ds.p=37756420);
28784 {T51*n=new51();
28785 oBC18cyan=((T0*)n);
28786 r51make(&ds,n,0,255,255);
28787 }
28788 se_dst=caller;/*unlink*/
28789 }}
28790 return oBC18cyan;
28791 }
28792
28793 T0* r16font(se_dump_stack*caller,T16* C){
28794 T0* R=NULL;
28795 void**locals[1];
28796 static se_frame_descriptor fd={"font NETWALK",1,1,"%R16%Result%R53%",1};
28797 se_dump_stack ds;
28798 ds.fd=&fd;
28799 ds.current=((void**)&C);
28800 ds.p=33566730;
28801 ds.caller=caller;
28802 ds.locals=locals;
28803 locals[0]=(void**)&R;
28804 se_dst=&ds;/*link*/
28805 (ds.p=33567236);
28806 R=(/*RF2*/(((T54*)ci(54,r16config(&ds),33567256)))->_bigfont/*24*/);
28807 se_dst=caller;/*unlink*/
28808 return R;
28809 }
28810
28811 T6 r16allow_wrap(se_dump_stack*caller,T16* C){
28812 T6 R=0;
28813 void**locals[1];
28814 static se_frame_descriptor fd={"allow_wrap NETWALK",1,1,"%R16%Result%E6%",1};
28815 se_dump_stack ds;
28816 ds.fd=&fd;
28817 ds.current=((void**)&C);
28818 ds.p=33560842;
28819 ds.caller=caller;
28820 ds.locals=locals;
28821 locals[0]=(void**)&R;
28822 se_dst=&ds;/*link*/
28823 (ds.p=33561348);
28824 R=(/*RF2*/(((T68*)ci(68,(/*RF2*/(C)->_current_setting/*16*/),33561368)))->_wrap/*12*/);
28825 se_dst=caller;/*unlink*/
28826 return R;
28827 }
28828
28829 T6 r16on_board(se_dump_stack*caller,T16* C,T2 a1,T2 a2){
28830 T6 R=0;
28831 void**locals[3];
28832 static se_frame_descriptor fd={"on_board NETWALK",1,3,"%R16%x%E2%y%E2%Result%E6%",1};
28833 se_dump_stack ds;
28834 ds.fd=&fd;
28835 ds.current=((void**)&C);
28836 ds.p=33723402;
28837 ds.caller=caller;
28838 ds.locals=locals;
28839 locals[0]=(void**)&a1;
28840 locals[1]=(void**)&a2;
28841 locals[2]=(void**)&R;
28842 se_dst=&ds;/*link*/
28843 (ds.p=33723908);
28844 R=((((a1)>=(1))&&((a1)<=(r16width(&ds,C))))&&((a2)>=(1)))&&((a2)<=(r16height(&ds,C)));
28845 se_dst=caller;/*unlink*/
28846 return R;
28847 }
28848 T0*oBC16win_image=NULL;
28849 int fBC16win_image=0;
28850
28851 T0* r16win_image(se_dump_stack*caller,T16* C){
28852 if(fBC16win_image==0){fBC16win_image=1;{
28853 void**locals[1];
28854 static se_frame_descriptor fd={"win_image NETWALK",1,1,"%R16%Result%R50%",1};
28855 se_dump_stack ds;
28856 ds.fd=&fd;
28857 ds.current=((void**)&C);
28858 ds.p=33569290;
28859 ds.caller=caller;
28860 ds.locals=locals;
28861 locals[0]=(void**)&oBC16win_image;
28862 se_dst=&ds;/*link*/
28863 (ds.p=33569796);
28864 {T50*n=new50();
28865 oBC16win_image=((T0*)n);
28866 r50make(&ds,n);
28867 }
28868 (ds.p=33570066);
28869 r50render_string(&ds,((T50*)ci(50,oBC16win_image,33570052)),((T0*)se_ms(9,"Well Done")),r16font(&ds,C),r16white(&ds));
28870 se_dst=caller;/*unlink*/
28871 }}
28872 return oBC16win_image;
28873 }
28874
28875 void r16tally_move(se_dump_stack*caller,T16* C){
28876 static se_frame_descriptor fd={"tally_move NETWALK",1,0,"%R16%",1};
28877 se_dump_stack ds;
28878 ds.fd=&fd;
28879 ds.current=((void**)&C);
28880 ds.p=33656330;
28881 ds.caller=caller;
28882 ds.locals=NULL;
28883 se_dst=&ds;/*link*/
28884 (ds.p=33656836);
28885 (/*SFN*/C->_move_count/*24*/)=((/*RF2*/(C)->_move_count/*24*/))+(1);
28886 (ds.p=33657114);
28887 r50free(&ds,((T50*)ci(50,(/*RF2*/(C)->_move_image/*80*/),33657092)));
28888 (ds.p=33657370);
28889 r50render_string(&ds,((T50*)ci(50,(/*RF2*/(C)->_move_image/*80*/),33657348)),r7_px_43(&ds,se_ms(7,"moves: "),r2to_string(&ds,(/*RF2*/(C)->_move_count/*24*/))),r16mainfont(&ds,C),r16white(&ds));
28890 se_dst=caller;/*unlink*/
28891 }
28892
28893 T0* r16black(se_dump_stack*caller){
28894 if(fBC18black==0){fBC18black=1;{
28895 void**locals[1];
28896 static se_frame_descriptor fd={"black COLOR_TABLE",0,1,"Result%R51%",1};
28897 se_dump_stack ds;
28898 ds.fd=&fd;
28899 ds.current=NULL;
28900 ds.p=37749514;
28901 ds.caller=caller;
28902 ds.locals=locals;
28903 locals[0]=(void**)&oBC18black;
28904 se_dst=&ds;/*link*/
28905 (ds.p=37750020);
28906 {T51*n=new51();
28907 oBC18black=((T0*)n);
28908 r51make(&ds,n,0,0,0);
28909 }
28910 se_dst=caller;/*unlink*/
28911 }}
28912 return oBC18black;
28913 }
28914
28915 void* EVENTMAKER_make_quit(int C){
28916 se_dump_stack ds={NULL,NULL,0,NULL,NULL};
28917 ds.caller=se_dst;
28918 se_dst=&ds;
28919 {void* R=r89make_quit(&ds);
28920 se_dst=ds.caller;
28921 return R;
28922 }
28923 }
28924
28925 void* EVENTMAKER_make_mbdown(int C,T2 a1,T2 a2,T2 a3,T2 a4){
28926 se_dump_stack ds={NULL,NULL,0,NULL,NULL};
28927 ds.caller=se_dst;
28928 se_dst=&ds;
28929 {void* R=r89make_mbdown(&ds,a1,a2,a3,a4);
28930 se_dst=ds.caller;
28931 return R;
28932 }
28933 }
28934
28935 void* EVENTMAKER_make_keydown(int C,T2 a1,T2 a2){
28936 se_dump_stack ds={NULL,NULL,0,NULL,NULL};
28937 ds.caller=se_dst;
28938 se_dst=&ds;
28939 {void* R=r89make_keydown(&ds,a1,a2);
28940 se_dst=ds.caller;
28941 return R;
28942 }
28943 }
28944 T16*eiffel_root_object=NULL;
28945 int se_argc;
28946 char**se_argv;
28947 T7* g[157];
28948 T7* t[157];
28949 char* p[157];
28950 void(*se_prinT[157])(void**);
28951
28952 void initialize_eiffel_runtime(int argc,char*argv[]){
28953 se_frame_descriptor irfd={"Initialysing runtime.",0,0,"",1};
28954 se_dump_stack ds = {NULL,NULL,0,NULL,NULL};
28955 ds.fd=&irfd;
28956 ds.caller=se_dst;
28957 se_argc=argc;
28958 se_argv=argv;
28959 gcmt=((mch**)se_malloc((gcmt_max+1)*sizeof(void*)));
28960 stack_bottom=((void**)(&argc));
28961 p[0]="???";
28962 p[141]="/home/ben/SmallEiffel/lib/kernel/double_ref.e";
28963 p[16]="./netwalk.e";
28964 p[38]="/home/ben/SmallEiffel/lib/kernel/safe_equal.e";
28965 p[79]="/home/ben/SmallEiffel/lib/random/gen_rand.e";
28966 p[59]="/home/ben/SmallEiffel/lib/io/output_stream.e";
28967 p[54]="./config_data.e";
28968 p[92]="ROUTINE";
28969 p[73]="/home/ben/SmallEiffel/lib/base/collection2.e";
28970 p[51]="./color.e";
28971 p[138]="./command_new_game.e";
28972 p[21]="/home/ben/SmallEiffel/lib/kernel/platform.e";
28973 p[50]="./image.e";
28974 p[130]="./io_score.e";
28975 p[112]="./command_close_current.e";
28976 p[98]="./textbox.e";
28977 p[53]="./ttf_font.e";
28978 p[2]="/home/ben/SmallEiffel/lib/kernel/integer.e";
28979 p[25]="./command.e";
28980 p[89]="./eventmaker.e";
28981 p[7]="/home/ben/SmallEiffel/lib/kernel/string.e";
28982 p[104]="./score_display.e";
28983 p[135]="./command_quit.e";
28984 p[23]="/home/ben/SmallEiffel/lib/kernel/comparable.e";
28985 p[77]="/home/ben/SmallEiffel/lib/random/std_rand.e";
28986 p[120]="./listbox.e";
28987 p[127]="./command_custom_change.e";
28988 p[74]="./tile.e";
28989 p[22]="/home/ben/SmallEiffel/lib/time/time.e";
28990 p[128]="./command_preset_change.e";
28991 p[114]="./command_activate.e";
28992 p[44]="/home/ben/SmallEiffel/lib/base/dictionary.e";
28993 p[28]="./event.e";
28994 p[26]="/home/ben/SmallEiffel/lib/kernel/integer_ref.e";
28995 p[10]="/home/ben/SmallEiffel/lib/kernel/any.e";
28996 p[129]="./command_cancel.e";
28997 p[58]="/home/ben/SmallEiffel/lib/io/std_output.e";
28998 p[94]="PROCEDURE";
28999 p[107]="./label.e";
29000 p[27]="/home/ben/SmallEiffel/lib/kernel/numeric.e";
29001 p[17]="./config.e";
29002 p[99]="./hs_window.e";
29003 p[78]="/home/ben/SmallEiffel/lib/random/min_stand.e";
29004 p[65]="./preset.e";
29005 p[55]="/home/ben/SmallEiffel/lib/io/text_file_read.e";
29006 p[18]="./color_table.e";
29007 p[136]="./command_show_hs.e";
29008 p[1]="/home/ben/SmallEiffel/lib/kernel/general.e";
29009 p[35]="/home/ben/SmallEiffel/lib/base/linked_collection.e";
29010 p[40]="/home/ben/SmallEiffel/lib/iterator/iterator_on_linked_list.e";
29011 p[37]="TUPLE";
29012 p[29]="./window.e";
29013 p[34]="/home/ben/SmallEiffel/lib/base/linked_list.e";
29014 p[68]="./setting.e";
29015 p[19]="./sdl_constant.e";
29016 p[62]="/home/ben/SmallEiffel/lib/kernel/array.e";
29017 p[113]="./button.e";
29018 p[24]="/home/ben/SmallEiffel/lib/kernel/hashable.e";
29019 p[52]="/home/ben/SmallEiffel/lib/kernel/pointer_ref.e";
29020 p[8]="/home/ben/SmallEiffel/lib/kernel/pointer.e";
29021 p[96]="./score.e";
29022 p[31]="/home/ben/SmallEiffel/lib/iterator/iterator.e";
29023 p[42]="/home/ben/SmallEiffel/lib/base/link.e";
29024 p[146]="/home/ben/SmallEiffel/lib/io/text_file_write.e";
29025 p[139]="/home/ben/SmallEiffel/lib/base/memo.e";
29026 p[20]="./dir_constant.e";
29027 p[125]="./command_options_ok.e";
29028 p[30]="./widget.e";
29029 p[117]="./options_window.e";
29030 p[126]="./checkbox.e";
29031 p[48]="/home/ben/SmallEiffel/lib/kernel/native_array.e";
29032 p[46]="/home/ben/SmallEiffel/lib/base/dictionary_node.e";
29033 p[36]="/home/ben/SmallEiffel/lib/kernel/collection.e";
29034 p[60]="/home/ben/SmallEiffel/lib/io/std_input.e";
29035 p[137]="./command_options.e";
29036 p[61]="/home/ben/SmallEiffel/lib/kernel/character_ref.e";
29037 p[3]="/home/ben/SmallEiffel/lib/kernel/character.e";
29038 p[56]="/home/ben/SmallEiffel/lib/io/input_stream.e";
29039 p[6]="/home/ben/SmallEiffel/lib/kernel/boolean.e";
29040 p[97]="./newhs_window.e";
29041 p[72]="/home/ben/SmallEiffel/lib/base/array2.e";
29042 p[33]="/home/ben/SmallEiffel/lib/kernel/boolean_ref.e";
29043 p[108]="/home/ben/SmallEiffel/lib/base/hash_table_size.e";
29044 p[57]="/home/ben/SmallEiffel/lib/io/std_input_output.e";
29045 p[116]="./command_newhs_ok.e";
29046 p[5]="/home/ben/SmallEiffel/lib/kernel/double.e";
29047 p[63]="/home/ben/SmallEiffel/lib/base/arrayed_collection.e";
29048 se_prinT[57]=((void(*)(void**))se_prinT57);
29049 se_prinT[114]=((void(*)(void**))se_prinT114);
29050 se_prinT[135]=((void(*)(void**))se_prinT135);
29051 se_prinT[8]=((void(*)(void**))se_prinT8);
29052 se_prinT[130]=((void(*)(void**))se_prinT130);
29053 se_prinT[47]=((void(*)(void**))se_prinT47);
29054 p[47]=p[46];
29055 se_prinT[75]=((void(*)(void**))se_prinT75);
29056 p[75]=p[72];
29057 se_prinT[6]=((void(*)(void**))se_prinT6);
29058 se_prinT[41]=((void(*)(void**))se_prinT41);
29059 p[41]=p[40];
29060 se_prinT[43]=((void(*)(void**))se_prinT43);
29061 p[43]=p[42];
29062 se_prinT[87]=((void(*)(void**))se_prinT87);
29063 p[87]=p[42];
29064 se_prinT[83]=((void(*)(void**))se_prinT83);
29065 p[83]=p[62];
29066 se_prinT[3]=((void(*)(void**))se_prinT3);
29067 se_prinT[117]=((void(*)(void**))se_prinT117);
29068 se_prinT[82]=((void(*)(void**))se_prinT82);
29069 p[82]=p[48];
29070 se_prinT[126]=((void(*)(void**))se_prinT126);
29071 se_prinT[49]=((void(*)(void**))se_prinT49);
29072 p[49]=p[48];
29073 se_prinT[89]=((void(*)(void**))se_prinT89);
29074 se_prinT[111]=((void(*)(void**))se_prinT111);
29075 se_prinT[54]=((void(*)(void**))se_prinT54);
29076 se_prinT[108]=((void(*)(void**))se_prinT108);
29077 se_prinT[102]=((void(*)(void**))se_prinT102);
29078 se_prinT[107]=((void(*)(void**))se_prinT107);
29079 se_prinT[121]=((void(*)(void**))se_prinT121);
29080 p[121]=p[42];
29081 se_prinT[124]=((void(*)(void**))se_prinT124);
29082 se_prinT[120]=((void(*)(void**))se_prinT120);
29083 se_prinT[76]=((void(*)(void**))se_prinT76);
29084 p[76]=p[48];
29085 se_prinT[149]=((void(*)(void**))se_prinT149);
29086 se_prinT[53]=((void(*)(void**))se_prinT53);
29087 se_prinT[50]=((void(*)(void**))se_prinT50);
29088 se_prinT[122]=((void(*)(void**))se_prinT122);
29089 p[122]=p[40];
29090 se_prinT[151]=((void(*)(void**))se_prinT151);
29091 p[151]=p[40];
29092 se_prinT[77]=((void(*)(void**))se_prinT77);
29093 se_prinT[51]=((void(*)(void**))se_prinT51);
29094 se_prinT[97]=((void(*)(void**))se_prinT97);
29095 se_prinT[99]=((void(*)(void**))se_prinT99);
29096 se_prinT[80]=((void(*)(void**))se_prinT80);
29097 p[80]=p[62];
29098 se_prinT[140]=((void(*)(void**))se_prinT140);
29099 p[140]=p[139];
29100 se_prinT[118]=((void(*)(void**))se_prinT118);
29101 p[118]=p[34];
29102 se_prinT[113]=((void(*)(void**))se_prinT113);
29103 se_prinT[55]=((void(*)(void**))se_prinT55);
29104 se_prinT[69]=((void(*)(void**))se_prinT69);
29105 p[69]=p[48];
29106 se_prinT[65]=((void(*)(void**))se_prinT65);
29107 se_prinT[128]=((void(*)(void**))se_prinT128);
29108 se_prinT[105]=((void(*)(void**))se_prinT105);
29109 p[105]=p[34];
29110 se_prinT[68]=((void(*)(void**))se_prinT68);
29111 se_prinT[129]=((void(*)(void**))se_prinT129);
29112 se_prinT[153]=((void(*)(void**))se_prinT153);
29113 p[153]=p[62];
29114 se_prinT[45]=((void(*)(void**))se_prinT45);
29115 p[45]=p[44];
29116 se_prinT[96]=((void(*)(void**))se_prinT96);
29117 se_prinT[7]=((void(*)(void**))se_prinT7);
29118 se_prinT[39]=((void(*)(void**))se_prinT39);
29119 p[39]=p[34];
29120 se_prinT[127]=((void(*)(void**))se_prinT127);
29121 se_prinT[9]=((void(*)(void**))se_prinT9);
29122 p[9]=p[48];
29123 se_prinT[98]=((void(*)(void**))se_prinT98);
29124 se_prinT[152]=((void(*)(void**))se_prinT152);
29125 p[152]=p[38];
29126 se_prinT[95]=((void(*)(void**))se_prinT95);
29127 se_prinT[134]=((void(*)(void**))se_prinT134);
29128 se_prinT[109]=((void(*)(void**))se_prinT109);
29129 se_prinT[155]=((void(*)(void**))se_prinT155);
29130 p[155]=p[38];
29131 se_prinT[104]=((void(*)(void**))se_prinT104);
29132 se_prinT[131]=((void(*)(void**))se_prinT131);
29133 p[131]=p[44];
29134 se_prinT[28]=((void(*)(void**))se_prinT28);
29135 se_prinT[112]=((void(*)(void**))se_prinT112);
29136 se_prinT[67]=((void(*)(void**))se_prinT67);
29137 p[67]=p[42];
29138 se_prinT[2]=((void(*)(void**))se_prinT2);
29139 se_prinT[5]=((void(*)(void**))se_prinT5);
29140 se_prinT[137]=((void(*)(void**))se_prinT137);
29141 se_prinT[115]=((void(*)(void**))se_prinT115);
29142 se_prinT[22]=((void(*)(void**))se_prinT22);
29143 se_prinT[74]=((void(*)(void**))se_prinT74);
29144 se_prinT[64]=((void(*)(void**))se_prinT64);
29145 p[64]=p[62];
29146 se_prinT[16]=((void(*)(void**))se_prinT16);
29147 se_prinT[125]=((void(*)(void**))se_prinT125);
29148 se_prinT[86]=((void(*)(void**))se_prinT86);
29149 p[86]=p[34];
29150 se_prinT[138]=((void(*)(void**))se_prinT138);
29151 se_prinT[85]=((void(*)(void**))se_prinT85);
29152 p[85]=p[48];
29153 se_prinT[146]=((void(*)(void**))se_prinT146);
29154 se_prinT[106]=((void(*)(void**))se_prinT106);
29155 p[106]=p[42];
29156 se_prinT[66]=((void(*)(void**))se_prinT66);
29157 p[66]=p[34];
29158 se_prinT[116]=((void(*)(void**))se_prinT116);
29159 se_prinT[132]=((void(*)(void**))se_prinT132);
29160 p[132]=p[46];
29161 se_prinT[136]=((void(*)(void**))se_prinT136);
29162 se_prinT[133]=((void(*)(void**))se_prinT133);
29163 p[133]=p[48];
29164 g[141]=se_string("DOUBLE_REF");
29165 g[16]=se_string("NETWALK");
29166 g[38]=se_string("SAFE_EQUAL");
29167 g[79]=se_string("GEN_RAND");
29168 g[59]=se_string("OUTPUT_STREAM");
29169 g[54]=se_string("CONFIG_DATA");
29170 g[92]=se_string("ROUTINE");
29171 g[73]=se_string("COLLECTION2");
29172 g[51]=se_string("COLOR");
29173 g[138]=se_string("COMMAND_NEW_GAME");
29174 g[21]=se_string("PLATFORM");
29175 g[50]=se_string("IMAGE");
29176 g[130]=se_string("IO_SCORE");
29177 g[112]=se_string("COMMAND_CLOSE_CURRENT");
29178 g[98]=se_string("TEXTBOX");
29179 g[53]=se_string("TTF_FONT");
29180 g[2]=se_string("INTEGER");
29181 g[25]=se_string("COMMAND");
29182 g[89]=se_string("EVENTMAKER");
29183 g[7]=se_string("STRING");
29184 g[104]=se_string("SCORE_DISPLAY");
29185 g[135]=se_string("COMMAND_QUIT");
29186 g[23]=se_string("COMPARABLE");
29187 g[77]=se_string("STD_RAND");
29188 g[120]=se_string("LISTBOX");
29189 g[127]=se_string("COMMAND_CUSTOM_CHANGE");
29190 g[74]=se_string("TILE");
29191 g[22]=se_string("TIME");
29192 g[128]=se_string("COMMAND_PRESET_CHANGE");
29193 g[114]=se_string("COMMAND_ACTIVATE");
29194 g[44]=se_string("DICTIONARY");
29195 g[28]=se_string("EVENT");
29196 g[26]=se_string("INTEGER_REF");
29197 g[10]=se_string("ANY");
29198 g[129]=se_string("COMMAND_CANCEL");
29199 g[58]=se_string("STD_OUTPUT");
29200 g[94]=se_string("PROCEDURE");
29201 g[107]=se_string("LABEL");
29202 g[27]=se_string("NUMERIC");
29203 g[17]=se_string("CONFIG");
29204 g[99]=se_string("HS_WINDOW");
29205 g[78]=se_string("MIN_STAND");
29206 g[65]=se_string("PRESET");
29207 g[55]=se_string("TEXT_FILE_READ");
29208 g[18]=se_string("COLOR_TABLE");
29209 g[136]=se_string("COMMAND_SHOW_HS");
29210 g[1]=se_string("GENERAL");
29211 g[35]=se_string("LINKED_COLLECTION");
29212 g[40]=se_string("ITERATOR_ON_LINKED_LIST");
29213 g[37]=se_string("TUPLE");
29214 g[29]=se_string("WINDOW");
29215 g[34]=se_string("LINKED_LIST");
29216 g[68]=se_string("SETTING");
29217 g[19]=se_string("SDL_CONSTANT");
29218 g[62]=se_string("ARRAY");
29219 g[113]=se_string("BUTTON");
29220 g[24]=se_string("HASHABLE");
29221 g[52]=se_string("POINTER_REF");
29222 g[8]=se_string("POINTER");
29223 g[96]=se_string("SCORE");
29224 g[31]=se_string("ITERATOR");
29225 g[42]=se_string("LINK");
29226 g[146]=se_string("TEXT_FILE_WRITE");
29227 g[139]=se_string("MEMO");
29228 g[20]=se_string("DIR_CONSTANT");
29229 g[125]=se_string("COMMAND_OPTIONS_OK");
29230 g[30]=se_string("WIDGET");
29231 g[117]=se_string("OPTIONS_WINDOW");
29232 g[126]=se_string("CHECKBOX");
29233 g[48]=se_string("NATIVE_ARRAY");
29234 g[46]=se_string("DICTIONARY_NODE");
29235 g[36]=se_string("COLLECTION");
29236 g[60]=se_string("STD_INPUT");
29237 g[137]=se_string("COMMAND_OPTIONS");
29238 g[61]=se_string("CHARACTER_REF");
29239 g[3]=se_string("CHARACTER");
29240 g[56]=se_string("INPUT_STREAM");
29241 g[6]=se_string("BOOLEAN");
29242 g[97]=se_string("NEWHS_WINDOW");
29243 g[72]=se_string("ARRAY2");
29244 g[0]=se_string("NONE");
29245 g[33]=se_string("BOOLEAN_REF");
29246 g[108]=se_string("HASH_TABLE_SIZE");
29247 g[57]=se_string("STD_INPUT_OUTPUT");
29248 g[116]=se_string("COMMAND_NEWHS_OK");
29249 g[5]=se_string("DOUBLE");
29250 g[63]=se_string("ARRAYED_COLLECTION");
29251 g[47]=g[46];
29252 g[75]=g[72];
29253 g[41]=g[40];
29254 g[43]=g[42];
29255 g[87]=g[42];
29256 g[83]=g[62];
29257 g[82]=g[48];
29258 g[49]=g[48];
29259 g[111]=g[94];
29260 g[102]=g[37];
29261 g[121]=g[42];
29262 g[124]=g[94];
29263 g[76]=g[48];
29264 g[149]=g[94];
29265 g[122]=g[40];
29266 g[151]=g[40];
29267 g[80]=g[62];
29268 g[140]=g[139];
29269 g[118]=g[34];
29270 g[69]=g[48];
29271 g[105]=g[34];
29272 g[153]=g[62];
29273 g[45]=g[44];
29274 g[39]=g[34];
29275 g[9]=g[48];
29276 g[152]=g[38];
29277 g[95]=g[94];
29278 g[134]=g[94];
29279 g[109]=g[94];
29280 g[155]=g[38];
29281 g[131]=g[44];
29282 g[67]=g[42];
29283 g[115]=g[94];
29284 g[64]=g[62];
29285 g[86]=g[34];
29286 g[85]=g[48];
29287 g[106]=g[42];
29288 g[66]=g[34];
29289 g[132]=g[46];
29290 g[133]=g[48];
29291 t[57]=g[57];
29292 t[114]=g[114];
29293 t[135]=g[135];
29294 t[8]=g[8];
29295 t[130]=g[130];
29296 t[47]=se_string("DICTIONARY_NODE[COMMAND,INTEGER]");
29297 t[75]=se_string("ARRAY2[TILE]");
29298 t[6]=g[6];
29299 t[41]=se_string("ITERATOR_ON_LINKED_LIST[WIDGET]");
29300 t[43]=se_string("LINK[WIDGET]");
29301 t[87]=se_string("LINK[TILE]");
29302 t[83]=se_string("ARRAY[INTEGER]");
29303 t[3]=g[3];
29304 t[117]=g[117];
29305 t[82]=se_string("NATIVE_ARRAY[BOOLEAN]");
29306 t[126]=g[126];
29307 t[49]=se_string("NATIVE_ARRAY[DICTIONARY_NODE[COMMAND,INTEGER]]");
29308 t[89]=g[89];
29309 t[111]=se_string("PROCEDURE[HS_WINDOW,TUPLE[WIDGET]]");
29310 t[54]=g[54];
29311 t[108]=g[108];
29312 t[102]=se_string("TUPLE[PRESET]");
29313 t[107]=g[107];
29314 t[121]=se_string("LINK[STRING]");
29315 t[124]=se_string("PROCEDURE[OPTIONS_WINDOW,TUPLE[WIDGET]]");
29316 t[120]=g[120];
29317 t[76]=se_string("NATIVE_ARRAY[TILE]");
29318 t[149]=se_string("PROCEDURE[IO_SCORE,TUPLE[SCORE,STRING]]");
29319 t[53]=g[53];
29320 t[50]=g[50];
29321 t[122]=se_string("ITERATOR_ON_LINKED_LIST[PRESET]");
29322 t[151]=se_string("ITERATOR_ON_LINKED_LIST[SCORE_DISPLAY]");
29323 t[77]=g[77];
29324 t[51]=g[51];
29325 t[97]=g[97];
29326 t[99]=g[99];
29327 t[80]=se_string("ARRAY[BOOLEAN]");
29328 t[140]=se_string("MEMO[INTEGER]");
29329 t[118]=se_string("LINKED_LIST[STRING]");
29330 t[113]=g[113];
29331 t[55]=g[55];
29332 t[69]=se_string("NATIVE_ARRAY[STRING]");
29333 t[65]=g[65];
29334 t[128]=g[128];
29335 t[105]=se_string("LINKED_LIST[SCORE_DISPLAY]");
29336 t[68]=g[68];
29337 t[129]=g[129];
29338 t[153]=se_string("ARRAY[CHARACTER]");
29339 t[45]=se_string("DICTIONARY[COMMAND,INTEGER]");
29340 t[96]=g[96];
29341 t[7]=g[7];
29342 t[39]=se_string("LINKED_LIST[WIDGET]");
29343 t[127]=g[127];
29344 t[9]=se_string("NATIVE_ARRAY[CHARACTER]");
29345 t[98]=g[98];
29346 t[152]=se_string("SAFE_EQUAL[STRING]");
29347 t[95]=se_string("PROCEDURE[WIDGET,TUPLE[WIDGET]]");
29348 t[134]=se_string("PROCEDURE[IO_SCORE,TUPLE[PRESET]]");
29349 t[109]=se_string("PROCEDURE[HS_WINDOW,TUPLE[PRESET]]");
29350 t[155]=se_string("SAFE_EQUAL[TILE]");
29351 t[104]=g[104];
29352 t[131]=se_string("DICTIONARY[SCORE,STRING]");
29353 t[28]=g[28];
29354 t[112]=g[112];
29355 t[67]=se_string("LINK[PRESET]");
29356 t[2]=g[2];
29357 t[5]=g[5];
29358 t[137]=g[137];
29359 t[115]=se_string("PROCEDURE[NEWHS_WINDOW,TUPLE[WIDGET]]");
29360 t[22]=g[22];
29361 t[74]=g[74];
29362 t[64]=se_string("ARRAY[STRING]");
29363 t[16]=g[16];
29364 t[125]=g[125];
29365 t[86]=se_string("LINKED_LIST[TILE]");
29366 t[138]=g[138];
29367 t[85]=se_string("NATIVE_ARRAY[INTEGER]");
29368 t[146]=g[146];
29369 t[106]=se_string("LINK[SCORE_DISPLAY]");
29370 t[66]=se_string("LINKED_LIST[PRESET]");
29371 t[116]=g[116];
29372 t[132]=se_string("DICTIONARY_NODE[SCORE,STRING]");
29373 t[136]=g[136];
29374 t[133]=se_string("NATIVE_ARRAY[DICTIONARY_NODE[SCORE,STRING]]");
29375 #ifdef SIGINT
29376 signal(SIGINT,se_signal_handler);
29377 #endif
29378 #ifdef SIGQUIT
29379 signal(SIGQUIT,se_signal_handler);
29380 #endif
29381 #ifdef SIGTERM
29382 signal(SIGTERM,se_signal_handler);
29383 #endif
29384 #ifdef SIGBREAK
29385 signal(SIGBREAK,se_signal_handler);
29386 #endif
29387 #ifdef SIGKILL
29388 signal(SIGKILL,se_signal_handler);
29389 #endif
29390 se_msi1();
29391 /*PCO*/
29392 (ds.p=2166548);
29393 {T57*n=new57();
29394 oBC1io=((T0*)n);
29395 r57make(&ds,n);
29396 }
29397 if(ds.fd->assertion_flag){
29398 ds.fd->assertion_flag=0;
29399 (ds.p=2167074);
29400 ac_ens((oBC1io)!=((void*)(NULL)),NULL);
29401 ds.fd->assertion_flag=1;
29402 }
29403 /*PCO*/
29404 gc_is_off=0;
29405 eiffel_root_object=((T16*)se_malloc(sizeof(double)+sizeof(*eiffel_root_object)));
29406 *eiffel_root_object=M16;
29407 se_dst=NULL;
29408 }
29409 int main(int argc,char*argv[]){
29410 initialize_eiffel_runtime(argc,argv);
29411 {T16*n=eiffel_root_object;
29412 se_frame_descriptor root={"System root.",1,0,"%R16%",1};
29413 se_dump_stack ds;
29414 ds.fd=&root;
29415 ds.current=((void**)(&n));
29416 ds.p=33576970;
29417 ds.caller=NULL;
29418 se_dst=&ds;/*link*/
29419 r16make(&ds,n);
29420 }
29421 exit(0);
29422 return 0;}
29423 T7*ms54_395678;
29424 T7*ms2_117797837;
29425
29426 T7*se_ms(int c,char*e){
29427 /* Allocate a Manifest STRING.*/
29428 T7*s=((T7*)se_malloc(sizeof(gc7)));
29429 ((gc7*)s)->header.flag=FSOH_MARKED;
29430 s->id=7;
29431 s->_count=c;
29432 s->_capacity=c+1;
29433 s->_storage=((T9)new9(c+1));
29434 memcpy(s->_storage,e,c+1);
29435 return s;}
29436
29437 T7*se_string(char*e){
29438 /* Allocate an Eiffel STRING by copying C char*e */
29439 int c=strlen(e);
29440 T7*s=new7();
29441 s->_count=c;
29442 s->_capacity=c+1;
29443 s->_storage=((T9)new9(c+1));
29444 memcpy(s->_storage,e,c+1);
29445 return s;}
29446
29447 void se_msi1(void){
29448 ms54_395678=se_ms(6,"config");
29449 ms2_117797837=se_ms(10,"0123456789");
29450 }
29451
29452 void manifest_string_mark1(void){
29453 ((rsoh*)(ms54_395678->_storage)-1)->header.magic_flag=RSOH_MARKED;
29454 ((rsoh*)(ms2_117797837->_storage)-1)->header.magic_flag=RSOH_MARKED;
29455 }
29456
29457 void once_function_mark(void){
29458 if(NULL!=oBC18grey)gc_mark51((T51*)(oBC18grey));
29459 if(NULL!=oBC18black)gc_mark51((T51*)(oBC18black));
29460 if(NULL!=oBC18white)gc_mark51((T51*)(oBC18white));
29461 if(NULL!=oBC18darkgreen)gc_mark51((T51*)(oBC18darkgreen));
29462 if(NULL!=oBC18green)gc_mark51((T51*)(oBC18green));
29463 if(NULL!=oBC98shifted_key_table)gc_mark153((T153*)(oBC98shifted_key_table));
29464 if(NULL!=oBC17config)gc_mark54((T54*)(oBC17config));
29465 if(NULL!=oBC117custom)gc_mark68((T68*)(oBC117custom));
29466 if(NULL!=oBC22time_mode_memo)gc_mark140((T140*)(oBC22time_mode_memo));
29467 if(NULL!=oBC18darkred)gc_mark51((T51*)(oBC18darkred));
29468 if(NULL!=oBC18cyan)gc_mark51((T51*)(oBC18cyan));
29469 if(NULL!=oBC18darkpurple)gc_mark51((T51*)(oBC18darkpurple));
29470 if(NULL!=oBC18blue)gc_mark51((T51*)(oBC18blue));
29471 if(NULL!=oBC16win_image)gc_mark50((T50*)(oBC16win_image));
29472 if(NULL!=oBC1io)gc_mark57((T57*)(oBC1io));
29473 if(NULL!=oBC2tmp_string)gc_mark7((T7*)(oBC2tmp_string));
29474 if(NULL!=oBC7string_buffer)gc_mark7((T7*)(oBC7string_buffer));
29475 if(NULL!=oBC7split_buffer)gc_mark64((T64*)(oBC7split_buffer));
29476 if(NULL!=oBC56last_string)gc_mark7((T7*)(oBC56last_string));
29477 }
29478 /*
29479 -- This file is free software, which comes along with SmallEiffel. This
29480 -- software is distributed in the hope that it will be useful, but WITHOUT
29481 -- ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
29482 -- FITNESS FOR A PARTICULAR PURPOSE. You can modify it as you want, provided
29483 -- this header is kept unaltered, and a notification of the changes is added.
29484 -- You are allowed to redistribute it and sell it, alone or as a part of
29485 -- another product.
29486 -- Copyright (C) 1994-2002 LORIA - INRIA - U.H.P. Nancy 1 - FRANCE
29487 -- Dominique COLNET and Suzanne COLLIN - SmallEiffel@loria.fr
29488 -- http://www.loria.fr/SmallEiffel
29489 --
29490 */
29491 /*
29492 Stack and Registers traversal for PC Linux with gcc.
29493 Addresses decrease as the stack grows.
29494 Registers are saved using SETJMP().
29495 A little correction of the non-accurate `stack_bottom' seams to
29496 be necessary here.
29497 */
29498
29499 void mark_stack_and_registers (void) {
29500 void** max = stack_bottom + 20; /* stack_bottom correction here. */
29501 void** stack_pointer;
29502 jmp_buf registers;
29503
29504 (void)setjmp(registers);
29505 stack_pointer = ((void**)(&registers));
29506 while (stack_pointer < max) {
29507 gc_mark(*(stack_pointer++));
29508 }
29509 }
29510
29511 void gc_start(void){
29512 if(gc_is_off)return;
29513 if(garbage_delayed())return;
29514 gcmt_tail_addr=(((char*)(gcmt[gcmt_used-1]))+(gcmt[gcmt_used-1])->size);
29515 ((gc16*)eiffel_root_object)->header.flag=FSOH_UNMARKED;
29516 gc_free57=NULL;
29517 gc_free114=NULL;
29518 gc_free135=NULL;
29519 gc_free130=NULL;
29520 gc_free47=NULL;
29521 gc_free75=NULL;
29522 gc_free41=NULL;
29523 gc_free43=NULL;
29524 gc_free87=NULL;
29525 gc_free83=NULL;
29526 gc_free117=NULL;
29527 if(na_env82.store_left>0){
29528 na_env82.store->header.size=na_env82.store_left;
29529 na_env82.store->header.magic_flag=RSOH_FREE;
29530 na_env82.store_left=0;
29531 }
29532 na_env82.chunk_list=NULL;
29533 na_env82.store_chunk=NULL;
29534 gc_free126=NULL;
29535 if(na_env49.store_left>0){
29536 na_env49.store->header.size=na_env49.store_left;
29537 na_env49.store->header.magic_flag=RSOH_FREE;
29538 na_env49.store_left=0;
29539 }
29540 na_env49.chunk_list=NULL;
29541 na_env49.store_chunk=NULL;
29542 gc_free54=NULL;
29543 gc_free102=NULL;
29544 gc_free107=NULL;
29545 gc_free121=NULL;
29546 gc_free120=NULL;
29547 if(na_env76.store_left>0){
29548 na_env76.store->header.size=na_env76.store_left;
29549 na_env76.store->header.magic_flag=RSOH_FREE;
29550 na_env76.store_left=0;
29551 }
29552 na_env76.chunk_list=NULL;
29553 na_env76.store_chunk=NULL;
29554 gc_free53=NULL;
29555 gc_free50=NULL;
29556 gc_free122=NULL;
29557 gc_free151=NULL;
29558 gc_free77=NULL;
29559 gc_free51=NULL;
29560 gc_free97=NULL;
29561 gc_free99=NULL;
29562 gc_free80=NULL;
29563 gc_free140=NULL;
29564 gc_free118=NULL;
29565 gc_free113=NULL;
29566 gc_free55=NULL;
29567 if(na_env69.store_left>0){
29568 na_env69.store->header.size=na_env69.store_left;
29569 na_env69.store->header.magic_flag=RSOH_FREE;
29570 na_env69.store_left=0;
29571 }
29572 na_env69.chunk_list=NULL;
29573 na_env69.store_chunk=NULL;
29574 gc_free65=NULL;
29575 gc_free128=NULL;
29576 gc_free105=NULL;
29577 gc_free68=NULL;
29578 gc_free129=NULL;
29579 gc_free153=NULL;
29580 gc_free45=NULL;
29581 gc_free96=NULL;
29582 gc_free7=NULL;
29583 gc_free39=NULL;
29584 gc_free127=NULL;
29585 if(na_env9.store_left>0){
29586 na_env9.store->header.size=na_env9.store_left;
29587 na_env9.store->header.magic_flag=RSOH_FREE;
29588 na_env9.store_left=0;
29589 }
29590 na_env9.chunk_list=NULL;
29591 na_env9.store_chunk=NULL;
29592 gc_free98=NULL;
29593 gc_free104=NULL;
29594 gc_free131=NULL;
29595 gc_free28=NULL;
29596 gc_free112=NULL;
29597 gc_free67=NULL;
29598 gc_free137=NULL;
29599 gc_free74=NULL;
29600 gc_free64=NULL;
29601 gc_free16=NULL;
29602 gc_free125=NULL;
29603 gc_free86=NULL;
29604 gc_free138=NULL;
29605 if(na_env85.store_left>0){
29606 na_env85.store->header.size=na_env85.store_left;
29607 na_env85.store->header.magic_flag=RSOH_FREE;
29608 na_env85.store_left=0;
29609 }
29610 na_env85.chunk_list=NULL;
29611 na_env85.store_chunk=NULL;
29612 gc_free146=NULL;
29613 gc_free106=NULL;
29614 gc_free66=NULL;
29615 gc_free116=NULL;
29616 gc_free132=NULL;
29617 gc_free136=NULL;
29618 if(na_env133.store_left>0){
29619 na_env133.store->header.size=na_env133.store_left;
29620 na_env133.store->header.magic_flag=RSOH_FREE;
29621 na_env133.store_left=0;
29622 }
29623 na_env133.chunk_list=NULL;
29624 na_env133.store_chunk=NULL;
29625 gc_mark16(eiffel_root_object);
29626 manifest_string_mark1();
29627 once_function_mark();
29628 {int i=SE_MAXID-1;
29629 while(i>=0){
29630 if(g[i]!=NULL)gc_mark7(g[i]);
29631 i--;}
29632 }
29633 {int i=SE_MAXID-1;
29634 while(i>=0){
29635 if(t[i]!=NULL)gc_mark7(t[i]);
29636 i--;}
29637 }
29638 mark_stack_and_registers();
29639 gc_sweep();
29640 collector_counter++;
29641 }
29642 gc57*store57=NULL;
29643 int store_left57=0;
29644 fsoc*store_chunk57=NULL;
29645 gc57*gc_free57=NULL;
29646 gc114*store114=NULL;
29647 int store_left114=0;
29648 fsoc*store_chunk114=NULL;
29649 gc114*gc_free114=NULL;
29650 gc135*store135=NULL;
29651 int store_left135=0;
29652 fsoc*store_chunk135=NULL;
29653 gc135*gc_free135=NULL;
29654 gc130*store130=NULL;
29655 int store_left130=0;
29656 fsoc*store_chunk130=NULL;
29657 gc130*gc_free130=NULL;
29658 gc47*store47=NULL;
29659 int store_left47=0;
29660 fsoc*store_chunk47=NULL;
29661 gc47*gc_free47=NULL;
29662 gc75*store75=NULL;
29663 int store_left75=0;
29664 fsoc*store_chunk75=NULL;
29665 gc75*gc_free75=NULL;
29666 gc41*store41=NULL;
29667 int store_left41=0;
29668 fsoc*store_chunk41=NULL;
29669 gc41*gc_free41=NULL;
29670 gc43*store43=NULL;
29671 int store_left43=0;
29672 fsoc*store_chunk43=NULL;
29673 gc43*gc_free43=NULL;
29674 gc87*store87=NULL;
29675 int store_left87=0;
29676 fsoc*store_chunk87=NULL;
29677 gc87*gc_free87=NULL;
29678 gc83*store83=NULL;
29679 int store_left83=0;
29680 fsoc*store_chunk83=NULL;
29681 gc83*gc_free83=NULL;
29682 gc117*store117=NULL;
29683 int store_left117=0;
29684 fsoc*store_chunk117=NULL;
29685 gc117*gc_free117=NULL;
29686 na_env na_env82={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark82};
29687 gc126*store126=NULL;
29688 int store_left126=0;
29689 fsoc*store_chunk126=NULL;
29690 gc126*gc_free126=NULL;
29691 na_env na_env49={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark49};
29692 gc54*store54=NULL;
29693 int store_left54=0;
29694 fsoc*store_chunk54=NULL;
29695 gc54*gc_free54=NULL;
29696 gc102*store102=NULL;
29697 int store_left102=0;
29698 fsoc*store_chunk102=NULL;
29699 gc102*gc_free102=NULL;
29700 gc107*store107=NULL;
29701 int store_left107=0;
29702 fsoc*store_chunk107=NULL;
29703 gc107*gc_free107=NULL;
29704 gc121*store121=NULL;
29705 int store_left121=0;
29706 fsoc*store_chunk121=NULL;
29707 gc121*gc_free121=NULL;
29708 gc120*store120=NULL;
29709 int store_left120=0;
29710 fsoc*store_chunk120=NULL;
29711 gc120*gc_free120=NULL;
29712 na_env na_env76={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark76};
29713 gc53*store53=NULL;
29714 int store_left53=0;
29715 fsoc*store_chunk53=NULL;
29716 gc53*gc_free53=NULL;
29717 gc50*store50=NULL;
29718 int store_left50=0;
29719 fsoc*store_chunk50=NULL;
29720 gc50*gc_free50=NULL;
29721 gc122*store122=NULL;
29722 int store_left122=0;
29723 fsoc*store_chunk122=NULL;
29724 gc122*gc_free122=NULL;
29725 gc151*store151=NULL;
29726 int store_left151=0;
29727 fsoc*store_chunk151=NULL;
29728 gc151*gc_free151=NULL;
29729 gc77*store77=NULL;
29730 int store_left77=0;
29731 fsoc*store_chunk77=NULL;
29732 gc77*gc_free77=NULL;
29733 gc51*store51=NULL;
29734 int store_left51=0;
29735 fsoc*store_chunk51=NULL;
29736 gc51*gc_free51=NULL;
29737 gc97*store97=NULL;
29738 int store_left97=0;
29739 fsoc*store_chunk97=NULL;
29740 gc97*gc_free97=NULL;
29741 gc99*store99=NULL;
29742 int store_left99=0;
29743 fsoc*store_chunk99=NULL;
29744 gc99*gc_free99=NULL;
29745 gc80*store80=NULL;
29746 int store_left80=0;
29747 fsoc*store_chunk80=NULL;
29748 gc80*gc_free80=NULL;
29749 gc140*store140=NULL;
29750 int store_left140=0;
29751 fsoc*store_chunk140=NULL;
29752 gc140*gc_free140=NULL;
29753 gc118*store118=NULL;
29754 int store_left118=0;
29755 fsoc*store_chunk118=NULL;
29756 gc118*gc_free118=NULL;
29757 gc113*store113=NULL;
29758 int store_left113=0;
29759 fsoc*store_chunk113=NULL;
29760 gc113*gc_free113=NULL;
29761 gc55*store55=NULL;
29762 int store_left55=0;
29763 fsoc*store_chunk55=NULL;
29764 gc55*gc_free55=NULL;
29765 na_env na_env69={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark69};
29766 gc65*store65=NULL;
29767 int store_left65=0;
29768 fsoc*store_chunk65=NULL;
29769 gc65*gc_free65=NULL;
29770 gc128*store128=NULL;
29771 int store_left128=0;
29772 fsoc*store_chunk128=NULL;
29773 gc128*gc_free128=NULL;
29774 gc105*store105=NULL;
29775 int store_left105=0;
29776 fsoc*store_chunk105=NULL;
29777 gc105*gc_free105=NULL;
29778 gc68*store68=NULL;
29779 int store_left68=0;
29780 fsoc*store_chunk68=NULL;
29781 gc68*gc_free68=NULL;
29782 gc129*store129=NULL;
29783 int store_left129=0;
29784 fsoc*store_chunk129=NULL;
29785 gc129*gc_free129=NULL;
29786 gc153*store153=NULL;
29787 int store_left153=0;
29788 fsoc*store_chunk153=NULL;
29789 gc153*gc_free153=NULL;
29790 gc45*store45=NULL;
29791 int store_left45=0;
29792 fsoc*store_chunk45=NULL;
29793 gc45*gc_free45=NULL;
29794 gc96*store96=NULL;
29795 int store_left96=0;
29796 fsoc*store_chunk96=NULL;
29797 gc96*gc_free96=NULL;
29798 gc7*store7=NULL;
29799 int store_left7=0;
29800 fsoc*store_chunk7=NULL;
29801 gc7*gc_free7=NULL;
29802 gc39*store39=NULL;
29803 int store_left39=0;
29804 fsoc*store_chunk39=NULL;
29805 gc39*gc_free39=NULL;
29806 gc127*store127=NULL;
29807 int store_left127=0;
29808 fsoc*store_chunk127=NULL;
29809 gc127*gc_free127=NULL;
29810 na_env na_env9={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark9};
29811 gc98*store98=NULL;
29812 int store_left98=0;
29813 fsoc*store_chunk98=NULL;
29814 gc98*gc_free98=NULL;
29815 gc104*store104=NULL;
29816 int store_left104=0;
29817 fsoc*store_chunk104=NULL;
29818 gc104*gc_free104=NULL;
29819 gc131*store131=NULL;
29820 int store_left131=0;
29821 fsoc*store_chunk131=NULL;
29822 gc131*gc_free131=NULL;
29823 gc28*store28=NULL;
29824 int store_left28=0;
29825 fsoc*store_chunk28=NULL;
29826 gc28*gc_free28=NULL;
29827 gc112*store112=NULL;
29828 int store_left112=0;
29829 fsoc*store_chunk112=NULL;
29830 gc112*gc_free112=NULL;
29831 gc67*store67=NULL;
29832 int store_left67=0;
29833 fsoc*store_chunk67=NULL;
29834 gc67*gc_free67=NULL;
29835 gc137*store137=NULL;
29836 int store_left137=0;
29837 fsoc*store_chunk137=NULL;
29838 gc137*gc_free137=NULL;
29839 gc74*store74=NULL;
29840 int store_left74=0;
29841 fsoc*store_chunk74=NULL;
29842 gc74*gc_free74=NULL;
29843 gc64*store64=NULL;
29844 int store_left64=0;
29845 fsoc*store_chunk64=NULL;
29846 gc64*gc_free64=NULL;
29847 gc16*store16=NULL;
29848 int store_left16=0;
29849 fsoc*store_chunk16=NULL;
29850 gc16*gc_free16=NULL;
29851 gc125*store125=NULL;
29852 int store_left125=0;
29853 fsoc*store_chunk125=NULL;
29854 gc125*gc_free125=NULL;
29855 gc86*store86=NULL;
29856 int store_left86=0;
29857 fsoc*store_chunk86=NULL;
29858 gc86*gc_free86=NULL;
29859 gc138*store138=NULL;
29860 int store_left138=0;
29861 fsoc*store_chunk138=NULL;
29862 gc138*gc_free138=NULL;
29863 na_env na_env85={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark85};
29864 gc146*store146=NULL;
29865 int store_left146=0;
29866 fsoc*store_chunk146=NULL;
29867 gc146*gc_free146=NULL;
29868 gc106*store106=NULL;
29869 int store_left106=0;
29870 fsoc*store_chunk106=NULL;
29871 gc106*gc_free106=NULL;
29872 gc66*store66=NULL;
29873 int store_left66=0;
29874 fsoc*store_chunk66=NULL;
29875 gc66*gc_free66=NULL;
29876 gc116*store116=NULL;
29877 int store_left116=0;
29878 fsoc*store_chunk116=NULL;
29879 gc116*gc_free116=NULL;
29880 gc132*store132=NULL;
29881 int store_left132=0;
29882 fsoc*store_chunk132=NULL;
29883 gc132*gc_free132=NULL;
29884 gc136*store136=NULL;
29885 int store_left136=0;
29886 fsoc*store_chunk136=NULL;
29887 gc136*gc_free136=NULL;
29888 na_env na_env133={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark133};
29889
29890 void gc_sweep57(fsoc*c){
29891 gc57*o1,*o2,*flt,flh;
29892 o1=((gc57*)(&(c->first_object)));
29893 if(c->header.state_type==FSO_STORE_CHUNK){
29894 for(;o1<store57;o1++){
29895 if((o1->header.flag)==FSOH_MARKED){
29896 o1->header.flag=FSOH_UNMARKED;
29897 }
29898 else{
29899 o1->header.next=gc_free57;
29900 gc_free57=o1;
29901 }
29902 }
29903 }
29904 else{
29905 int dead=1;
29906 flh.header.next=NULL;
29907 flt=&flh;
29908 o2=o1+c->count_minus_one;
29909 for(;o1<=o2;o2--){
29910 if((o2->header.flag)==FSOH_MARKED){
29911 o2->header.flag=FSOH_UNMARKED;
29912 dead=0;}
29913 else{
29914 flt->header.next=o2;
29915 flt=o2;
29916 }
29917 }
29918 if (dead){
29919 c->next=fsocfl;
29920 fsocfl=c;
29921 c->header.state_type=FSO_FREE_CHUNK;
29922 }
29923 else if(flh.header.next!=NULL){
29924 flt->header.next=gc_free57;
29925 gc_free57=flh.header.next;
29926 }
29927 }
29928 }
29929
29930 void gc_mark57(T57*o){
29931 se_gc_check_id(o,57);
29932 {((gc57*)o)->header.flag=FSOH_MARKED;
29933
29934 }}
29935
29936 void gc_align_mark57(fsoc*c,gc57*p){
29937 gc57*b=((gc57*)(&(c->first_object)));
29938 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store57)))return;
29939 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
29940 if(((char*)p)<((char*)b))return;
29941 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
29942 if(p->header.flag==FSOH_UNMARKED){
29943 T57*o=(&(p->object));
29944 ((gc57*)o)->header.flag=FSOH_MARKED;
29945 }
29946 }
29947 }
29948 fsoc H57={{FSOC_SIZE,FSO_STORE_CHUNK,
29949 (void(*)(mch*,void*))gc_align_mark57,
29950 (void(*)(mch*))gc_sweep57},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc57))-1)};
29951
29952 T57*new57(void){
29953 gc57*n;
29954 fsoc*c;
29955 if(store_left57>1){
29956 store_left57--;
29957 n=store57++;
29958 }
29959 else if(gc_free57!=NULL){
29960 n=gc_free57;
29961 gc_free57=n->header.next;
29962 }
29963 else if(store_left57==1){
29964 store_left57=0;
29965 store_chunk57->header.state_type=FSO_USED_CHUNK;
29966 n=store57++;
29967 }
29968 else{
29969 c=gc_fsoc_get1();
29970 if(gc_free57!=NULL){
29971 n=gc_free57;
29972 gc_free57=n->header.next;
29973 }
29974 else{
29975 if(c==NULL)c=gc_fsoc_get2();
29976 store_chunk57=c;
29977 *store_chunk57=H57;
29978 store57=((gc57*)(&(store_chunk57->first_object)));
29979 store_left57=H57.count_minus_one;
29980 n=store57++;
29981 }
29982 }
29983 n->header.flag=FSOH_UNMARKED;
29984 n->object=M57;
29985 return((T57*)n);
29986 }
29987
29988 void gc_sweep114(fsoc*c){
29989 gc114*o1,*o2,*flt,flh;
29990 o1=((gc114*)(&(c->first_object)));
29991 if(c->header.state_type==FSO_STORE_CHUNK){
29992 for(;o1<store114;o1++){
29993 if((o1->header.flag)==FSOH_MARKED){
29994 o1->header.flag=FSOH_UNMARKED;
29995 }
29996 else{
29997 o1->header.next=gc_free114;
29998 gc_free114=o1;
29999 }
30000 }
30001 }
30002 else{
30003 int dead=1;
30004 flh.header.next=NULL;
30005 flt=&flh;
30006 o2=o1+c->count_minus_one;
30007 for(;o1<=o2;o2--){
30008 if((o2->header.flag)==FSOH_MARKED){
30009 o2->header.flag=FSOH_UNMARKED;
30010 dead=0;}
30011 else{
30012 flt->header.next=o2;
30013 flt=o2;
30014 }
30015 }
30016 if (dead){
30017 c->next=fsocfl;
30018 fsocfl=c;
30019 c->header.state_type=FSO_FREE_CHUNK;
30020 }
30021 else if(flh.header.next!=NULL){
30022 flt->header.next=gc_free114;
30023 gc_free114=flh.header.next;
30024 }
30025 }
30026 }
30027
30028 void gc_mark114(T114*o){
30029 se_gc_check_id(o,114);
30030 {if(((gc114*)o)->header.flag==FSOH_UNMARKED){
30031 ((gc114*)o)->header.flag=FSOH_MARKED;
30032 if(NULL!=o->_main/*4*/)Xgc_mark30((T0*)(o->_main/*4*/));
30033 }
30034 }}
30035
30036 void gc_align_mark114(fsoc*c,gc114*p){
30037 gc114*b=((gc114*)(&(c->first_object)));
30038 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store114)))return;
30039 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30040 if(((char*)p)<((char*)b))return;
30041 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30042 if(p->header.flag==FSOH_UNMARKED){
30043 T114*o=(&(p->object));
30044 ((gc114*)o)->header.flag=FSOH_MARKED;
30045 if(NULL!=o->_main/*4*/)Xgc_mark30((T0*)(o->_main/*4*/));
30046 }
30047 }
30048 }
30049 fsoc H114={{FSOC_SIZE,FSO_STORE_CHUNK,
30050 (void(*)(mch*,void*))gc_align_mark114,
30051 (void(*)(mch*))gc_sweep114},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc114))-1)};
30052
30053 T114*new114(void){
30054 gc114*n;
30055 fsoc*c;
30056 if(store_left114>1){
30057 store_left114--;
30058 n=store114++;
30059 }
30060 else if(gc_free114!=NULL){
30061 n=gc_free114;
30062 gc_free114=n->header.next;
30063 }
30064 else if(store_left114==1){
30065 store_left114=0;
30066 store_chunk114->header.state_type=FSO_USED_CHUNK;
30067 n=store114++;
30068 }
30069 else{
30070 c=gc_fsoc_get1();
30071 if(gc_free114!=NULL){
30072 n=gc_free114;
30073 gc_free114=n->header.next;
30074 }
30075 else{
30076 if(c==NULL)c=gc_fsoc_get2();
30077 store_chunk114=c;
30078 *store_chunk114=H114;
30079 store114=((gc114*)(&(store_chunk114->first_object)));
30080 store_left114=H114.count_minus_one;
30081 n=store114++;
30082 }
30083 }
30084 n->header.flag=FSOH_UNMARKED;
30085 n->object=M114;
30086 return((T114*)n);
30087 }
30088
30089 void gc_sweep135(fsoc*c){
30090 gc135*o1,*o2,*flt,flh;
30091 o1=((gc135*)(&(c->first_object)));
30092 if(c->header.state_type==FSO_STORE_CHUNK){
30093 for(;o1<store135;o1++){
30094 if((o1->header.flag)==FSOH_MARKED){
30095 o1->header.flag=FSOH_UNMARKED;
30096 }
30097 else{
30098 o1->header.next=gc_free135;
30099 gc_free135=o1;
30100 }
30101 }
30102 }
30103 else{
30104 int dead=1;
30105 flh.header.next=NULL;
30106 flt=&flh;
30107 o2=o1+c->count_minus_one;
30108 for(;o1<=o2;o2--){
30109 if((o2->header.flag)==FSOH_MARKED){
30110 o2->header.flag=FSOH_UNMARKED;
30111 dead=0;}
30112 else{
30113 flt->header.next=o2;
30114 flt=o2;
30115 }
30116 }
30117 if (dead){
30118 c->next=fsocfl;
30119 fsocfl=c;
30120 c->header.state_type=FSO_FREE_CHUNK;
30121 }
30122 else if(flh.header.next!=NULL){
30123 flt->header.next=gc_free135;
30124 gc_free135=flh.header.next;
30125 }
30126 }
30127 }
30128
30129 void gc_mark135(T135*o){
30130 se_gc_check_id(o,135);
30131 {if(((gc135*)o)->header.flag==FSOH_UNMARKED){
30132 ((gc135*)o)->header.flag=FSOH_MARKED;
30133 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
30134 }
30135 }}
30136
30137 void gc_align_mark135(fsoc*c,gc135*p){
30138 gc135*b=((gc135*)(&(c->first_object)));
30139 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store135)))return;
30140 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30141 if(((char*)p)<((char*)b))return;
30142 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30143 if(p->header.flag==FSOH_UNMARKED){
30144 T135*o=(&(p->object));
30145 ((gc135*)o)->header.flag=FSOH_MARKED;
30146 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
30147 }
30148 }
30149 }
30150 fsoc H135={{FSOC_SIZE,FSO_STORE_CHUNK,
30151 (void(*)(mch*,void*))gc_align_mark135,
30152 (void(*)(mch*))gc_sweep135},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc135))-1)};
30153
30154 T135*new135(void){
30155 gc135*n;
30156 fsoc*c;
30157 if(store_left135>1){
30158 store_left135--;
30159 n=store135++;
30160 }
30161 else if(gc_free135!=NULL){
30162 n=gc_free135;
30163 gc_free135=n->header.next;
30164 }
30165 else if(store_left135==1){
30166 store_left135=0;
30167 store_chunk135->header.state_type=FSO_USED_CHUNK;
30168 n=store135++;
30169 }
30170 else{
30171 c=gc_fsoc_get1();
30172 if(gc_free135!=NULL){
30173 n=gc_free135;
30174 gc_free135=n->header.next;
30175 }
30176 else{
30177 if(c==NULL)c=gc_fsoc_get2();
30178 store_chunk135=c;
30179 *store_chunk135=H135;
30180 store135=((gc135*)(&(store_chunk135->first_object)));
30181 store_left135=H135.count_minus_one;
30182 n=store135++;
30183 }
30184 }
30185 n->header.flag=FSOH_UNMARKED;
30186 n->object=M135;
30187 return((T135*)n);
30188 }
30189
30190 void gc_sweep130(fsoc*c){
30191 gc130*o1,*o2,*flt,flh;
30192 o1=((gc130*)(&(c->first_object)));
30193 if(c->header.state_type==FSO_STORE_CHUNK){
30194 for(;o1<store130;o1++){
30195 if((o1->header.flag)==FSOH_MARKED){
30196 o1->header.flag=FSOH_UNMARKED;
30197 }
30198 else{
30199 o1->header.next=gc_free130;
30200 gc_free130=o1;
30201 }
30202 }
30203 }
30204 else{
30205 int dead=1;
30206 flh.header.next=NULL;
30207 flt=&flh;
30208 o2=o1+c->count_minus_one;
30209 for(;o1<=o2;o2--){
30210 if((o2->header.flag)==FSOH_MARKED){
30211 o2->header.flag=FSOH_UNMARKED;
30212 dead=0;}
30213 else{
30214 flt->header.next=o2;
30215 flt=o2;
30216 }
30217 }
30218 if (dead){
30219 c->next=fsocfl;
30220 fsocfl=c;
30221 c->header.state_type=FSO_FREE_CHUNK;
30222 }
30223 else if(flh.header.next!=NULL){
30224 flt->header.next=gc_free130;
30225 gc_free130=flh.header.next;
30226 }
30227 }
30228 }
30229
30230 void gc_mark130(T130*o){
30231 se_gc_check_id(o,130);
30232 {if(((gc130*)o)->header.flag==FSOH_UNMARKED){
30233 ((gc130*)o)->header.flag=FSOH_MARKED;
30234 if(NULL!=o->_tfw/*12*/)gc_mark146((T146*)(o->_tfw/*12*/));
30235 if(NULL!=o->_tfr/*8*/)gc_mark55((T55*)(o->_tfr/*8*/));
30236 if(NULL!=o->_score_table/*4*/)gc_mark131((T131*)(o->_score_table/*4*/));
30237 }
30238 }}
30239
30240 void gc_align_mark130(fsoc*c,gc130*p){
30241 gc130*b=((gc130*)(&(c->first_object)));
30242 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store130)))return;
30243 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30244 if(((char*)p)<((char*)b))return;
30245 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30246 if(p->header.flag==FSOH_UNMARKED){
30247 T130*o=(&(p->object));
30248 ((gc130*)o)->header.flag=FSOH_MARKED;
30249 if(NULL!=o->_tfw/*12*/)gc_mark146((T146*)(o->_tfw/*12*/));
30250 if(NULL!=o->_tfr/*8*/)gc_mark55((T55*)(o->_tfr/*8*/));
30251 if(NULL!=o->_score_table/*4*/)gc_mark131((T131*)(o->_score_table/*4*/));
30252 }
30253 }
30254 }
30255 fsoc H130={{FSOC_SIZE,FSO_STORE_CHUNK,
30256 (void(*)(mch*,void*))gc_align_mark130,
30257 (void(*)(mch*))gc_sweep130},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc130))-1)};
30258
30259 T130*new130(void){
30260 gc130*n;
30261 fsoc*c;
30262 if(store_left130>1){
30263 store_left130--;
30264 n=store130++;
30265 }
30266 else if(gc_free130!=NULL){
30267 n=gc_free130;
30268 gc_free130=n->header.next;
30269 }
30270 else if(store_left130==1){
30271 store_left130=0;
30272 store_chunk130->header.state_type=FSO_USED_CHUNK;
30273 n=store130++;
30274 }
30275 else{
30276 c=gc_fsoc_get1();
30277 if(gc_free130!=NULL){
30278 n=gc_free130;
30279 gc_free130=n->header.next;
30280 }
30281 else{
30282 if(c==NULL)c=gc_fsoc_get2();
30283 store_chunk130=c;
30284 *store_chunk130=H130;
30285 store130=((gc130*)(&(store_chunk130->first_object)));
30286 store_left130=H130.count_minus_one;
30287 n=store130++;
30288 }
30289 }
30290 n->header.flag=FSOH_UNMARKED;
30291 n->object=M130;
30292 return((T130*)n);
30293 }
30294
30295 void gc_sweep47(fsoc*c){
30296 gc47*o1,*o2,*flt,flh;
30297 o1=((gc47*)(&(c->first_object)));
30298 if(c->header.state_type==FSO_STORE_CHUNK){
30299 for(;o1<store47;o1++){
30300 if((o1->header.flag)==FSOH_MARKED){
30301 o1->header.flag=FSOH_UNMARKED;
30302 }
30303 else{
30304 o1->header.next=gc_free47;
30305 gc_free47=o1;
30306 }
30307 }
30308 }
30309 else{
30310 int dead=1;
30311 flh.header.next=NULL;
30312 flt=&flh;
30313 o2=o1+c->count_minus_one;
30314 for(;o1<=o2;o2--){
30315 if((o2->header.flag)==FSOH_MARKED){
30316 o2->header.flag=FSOH_UNMARKED;
30317 dead=0;}
30318 else{
30319 flt->header.next=o2;
30320 flt=o2;
30321 }
30322 }
30323 if (dead){
30324 c->next=fsocfl;
30325 fsocfl=c;
30326 c->header.state_type=FSO_FREE_CHUNK;
30327 }
30328 else if(flh.header.next!=NULL){
30329 flt->header.next=gc_free47;
30330 gc_free47=flh.header.next;
30331 }
30332 }
30333 }
30334
30335 void gc_mark47(T47*o){
30336 se_gc_check_id(o,47);
30337 {begin:
30338 if(((gc47*)o)->header.flag==FSOH_UNMARKED){
30339 ((gc47*)o)->header.flag=FSOH_MARKED;
30340 if(NULL!=o->_item/*4*/)Xgc_mark25((T0*)(o->_item/*4*/));
30341 o=(void*)o->_next;
30342 if((o!=NULL))goto begin;
30343 }
30344 }}
30345
30346 void gc_align_mark47(fsoc*c,gc47*p){
30347 gc47*b=((gc47*)(&(c->first_object)));
30348 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store47)))return;
30349 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30350 if(((char*)p)<((char*)b))return;
30351 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30352 if(p->header.flag==FSOH_UNMARKED){
30353 T47*o=(&(p->object));
30354 begin:
30355 ((gc47*)o)->header.flag=FSOH_MARKED;
30356 if(NULL!=o->_item/*4*/)Xgc_mark25((T0*)(o->_item/*4*/));
30357 o=(void*)o->_next;
30358 if((o!=NULL)&&(((gc47*)o)->header.flag==FSOH_UNMARKED))goto begin;
30359 }
30360 }
30361 }
30362 fsoc H47={{FSOC_SIZE,FSO_STORE_CHUNK,
30363 (void(*)(mch*,void*))gc_align_mark47,
30364 (void(*)(mch*))gc_sweep47},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc47))-1)};
30365
30366 T47*new47(void){
30367 gc47*n;
30368 fsoc*c;
30369 if(store_left47>1){
30370 store_left47--;
30371 n=store47++;
30372 }
30373 else if(gc_free47!=NULL){
30374 n=gc_free47;
30375 gc_free47=n->header.next;
30376 }
30377 else if(store_left47==1){
30378 store_left47=0;
30379 store_chunk47->header.state_type=FSO_USED_CHUNK;
30380 n=store47++;
30381 }
30382 else{
30383 c=gc_fsoc_get1();
30384 if(gc_free47!=NULL){
30385 n=gc_free47;
30386 gc_free47=n->header.next;
30387 }
30388 else{
30389 if(c==NULL)c=gc_fsoc_get2();
30390 store_chunk47=c;
30391 *store_chunk47=H47;
30392 store47=((gc47*)(&(store_chunk47->first_object)));
30393 store_left47=H47.count_minus_one;
30394 n=store47++;
30395 }
30396 }
30397 n->header.flag=FSOH_UNMARKED;
30398 n->object=M47;
30399 return((T47*)n);
30400 }
30401
30402 void gc_sweep75(fsoc*c){
30403 gc75*o1,*o2,*flt,flh;
30404 o1=((gc75*)(&(c->first_object)));
30405 if(c->header.state_type==FSO_STORE_CHUNK){
30406 for(;o1<store75;o1++){
30407 if((o1->header.flag)==FSOH_MARKED){
30408 o1->header.flag=FSOH_UNMARKED;
30409 }
30410 else{
30411 o1->header.next=gc_free75;
30412 gc_free75=o1;
30413 }
30414 }
30415 }
30416 else{
30417 int dead=1;
30418 flh.header.next=NULL;
30419 flt=&flh;
30420 o2=o1+c->count_minus_one;
30421 for(;o1<=o2;o2--){
30422 if((o2->header.flag)==FSOH_MARKED){
30423 o2->header.flag=FSOH_UNMARKED;
30424 dead=0;}
30425 else{
30426 flt->header.next=o2;
30427 flt=o2;
30428 }
30429 }
30430 if (dead){
30431 c->next=fsocfl;
30432 fsocfl=c;
30433 c->header.state_type=FSO_FREE_CHUNK;
30434 }
30435 else if(flh.header.next!=NULL){
30436 flt->header.next=gc_free75;
30437 gc_free75=flh.header.next;
30438 }
30439 }
30440 }
30441
30442 void gc_mark75(T75*o){
30443 se_gc_check_id(o,75);
30444 {if(((gc75*)o)->header.flag==FSOH_UNMARKED){
30445 ((gc75*)o)->header.flag=FSOH_MARKED;
30446 if(NULL!=o->_storage/*20*/)gc_mark76((o->_storage/*20*/));
30447 }
30448 }}
30449
30450 void gc_align_mark75(fsoc*c,gc75*p){
30451 gc75*b=((gc75*)(&(c->first_object)));
30452 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store75)))return;
30453 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30454 if(((char*)p)<((char*)b))return;
30455 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30456 if(p->header.flag==FSOH_UNMARKED){
30457 T75*o=(&(p->object));
30458 ((gc75*)o)->header.flag=FSOH_MARKED;
30459 if(NULL!=o->_storage/*20*/)gc_mark76((o->_storage/*20*/));
30460 }
30461 }
30462 }
30463 fsoc H75={{FSOC_SIZE,FSO_STORE_CHUNK,
30464 (void(*)(mch*,void*))gc_align_mark75,
30465 (void(*)(mch*))gc_sweep75},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc75))-1)};
30466
30467 T75*new75(void){
30468 gc75*n;
30469 fsoc*c;
30470 if(store_left75>1){
30471 store_left75--;
30472 n=store75++;
30473 }
30474 else if(gc_free75!=NULL){
30475 n=gc_free75;
30476 gc_free75=n->header.next;
30477 }
30478 else if(store_left75==1){
30479 store_left75=0;
30480 store_chunk75->header.state_type=FSO_USED_CHUNK;
30481 n=store75++;
30482 }
30483 else{
30484 c=gc_fsoc_get1();
30485 if(gc_free75!=NULL){
30486 n=gc_free75;
30487 gc_free75=n->header.next;
30488 }
30489 else{
30490 if(c==NULL)c=gc_fsoc_get2();
30491 store_chunk75=c;
30492 *store_chunk75=H75;
30493 store75=((gc75*)(&(store_chunk75->first_object)));
30494 store_left75=H75.count_minus_one;
30495 n=store75++;
30496 }
30497 }
30498 n->header.flag=FSOH_UNMARKED;
30499 n->object=M75;
30500 return((T75*)n);
30501 }
30502
30503 void gc_sweep41(fsoc*c){
30504 gc41*o1,*o2,*flt,flh;
30505 o1=((gc41*)(&(c->first_object)));
30506 if(c->header.state_type==FSO_STORE_CHUNK){
30507 for(;o1<store41;o1++){
30508 if((o1->header.flag)==FSOH_MARKED){
30509 o1->header.flag=FSOH_UNMARKED;
30510 }
30511 else{
30512 o1->header.next=gc_free41;
30513 gc_free41=o1;
30514 }
30515 }
30516 }
30517 else{
30518 int dead=1;
30519 flh.header.next=NULL;
30520 flt=&flh;
30521 o2=o1+c->count_minus_one;
30522 for(;o1<=o2;o2--){
30523 if((o2->header.flag)==FSOH_MARKED){
30524 o2->header.flag=FSOH_UNMARKED;
30525 dead=0;}
30526 else{
30527 flt->header.next=o2;
30528 flt=o2;
30529 }
30530 }
30531 if (dead){
30532 c->next=fsocfl;
30533 fsocfl=c;
30534 c->header.state_type=FSO_FREE_CHUNK;
30535 }
30536 else if(flh.header.next!=NULL){
30537 flt->header.next=gc_free41;
30538 gc_free41=flh.header.next;
30539 }
30540 }
30541 }
30542
30543 void gc_mark41(T41*o){
30544 se_gc_check_id(o,41);
30545 {if(((gc41*)o)->header.flag==FSOH_UNMARKED){
30546 ((gc41*)o)->header.flag=FSOH_MARKED;
30547 if(NULL!=o->_current_link/*8*/)gc_mark43((T43*)(o->_current_link/*8*/));
30548 if(NULL!=o->_linked_list/*4*/)gc_mark39((T39*)(o->_linked_list/*4*/));
30549 }
30550 }}
30551
30552 void gc_align_mark41(fsoc*c,gc41*p){
30553 gc41*b=((gc41*)(&(c->first_object)));
30554 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store41)))return;
30555 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30556 if(((char*)p)<((char*)b))return;
30557 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30558 if(p->header.flag==FSOH_UNMARKED){
30559 T41*o=(&(p->object));
30560 ((gc41*)o)->header.flag=FSOH_MARKED;
30561 if(NULL!=o->_current_link/*8*/)gc_mark43((T43*)(o->_current_link/*8*/));
30562 if(NULL!=o->_linked_list/*4*/)gc_mark39((T39*)(o->_linked_list/*4*/));
30563 }
30564 }
30565 }
30566 fsoc H41={{FSOC_SIZE,FSO_STORE_CHUNK,
30567 (void(*)(mch*,void*))gc_align_mark41,
30568 (void(*)(mch*))gc_sweep41},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc41))-1)};
30569
30570 T41*new41(void){
30571 gc41*n;
30572 fsoc*c;
30573 if(store_left41>1){
30574 store_left41--;
30575 n=store41++;
30576 }
30577 else if(gc_free41!=NULL){
30578 n=gc_free41;
30579 gc_free41=n->header.next;
30580 }
30581 else if(store_left41==1){
30582 store_left41=0;
30583 store_chunk41->header.state_type=FSO_USED_CHUNK;
30584 n=store41++;
30585 }
30586 else{
30587 c=gc_fsoc_get1();
30588 if(gc_free41!=NULL){
30589 n=gc_free41;
30590 gc_free41=n->header.next;
30591 }
30592 else{
30593 if(c==NULL)c=gc_fsoc_get2();
30594 store_chunk41=c;
30595 *store_chunk41=H41;
30596 store41=((gc41*)(&(store_chunk41->first_object)));
30597 store_left41=H41.count_minus_one;
30598 n=store41++;
30599 }
30600 }
30601 n->header.flag=FSOH_UNMARKED;
30602 n->object=M41;
30603 return((T41*)n);
30604 }
30605
30606 void gc_sweep43(fsoc*c){
30607 gc43*o1,*o2,*flt,flh;
30608 o1=((gc43*)(&(c->first_object)));
30609 if(c->header.state_type==FSO_STORE_CHUNK){
30610 for(;o1<store43;o1++){
30611 if((o1->header.flag)==FSOH_MARKED){
30612 o1->header.flag=FSOH_UNMARKED;
30613 }
30614 else{
30615 o1->header.next=gc_free43;
30616 gc_free43=o1;
30617 }
30618 }
30619 }
30620 else{
30621 int dead=1;
30622 flh.header.next=NULL;
30623 flt=&flh;
30624 o2=o1+c->count_minus_one;
30625 for(;o1<=o2;o2--){
30626 if((o2->header.flag)==FSOH_MARKED){
30627 o2->header.flag=FSOH_UNMARKED;
30628 dead=0;}
30629 else{
30630 flt->header.next=o2;
30631 flt=o2;
30632 }
30633 }
30634 if (dead){
30635 c->next=fsocfl;
30636 fsocfl=c;
30637 c->header.state_type=FSO_FREE_CHUNK;
30638 }
30639 else if(flh.header.next!=NULL){
30640 flt->header.next=gc_free43;
30641 gc_free43=flh.header.next;
30642 }
30643 }
30644 }
30645
30646 void gc_mark43(T43*o){
30647 se_gc_check_id(o,43);
30648 {begin:
30649 if(((gc43*)o)->header.flag==FSOH_UNMARKED){
30650 ((gc43*)o)->header.flag=FSOH_MARKED;
30651 if(NULL!=o->_item/*4*/)Xgc_mark30((T0*)(o->_item/*4*/));
30652 o=(void*)o->_next;
30653 if((o!=NULL))goto begin;
30654 }
30655 }}
30656
30657 void gc_align_mark43(fsoc*c,gc43*p){
30658 gc43*b=((gc43*)(&(c->first_object)));
30659 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store43)))return;
30660 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30661 if(((char*)p)<((char*)b))return;
30662 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30663 if(p->header.flag==FSOH_UNMARKED){
30664 T43*o=(&(p->object));
30665 begin:
30666 ((gc43*)o)->header.flag=FSOH_MARKED;
30667 if(NULL!=o->_item/*4*/)Xgc_mark30((T0*)(o->_item/*4*/));
30668 o=(void*)o->_next;
30669 if((o!=NULL)&&(((gc43*)o)->header.flag==FSOH_UNMARKED))goto begin;
30670 }
30671 }
30672 }
30673 fsoc H43={{FSOC_SIZE,FSO_STORE_CHUNK,
30674 (void(*)(mch*,void*))gc_align_mark43,
30675 (void(*)(mch*))gc_sweep43},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc43))-1)};
30676
30677 T43*new43(void){
30678 gc43*n;
30679 fsoc*c;
30680 if(store_left43>1){
30681 store_left43--;
30682 n=store43++;
30683 }
30684 else if(gc_free43!=NULL){
30685 n=gc_free43;
30686 gc_free43=n->header.next;
30687 }
30688 else if(store_left43==1){
30689 store_left43=0;
30690 store_chunk43->header.state_type=FSO_USED_CHUNK;
30691 n=store43++;
30692 }
30693 else{
30694 c=gc_fsoc_get1();
30695 if(gc_free43!=NULL){
30696 n=gc_free43;
30697 gc_free43=n->header.next;
30698 }
30699 else{
30700 if(c==NULL)c=gc_fsoc_get2();
30701 store_chunk43=c;
30702 *store_chunk43=H43;
30703 store43=((gc43*)(&(store_chunk43->first_object)));
30704 store_left43=H43.count_minus_one;
30705 n=store43++;
30706 }
30707 }
30708 n->header.flag=FSOH_UNMARKED;
30709 n->object=M43;
30710 return((T43*)n);
30711 }
30712
30713 void gc_sweep87(fsoc*c){
30714 gc87*o1,*o2,*flt,flh;
30715 o1=((gc87*)(&(c->first_object)));
30716 if(c->header.state_type==FSO_STORE_CHUNK){
30717 for(;o1<store87;o1++){
30718 if((o1->header.flag)==FSOH_MARKED){
30719 o1->header.flag=FSOH_UNMARKED;
30720 }
30721 else{
30722 o1->header.next=gc_free87;
30723 gc_free87=o1;
30724 }
30725 }
30726 }
30727 else{
30728 int dead=1;
30729 flh.header.next=NULL;
30730 flt=&flh;
30731 o2=o1+c->count_minus_one;
30732 for(;o1<=o2;o2--){
30733 if((o2->header.flag)==FSOH_MARKED){
30734 o2->header.flag=FSOH_UNMARKED;
30735 dead=0;}
30736 else{
30737 flt->header.next=o2;
30738 flt=o2;
30739 }
30740 }
30741 if (dead){
30742 c->next=fsocfl;
30743 fsocfl=c;
30744 c->header.state_type=FSO_FREE_CHUNK;
30745 }
30746 else if(flh.header.next!=NULL){
30747 flt->header.next=gc_free87;
30748 gc_free87=flh.header.next;
30749 }
30750 }
30751 }
30752
30753 void gc_mark87(T87*o){
30754 se_gc_check_id(o,87);
30755 {begin:
30756 if(((gc87*)o)->header.flag==FSOH_UNMARKED){
30757 ((gc87*)o)->header.flag=FSOH_MARKED;
30758 if(NULL!=o->_item/*4*/)gc_mark74((T74*)(o->_item/*4*/));
30759 o=(void*)o->_next;
30760 if((o!=NULL))goto begin;
30761 }
30762 }}
30763
30764 void gc_align_mark87(fsoc*c,gc87*p){
30765 gc87*b=((gc87*)(&(c->first_object)));
30766 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store87)))return;
30767 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30768 if(((char*)p)<((char*)b))return;
30769 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30770 if(p->header.flag==FSOH_UNMARKED){
30771 T87*o=(&(p->object));
30772 begin:
30773 ((gc87*)o)->header.flag=FSOH_MARKED;
30774 if(NULL!=o->_item/*4*/)gc_mark74((T74*)(o->_item/*4*/));
30775 o=(void*)o->_next;
30776 if((o!=NULL)&&(((gc87*)o)->header.flag==FSOH_UNMARKED))goto begin;
30777 }
30778 }
30779 }
30780 fsoc H87={{FSOC_SIZE,FSO_STORE_CHUNK,
30781 (void(*)(mch*,void*))gc_align_mark87,
30782 (void(*)(mch*))gc_sweep87},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc87))-1)};
30783
30784 T87*new87(void){
30785 gc87*n;
30786 fsoc*c;
30787 if(store_left87>1){
30788 store_left87--;
30789 n=store87++;
30790 }
30791 else if(gc_free87!=NULL){
30792 n=gc_free87;
30793 gc_free87=n->header.next;
30794 }
30795 else if(store_left87==1){
30796 store_left87=0;
30797 store_chunk87->header.state_type=FSO_USED_CHUNK;
30798 n=store87++;
30799 }
30800 else{
30801 c=gc_fsoc_get1();
30802 if(gc_free87!=NULL){
30803 n=gc_free87;
30804 gc_free87=n->header.next;
30805 }
30806 else{
30807 if(c==NULL)c=gc_fsoc_get2();
30808 store_chunk87=c;
30809 *store_chunk87=H87;
30810 store87=((gc87*)(&(store_chunk87->first_object)));
30811 store_left87=H87.count_minus_one;
30812 n=store87++;
30813 }
30814 }
30815 n->header.flag=FSOH_UNMARKED;
30816 n->object=M87;
30817 return((T87*)n);
30818 }
30819
30820 void gc_sweep83(fsoc*c){
30821 gc83*o1,*o2,*flt,flh;
30822 o1=((gc83*)(&(c->first_object)));
30823 if(c->header.state_type==FSO_STORE_CHUNK){
30824 for(;o1<store83;o1++){
30825 if((o1->header.flag)==FSOH_MARKED){
30826 o1->header.flag=FSOH_UNMARKED;
30827 }
30828 else{
30829 o1->header.next=gc_free83;
30830 gc_free83=o1;
30831 }
30832 }
30833 }
30834 else{
30835 int dead=1;
30836 flh.header.next=NULL;
30837 flt=&flh;
30838 o2=o1+c->count_minus_one;
30839 for(;o1<=o2;o2--){
30840 if((o2->header.flag)==FSOH_MARKED){
30841 o2->header.flag=FSOH_UNMARKED;
30842 dead=0;}
30843 else{
30844 flt->header.next=o2;
30845 flt=o2;
30846 }
30847 }
30848 if (dead){
30849 c->next=fsocfl;
30850 fsocfl=c;
30851 c->header.state_type=FSO_FREE_CHUNK;
30852 }
30853 else if(flh.header.next!=NULL){
30854 flt->header.next=gc_free83;
30855 gc_free83=flh.header.next;
30856 }
30857 }
30858 }
30859
30860 void gc_mark83(T83*o){
30861 se_gc_check_id(o,83);
30862 {if(((gc83*)o)->header.flag==FSOH_UNMARKED){
30863 ((gc83*)o)->header.flag=FSOH_MARKED;
30864 if(NULL!=o->_storage/*4*/)gc_mark85((o->_storage/*4*/));
30865 }
30866 }}
30867
30868 void gc_align_mark83(fsoc*c,gc83*p){
30869 gc83*b=((gc83*)(&(c->first_object)));
30870 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store83)))return;
30871 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30872 if(((char*)p)<((char*)b))return;
30873 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30874 if(p->header.flag==FSOH_UNMARKED){
30875 T83*o=(&(p->object));
30876 ((gc83*)o)->header.flag=FSOH_MARKED;
30877 if(NULL!=o->_storage/*4*/)gc_mark85((o->_storage/*4*/));
30878 }
30879 }
30880 }
30881 fsoc H83={{FSOC_SIZE,FSO_STORE_CHUNK,
30882 (void(*)(mch*,void*))gc_align_mark83,
30883 (void(*)(mch*))gc_sweep83},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc83))-1)};
30884
30885 T83*new83(void){
30886 gc83*n;
30887 fsoc*c;
30888 if(store_left83>1){
30889 store_left83--;
30890 n=store83++;
30891 }
30892 else if(gc_free83!=NULL){
30893 n=gc_free83;
30894 gc_free83=n->header.next;
30895 }
30896 else if(store_left83==1){
30897 store_left83=0;
30898 store_chunk83->header.state_type=FSO_USED_CHUNK;
30899 n=store83++;
30900 }
30901 else{
30902 c=gc_fsoc_get1();
30903 if(gc_free83!=NULL){
30904 n=gc_free83;
30905 gc_free83=n->header.next;
30906 }
30907 else{
30908 if(c==NULL)c=gc_fsoc_get2();
30909 store_chunk83=c;
30910 *store_chunk83=H83;
30911 store83=((gc83*)(&(store_chunk83->first_object)));
30912 store_left83=H83.count_minus_one;
30913 n=store83++;
30914 }
30915 }
30916 n->header.flag=FSOH_UNMARKED;
30917 n->object=M83;
30918 return((T83*)n);
30919 }
30920
30921 void gc_sweep117(fsoc*c){
30922 gc117*o1,*o2,*flt,flh;
30923 o1=((gc117*)(&(c->first_object)));
30924 if(c->header.state_type==FSO_STORE_CHUNK){
30925 for(;o1<store117;o1++){
30926 if((o1->header.flag)==FSOH_MARKED){
30927 o1->header.flag=FSOH_UNMARKED;
30928 }
30929 else{
30930 o1->header.next=gc_free117;
30931 gc_free117=o1;
30932 }
30933 }
30934 }
30935 else{
30936 int dead=1;
30937 flh.header.next=NULL;
30938 flt=&flh;
30939 o2=o1+c->count_minus_one;
30940 for(;o1<=o2;o2--){
30941 if((o2->header.flag)==FSOH_MARKED){
30942 o2->header.flag=FSOH_UNMARKED;
30943 dead=0;}
30944 else{
30945 flt->header.next=o2;
30946 flt=o2;
30947 }
30948 }
30949 if (dead){
30950 c->next=fsocfl;
30951 fsocfl=c;
30952 c->header.state_type=FSO_FREE_CHUNK;
30953 }
30954 else if(flh.header.next!=NULL){
30955 flt->header.next=gc_free117;
30956 gc_free117=flh.header.next;
30957 }
30958 }
30959 }
30960
30961 void gc_mark117(T117*o){
30962 se_gc_check_id(o,117);
30963 {if(((gc117*)o)->header.flag==FSOH_UNMARKED){
30964 ((gc117*)o)->header.flag=FSOH_MARKED;
30965 if(NULL!=o->_preset_list/*57*/)gc_mark66((T66*)(o->_preset_list/*57*/));
30966 if(NULL!=o->_preset/*53*/)gc_mark65((T65*)(o->_preset/*53*/));
30967 if(NULL!=o->_setting/*49*/)gc_mark68((T68*)(o->_setting/*49*/));
30968 if(NULL!=o->_height_tb/*45*/)gc_mark98((T98*)(o->_height_tb/*45*/));
30969 if(NULL!=o->_width_tb/*41*/)gc_mark98((T98*)(o->_width_tb/*41*/));
30970 if(NULL!=o->_wrap_cb/*37*/)gc_mark126((T126*)(o->_wrap_cb/*37*/));
30971 if(NULL!=o->_preset_lb/*33*/)gc_mark120((T120*)(o->_preset_lb/*33*/));
30972 if(NULL!=o->_focus_widget/*29*/)Xgc_mark30((T0*)(o->_focus_widget/*29*/));
30973 if(NULL!=o->_widget_list/*25*/)gc_mark39((T39*)(o->_widget_list/*25*/));
30974 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
30975 }
30976 }}
30977
30978 void gc_align_mark117(fsoc*c,gc117*p){
30979 gc117*b=((gc117*)(&(c->first_object)));
30980 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store117)))return;
30981 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
30982 if(((char*)p)<((char*)b))return;
30983 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
30984 if(p->header.flag==FSOH_UNMARKED){
30985 T117*o=(&(p->object));
30986 ((gc117*)o)->header.flag=FSOH_MARKED;
30987 if(NULL!=o->_preset_list/*57*/)gc_mark66((T66*)(o->_preset_list/*57*/));
30988 if(NULL!=o->_preset/*53*/)gc_mark65((T65*)(o->_preset/*53*/));
30989 if(NULL!=o->_setting/*49*/)gc_mark68((T68*)(o->_setting/*49*/));
30990 if(NULL!=o->_height_tb/*45*/)gc_mark98((T98*)(o->_height_tb/*45*/));
30991 if(NULL!=o->_width_tb/*41*/)gc_mark98((T98*)(o->_width_tb/*41*/));
30992 if(NULL!=o->_wrap_cb/*37*/)gc_mark126((T126*)(o->_wrap_cb/*37*/));
30993 if(NULL!=o->_preset_lb/*33*/)gc_mark120((T120*)(o->_preset_lb/*33*/));
30994 if(NULL!=o->_focus_widget/*29*/)Xgc_mark30((T0*)(o->_focus_widget/*29*/));
30995 if(NULL!=o->_widget_list/*25*/)gc_mark39((T39*)(o->_widget_list/*25*/));
30996 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
30997 }
30998 }
30999 }
31000 fsoc H117={{FSOC_SIZE,FSO_STORE_CHUNK,
31001 (void(*)(mch*,void*))gc_align_mark117,
31002 (void(*)(mch*))gc_sweep117},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc117))-1)};
31003
31004 T117*new117(void){
31005 gc117*n;
31006 fsoc*c;
31007 if(store_left117>1){
31008 store_left117--;
31009 n=store117++;
31010 }
31011 else if(gc_free117!=NULL){
31012 n=gc_free117;
31013 gc_free117=n->header.next;
31014 }
31015 else if(store_left117==1){
31016 store_left117=0;
31017 store_chunk117->header.state_type=FSO_USED_CHUNK;
31018 n=store117++;
31019 }
31020 else{
31021 c=gc_fsoc_get1();
31022 if(gc_free117!=NULL){
31023 n=gc_free117;
31024 gc_free117=n->header.next;
31025 }
31026 else{
31027 if(c==NULL)c=gc_fsoc_get2();
31028 store_chunk117=c;
31029 *store_chunk117=H117;
31030 store117=((gc117*)(&(store_chunk117->first_object)));
31031 store_left117=H117.count_minus_one;
31032 n=store117++;
31033 }
31034 }
31035 n->header.flag=FSOH_UNMARKED;
31036 n->object=M117;
31037 return((T117*)n);
31038 }
31039
31040 void gc_mark82(T82 o){
31041 (((rsoh*)o)-1)->header.magic_flag=RSOH_MARKED;
31042 }
31043
31044 T82 new82(int size){
31045 size=(size*sizeof(T6))+sizeof(rsoh);
31046 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
31047 if (size<=(na_env82.store_left)){
31048 rsoh*r=na_env82.store;
31049 na_env82.store_left-=size;
31050 if(na_env82.store_left>sizeof(rsoh)){
31051 r->header.size=size;
31052 na_env82.store=((rsoh*)(((char*)(na_env82.store))+size));
31053 }
31054 else {
31055 r->header.size=size+na_env82.store_left;
31056 na_env82.store_left=0;
31057 }
31058 (r->header.magic_flag)=RSOH_UNMARKED;
31059 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
31060 return((T82)(r+1));
31061 }
31062 return((T82)new_na(&na_env82,size));
31063 }
31064
31065 void gc_sweep126(fsoc*c){
31066 gc126*o1,*o2,*flt,flh;
31067 o1=((gc126*)(&(c->first_object)));
31068 if(c->header.state_type==FSO_STORE_CHUNK){
31069 for(;o1<store126;o1++){
31070 if((o1->header.flag)==FSOH_MARKED){
31071 o1->header.flag=FSOH_UNMARKED;
31072 }
31073 else{
31074 o1->header.next=gc_free126;
31075 gc_free126=o1;
31076 }
31077 }
31078 }
31079 else{
31080 int dead=1;
31081 flh.header.next=NULL;
31082 flt=&flh;
31083 o2=o1+c->count_minus_one;
31084 for(;o1<=o2;o2--){
31085 if((o2->header.flag)==FSOH_MARKED){
31086 o2->header.flag=FSOH_UNMARKED;
31087 dead=0;}
31088 else{
31089 flt->header.next=o2;
31090 flt=o2;
31091 }
31092 }
31093 if (dead){
31094 c->next=fsocfl;
31095 fsocfl=c;
31096 c->header.state_type=FSO_FREE_CHUNK;
31097 }
31098 else if(flh.header.next!=NULL){
31099 flt->header.next=gc_free126;
31100 gc_free126=flh.header.next;
31101 }
31102 }
31103 }
31104
31105 void gc_mark126(T126*o){
31106 se_gc_check_id(o,126);
31107 {if(((gc126*)o)->header.flag==FSOH_UNMARKED){
31108 ((gc126*)o)->header.flag=FSOH_MARKED;
31109 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
31110 }
31111 }}
31112
31113 void gc_align_mark126(fsoc*c,gc126*p){
31114 gc126*b=((gc126*)(&(c->first_object)));
31115 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store126)))return;
31116 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31117 if(((char*)p)<((char*)b))return;
31118 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31119 if(p->header.flag==FSOH_UNMARKED){
31120 T126*o=(&(p->object));
31121 ((gc126*)o)->header.flag=FSOH_MARKED;
31122 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
31123 }
31124 }
31125 }
31126 fsoc H126={{FSOC_SIZE,FSO_STORE_CHUNK,
31127 (void(*)(mch*,void*))gc_align_mark126,
31128 (void(*)(mch*))gc_sweep126},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc126))-1)};
31129
31130 T126*new126(void){
31131 gc126*n;
31132 fsoc*c;
31133 if(store_left126>1){
31134 store_left126--;
31135 n=store126++;
31136 }
31137 else if(gc_free126!=NULL){
31138 n=gc_free126;
31139 gc_free126=n->header.next;
31140 }
31141 else if(store_left126==1){
31142 store_left126=0;
31143 store_chunk126->header.state_type=FSO_USED_CHUNK;
31144 n=store126++;
31145 }
31146 else{
31147 c=gc_fsoc_get1();
31148 if(gc_free126!=NULL){
31149 n=gc_free126;
31150 gc_free126=n->header.next;
31151 }
31152 else{
31153 if(c==NULL)c=gc_fsoc_get2();
31154 store_chunk126=c;
31155 *store_chunk126=H126;
31156 store126=((gc126*)(&(store_chunk126->first_object)));
31157 store_left126=H126.count_minus_one;
31158 n=store126++;
31159 }
31160 }
31161 n->header.flag=FSOH_UNMARKED;
31162 n->object=M126;
31163 return((T126*)n);
31164 }
31165
31166 void gc_mark49(T49 o){
31167 rsoh*h=((rsoh*)o)-1;
31168 if((h->header.magic_flag)==RSOH_UNMARKED){
31169 h->header.magic_flag=RSOH_MARKED;
31170 {T0* e;
31171 T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
31172 for(;((void*)p)>=((void*)o);p--){
31173 e=*p;
31174 if(NULL!=e)gc_mark47((T47*)(e));
31175
31176 }
31177 }
31178 }}
31179
31180 T49 new49(int size){
31181 size=(size*sizeof(T0*))+sizeof(rsoh);
31182 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
31183 if (size<=(na_env49.store_left)){
31184 rsoh*r=na_env49.store;
31185 na_env49.store_left-=size;
31186 if(na_env49.store_left>sizeof(rsoh)){
31187 r->header.size=size;
31188 na_env49.store=((rsoh*)(((char*)(na_env49.store))+size));
31189 }
31190 else {
31191 r->header.size=size+na_env49.store_left;
31192 na_env49.store_left=0;
31193 }
31194 (r->header.magic_flag)=RSOH_UNMARKED;
31195 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
31196 return((T49)(r+1));
31197 }
31198 return((T49)new_na(&na_env49,size));
31199 }
31200
31201 void gc_sweep54(fsoc*c){
31202 gc54*o1,*o2,*flt,flh;
31203 o1=((gc54*)(&(c->first_object)));
31204 if(c->header.state_type==FSO_STORE_CHUNK){
31205 for(;o1<store54;o1++){
31206 if((o1->header.flag)==FSOH_MARKED){
31207 o1->header.flag=FSOH_UNMARKED;
31208 }
31209 else{
31210 o1->header.next=gc_free54;
31211 gc_free54=o1;
31212 }
31213 }
31214 }
31215 else{
31216 int dead=1;
31217 flh.header.next=NULL;
31218 flt=&flh;
31219 o2=o1+c->count_minus_one;
31220 for(;o1<=o2;o2--){
31221 if((o2->header.flag)==FSOH_MARKED){
31222 o2->header.flag=FSOH_UNMARKED;
31223 dead=0;}
31224 else{
31225 flt->header.next=o2;
31226 flt=o2;
31227 }
31228 }
31229 if (dead){
31230 c->next=fsocfl;
31231 fsocfl=c;
31232 c->header.state_type=FSO_FREE_CHUNK;
31233 }
31234 else if(flh.header.next!=NULL){
31235 flt->header.next=gc_free54;
31236 gc_free54=flh.header.next;
31237 }
31238 }
31239 }
31240
31241 void gc_mark54(T54*o){
31242 se_gc_check_id(o,54);
31243 {if(((gc54*)o)->header.flag==FSOH_UNMARKED){
31244 ((gc54*)o)->header.flag=FSOH_MARKED;
31245 if(NULL!=o->_default_preset/*28*/)gc_mark7((T7*)(o->_default_preset/*28*/));
31246 if(NULL!=o->_bigfont/*24*/)gc_mark53((T53*)(o->_bigfont/*24*/));
31247 if(NULL!=o->_mainfont/*20*/)gc_mark53((T53*)(o->_mainfont/*20*/));
31248 if(NULL!=o->_bigttf/*16*/)gc_mark7((T7*)(o->_bigttf/*16*/));
31249 if(NULL!=o->_mainttf/*12*/)gc_mark7((T7*)(o->_mainttf/*12*/));
31250 if(NULL!=o->_preset_list/*8*/)gc_mark66((T66*)(o->_preset_list/*8*/));
31251 if(NULL!=o->_score_file/*4*/)gc_mark7((T7*)(o->_score_file/*4*/));
31252 }
31253 }}
31254
31255 void gc_align_mark54(fsoc*c,gc54*p){
31256 gc54*b=((gc54*)(&(c->first_object)));
31257 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store54)))return;
31258 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31259 if(((char*)p)<((char*)b))return;
31260 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31261 if(p->header.flag==FSOH_UNMARKED){
31262 T54*o=(&(p->object));
31263 ((gc54*)o)->header.flag=FSOH_MARKED;
31264 if(NULL!=o->_default_preset/*28*/)gc_mark7((T7*)(o->_default_preset/*28*/));
31265 if(NULL!=o->_bigfont/*24*/)gc_mark53((T53*)(o->_bigfont/*24*/));
31266 if(NULL!=o->_mainfont/*20*/)gc_mark53((T53*)(o->_mainfont/*20*/));
31267 if(NULL!=o->_bigttf/*16*/)gc_mark7((T7*)(o->_bigttf/*16*/));
31268 if(NULL!=o->_mainttf/*12*/)gc_mark7((T7*)(o->_mainttf/*12*/));
31269 if(NULL!=o->_preset_list/*8*/)gc_mark66((T66*)(o->_preset_list/*8*/));
31270 if(NULL!=o->_score_file/*4*/)gc_mark7((T7*)(o->_score_file/*4*/));
31271 }
31272 }
31273 }
31274 fsoc H54={{FSOC_SIZE,FSO_STORE_CHUNK,
31275 (void(*)(mch*,void*))gc_align_mark54,
31276 (void(*)(mch*))gc_sweep54},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc54))-1)};
31277
31278 T54*new54(void){
31279 gc54*n;
31280 fsoc*c;
31281 if(store_left54>1){
31282 store_left54--;
31283 n=store54++;
31284 }
31285 else if(gc_free54!=NULL){
31286 n=gc_free54;
31287 gc_free54=n->header.next;
31288 }
31289 else if(store_left54==1){
31290 store_left54=0;
31291 store_chunk54->header.state_type=FSO_USED_CHUNK;
31292 n=store54++;
31293 }
31294 else{
31295 c=gc_fsoc_get1();
31296 if(gc_free54!=NULL){
31297 n=gc_free54;
31298 gc_free54=n->header.next;
31299 }
31300 else{
31301 if(c==NULL)c=gc_fsoc_get2();
31302 store_chunk54=c;
31303 *store_chunk54=H54;
31304 store54=((gc54*)(&(store_chunk54->first_object)));
31305 store_left54=H54.count_minus_one;
31306 n=store54++;
31307 }
31308 }
31309 n->header.flag=FSOH_UNMARKED;
31310 n->object=M54;
31311 return((T54*)n);
31312 }
31313
31314 void gc_sweep102(fsoc*c){
31315 gc102*o1,*o2,*flt,flh;
31316 o1=((gc102*)(&(c->first_object)));
31317 if(c->header.state_type==FSO_STORE_CHUNK){
31318 for(;o1<store102;o1++){
31319 if((o1->header.flag)==FSOH_MARKED){
31320 o1->header.flag=FSOH_UNMARKED;
31321 }
31322 else{
31323 o1->header.next=gc_free102;
31324 gc_free102=o1;
31325 }
31326 }
31327 }
31328 else{
31329 int dead=1;
31330 flh.header.next=NULL;
31331 flt=&flh;
31332 o2=o1+c->count_minus_one;
31333 for(;o1<=o2;o2--){
31334 if((o2->header.flag)==FSOH_MARKED){
31335 o2->header.flag=FSOH_UNMARKED;
31336 dead=0;}
31337 else{
31338 flt->header.next=o2;
31339 flt=o2;
31340 }
31341 }
31342 if (dead){
31343 c->next=fsocfl;
31344 fsocfl=c;
31345 c->header.state_type=FSO_FREE_CHUNK;
31346 }
31347 else if(flh.header.next!=NULL){
31348 flt->header.next=gc_free102;
31349 gc_free102=flh.header.next;
31350 }
31351 }
31352 }
31353
31354 void gc_mark102(T102*o){
31355 se_gc_check_id(o,102);
31356 {if(((gc102*)o)->header.flag==FSOH_UNMARKED){
31357 ((gc102*)o)->header.flag=FSOH_MARKED;
31358 if(NULL!=o->_first/*4*/)gc_mark65((T65*)(o->_first/*4*/));
31359 }
31360 }}
31361
31362 void gc_align_mark102(fsoc*c,gc102*p){
31363 gc102*b=((gc102*)(&(c->first_object)));
31364 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store102)))return;
31365 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31366 if(((char*)p)<((char*)b))return;
31367 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31368 if(p->header.flag==FSOH_UNMARKED){
31369 T102*o=(&(p->object));
31370 ((gc102*)o)->header.flag=FSOH_MARKED;
31371 if(NULL!=o->_first/*4*/)gc_mark65((T65*)(o->_first/*4*/));
31372 }
31373 }
31374 }
31375 fsoc H102={{FSOC_SIZE,FSO_STORE_CHUNK,
31376 (void(*)(mch*,void*))gc_align_mark102,
31377 (void(*)(mch*))gc_sweep102},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc102))-1)};
31378
31379 T102*new102(void){
31380 gc102*n;
31381 fsoc*c;
31382 if(store_left102>1){
31383 store_left102--;
31384 n=store102++;
31385 }
31386 else if(gc_free102!=NULL){
31387 n=gc_free102;
31388 gc_free102=n->header.next;
31389 }
31390 else if(store_left102==1){
31391 store_left102=0;
31392 store_chunk102->header.state_type=FSO_USED_CHUNK;
31393 n=store102++;
31394 }
31395 else{
31396 c=gc_fsoc_get1();
31397 if(gc_free102!=NULL){
31398 n=gc_free102;
31399 gc_free102=n->header.next;
31400 }
31401 else{
31402 if(c==NULL)c=gc_fsoc_get2();
31403 store_chunk102=c;
31404 *store_chunk102=H102;
31405 store102=((gc102*)(&(store_chunk102->first_object)));
31406 store_left102=H102.count_minus_one;
31407 n=store102++;
31408 }
31409 }
31410 n->header.flag=FSOH_UNMARKED;
31411 n->object=M102;
31412 return((T102*)n);
31413 }
31414
31415 void gc_sweep107(fsoc*c){
31416 gc107*o1,*o2,*flt,flh;
31417 o1=((gc107*)(&(c->first_object)));
31418 if(c->header.state_type==FSO_STORE_CHUNK){
31419 for(;o1<store107;o1++){
31420 if((o1->header.flag)==FSOH_MARKED){
31421 o1->header.flag=FSOH_UNMARKED;
31422 }
31423 else{
31424 o1->header.next=gc_free107;
31425 gc_free107=o1;
31426 }
31427 }
31428 }
31429 else{
31430 int dead=1;
31431 flh.header.next=NULL;
31432 flt=&flh;
31433 o2=o1+c->count_minus_one;
31434 for(;o1<=o2;o2--){
31435 if((o2->header.flag)==FSOH_MARKED){
31436 o2->header.flag=FSOH_UNMARKED;
31437 dead=0;}
31438 else{
31439 flt->header.next=o2;
31440 flt=o2;
31441 }
31442 }
31443 if (dead){
31444 c->next=fsocfl;
31445 fsocfl=c;
31446 c->header.state_type=FSO_FREE_CHUNK;
31447 }
31448 else if(flh.header.next!=NULL){
31449 flt->header.next=gc_free107;
31450 gc_free107=flh.header.next;
31451 }
31452 }
31453 }
31454
31455 void gc_mark107(T107*o){
31456 se_gc_check_id(o,107);
31457 {if(((gc107*)o)->header.flag==FSOH_UNMARKED){
31458 ((gc107*)o)->header.flag=FSOH_MARKED;
31459 if(NULL!=o->_img/*29*/)gc_mark50((T50*)(o->_img/*29*/));
31460 if(NULL!=o->_string/*25*/)gc_mark7((T7*)(o->_string/*25*/));
31461 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
31462 }
31463 }}
31464
31465 void gc_align_mark107(fsoc*c,gc107*p){
31466 gc107*b=((gc107*)(&(c->first_object)));
31467 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store107)))return;
31468 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31469 if(((char*)p)<((char*)b))return;
31470 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31471 if(p->header.flag==FSOH_UNMARKED){
31472 T107*o=(&(p->object));
31473 ((gc107*)o)->header.flag=FSOH_MARKED;
31474 if(NULL!=o->_img/*29*/)gc_mark50((T50*)(o->_img/*29*/));
31475 if(NULL!=o->_string/*25*/)gc_mark7((T7*)(o->_string/*25*/));
31476 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
31477 }
31478 }
31479 }
31480 fsoc H107={{FSOC_SIZE,FSO_STORE_CHUNK,
31481 (void(*)(mch*,void*))gc_align_mark107,
31482 (void(*)(mch*))gc_sweep107},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc107))-1)};
31483
31484 T107*new107(void){
31485 gc107*n;
31486 fsoc*c;
31487 if(store_left107>1){
31488 store_left107--;
31489 n=store107++;
31490 }
31491 else if(gc_free107!=NULL){
31492 n=gc_free107;
31493 gc_free107=n->header.next;
31494 }
31495 else if(store_left107==1){
31496 store_left107=0;
31497 store_chunk107->header.state_type=FSO_USED_CHUNK;
31498 n=store107++;
31499 }
31500 else{
31501 c=gc_fsoc_get1();
31502 if(gc_free107!=NULL){
31503 n=gc_free107;
31504 gc_free107=n->header.next;
31505 }
31506 else{
31507 if(c==NULL)c=gc_fsoc_get2();
31508 store_chunk107=c;
31509 *store_chunk107=H107;
31510 store107=((gc107*)(&(store_chunk107->first_object)));
31511 store_left107=H107.count_minus_one;
31512 n=store107++;
31513 }
31514 }
31515 n->header.flag=FSOH_UNMARKED;
31516 n->object=M107;
31517 return((T107*)n);
31518 }
31519
31520 void gc_sweep121(fsoc*c){
31521 gc121*o1,*o2,*flt,flh;
31522 o1=((gc121*)(&(c->first_object)));
31523 if(c->header.state_type==FSO_STORE_CHUNK){
31524 for(;o1<store121;o1++){
31525 if((o1->header.flag)==FSOH_MARKED){
31526 o1->header.flag=FSOH_UNMARKED;
31527 }
31528 else{
31529 o1->header.next=gc_free121;
31530 gc_free121=o1;
31531 }
31532 }
31533 }
31534 else{
31535 int dead=1;
31536 flh.header.next=NULL;
31537 flt=&flh;
31538 o2=o1+c->count_minus_one;
31539 for(;o1<=o2;o2--){
31540 if((o2->header.flag)==FSOH_MARKED){
31541 o2->header.flag=FSOH_UNMARKED;
31542 dead=0;}
31543 else{
31544 flt->header.next=o2;
31545 flt=o2;
31546 }
31547 }
31548 if (dead){
31549 c->next=fsocfl;
31550 fsocfl=c;
31551 c->header.state_type=FSO_FREE_CHUNK;
31552 }
31553 else if(flh.header.next!=NULL){
31554 flt->header.next=gc_free121;
31555 gc_free121=flh.header.next;
31556 }
31557 }
31558 }
31559
31560 void gc_mark121(T121*o){
31561 se_gc_check_id(o,121);
31562 {begin:
31563 if(((gc121*)o)->header.flag==FSOH_UNMARKED){
31564 ((gc121*)o)->header.flag=FSOH_MARKED;
31565 if(NULL!=o->_item/*4*/)gc_mark7((T7*)(o->_item/*4*/));
31566 o=(void*)o->_next;
31567 if((o!=NULL))goto begin;
31568 }
31569 }}
31570
31571 void gc_align_mark121(fsoc*c,gc121*p){
31572 gc121*b=((gc121*)(&(c->first_object)));
31573 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store121)))return;
31574 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31575 if(((char*)p)<((char*)b))return;
31576 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31577 if(p->header.flag==FSOH_UNMARKED){
31578 T121*o=(&(p->object));
31579 begin:
31580 ((gc121*)o)->header.flag=FSOH_MARKED;
31581 if(NULL!=o->_item/*4*/)gc_mark7((T7*)(o->_item/*4*/));
31582 o=(void*)o->_next;
31583 if((o!=NULL)&&(((gc121*)o)->header.flag==FSOH_UNMARKED))goto begin;
31584 }
31585 }
31586 }
31587 fsoc H121={{FSOC_SIZE,FSO_STORE_CHUNK,
31588 (void(*)(mch*,void*))gc_align_mark121,
31589 (void(*)(mch*))gc_sweep121},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc121))-1)};
31590
31591 T121*new121(void){
31592 gc121*n;
31593 fsoc*c;
31594 if(store_left121>1){
31595 store_left121--;
31596 n=store121++;
31597 }
31598 else if(gc_free121!=NULL){
31599 n=gc_free121;
31600 gc_free121=n->header.next;
31601 }
31602 else if(store_left121==1){
31603 store_left121=0;
31604 store_chunk121->header.state_type=FSO_USED_CHUNK;
31605 n=store121++;
31606 }
31607 else{
31608 c=gc_fsoc_get1();
31609 if(gc_free121!=NULL){
31610 n=gc_free121;
31611 gc_free121=n->header.next;
31612 }
31613 else{
31614 if(c==NULL)c=gc_fsoc_get2();
31615 store_chunk121=c;
31616 *store_chunk121=H121;
31617 store121=((gc121*)(&(store_chunk121->first_object)));
31618 store_left121=H121.count_minus_one;
31619 n=store121++;
31620 }
31621 }
31622 n->header.flag=FSOH_UNMARKED;
31623 n->object=M121;
31624 return((T121*)n);
31625 }
31626
31627 void gc_sweep120(fsoc*c){
31628 gc120*o1,*o2,*flt,flh;
31629 o1=((gc120*)(&(c->first_object)));
31630 if(c->header.state_type==FSO_STORE_CHUNK){
31631 for(;o1<store120;o1++){
31632 if((o1->header.flag)==FSOH_MARKED){
31633 o1->header.flag=FSOH_UNMARKED;
31634 }
31635 else{
31636 o1->header.next=gc_free120;
31637 gc_free120=o1;
31638 }
31639 }
31640 }
31641 else{
31642 int dead=1;
31643 flh.header.next=NULL;
31644 flt=&flh;
31645 o2=o1+c->count_minus_one;
31646 for(;o1<=o2;o2--){
31647 if((o2->header.flag)==FSOH_MARKED){
31648 o2->header.flag=FSOH_UNMARKED;
31649 dead=0;}
31650 else{
31651 flt->header.next=o2;
31652 flt=o2;
31653 }
31654 }
31655 if (dead){
31656 c->next=fsocfl;
31657 fsocfl=c;
31658 c->header.state_type=FSO_FREE_CHUNK;
31659 }
31660 else if(flh.header.next!=NULL){
31661 flt->header.next=gc_free120;
31662 gc_free120=flh.header.next;
31663 }
31664 }
31665 }
31666
31667 void gc_mark120(T120*o){
31668 se_gc_check_id(o,120);
31669 {if(((gc120*)o)->header.flag==FSOH_UNMARKED){
31670 ((gc120*)o)->header.flag=FSOH_MARKED;
31671 if(NULL!=o->_textimg/*37*/)gc_mark50((T50*)(o->_textimg/*37*/));
31672 if(NULL!=o->_string/*29*/)gc_mark7((T7*)(o->_string/*29*/));
31673 if(NULL!=o->_string_list/*25*/)gc_mark118((T118*)(o->_string_list/*25*/));
31674 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
31675 }
31676 }}
31677
31678 void gc_align_mark120(fsoc*c,gc120*p){
31679 gc120*b=((gc120*)(&(c->first_object)));
31680 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store120)))return;
31681 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31682 if(((char*)p)<((char*)b))return;
31683 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31684 if(p->header.flag==FSOH_UNMARKED){
31685 T120*o=(&(p->object));
31686 ((gc120*)o)->header.flag=FSOH_MARKED;
31687 if(NULL!=o->_textimg/*37*/)gc_mark50((T50*)(o->_textimg/*37*/));
31688 if(NULL!=o->_string/*29*/)gc_mark7((T7*)(o->_string/*29*/));
31689 if(NULL!=o->_string_list/*25*/)gc_mark118((T118*)(o->_string_list/*25*/));
31690 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
31691 }
31692 }
31693 }
31694 fsoc H120={{FSOC_SIZE,FSO_STORE_CHUNK,
31695 (void(*)(mch*,void*))gc_align_mark120,
31696 (void(*)(mch*))gc_sweep120},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc120))-1)};
31697
31698 T120*new120(void){
31699 gc120*n;
31700 fsoc*c;
31701 if(store_left120>1){
31702 store_left120--;
31703 n=store120++;
31704 }
31705 else if(gc_free120!=NULL){
31706 n=gc_free120;
31707 gc_free120=n->header.next;
31708 }
31709 else if(store_left120==1){
31710 store_left120=0;
31711 store_chunk120->header.state_type=FSO_USED_CHUNK;
31712 n=store120++;
31713 }
31714 else{
31715 c=gc_fsoc_get1();
31716 if(gc_free120!=NULL){
31717 n=gc_free120;
31718 gc_free120=n->header.next;
31719 }
31720 else{
31721 if(c==NULL)c=gc_fsoc_get2();
31722 store_chunk120=c;
31723 *store_chunk120=H120;
31724 store120=((gc120*)(&(store_chunk120->first_object)));
31725 store_left120=H120.count_minus_one;
31726 n=store120++;
31727 }
31728 }
31729 n->header.flag=FSOH_UNMARKED;
31730 n->object=M120;
31731 return((T120*)n);
31732 }
31733
31734 void gc_mark76(T76 o){
31735 rsoh*h=((rsoh*)o)-1;
31736 if((h->header.magic_flag)==RSOH_UNMARKED){
31737 h->header.magic_flag=RSOH_MARKED;
31738 {T0* e;
31739 T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
31740 for(;((void*)p)>=((void*)o);p--){
31741 e=*p;
31742 if(NULL!=e)gc_mark74((T74*)(e));
31743
31744 }
31745 }
31746 }}
31747
31748 T76 new76(int size){
31749 size=(size*sizeof(T0*))+sizeof(rsoh);
31750 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
31751 if (size<=(na_env76.store_left)){
31752 rsoh*r=na_env76.store;
31753 na_env76.store_left-=size;
31754 if(na_env76.store_left>sizeof(rsoh)){
31755 r->header.size=size;
31756 na_env76.store=((rsoh*)(((char*)(na_env76.store))+size));
31757 }
31758 else {
31759 r->header.size=size+na_env76.store_left;
31760 na_env76.store_left=0;
31761 }
31762 (r->header.magic_flag)=RSOH_UNMARKED;
31763 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
31764 return((T76)(r+1));
31765 }
31766 return((T76)new_na(&na_env76,size));
31767 }
31768
31769 void gc_sweep53(fsoc*c){
31770 gc53*o1,*o2,*flt,flh;
31771 o1=((gc53*)(&(c->first_object)));
31772 if(c->header.state_type==FSO_STORE_CHUNK){
31773 for(;o1<store53;o1++){
31774 if((o1->header.flag)==FSOH_MARKED){
31775 o1->header.flag=FSOH_UNMARKED;
31776 }
31777 else{
31778 o1->header.next=gc_free53;
31779 gc_free53=o1;
31780 }
31781 }
31782 }
31783 else{
31784 int dead=1;
31785 flh.header.next=NULL;
31786 flt=&flh;
31787 o2=o1+c->count_minus_one;
31788 for(;o1<=o2;o2--){
31789 if((o2->header.flag)==FSOH_MARKED){
31790 o2->header.flag=FSOH_UNMARKED;
31791 dead=0;}
31792 else{
31793 flt->header.next=o2;
31794 flt=o2;
31795 }
31796 }
31797 if (dead){
31798 c->next=fsocfl;
31799 fsocfl=c;
31800 c->header.state_type=FSO_FREE_CHUNK;
31801 }
31802 else if(flh.header.next!=NULL){
31803 flt->header.next=gc_free53;
31804 gc_free53=flh.header.next;
31805 }
31806 }
31807 }
31808
31809 void gc_mark53(T53*o){
31810 se_gc_check_id(o,53);
31811 {((gc53*)o)->header.flag=FSOH_MARKED;
31812
31813 }}
31814
31815 void gc_align_mark53(fsoc*c,gc53*p){
31816 gc53*b=((gc53*)(&(c->first_object)));
31817 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store53)))return;
31818 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31819 if(((char*)p)<((char*)b))return;
31820 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31821 if(p->header.flag==FSOH_UNMARKED){
31822 T53*o=(&(p->object));
31823 ((gc53*)o)->header.flag=FSOH_MARKED;
31824 }
31825 }
31826 }
31827 fsoc H53={{FSOC_SIZE,FSO_STORE_CHUNK,
31828 (void(*)(mch*,void*))gc_align_mark53,
31829 (void(*)(mch*))gc_sweep53},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc53))-1)};
31830
31831 T53*new53(void){
31832 gc53*n;
31833 fsoc*c;
31834 if(store_left53>1){
31835 store_left53--;
31836 n=store53++;
31837 }
31838 else if(gc_free53!=NULL){
31839 n=gc_free53;
31840 gc_free53=n->header.next;
31841 }
31842 else if(store_left53==1){
31843 store_left53=0;
31844 store_chunk53->header.state_type=FSO_USED_CHUNK;
31845 n=store53++;
31846 }
31847 else{
31848 c=gc_fsoc_get1();
31849 if(gc_free53!=NULL){
31850 n=gc_free53;
31851 gc_free53=n->header.next;
31852 }
31853 else{
31854 if(c==NULL)c=gc_fsoc_get2();
31855 store_chunk53=c;
31856 *store_chunk53=H53;
31857 store53=((gc53*)(&(store_chunk53->first_object)));
31858 store_left53=H53.count_minus_one;
31859 n=store53++;
31860 }
31861 }
31862 n->header.flag=FSOH_UNMARKED;
31863 n->object=M53;
31864 return((T53*)n);
31865 }
31866
31867 void gc_sweep50(fsoc*c){
31868 gc50*o1,*o2,*flt,flh;
31869 o1=((gc50*)(&(c->first_object)));
31870 if(c->header.state_type==FSO_STORE_CHUNK){
31871 for(;o1<store50;o1++){
31872 if((o1->header.flag)==FSOH_MARKED){
31873 o1->header.flag=FSOH_UNMARKED;
31874 }
31875 else{
31876 o1->header.next=gc_free50;
31877 gc_free50=o1;
31878 }
31879 }
31880 }
31881 else{
31882 int dead=1;
31883 flh.header.next=NULL;
31884 flt=&flh;
31885 o2=o1+c->count_minus_one;
31886 for(;o1<=o2;o2--){
31887 if((o2->header.flag)==FSOH_MARKED){
31888 o2->header.flag=FSOH_UNMARKED;
31889 dead=0;}
31890 else{
31891 flt->header.next=o2;
31892 flt=o2;
31893 }
31894 }
31895 if (dead){
31896 c->next=fsocfl;
31897 fsocfl=c;
31898 c->header.state_type=FSO_FREE_CHUNK;
31899 }
31900 else if(flh.header.next!=NULL){
31901 flt->header.next=gc_free50;
31902 gc_free50=flh.header.next;
31903 }
31904 }
31905 }
31906
31907 void gc_mark50(T50*o){
31908 se_gc_check_id(o,50);
31909 {((gc50*)o)->header.flag=FSOH_MARKED;
31910
31911 }}
31912
31913 void gc_align_mark50(fsoc*c,gc50*p){
31914 gc50*b=((gc50*)(&(c->first_object)));
31915 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store50)))return;
31916 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
31917 if(((char*)p)<((char*)b))return;
31918 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
31919 if(p->header.flag==FSOH_UNMARKED){
31920 T50*o=(&(p->object));
31921 ((gc50*)o)->header.flag=FSOH_MARKED;
31922 }
31923 }
31924 }
31925 fsoc H50={{FSOC_SIZE,FSO_STORE_CHUNK,
31926 (void(*)(mch*,void*))gc_align_mark50,
31927 (void(*)(mch*))gc_sweep50},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc50))-1)};
31928
31929 T50*new50(void){
31930 gc50*n;
31931 fsoc*c;
31932 if(store_left50>1){
31933 store_left50--;
31934 n=store50++;
31935 }
31936 else if(gc_free50!=NULL){
31937 n=gc_free50;
31938 gc_free50=n->header.next;
31939 }
31940 else if(store_left50==1){
31941 store_left50=0;
31942 store_chunk50->header.state_type=FSO_USED_CHUNK;
31943 n=store50++;
31944 }
31945 else{
31946 c=gc_fsoc_get1();
31947 if(gc_free50!=NULL){
31948 n=gc_free50;
31949 gc_free50=n->header.next;
31950 }
31951 else{
31952 if(c==NULL)c=gc_fsoc_get2();
31953 store_chunk50=c;
31954 *store_chunk50=H50;
31955 store50=((gc50*)(&(store_chunk50->first_object)));
31956 store_left50=H50.count_minus_one;
31957 n=store50++;
31958 }
31959 }
31960 n->header.flag=FSOH_UNMARKED;
31961 n->object=M50;
31962 return((T50*)n);
31963 }
31964
31965 void gc_sweep122(fsoc*c){
31966 gc122*o1,*o2,*flt,flh;
31967 o1=((gc122*)(&(c->first_object)));
31968 if(c->header.state_type==FSO_STORE_CHUNK){
31969 for(;o1<store122;o1++){
31970 if((o1->header.flag)==FSOH_MARKED){
31971 o1->header.flag=FSOH_UNMARKED;
31972 }
31973 else{
31974 o1->header.next=gc_free122;
31975 gc_free122=o1;
31976 }
31977 }
31978 }
31979 else{
31980 int dead=1;
31981 flh.header.next=NULL;
31982 flt=&flh;
31983 o2=o1+c->count_minus_one;
31984 for(;o1<=o2;o2--){
31985 if((o2->header.flag)==FSOH_MARKED){
31986 o2->header.flag=FSOH_UNMARKED;
31987 dead=0;}
31988 else{
31989 flt->header.next=o2;
31990 flt=o2;
31991 }
31992 }
31993 if (dead){
31994 c->next=fsocfl;
31995 fsocfl=c;
31996 c->header.state_type=FSO_FREE_CHUNK;
31997 }
31998 else if(flh.header.next!=NULL){
31999 flt->header.next=gc_free122;
32000 gc_free122=flh.header.next;
32001 }
32002 }
32003 }
32004
32005 void gc_mark122(T122*o){
32006 se_gc_check_id(o,122);
32007 {if(((gc122*)o)->header.flag==FSOH_UNMARKED){
32008 ((gc122*)o)->header.flag=FSOH_MARKED;
32009 if(NULL!=o->_current_link/*8*/)gc_mark67((T67*)(o->_current_link/*8*/));
32010 if(NULL!=o->_linked_list/*4*/)gc_mark66((T66*)(o->_linked_list/*4*/));
32011 }
32012 }}
32013
32014 void gc_align_mark122(fsoc*c,gc122*p){
32015 gc122*b=((gc122*)(&(c->first_object)));
32016 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store122)))return;
32017 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32018 if(((char*)p)<((char*)b))return;
32019 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32020 if(p->header.flag==FSOH_UNMARKED){
32021 T122*o=(&(p->object));
32022 ((gc122*)o)->header.flag=FSOH_MARKED;
32023 if(NULL!=o->_current_link/*8*/)gc_mark67((T67*)(o->_current_link/*8*/));
32024 if(NULL!=o->_linked_list/*4*/)gc_mark66((T66*)(o->_linked_list/*4*/));
32025 }
32026 }
32027 }
32028 fsoc H122={{FSOC_SIZE,FSO_STORE_CHUNK,
32029 (void(*)(mch*,void*))gc_align_mark122,
32030 (void(*)(mch*))gc_sweep122},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc122))-1)};
32031
32032 T122*new122(void){
32033 gc122*n;
32034 fsoc*c;
32035 if(store_left122>1){
32036 store_left122--;
32037 n=store122++;
32038 }
32039 else if(gc_free122!=NULL){
32040 n=gc_free122;
32041 gc_free122=n->header.next;
32042 }
32043 else if(store_left122==1){
32044 store_left122=0;
32045 store_chunk122->header.state_type=FSO_USED_CHUNK;
32046 n=store122++;
32047 }
32048 else{
32049 c=gc_fsoc_get1();
32050 if(gc_free122!=NULL){
32051 n=gc_free122;
32052 gc_free122=n->header.next;
32053 }
32054 else{
32055 if(c==NULL)c=gc_fsoc_get2();
32056 store_chunk122=c;
32057 *store_chunk122=H122;
32058 store122=((gc122*)(&(store_chunk122->first_object)));
32059 store_left122=H122.count_minus_one;
32060 n=store122++;
32061 }
32062 }
32063 n->header.flag=FSOH_UNMARKED;
32064 n->object=M122;
32065 return((T122*)n);
32066 }
32067
32068 void gc_sweep151(fsoc*c){
32069 gc151*o1,*o2,*flt,flh;
32070 o1=((gc151*)(&(c->first_object)));
32071 if(c->header.state_type==FSO_STORE_CHUNK){
32072 for(;o1<store151;o1++){
32073 if((o1->header.flag)==FSOH_MARKED){
32074 o1->header.flag=FSOH_UNMARKED;
32075 }
32076 else{
32077 o1->header.next=gc_free151;
32078 gc_free151=o1;
32079 }
32080 }
32081 }
32082 else{
32083 int dead=1;
32084 flh.header.next=NULL;
32085 flt=&flh;
32086 o2=o1+c->count_minus_one;
32087 for(;o1<=o2;o2--){
32088 if((o2->header.flag)==FSOH_MARKED){
32089 o2->header.flag=FSOH_UNMARKED;
32090 dead=0;}
32091 else{
32092 flt->header.next=o2;
32093 flt=o2;
32094 }
32095 }
32096 if (dead){
32097 c->next=fsocfl;
32098 fsocfl=c;
32099 c->header.state_type=FSO_FREE_CHUNK;
32100 }
32101 else if(flh.header.next!=NULL){
32102 flt->header.next=gc_free151;
32103 gc_free151=flh.header.next;
32104 }
32105 }
32106 }
32107
32108 void gc_mark151(T151*o){
32109 se_gc_check_id(o,151);
32110 {if(((gc151*)o)->header.flag==FSOH_UNMARKED){
32111 ((gc151*)o)->header.flag=FSOH_MARKED;
32112 if(NULL!=o->_current_link/*8*/)gc_mark106((T106*)(o->_current_link/*8*/));
32113 if(NULL!=o->_linked_list/*4*/)gc_mark105((T105*)(o->_linked_list/*4*/));
32114 }
32115 }}
32116
32117 void gc_align_mark151(fsoc*c,gc151*p){
32118 gc151*b=((gc151*)(&(c->first_object)));
32119 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store151)))return;
32120 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32121 if(((char*)p)<((char*)b))return;
32122 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32123 if(p->header.flag==FSOH_UNMARKED){
32124 T151*o=(&(p->object));
32125 ((gc151*)o)->header.flag=FSOH_MARKED;
32126 if(NULL!=o->_current_link/*8*/)gc_mark106((T106*)(o->_current_link/*8*/));
32127 if(NULL!=o->_linked_list/*4*/)gc_mark105((T105*)(o->_linked_list/*4*/));
32128 }
32129 }
32130 }
32131 fsoc H151={{FSOC_SIZE,FSO_STORE_CHUNK,
32132 (void(*)(mch*,void*))gc_align_mark151,
32133 (void(*)(mch*))gc_sweep151},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc151))-1)};
32134
32135 T151*new151(void){
32136 gc151*n;
32137 fsoc*c;
32138 if(store_left151>1){
32139 store_left151--;
32140 n=store151++;
32141 }
32142 else if(gc_free151!=NULL){
32143 n=gc_free151;
32144 gc_free151=n->header.next;
32145 }
32146 else if(store_left151==1){
32147 store_left151=0;
32148 store_chunk151->header.state_type=FSO_USED_CHUNK;
32149 n=store151++;
32150 }
32151 else{
32152 c=gc_fsoc_get1();
32153 if(gc_free151!=NULL){
32154 n=gc_free151;
32155 gc_free151=n->header.next;
32156 }
32157 else{
32158 if(c==NULL)c=gc_fsoc_get2();
32159 store_chunk151=c;
32160 *store_chunk151=H151;
32161 store151=((gc151*)(&(store_chunk151->first_object)));
32162 store_left151=H151.count_minus_one;
32163 n=store151++;
32164 }
32165 }
32166 n->header.flag=FSOH_UNMARKED;
32167 n->object=M151;
32168 return((T151*)n);
32169 }
32170
32171 void gc_sweep77(fsoc*c){
32172 gc77*o1,*o2,*flt,flh;
32173 o1=((gc77*)(&(c->first_object)));
32174 if(c->header.state_type==FSO_STORE_CHUNK){
32175 for(;o1<store77;o1++){
32176 if((o1->header.flag)==FSOH_MARKED){
32177 o1->header.flag=FSOH_UNMARKED;
32178 }
32179 else{
32180 o1->header.next=gc_free77;
32181 gc_free77=o1;
32182 }
32183 }
32184 }
32185 else{
32186 int dead=1;
32187 flh.header.next=NULL;
32188 flt=&flh;
32189 o2=o1+c->count_minus_one;
32190 for(;o1<=o2;o2--){
32191 if((o2->header.flag)==FSOH_MARKED){
32192 o2->header.flag=FSOH_UNMARKED;
32193 dead=0;}
32194 else{
32195 flt->header.next=o2;
32196 flt=o2;
32197 }
32198 }
32199 if (dead){
32200 c->next=fsocfl;
32201 fsocfl=c;
32202 c->header.state_type=FSO_FREE_CHUNK;
32203 }
32204 else if(flh.header.next!=NULL){
32205 flt->header.next=gc_free77;
32206 gc_free77=flh.header.next;
32207 }
32208 }
32209 }
32210
32211 void gc_mark77(T77*o){
32212 se_gc_check_id(o,77);
32213 {if(((gc77*)o)->header.flag==FSOH_UNMARKED){
32214 ((gc77*)o)->header.flag=FSOH_MARKED;
32215 if(NULL!=o->_iv/*8*/)gc_mark83((T83*)(o->_iv/*8*/));
32216 }
32217 }}
32218
32219 void gc_align_mark77(fsoc*c,gc77*p){
32220 gc77*b=((gc77*)(&(c->first_object)));
32221 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store77)))return;
32222 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32223 if(((char*)p)<((char*)b))return;
32224 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32225 if(p->header.flag==FSOH_UNMARKED){
32226 T77*o=(&(p->object));
32227 ((gc77*)o)->header.flag=FSOH_MARKED;
32228 if(NULL!=o->_iv/*8*/)gc_mark83((T83*)(o->_iv/*8*/));
32229 }
32230 }
32231 }
32232 fsoc H77={{FSOC_SIZE,FSO_STORE_CHUNK,
32233 (void(*)(mch*,void*))gc_align_mark77,
32234 (void(*)(mch*))gc_sweep77},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc77))-1)};
32235
32236 T77*new77(void){
32237 gc77*n;
32238 fsoc*c;
32239 if(store_left77>1){
32240 store_left77--;
32241 n=store77++;
32242 }
32243 else if(gc_free77!=NULL){
32244 n=gc_free77;
32245 gc_free77=n->header.next;
32246 }
32247 else if(store_left77==1){
32248 store_left77=0;
32249 store_chunk77->header.state_type=FSO_USED_CHUNK;
32250 n=store77++;
32251 }
32252 else{
32253 c=gc_fsoc_get1();
32254 if(gc_free77!=NULL){
32255 n=gc_free77;
32256 gc_free77=n->header.next;
32257 }
32258 else{
32259 if(c==NULL)c=gc_fsoc_get2();
32260 store_chunk77=c;
32261 *store_chunk77=H77;
32262 store77=((gc77*)(&(store_chunk77->first_object)));
32263 store_left77=H77.count_minus_one;
32264 n=store77++;
32265 }
32266 }
32267 n->header.flag=FSOH_UNMARKED;
32268 n->object=M77;
32269 return((T77*)n);
32270 }
32271
32272 void gc_sweep51(fsoc*c){
32273 gc51*o1,*o2,*flt,flh;
32274 o1=((gc51*)(&(c->first_object)));
32275 if(c->header.state_type==FSO_STORE_CHUNK){
32276 for(;o1<store51;o1++){
32277 if((o1->header.flag)==FSOH_MARKED){
32278 o1->header.flag=FSOH_UNMARKED;
32279 }
32280 else{
32281 o1->header.next=gc_free51;
32282 gc_free51=o1;
32283 }
32284 }
32285 }
32286 else{
32287 int dead=1;
32288 flh.header.next=NULL;
32289 flt=&flh;
32290 o2=o1+c->count_minus_one;
32291 for(;o1<=o2;o2--){
32292 if((o2->header.flag)==FSOH_MARKED){
32293 o2->header.flag=FSOH_UNMARKED;
32294 dead=0;}
32295 else{
32296 flt->header.next=o2;
32297 flt=o2;
32298 }
32299 }
32300 if (dead){
32301 c->next=fsocfl;
32302 fsocfl=c;
32303 c->header.state_type=FSO_FREE_CHUNK;
32304 }
32305 else if(flh.header.next!=NULL){
32306 flt->header.next=gc_free51;
32307 gc_free51=flh.header.next;
32308 }
32309 }
32310 }
32311
32312 void gc_mark51(T51*o){
32313 se_gc_check_id(o,51);
32314 {((gc51*)o)->header.flag=FSOH_MARKED;
32315
32316 }}
32317
32318 void gc_align_mark51(fsoc*c,gc51*p){
32319 gc51*b=((gc51*)(&(c->first_object)));
32320 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store51)))return;
32321 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32322 if(((char*)p)<((char*)b))return;
32323 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32324 if(p->header.flag==FSOH_UNMARKED){
32325 T51*o=(&(p->object));
32326 ((gc51*)o)->header.flag=FSOH_MARKED;
32327 }
32328 }
32329 }
32330 fsoc H51={{FSOC_SIZE,FSO_STORE_CHUNK,
32331 (void(*)(mch*,void*))gc_align_mark51,
32332 (void(*)(mch*))gc_sweep51},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc51))-1)};
32333
32334 T51*new51(void){
32335 gc51*n;
32336 fsoc*c;
32337 if(store_left51>1){
32338 store_left51--;
32339 n=store51++;
32340 }
32341 else if(gc_free51!=NULL){
32342 n=gc_free51;
32343 gc_free51=n->header.next;
32344 }
32345 else if(store_left51==1){
32346 store_left51=0;
32347 store_chunk51->header.state_type=FSO_USED_CHUNK;
32348 n=store51++;
32349 }
32350 else{
32351 c=gc_fsoc_get1();
32352 if(gc_free51!=NULL){
32353 n=gc_free51;
32354 gc_free51=n->header.next;
32355 }
32356 else{
32357 if(c==NULL)c=gc_fsoc_get2();
32358 store_chunk51=c;
32359 *store_chunk51=H51;
32360 store51=((gc51*)(&(store_chunk51->first_object)));
32361 store_left51=H51.count_minus_one;
32362 n=store51++;
32363 }
32364 }
32365 n->header.flag=FSOH_UNMARKED;
32366 n->object=M51;
32367 return((T51*)n);
32368 }
32369
32370 void gc_sweep97(fsoc*c){
32371 gc97*o1,*o2,*flt,flh;
32372 o1=((gc97*)(&(c->first_object)));
32373 if(c->header.state_type==FSO_STORE_CHUNK){
32374 for(;o1<store97;o1++){
32375 if((o1->header.flag)==FSOH_MARKED){
32376 o1->header.flag=FSOH_UNMARKED;
32377 }
32378 else{
32379 o1->header.next=gc_free97;
32380 gc_free97=o1;
32381 }
32382 }
32383 }
32384 else{
32385 int dead=1;
32386 flh.header.next=NULL;
32387 flt=&flh;
32388 o2=o1+c->count_minus_one;
32389 for(;o1<=o2;o2--){
32390 if((o2->header.flag)==FSOH_MARKED){
32391 o2->header.flag=FSOH_UNMARKED;
32392 dead=0;}
32393 else{
32394 flt->header.next=o2;
32395 flt=o2;
32396 }
32397 }
32398 if (dead){
32399 c->next=fsocfl;
32400 fsocfl=c;
32401 c->header.state_type=FSO_FREE_CHUNK;
32402 }
32403 else if(flh.header.next!=NULL){
32404 flt->header.next=gc_free97;
32405 gc_free97=flh.header.next;
32406 }
32407 }
32408 }
32409
32410 void gc_mark97(T97*o){
32411 se_gc_check_id(o,97);
32412 {if(((gc97*)o)->header.flag==FSOH_UNMARKED){
32413 ((gc97*)o)->header.flag=FSOH_MARKED;
32414 if(NULL!=o->_name_tb/*33*/)gc_mark98((T98*)(o->_name_tb/*33*/));
32415 if(NULL!=o->_focus_widget/*29*/)Xgc_mark30((T0*)(o->_focus_widget/*29*/));
32416 if(NULL!=o->_widget_list/*25*/)gc_mark39((T39*)(o->_widget_list/*25*/));
32417 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
32418 }
32419 }}
32420
32421 void gc_align_mark97(fsoc*c,gc97*p){
32422 gc97*b=((gc97*)(&(c->first_object)));
32423 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store97)))return;
32424 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32425 if(((char*)p)<((char*)b))return;
32426 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32427 if(p->header.flag==FSOH_UNMARKED){
32428 T97*o=(&(p->object));
32429 ((gc97*)o)->header.flag=FSOH_MARKED;
32430 if(NULL!=o->_name_tb/*33*/)gc_mark98((T98*)(o->_name_tb/*33*/));
32431 if(NULL!=o->_focus_widget/*29*/)Xgc_mark30((T0*)(o->_focus_widget/*29*/));
32432 if(NULL!=o->_widget_list/*25*/)gc_mark39((T39*)(o->_widget_list/*25*/));
32433 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
32434 }
32435 }
32436 }
32437 fsoc H97={{FSOC_SIZE,FSO_STORE_CHUNK,
32438 (void(*)(mch*,void*))gc_align_mark97,
32439 (void(*)(mch*))gc_sweep97},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc97))-1)};
32440
32441 T97*new97(void){
32442 gc97*n;
32443 fsoc*c;
32444 if(store_left97>1){
32445 store_left97--;
32446 n=store97++;
32447 }
32448 else if(gc_free97!=NULL){
32449 n=gc_free97;
32450 gc_free97=n->header.next;
32451 }
32452 else if(store_left97==1){
32453 store_left97=0;
32454 store_chunk97->header.state_type=FSO_USED_CHUNK;
32455 n=store97++;
32456 }
32457 else{
32458 c=gc_fsoc_get1();
32459 if(gc_free97!=NULL){
32460 n=gc_free97;
32461 gc_free97=n->header.next;
32462 }
32463 else{
32464 if(c==NULL)c=gc_fsoc_get2();
32465 store_chunk97=c;
32466 *store_chunk97=H97;
32467 store97=((gc97*)(&(store_chunk97->first_object)));
32468 store_left97=H97.count_minus_one;
32469 n=store97++;
32470 }
32471 }
32472 n->header.flag=FSOH_UNMARKED;
32473 n->object=M97;
32474 return((T97*)n);
32475 }
32476
32477 void gc_sweep99(fsoc*c){
32478 gc99*o1,*o2,*flt,flh;
32479 o1=((gc99*)(&(c->first_object)));
32480 if(c->header.state_type==FSO_STORE_CHUNK){
32481 for(;o1<store99;o1++){
32482 if((o1->header.flag)==FSOH_MARKED){
32483 o1->header.flag=FSOH_UNMARKED;
32484 }
32485 else{
32486 o1->header.next=gc_free99;
32487 gc_free99=o1;
32488 }
32489 }
32490 }
32491 else{
32492 int dead=1;
32493 flh.header.next=NULL;
32494 flt=&flh;
32495 o2=o1+c->count_minus_one;
32496 for(;o1<=o2;o2--){
32497 if((o2->header.flag)==FSOH_MARKED){
32498 o2->header.flag=FSOH_UNMARKED;
32499 dead=0;}
32500 else{
32501 flt->header.next=o2;
32502 flt=o2;
32503 }
32504 }
32505 if (dead){
32506 c->next=fsocfl;
32507 fsocfl=c;
32508 c->header.state_type=FSO_FREE_CHUNK;
32509 }
32510 else if(flh.header.next!=NULL){
32511 flt->header.next=gc_free99;
32512 gc_free99=flh.header.next;
32513 }
32514 }
32515 }
32516
32517 void gc_mark99(T99*o){
32518 se_gc_check_id(o,99);
32519 {if(((gc99*)o)->header.flag==FSOH_UNMARKED){
32520 ((gc99*)o)->header.flag=FSOH_MARKED;
32521 if(NULL!=o->_score_list/*37*/)gc_mark105((T105*)(o->_score_list/*37*/));
32522 if(NULL!=o->_focus_widget/*29*/)Xgc_mark30((T0*)(o->_focus_widget/*29*/));
32523 if(NULL!=o->_widget_list/*25*/)gc_mark39((T39*)(o->_widget_list/*25*/));
32524 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
32525 }
32526 }}
32527
32528 void gc_align_mark99(fsoc*c,gc99*p){
32529 gc99*b=((gc99*)(&(c->first_object)));
32530 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store99)))return;
32531 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32532 if(((char*)p)<((char*)b))return;
32533 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32534 if(p->header.flag==FSOH_UNMARKED){
32535 T99*o=(&(p->object));
32536 ((gc99*)o)->header.flag=FSOH_MARKED;
32537 if(NULL!=o->_score_list/*37*/)gc_mark105((T105*)(o->_score_list/*37*/));
32538 if(NULL!=o->_focus_widget/*29*/)Xgc_mark30((T0*)(o->_focus_widget/*29*/));
32539 if(NULL!=o->_widget_list/*25*/)gc_mark39((T39*)(o->_widget_list/*25*/));
32540 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
32541 }
32542 }
32543 }
32544 fsoc H99={{FSOC_SIZE,FSO_STORE_CHUNK,
32545 (void(*)(mch*,void*))gc_align_mark99,
32546 (void(*)(mch*))gc_sweep99},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc99))-1)};
32547
32548 T99*new99(void){
32549 gc99*n;
32550 fsoc*c;
32551 if(store_left99>1){
32552 store_left99--;
32553 n=store99++;
32554 }
32555 else if(gc_free99!=NULL){
32556 n=gc_free99;
32557 gc_free99=n->header.next;
32558 }
32559 else if(store_left99==1){
32560 store_left99=0;
32561 store_chunk99->header.state_type=FSO_USED_CHUNK;
32562 n=store99++;
32563 }
32564 else{
32565 c=gc_fsoc_get1();
32566 if(gc_free99!=NULL){
32567 n=gc_free99;
32568 gc_free99=n->header.next;
32569 }
32570 else{
32571 if(c==NULL)c=gc_fsoc_get2();
32572 store_chunk99=c;
32573 *store_chunk99=H99;
32574 store99=((gc99*)(&(store_chunk99->first_object)));
32575 store_left99=H99.count_minus_one;
32576 n=store99++;
32577 }
32578 }
32579 n->header.flag=FSOH_UNMARKED;
32580 n->object=M99;
32581 return((T99*)n);
32582 }
32583
32584 void gc_sweep80(fsoc*c){
32585 gc80*o1,*o2,*flt,flh;
32586 o1=((gc80*)(&(c->first_object)));
32587 if(c->header.state_type==FSO_STORE_CHUNK){
32588 for(;o1<store80;o1++){
32589 if((o1->header.flag)==FSOH_MARKED){
32590 o1->header.flag=FSOH_UNMARKED;
32591 }
32592 else{
32593 o1->header.next=gc_free80;
32594 gc_free80=o1;
32595 }
32596 }
32597 }
32598 else{
32599 int dead=1;
32600 flh.header.next=NULL;
32601 flt=&flh;
32602 o2=o1+c->count_minus_one;
32603 for(;o1<=o2;o2--){
32604 if((o2->header.flag)==FSOH_MARKED){
32605 o2->header.flag=FSOH_UNMARKED;
32606 dead=0;}
32607 else{
32608 flt->header.next=o2;
32609 flt=o2;
32610 }
32611 }
32612 if (dead){
32613 c->next=fsocfl;
32614 fsocfl=c;
32615 c->header.state_type=FSO_FREE_CHUNK;
32616 }
32617 else if(flh.header.next!=NULL){
32618 flt->header.next=gc_free80;
32619 gc_free80=flh.header.next;
32620 }
32621 }
32622 }
32623
32624 void gc_mark80(T80*o){
32625 se_gc_check_id(o,80);
32626 {if(((gc80*)o)->header.flag==FSOH_UNMARKED){
32627 ((gc80*)o)->header.flag=FSOH_MARKED;
32628 if(NULL!=o->_storage/*4*/)gc_mark82((o->_storage/*4*/));
32629 }
32630 }}
32631
32632 void gc_align_mark80(fsoc*c,gc80*p){
32633 gc80*b=((gc80*)(&(c->first_object)));
32634 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store80)))return;
32635 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32636 if(((char*)p)<((char*)b))return;
32637 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32638 if(p->header.flag==FSOH_UNMARKED){
32639 T80*o=(&(p->object));
32640 ((gc80*)o)->header.flag=FSOH_MARKED;
32641 if(NULL!=o->_storage/*4*/)gc_mark82((o->_storage/*4*/));
32642 }
32643 }
32644 }
32645 fsoc H80={{FSOC_SIZE,FSO_STORE_CHUNK,
32646 (void(*)(mch*,void*))gc_align_mark80,
32647 (void(*)(mch*))gc_sweep80},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc80))-1)};
32648
32649 T80*new80(void){
32650 gc80*n;
32651 fsoc*c;
32652 if(store_left80>1){
32653 store_left80--;
32654 n=store80++;
32655 }
32656 else if(gc_free80!=NULL){
32657 n=gc_free80;
32658 gc_free80=n->header.next;
32659 }
32660 else if(store_left80==1){
32661 store_left80=0;
32662 store_chunk80->header.state_type=FSO_USED_CHUNK;
32663 n=store80++;
32664 }
32665 else{
32666 c=gc_fsoc_get1();
32667 if(gc_free80!=NULL){
32668 n=gc_free80;
32669 gc_free80=n->header.next;
32670 }
32671 else{
32672 if(c==NULL)c=gc_fsoc_get2();
32673 store_chunk80=c;
32674 *store_chunk80=H80;
32675 store80=((gc80*)(&(store_chunk80->first_object)));
32676 store_left80=H80.count_minus_one;
32677 n=store80++;
32678 }
32679 }
32680 n->header.flag=FSOH_UNMARKED;
32681 n->object=M80;
32682 return((T80*)n);
32683 }
32684
32685 void gc_sweep140(fsoc*c){
32686 gc140*o1,*o2,*flt,flh;
32687 o1=((gc140*)(&(c->first_object)));
32688 if(c->header.state_type==FSO_STORE_CHUNK){
32689 for(;o1<store140;o1++){
32690 if((o1->header.flag)==FSOH_MARKED){
32691 o1->header.flag=FSOH_UNMARKED;
32692 }
32693 else{
32694 o1->header.next=gc_free140;
32695 gc_free140=o1;
32696 }
32697 }
32698 }
32699 else{
32700 int dead=1;
32701 flh.header.next=NULL;
32702 flt=&flh;
32703 o2=o1+c->count_minus_one;
32704 for(;o1<=o2;o2--){
32705 if((o2->header.flag)==FSOH_MARKED){
32706 o2->header.flag=FSOH_UNMARKED;
32707 dead=0;}
32708 else{
32709 flt->header.next=o2;
32710 flt=o2;
32711 }
32712 }
32713 if (dead){
32714 c->next=fsocfl;
32715 fsocfl=c;
32716 c->header.state_type=FSO_FREE_CHUNK;
32717 }
32718 else if(flh.header.next!=NULL){
32719 flt->header.next=gc_free140;
32720 gc_free140=flh.header.next;
32721 }
32722 }
32723 }
32724
32725 void gc_mark140(T140*o){
32726 se_gc_check_id(o,140);
32727 {((gc140*)o)->header.flag=FSOH_MARKED;
32728
32729 }}
32730
32731 void gc_align_mark140(fsoc*c,gc140*p){
32732 gc140*b=((gc140*)(&(c->first_object)));
32733 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store140)))return;
32734 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32735 if(((char*)p)<((char*)b))return;
32736 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32737 if(p->header.flag==FSOH_UNMARKED){
32738 T140*o=(&(p->object));
32739 ((gc140*)o)->header.flag=FSOH_MARKED;
32740 }
32741 }
32742 }
32743 fsoc H140={{FSOC_SIZE,FSO_STORE_CHUNK,
32744 (void(*)(mch*,void*))gc_align_mark140,
32745 (void(*)(mch*))gc_sweep140},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc140))-1)};
32746
32747 T140*new140(void){
32748 gc140*n;
32749 fsoc*c;
32750 if(store_left140>1){
32751 store_left140--;
32752 n=store140++;
32753 }
32754 else if(gc_free140!=NULL){
32755 n=gc_free140;
32756 gc_free140=n->header.next;
32757 }
32758 else if(store_left140==1){
32759 store_left140=0;
32760 store_chunk140->header.state_type=FSO_USED_CHUNK;
32761 n=store140++;
32762 }
32763 else{
32764 c=gc_fsoc_get1();
32765 if(gc_free140!=NULL){
32766 n=gc_free140;
32767 gc_free140=n->header.next;
32768 }
32769 else{
32770 if(c==NULL)c=gc_fsoc_get2();
32771 store_chunk140=c;
32772 *store_chunk140=H140;
32773 store140=((gc140*)(&(store_chunk140->first_object)));
32774 store_left140=H140.count_minus_one;
32775 n=store140++;
32776 }
32777 }
32778 n->header.flag=FSOH_UNMARKED;
32779 n->object=M140;
32780 return((T140*)n);
32781 }
32782
32783 void gc_sweep118(fsoc*c){
32784 gc118*o1,*o2,*flt,flh;
32785 o1=((gc118*)(&(c->first_object)));
32786 if(c->header.state_type==FSO_STORE_CHUNK){
32787 for(;o1<store118;o1++){
32788 if((o1->header.flag)==FSOH_MARKED){
32789 o1->header.flag=FSOH_UNMARKED;
32790 }
32791 else{
32792 o1->header.next=gc_free118;
32793 gc_free118=o1;
32794 }
32795 }
32796 }
32797 else{
32798 int dead=1;
32799 flh.header.next=NULL;
32800 flt=&flh;
32801 o2=o1+c->count_minus_one;
32802 for(;o1<=o2;o2--){
32803 if((o2->header.flag)==FSOH_MARKED){
32804 o2->header.flag=FSOH_UNMARKED;
32805 dead=0;}
32806 else{
32807 flt->header.next=o2;
32808 flt=o2;
32809 }
32810 }
32811 if (dead){
32812 c->next=fsocfl;
32813 fsocfl=c;
32814 c->header.state_type=FSO_FREE_CHUNK;
32815 }
32816 else if(flh.header.next!=NULL){
32817 flt->header.next=gc_free118;
32818 gc_free118=flh.header.next;
32819 }
32820 }
32821 }
32822
32823 void gc_mark118(T118*o){
32824 se_gc_check_id(o,118);
32825 {if(((gc118*)o)->header.flag==FSOH_UNMARKED){
32826 ((gc118*)o)->header.flag=FSOH_MARKED;
32827 if(NULL!=o->_mem_lnk/*20*/)gc_mark121((T121*)(o->_mem_lnk/*20*/));
32828 if(NULL!=o->_last_link/*12*/)gc_mark121((T121*)(o->_last_link/*12*/));
32829 if(NULL!=o->_first_link/*8*/)gc_mark121((T121*)(o->_first_link/*8*/));
32830 }
32831 }}
32832
32833 void gc_align_mark118(fsoc*c,gc118*p){
32834 gc118*b=((gc118*)(&(c->first_object)));
32835 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store118)))return;
32836 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32837 if(((char*)p)<((char*)b))return;
32838 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32839 if(p->header.flag==FSOH_UNMARKED){
32840 T118*o=(&(p->object));
32841 ((gc118*)o)->header.flag=FSOH_MARKED;
32842 if(NULL!=o->_mem_lnk/*20*/)gc_mark121((T121*)(o->_mem_lnk/*20*/));
32843 if(NULL!=o->_last_link/*12*/)gc_mark121((T121*)(o->_last_link/*12*/));
32844 if(NULL!=o->_first_link/*8*/)gc_mark121((T121*)(o->_first_link/*8*/));
32845 }
32846 }
32847 }
32848 fsoc H118={{FSOC_SIZE,FSO_STORE_CHUNK,
32849 (void(*)(mch*,void*))gc_align_mark118,
32850 (void(*)(mch*))gc_sweep118},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc118))-1)};
32851
32852 T118*new118(void){
32853 gc118*n;
32854 fsoc*c;
32855 if(store_left118>1){
32856 store_left118--;
32857 n=store118++;
32858 }
32859 else if(gc_free118!=NULL){
32860 n=gc_free118;
32861 gc_free118=n->header.next;
32862 }
32863 else if(store_left118==1){
32864 store_left118=0;
32865 store_chunk118->header.state_type=FSO_USED_CHUNK;
32866 n=store118++;
32867 }
32868 else{
32869 c=gc_fsoc_get1();
32870 if(gc_free118!=NULL){
32871 n=gc_free118;
32872 gc_free118=n->header.next;
32873 }
32874 else{
32875 if(c==NULL)c=gc_fsoc_get2();
32876 store_chunk118=c;
32877 *store_chunk118=H118;
32878 store118=((gc118*)(&(store_chunk118->first_object)));
32879 store_left118=H118.count_minus_one;
32880 n=store118++;
32881 }
32882 }
32883 n->header.flag=FSOH_UNMARKED;
32884 n->object=M118;
32885 return((T118*)n);
32886 }
32887
32888 void gc_sweep113(fsoc*c){
32889 gc113*o1,*o2,*flt,flh;
32890 o1=((gc113*)(&(c->first_object)));
32891 if(c->header.state_type==FSO_STORE_CHUNK){
32892 for(;o1<store113;o1++){
32893 if((o1->header.flag)==FSOH_MARKED){
32894 o1->header.flag=FSOH_UNMARKED;
32895 }
32896 else{
32897 o1->header.next=gc_free113;
32898 gc_free113=o1;
32899 }
32900 }
32901 }
32902 else{
32903 int dead=1;
32904 flh.header.next=NULL;
32905 flt=&flh;
32906 o2=o1+c->count_minus_one;
32907 for(;o1<=o2;o2--){
32908 if((o2->header.flag)==FSOH_MARKED){
32909 o2->header.flag=FSOH_UNMARKED;
32910 dead=0;}
32911 else{
32912 flt->header.next=o2;
32913 flt=o2;
32914 }
32915 }
32916 if (dead){
32917 c->next=fsocfl;
32918 fsocfl=c;
32919 c->header.state_type=FSO_FREE_CHUNK;
32920 }
32921 else if(flh.header.next!=NULL){
32922 flt->header.next=gc_free113;
32923 gc_free113=flh.header.next;
32924 }
32925 }
32926 }
32927
32928 void gc_mark113(T113*o){
32929 se_gc_check_id(o,113);
32930 {if(((gc113*)o)->header.flag==FSOH_UNMARKED){
32931 ((gc113*)o)->header.flag=FSOH_MARKED;
32932 if(NULL!=o->_img/*29*/)gc_mark50((T50*)(o->_img/*29*/));
32933 if(NULL!=o->_string/*25*/)gc_mark7((T7*)(o->_string/*25*/));
32934 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
32935 }
32936 }}
32937
32938 void gc_align_mark113(fsoc*c,gc113*p){
32939 gc113*b=((gc113*)(&(c->first_object)));
32940 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store113)))return;
32941 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
32942 if(((char*)p)<((char*)b))return;
32943 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
32944 if(p->header.flag==FSOH_UNMARKED){
32945 T113*o=(&(p->object));
32946 ((gc113*)o)->header.flag=FSOH_MARKED;
32947 if(NULL!=o->_img/*29*/)gc_mark50((T50*)(o->_img/*29*/));
32948 if(NULL!=o->_string/*25*/)gc_mark7((T7*)(o->_string/*25*/));
32949 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
32950 }
32951 }
32952 }
32953 fsoc H113={{FSOC_SIZE,FSO_STORE_CHUNK,
32954 (void(*)(mch*,void*))gc_align_mark113,
32955 (void(*)(mch*))gc_sweep113},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc113))-1)};
32956
32957 T113*new113(void){
32958 gc113*n;
32959 fsoc*c;
32960 if(store_left113>1){
32961 store_left113--;
32962 n=store113++;
32963 }
32964 else if(gc_free113!=NULL){
32965 n=gc_free113;
32966 gc_free113=n->header.next;
32967 }
32968 else if(store_left113==1){
32969 store_left113=0;
32970 store_chunk113->header.state_type=FSO_USED_CHUNK;
32971 n=store113++;
32972 }
32973 else{
32974 c=gc_fsoc_get1();
32975 if(gc_free113!=NULL){
32976 n=gc_free113;
32977 gc_free113=n->header.next;
32978 }
32979 else{
32980 if(c==NULL)c=gc_fsoc_get2();
32981 store_chunk113=c;
32982 *store_chunk113=H113;
32983 store113=((gc113*)(&(store_chunk113->first_object)));
32984 store_left113=H113.count_minus_one;
32985 n=store113++;
32986 }
32987 }
32988 n->header.flag=FSOH_UNMARKED;
32989 n->object=M113;
32990 return((T113*)n);
32991 }
32992
32993 void gc_sweep55(fsoc*c){
32994 gc55*o1,*o2,*flt,flh;
32995 o1=((gc55*)(&(c->first_object)));
32996 if(c->header.state_type==FSO_STORE_CHUNK){
32997 for(;o1<store55;o1++){
32998 if((o1->header.flag)==FSOH_MARKED){
32999 o1->header.flag=FSOH_UNMARKED;
33000 }
33001 else{
33002 o1->header.next=gc_free55;
33003 gc_free55=o1;
33004 }
33005 }
33006 }
33007 else{
33008 int dead=1;
33009 flh.header.next=NULL;
33010 flt=&flh;
33011 o2=o1+c->count_minus_one;
33012 for(;o1<=o2;o2--){
33013 if((o2->header.flag)==FSOH_MARKED){
33014 o2->header.flag=FSOH_UNMARKED;
33015 dead=0;}
33016 else{
33017 flt->header.next=o2;
33018 flt=o2;
33019 }
33020 }
33021 if (dead){
33022 c->next=fsocfl;
33023 fsocfl=c;
33024 c->header.state_type=FSO_FREE_CHUNK;
33025 }
33026 else if(flh.header.next!=NULL){
33027 flt->header.next=gc_free55;
33028 gc_free55=flh.header.next;
33029 }
33030 }
33031 }
33032
33033 void gc_mark55(T55*o){
33034 se_gc_check_id(o,55);
33035 {if(((gc55*)o)->header.flag==FSOH_UNMARKED){
33036 ((gc55*)o)->header.flag=FSOH_MARKED;
33037 if(NULL!=o->_path/*5*/)gc_mark7((T7*)(o->_path/*5*/));
33038 }
33039 }}
33040
33041 void gc_align_mark55(fsoc*c,gc55*p){
33042 gc55*b=((gc55*)(&(c->first_object)));
33043 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store55)))return;
33044 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33045 if(((char*)p)<((char*)b))return;
33046 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33047 if(p->header.flag==FSOH_UNMARKED){
33048 T55*o=(&(p->object));
33049 ((gc55*)o)->header.flag=FSOH_MARKED;
33050 if(NULL!=o->_path/*5*/)gc_mark7((T7*)(o->_path/*5*/));
33051 }
33052 }
33053 }
33054 fsoc H55={{FSOC_SIZE,FSO_STORE_CHUNK,
33055 (void(*)(mch*,void*))gc_align_mark55,
33056 (void(*)(mch*))gc_sweep55},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc55))-1)};
33057
33058 T55*new55(void){
33059 gc55*n;
33060 fsoc*c;
33061 if(store_left55>1){
33062 store_left55--;
33063 n=store55++;
33064 }
33065 else if(gc_free55!=NULL){
33066 n=gc_free55;
33067 gc_free55=n->header.next;
33068 }
33069 else if(store_left55==1){
33070 store_left55=0;
33071 store_chunk55->header.state_type=FSO_USED_CHUNK;
33072 n=store55++;
33073 }
33074 else{
33075 c=gc_fsoc_get1();
33076 if(gc_free55!=NULL){
33077 n=gc_free55;
33078 gc_free55=n->header.next;
33079 }
33080 else{
33081 if(c==NULL)c=gc_fsoc_get2();
33082 store_chunk55=c;
33083 *store_chunk55=H55;
33084 store55=((gc55*)(&(store_chunk55->first_object)));
33085 store_left55=H55.count_minus_one;
33086 n=store55++;
33087 }
33088 }
33089 n->header.flag=FSOH_UNMARKED;
33090 n->object=M55;
33091 return((T55*)n);
33092 }
33093
33094 void gc_mark69(T69 o){
33095 rsoh*h=((rsoh*)o)-1;
33096 if((h->header.magic_flag)==RSOH_UNMARKED){
33097 h->header.magic_flag=RSOH_MARKED;
33098 {T0* e;
33099 T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
33100 for(;((void*)p)>=((void*)o);p--){
33101 e=*p;
33102 if(NULL!=e)gc_mark7((T7*)(e));
33103
33104 }
33105 }
33106 }}
33107
33108 T69 new69(int size){
33109 size=(size*sizeof(T0*))+sizeof(rsoh);
33110 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
33111 if (size<=(na_env69.store_left)){
33112 rsoh*r=na_env69.store;
33113 na_env69.store_left-=size;
33114 if(na_env69.store_left>sizeof(rsoh)){
33115 r->header.size=size;
33116 na_env69.store=((rsoh*)(((char*)(na_env69.store))+size));
33117 }
33118 else {
33119 r->header.size=size+na_env69.store_left;
33120 na_env69.store_left=0;
33121 }
33122 (r->header.magic_flag)=RSOH_UNMARKED;
33123 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
33124 return((T69)(r+1));
33125 }
33126 return((T69)new_na(&na_env69,size));
33127 }
33128
33129 void gc_sweep65(fsoc*c){
33130 gc65*o1,*o2,*flt,flh;
33131 o1=((gc65*)(&(c->first_object)));
33132 if(c->header.state_type==FSO_STORE_CHUNK){
33133 for(;o1<store65;o1++){
33134 if((o1->header.flag)==FSOH_MARKED){
33135 o1->header.flag=FSOH_UNMARKED;
33136 }
33137 else{
33138 o1->header.next=gc_free65;
33139 gc_free65=o1;
33140 }
33141 }
33142 }
33143 else{
33144 int dead=1;
33145 flh.header.next=NULL;
33146 flt=&flh;
33147 o2=o1+c->count_minus_one;
33148 for(;o1<=o2;o2--){
33149 if((o2->header.flag)==FSOH_MARKED){
33150 o2->header.flag=FSOH_UNMARKED;
33151 dead=0;}
33152 else{
33153 flt->header.next=o2;
33154 flt=o2;
33155 }
33156 }
33157 if (dead){
33158 c->next=fsocfl;
33159 fsocfl=c;
33160 c->header.state_type=FSO_FREE_CHUNK;
33161 }
33162 else if(flh.header.next!=NULL){
33163 flt->header.next=gc_free65;
33164 gc_free65=flh.header.next;
33165 }
33166 }
33167 }
33168
33169 void gc_mark65(T65*o){
33170 se_gc_check_id(o,65);
33171 {if(((gc65*)o)->header.flag==FSOH_UNMARKED){
33172 ((gc65*)o)->header.flag=FSOH_MARKED;
33173 if(NULL!=o->_hiscore/*12*/)gc_mark96((T96*)(o->_hiscore/*12*/));
33174 if(NULL!=o->_setting/*8*/)gc_mark68((T68*)(o->_setting/*8*/));
33175 if(NULL!=o->_name/*4*/)gc_mark7((T7*)(o->_name/*4*/));
33176 }
33177 }}
33178
33179 void gc_align_mark65(fsoc*c,gc65*p){
33180 gc65*b=((gc65*)(&(c->first_object)));
33181 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store65)))return;
33182 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33183 if(((char*)p)<((char*)b))return;
33184 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33185 if(p->header.flag==FSOH_UNMARKED){
33186 T65*o=(&(p->object));
33187 ((gc65*)o)->header.flag=FSOH_MARKED;
33188 if(NULL!=o->_hiscore/*12*/)gc_mark96((T96*)(o->_hiscore/*12*/));
33189 if(NULL!=o->_setting/*8*/)gc_mark68((T68*)(o->_setting/*8*/));
33190 if(NULL!=o->_name/*4*/)gc_mark7((T7*)(o->_name/*4*/));
33191 }
33192 }
33193 }
33194 fsoc H65={{FSOC_SIZE,FSO_STORE_CHUNK,
33195 (void(*)(mch*,void*))gc_align_mark65,
33196 (void(*)(mch*))gc_sweep65},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc65))-1)};
33197
33198 T65*new65(void){
33199 gc65*n;
33200 fsoc*c;
33201 if(store_left65>1){
33202 store_left65--;
33203 n=store65++;
33204 }
33205 else if(gc_free65!=NULL){
33206 n=gc_free65;
33207 gc_free65=n->header.next;
33208 }
33209 else if(store_left65==1){
33210 store_left65=0;
33211 store_chunk65->header.state_type=FSO_USED_CHUNK;
33212 n=store65++;
33213 }
33214 else{
33215 c=gc_fsoc_get1();
33216 if(gc_free65!=NULL){
33217 n=gc_free65;
33218 gc_free65=n->header.next;
33219 }
33220 else{
33221 if(c==NULL)c=gc_fsoc_get2();
33222 store_chunk65=c;
33223 *store_chunk65=H65;
33224 store65=((gc65*)(&(store_chunk65->first_object)));
33225 store_left65=H65.count_minus_one;
33226 n=store65++;
33227 }
33228 }
33229 n->header.flag=FSOH_UNMARKED;
33230 n->object=M65;
33231 return((T65*)n);
33232 }
33233
33234 void gc_sweep128(fsoc*c){
33235 gc128*o1,*o2,*flt,flh;
33236 o1=((gc128*)(&(c->first_object)));
33237 if(c->header.state_type==FSO_STORE_CHUNK){
33238 for(;o1<store128;o1++){
33239 if((o1->header.flag)==FSOH_MARKED){
33240 o1->header.flag=FSOH_UNMARKED;
33241 }
33242 else{
33243 o1->header.next=gc_free128;
33244 gc_free128=o1;
33245 }
33246 }
33247 }
33248 else{
33249 int dead=1;
33250 flh.header.next=NULL;
33251 flt=&flh;
33252 o2=o1+c->count_minus_one;
33253 for(;o1<=o2;o2--){
33254 if((o2->header.flag)==FSOH_MARKED){
33255 o2->header.flag=FSOH_UNMARKED;
33256 dead=0;}
33257 else{
33258 flt->header.next=o2;
33259 flt=o2;
33260 }
33261 }
33262 if (dead){
33263 c->next=fsocfl;
33264 fsocfl=c;
33265 c->header.state_type=FSO_FREE_CHUNK;
33266 }
33267 else if(flh.header.next!=NULL){
33268 flt->header.next=gc_free128;
33269 gc_free128=flh.header.next;
33270 }
33271 }
33272 }
33273
33274 void gc_mark128(T128*o){
33275 se_gc_check_id(o,128);
33276 {if(((gc128*)o)->header.flag==FSOH_UNMARKED){
33277 ((gc128*)o)->header.flag=FSOH_MARKED;
33278 if(NULL!=o->_main/*4*/)gc_mark117((T117*)(o->_main/*4*/));
33279 }
33280 }}
33281
33282 void gc_align_mark128(fsoc*c,gc128*p){
33283 gc128*b=((gc128*)(&(c->first_object)));
33284 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store128)))return;
33285 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33286 if(((char*)p)<((char*)b))return;
33287 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33288 if(p->header.flag==FSOH_UNMARKED){
33289 T128*o=(&(p->object));
33290 ((gc128*)o)->header.flag=FSOH_MARKED;
33291 if(NULL!=o->_main/*4*/)gc_mark117((T117*)(o->_main/*4*/));
33292 }
33293 }
33294 }
33295 fsoc H128={{FSOC_SIZE,FSO_STORE_CHUNK,
33296 (void(*)(mch*,void*))gc_align_mark128,
33297 (void(*)(mch*))gc_sweep128},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc128))-1)};
33298
33299 T128*new128(void){
33300 gc128*n;
33301 fsoc*c;
33302 if(store_left128>1){
33303 store_left128--;
33304 n=store128++;
33305 }
33306 else if(gc_free128!=NULL){
33307 n=gc_free128;
33308 gc_free128=n->header.next;
33309 }
33310 else if(store_left128==1){
33311 store_left128=0;
33312 store_chunk128->header.state_type=FSO_USED_CHUNK;
33313 n=store128++;
33314 }
33315 else{
33316 c=gc_fsoc_get1();
33317 if(gc_free128!=NULL){
33318 n=gc_free128;
33319 gc_free128=n->header.next;
33320 }
33321 else{
33322 if(c==NULL)c=gc_fsoc_get2();
33323 store_chunk128=c;
33324 *store_chunk128=H128;
33325 store128=((gc128*)(&(store_chunk128->first_object)));
33326 store_left128=H128.count_minus_one;
33327 n=store128++;
33328 }
33329 }
33330 n->header.flag=FSOH_UNMARKED;
33331 n->object=M128;
33332 return((T128*)n);
33333 }
33334
33335 void gc_sweep105(fsoc*c){
33336 gc105*o1,*o2,*flt,flh;
33337 o1=((gc105*)(&(c->first_object)));
33338 if(c->header.state_type==FSO_STORE_CHUNK){
33339 for(;o1<store105;o1++){
33340 if((o1->header.flag)==FSOH_MARKED){
33341 o1->header.flag=FSOH_UNMARKED;
33342 }
33343 else{
33344 o1->header.next=gc_free105;
33345 gc_free105=o1;
33346 }
33347 }
33348 }
33349 else{
33350 int dead=1;
33351 flh.header.next=NULL;
33352 flt=&flh;
33353 o2=o1+c->count_minus_one;
33354 for(;o1<=o2;o2--){
33355 if((o2->header.flag)==FSOH_MARKED){
33356 o2->header.flag=FSOH_UNMARKED;
33357 dead=0;}
33358 else{
33359 flt->header.next=o2;
33360 flt=o2;
33361 }
33362 }
33363 if (dead){
33364 c->next=fsocfl;
33365 fsocfl=c;
33366 c->header.state_type=FSO_FREE_CHUNK;
33367 }
33368 else if(flh.header.next!=NULL){
33369 flt->header.next=gc_free105;
33370 gc_free105=flh.header.next;
33371 }
33372 }
33373 }
33374
33375 void gc_mark105(T105*o){
33376 se_gc_check_id(o,105);
33377 {if(((gc105*)o)->header.flag==FSOH_UNMARKED){
33378 ((gc105*)o)->header.flag=FSOH_MARKED;
33379 if(NULL!=o->_mem_lnk/*20*/)gc_mark106((T106*)(o->_mem_lnk/*20*/));
33380 if(NULL!=o->_last_link/*12*/)gc_mark106((T106*)(o->_last_link/*12*/));
33381 if(NULL!=o->_first_link/*8*/)gc_mark106((T106*)(o->_first_link/*8*/));
33382 }
33383 }}
33384
33385 void gc_align_mark105(fsoc*c,gc105*p){
33386 gc105*b=((gc105*)(&(c->first_object)));
33387 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store105)))return;
33388 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33389 if(((char*)p)<((char*)b))return;
33390 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33391 if(p->header.flag==FSOH_UNMARKED){
33392 T105*o=(&(p->object));
33393 ((gc105*)o)->header.flag=FSOH_MARKED;
33394 if(NULL!=o->_mem_lnk/*20*/)gc_mark106((T106*)(o->_mem_lnk/*20*/));
33395 if(NULL!=o->_last_link/*12*/)gc_mark106((T106*)(o->_last_link/*12*/));
33396 if(NULL!=o->_first_link/*8*/)gc_mark106((T106*)(o->_first_link/*8*/));
33397 }
33398 }
33399 }
33400 fsoc H105={{FSOC_SIZE,FSO_STORE_CHUNK,
33401 (void(*)(mch*,void*))gc_align_mark105,
33402 (void(*)(mch*))gc_sweep105},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc105))-1)};
33403
33404 T105*new105(void){
33405 gc105*n;
33406 fsoc*c;
33407 if(store_left105>1){
33408 store_left105--;
33409 n=store105++;
33410 }
33411 else if(gc_free105!=NULL){
33412 n=gc_free105;
33413 gc_free105=n->header.next;
33414 }
33415 else if(store_left105==1){
33416 store_left105=0;
33417 store_chunk105->header.state_type=FSO_USED_CHUNK;
33418 n=store105++;
33419 }
33420 else{
33421 c=gc_fsoc_get1();
33422 if(gc_free105!=NULL){
33423 n=gc_free105;
33424 gc_free105=n->header.next;
33425 }
33426 else{
33427 if(c==NULL)c=gc_fsoc_get2();
33428 store_chunk105=c;
33429 *store_chunk105=H105;
33430 store105=((gc105*)(&(store_chunk105->first_object)));
33431 store_left105=H105.count_minus_one;
33432 n=store105++;
33433 }
33434 }
33435 n->header.flag=FSOH_UNMARKED;
33436 n->object=M105;
33437 return((T105*)n);
33438 }
33439
33440 void gc_sweep68(fsoc*c){
33441 gc68*o1,*o2,*flt,flh;
33442 o1=((gc68*)(&(c->first_object)));
33443 if(c->header.state_type==FSO_STORE_CHUNK){
33444 for(;o1<store68;o1++){
33445 if((o1->header.flag)==FSOH_MARKED){
33446 o1->header.flag=FSOH_UNMARKED;
33447 }
33448 else{
33449 o1->header.next=gc_free68;
33450 gc_free68=o1;
33451 }
33452 }
33453 }
33454 else{
33455 int dead=1;
33456 flh.header.next=NULL;
33457 flt=&flh;
33458 o2=o1+c->count_minus_one;
33459 for(;o1<=o2;o2--){
33460 if((o2->header.flag)==FSOH_MARKED){
33461 o2->header.flag=FSOH_UNMARKED;
33462 dead=0;}
33463 else{
33464 flt->header.next=o2;
33465 flt=o2;
33466 }
33467 }
33468 if (dead){
33469 c->next=fsocfl;
33470 fsocfl=c;
33471 c->header.state_type=FSO_FREE_CHUNK;
33472 }
33473 else if(flh.header.next!=NULL){
33474 flt->header.next=gc_free68;
33475 gc_free68=flh.header.next;
33476 }
33477 }
33478 }
33479
33480 void gc_mark68(T68*o){
33481 se_gc_check_id(o,68);
33482 {((gc68*)o)->header.flag=FSOH_MARKED;
33483
33484 }}
33485
33486 void gc_align_mark68(fsoc*c,gc68*p){
33487 gc68*b=((gc68*)(&(c->first_object)));
33488 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store68)))return;
33489 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33490 if(((char*)p)<((char*)b))return;
33491 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33492 if(p->header.flag==FSOH_UNMARKED){
33493 T68*o=(&(p->object));
33494 ((gc68*)o)->header.flag=FSOH_MARKED;
33495 }
33496 }
33497 }
33498 fsoc H68={{FSOC_SIZE,FSO_STORE_CHUNK,
33499 (void(*)(mch*,void*))gc_align_mark68,
33500 (void(*)(mch*))gc_sweep68},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc68))-1)};
33501
33502 T68*new68(void){
33503 gc68*n;
33504 fsoc*c;
33505 if(store_left68>1){
33506 store_left68--;
33507 n=store68++;
33508 }
33509 else if(gc_free68!=NULL){
33510 n=gc_free68;
33511 gc_free68=n->header.next;
33512 }
33513 else if(store_left68==1){
33514 store_left68=0;
33515 store_chunk68->header.state_type=FSO_USED_CHUNK;
33516 n=store68++;
33517 }
33518 else{
33519 c=gc_fsoc_get1();
33520 if(gc_free68!=NULL){
33521 n=gc_free68;
33522 gc_free68=n->header.next;
33523 }
33524 else{
33525 if(c==NULL)c=gc_fsoc_get2();
33526 store_chunk68=c;
33527 *store_chunk68=H68;
33528 store68=((gc68*)(&(store_chunk68->first_object)));
33529 store_left68=H68.count_minus_one;
33530 n=store68++;
33531 }
33532 }
33533 n->header.flag=FSOH_UNMARKED;
33534 n->object=M68;
33535 return((T68*)n);
33536 }
33537
33538 void gc_sweep129(fsoc*c){
33539 gc129*o1,*o2,*flt,flh;
33540 o1=((gc129*)(&(c->first_object)));
33541 if(c->header.state_type==FSO_STORE_CHUNK){
33542 for(;o1<store129;o1++){
33543 if((o1->header.flag)==FSOH_MARKED){
33544 o1->header.flag=FSOH_UNMARKED;
33545 }
33546 else{
33547 o1->header.next=gc_free129;
33548 gc_free129=o1;
33549 }
33550 }
33551 }
33552 else{
33553 int dead=1;
33554 flh.header.next=NULL;
33555 flt=&flh;
33556 o2=o1+c->count_minus_one;
33557 for(;o1<=o2;o2--){
33558 if((o2->header.flag)==FSOH_MARKED){
33559 o2->header.flag=FSOH_UNMARKED;
33560 dead=0;}
33561 else{
33562 flt->header.next=o2;
33563 flt=o2;
33564 }
33565 }
33566 if (dead){
33567 c->next=fsocfl;
33568 fsocfl=c;
33569 c->header.state_type=FSO_FREE_CHUNK;
33570 }
33571 else if(flh.header.next!=NULL){
33572 flt->header.next=gc_free129;
33573 gc_free129=flh.header.next;
33574 }
33575 }
33576 }
33577
33578 void gc_mark129(T129*o){
33579 se_gc_check_id(o,129);
33580 {if(((gc129*)o)->header.flag==FSOH_UNMARKED){
33581 ((gc129*)o)->header.flag=FSOH_MARKED;
33582 if(NULL!=o->_main/*4*/)Xgc_mark30((T0*)(o->_main/*4*/));
33583 }
33584 }}
33585
33586 void gc_align_mark129(fsoc*c,gc129*p){
33587 gc129*b=((gc129*)(&(c->first_object)));
33588 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store129)))return;
33589 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33590 if(((char*)p)<((char*)b))return;
33591 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33592 if(p->header.flag==FSOH_UNMARKED){
33593 T129*o=(&(p->object));
33594 ((gc129*)o)->header.flag=FSOH_MARKED;
33595 if(NULL!=o->_main/*4*/)Xgc_mark30((T0*)(o->_main/*4*/));
33596 }
33597 }
33598 }
33599 fsoc H129={{FSOC_SIZE,FSO_STORE_CHUNK,
33600 (void(*)(mch*,void*))gc_align_mark129,
33601 (void(*)(mch*))gc_sweep129},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc129))-1)};
33602
33603 T129*new129(void){
33604 gc129*n;
33605 fsoc*c;
33606 if(store_left129>1){
33607 store_left129--;
33608 n=store129++;
33609 }
33610 else if(gc_free129!=NULL){
33611 n=gc_free129;
33612 gc_free129=n->header.next;
33613 }
33614 else if(store_left129==1){
33615 store_left129=0;
33616 store_chunk129->header.state_type=FSO_USED_CHUNK;
33617 n=store129++;
33618 }
33619 else{
33620 c=gc_fsoc_get1();
33621 if(gc_free129!=NULL){
33622 n=gc_free129;
33623 gc_free129=n->header.next;
33624 }
33625 else{
33626 if(c==NULL)c=gc_fsoc_get2();
33627 store_chunk129=c;
33628 *store_chunk129=H129;
33629 store129=((gc129*)(&(store_chunk129->first_object)));
33630 store_left129=H129.count_minus_one;
33631 n=store129++;
33632 }
33633 }
33634 n->header.flag=FSOH_UNMARKED;
33635 n->object=M129;
33636 return((T129*)n);
33637 }
33638
33639 void gc_sweep153(fsoc*c){
33640 gc153*o1,*o2,*flt,flh;
33641 o1=((gc153*)(&(c->first_object)));
33642 if(c->header.state_type==FSO_STORE_CHUNK){
33643 for(;o1<store153;o1++){
33644 if((o1->header.flag)==FSOH_MARKED){
33645 o1->header.flag=FSOH_UNMARKED;
33646 }
33647 else{
33648 o1->header.next=gc_free153;
33649 gc_free153=o1;
33650 }
33651 }
33652 }
33653 else{
33654 int dead=1;
33655 flh.header.next=NULL;
33656 flt=&flh;
33657 o2=o1+c->count_minus_one;
33658 for(;o1<=o2;o2--){
33659 if((o2->header.flag)==FSOH_MARKED){
33660 o2->header.flag=FSOH_UNMARKED;
33661 dead=0;}
33662 else{
33663 flt->header.next=o2;
33664 flt=o2;
33665 }
33666 }
33667 if (dead){
33668 c->next=fsocfl;
33669 fsocfl=c;
33670 c->header.state_type=FSO_FREE_CHUNK;
33671 }
33672 else if(flh.header.next!=NULL){
33673 flt->header.next=gc_free153;
33674 gc_free153=flh.header.next;
33675 }
33676 }
33677 }
33678
33679 void gc_mark153(T153*o){
33680 se_gc_check_id(o,153);
33681 {if(((gc153*)o)->header.flag==FSOH_UNMARKED){
33682 ((gc153*)o)->header.flag=FSOH_MARKED;
33683 if(NULL!=o->_storage/*4*/)gc_mark9((o->_storage/*4*/));
33684 }
33685 }}
33686
33687 void gc_align_mark153(fsoc*c,gc153*p){
33688 gc153*b=((gc153*)(&(c->first_object)));
33689 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store153)))return;
33690 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33691 if(((char*)p)<((char*)b))return;
33692 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33693 if(p->header.flag==FSOH_UNMARKED){
33694 T153*o=(&(p->object));
33695 ((gc153*)o)->header.flag=FSOH_MARKED;
33696 if(NULL!=o->_storage/*4*/)gc_mark9((o->_storage/*4*/));
33697 }
33698 }
33699 }
33700 fsoc H153={{FSOC_SIZE,FSO_STORE_CHUNK,
33701 (void(*)(mch*,void*))gc_align_mark153,
33702 (void(*)(mch*))gc_sweep153},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc153))-1)};
33703
33704 T153*new153(void){
33705 gc153*n;
33706 fsoc*c;
33707 if(store_left153>1){
33708 store_left153--;
33709 n=store153++;
33710 }
33711 else if(gc_free153!=NULL){
33712 n=gc_free153;
33713 gc_free153=n->header.next;
33714 }
33715 else if(store_left153==1){
33716 store_left153=0;
33717 store_chunk153->header.state_type=FSO_USED_CHUNK;
33718 n=store153++;
33719 }
33720 else{
33721 c=gc_fsoc_get1();
33722 if(gc_free153!=NULL){
33723 n=gc_free153;
33724 gc_free153=n->header.next;
33725 }
33726 else{
33727 if(c==NULL)c=gc_fsoc_get2();
33728 store_chunk153=c;
33729 *store_chunk153=H153;
33730 store153=((gc153*)(&(store_chunk153->first_object)));
33731 store_left153=H153.count_minus_one;
33732 n=store153++;
33733 }
33734 }
33735 n->header.flag=FSOH_UNMARKED;
33736 n->object=M153;
33737 return((T153*)n);
33738 }
33739
33740 void gc_sweep45(fsoc*c){
33741 gc45*o1,*o2,*flt,flh;
33742 o1=((gc45*)(&(c->first_object)));
33743 if(c->header.state_type==FSO_STORE_CHUNK){
33744 for(;o1<store45;o1++){
33745 if((o1->header.flag)==FSOH_MARKED){
33746 o1->header.flag=FSOH_UNMARKED;
33747 }
33748 else{
33749 o1->header.next=gc_free45;
33750 gc_free45=o1;
33751 }
33752 }
33753 }
33754 else{
33755 int dead=1;
33756 flh.header.next=NULL;
33757 flt=&flh;
33758 o2=o1+c->count_minus_one;
33759 for(;o1<=o2;o2--){
33760 if((o2->header.flag)==FSOH_MARKED){
33761 o2->header.flag=FSOH_UNMARKED;
33762 dead=0;}
33763 else{
33764 flt->header.next=o2;
33765 flt=o2;
33766 }
33767 }
33768 if (dead){
33769 c->next=fsocfl;
33770 fsocfl=c;
33771 c->header.state_type=FSO_FREE_CHUNK;
33772 }
33773 else if(flh.header.next!=NULL){
33774 flt->header.next=gc_free45;
33775 gc_free45=flh.header.next;
33776 }
33777 }
33778 }
33779
33780 void gc_mark45(T45*o){
33781 se_gc_check_id(o,45);
33782 {if(((gc45*)o)->header.flag==FSOH_UNMARKED){
33783 ((gc45*)o)->header.flag=FSOH_MARKED;
33784 if(NULL!=o->_cache_node/*20*/)gc_mark47((T47*)(o->_cache_node/*20*/));
33785 if(NULL!=o->_buckets/*4*/)gc_mark49((o->_buckets/*4*/));
33786 }
33787 }}
33788
33789 void gc_align_mark45(fsoc*c,gc45*p){
33790 gc45*b=((gc45*)(&(c->first_object)));
33791 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store45)))return;
33792 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33793 if(((char*)p)<((char*)b))return;
33794 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33795 if(p->header.flag==FSOH_UNMARKED){
33796 T45*o=(&(p->object));
33797 ((gc45*)o)->header.flag=FSOH_MARKED;
33798 if(NULL!=o->_cache_node/*20*/)gc_mark47((T47*)(o->_cache_node/*20*/));
33799 if(NULL!=o->_buckets/*4*/)gc_mark49((o->_buckets/*4*/));
33800 }
33801 }
33802 }
33803 fsoc H45={{FSOC_SIZE,FSO_STORE_CHUNK,
33804 (void(*)(mch*,void*))gc_align_mark45,
33805 (void(*)(mch*))gc_sweep45},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc45))-1)};
33806
33807 T45*new45(void){
33808 gc45*n;
33809 fsoc*c;
33810 if(store_left45>1){
33811 store_left45--;
33812 n=store45++;
33813 }
33814 else if(gc_free45!=NULL){
33815 n=gc_free45;
33816 gc_free45=n->header.next;
33817 }
33818 else if(store_left45==1){
33819 store_left45=0;
33820 store_chunk45->header.state_type=FSO_USED_CHUNK;
33821 n=store45++;
33822 }
33823 else{
33824 c=gc_fsoc_get1();
33825 if(gc_free45!=NULL){
33826 n=gc_free45;
33827 gc_free45=n->header.next;
33828 }
33829 else{
33830 if(c==NULL)c=gc_fsoc_get2();
33831 store_chunk45=c;
33832 *store_chunk45=H45;
33833 store45=((gc45*)(&(store_chunk45->first_object)));
33834 store_left45=H45.count_minus_one;
33835 n=store45++;
33836 }
33837 }
33838 n->header.flag=FSOH_UNMARKED;
33839 n->object=M45;
33840 return((T45*)n);
33841 }
33842
33843 void gc_sweep96(fsoc*c){
33844 gc96*o1,*o2,*flt,flh;
33845 o1=((gc96*)(&(c->first_object)));
33846 if(c->header.state_type==FSO_STORE_CHUNK){
33847 for(;o1<store96;o1++){
33848 if((o1->header.flag)==FSOH_MARKED){
33849 o1->header.flag=FSOH_UNMARKED;
33850 }
33851 else{
33852 o1->header.next=gc_free96;
33853 gc_free96=o1;
33854 }
33855 }
33856 }
33857 else{
33858 int dead=1;
33859 flh.header.next=NULL;
33860 flt=&flh;
33861 o2=o1+c->count_minus_one;
33862 for(;o1<=o2;o2--){
33863 if((o2->header.flag)==FSOH_MARKED){
33864 o2->header.flag=FSOH_UNMARKED;
33865 dead=0;}
33866 else{
33867 flt->header.next=o2;
33868 flt=o2;
33869 }
33870 }
33871 if (dead){
33872 c->next=fsocfl;
33873 fsocfl=c;
33874 c->header.state_type=FSO_FREE_CHUNK;
33875 }
33876 else if(flh.header.next!=NULL){
33877 flt->header.next=gc_free96;
33878 gc_free96=flh.header.next;
33879 }
33880 }
33881 }
33882
33883 void gc_mark96(T96*o){
33884 se_gc_check_id(o,96);
33885 {if(((gc96*)o)->header.flag==FSOH_UNMARKED){
33886 ((gc96*)o)->header.flag=FSOH_MARKED;
33887 if(NULL!=o->_name/*4*/)gc_mark7((T7*)(o->_name/*4*/));
33888 }
33889 }}
33890
33891 void gc_align_mark96(fsoc*c,gc96*p){
33892 gc96*b=((gc96*)(&(c->first_object)));
33893 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store96)))return;
33894 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33895 if(((char*)p)<((char*)b))return;
33896 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33897 if(p->header.flag==FSOH_UNMARKED){
33898 T96*o=(&(p->object));
33899 ((gc96*)o)->header.flag=FSOH_MARKED;
33900 if(NULL!=o->_name/*4*/)gc_mark7((T7*)(o->_name/*4*/));
33901 }
33902 }
33903 }
33904 fsoc H96={{FSOC_SIZE,FSO_STORE_CHUNK,
33905 (void(*)(mch*,void*))gc_align_mark96,
33906 (void(*)(mch*))gc_sweep96},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc96))-1)};
33907
33908 T96*new96(void){
33909 gc96*n;
33910 fsoc*c;
33911 if(store_left96>1){
33912 store_left96--;
33913 n=store96++;
33914 }
33915 else if(gc_free96!=NULL){
33916 n=gc_free96;
33917 gc_free96=n->header.next;
33918 }
33919 else if(store_left96==1){
33920 store_left96=0;
33921 store_chunk96->header.state_type=FSO_USED_CHUNK;
33922 n=store96++;
33923 }
33924 else{
33925 c=gc_fsoc_get1();
33926 if(gc_free96!=NULL){
33927 n=gc_free96;
33928 gc_free96=n->header.next;
33929 }
33930 else{
33931 if(c==NULL)c=gc_fsoc_get2();
33932 store_chunk96=c;
33933 *store_chunk96=H96;
33934 store96=((gc96*)(&(store_chunk96->first_object)));
33935 store_left96=H96.count_minus_one;
33936 n=store96++;
33937 }
33938 }
33939 n->header.flag=FSOH_UNMARKED;
33940 n->object=M96;
33941 return((T96*)n);
33942 }
33943
33944 void gc_sweep7(fsoc*c){
33945 gc7*o1,*o2,*flt,flh;
33946 o1=((gc7*)(&(c->first_object)));
33947 if(c->header.state_type==FSO_STORE_CHUNK){
33948 for(;o1<store7;o1++){
33949 if((o1->header.flag)==FSOH_MARKED){
33950 o1->header.flag=FSOH_UNMARKED;
33951 }
33952 else{
33953 o1->header.next=gc_free7;
33954 gc_free7=o1;
33955 }
33956 }
33957 }
33958 else{
33959 int dead=1;
33960 flh.header.next=NULL;
33961 flt=&flh;
33962 o2=o1+c->count_minus_one;
33963 for(;o1<=o2;o2--){
33964 if((o2->header.flag)==FSOH_MARKED){
33965 o2->header.flag=FSOH_UNMARKED;
33966 dead=0;}
33967 else{
33968 flt->header.next=o2;
33969 flt=o2;
33970 }
33971 }
33972 if (dead){
33973 c->next=fsocfl;
33974 fsocfl=c;
33975 c->header.state_type=FSO_FREE_CHUNK;
33976 }
33977 else if(flh.header.next!=NULL){
33978 flt->header.next=gc_free7;
33979 gc_free7=flh.header.next;
33980 }
33981 }
33982 }
33983
33984 void gc_mark7(T7*o){
33985 se_gc_check_id(o,7);
33986 {if(((gc7*)o)->header.flag==FSOH_UNMARKED){
33987 ((gc7*)o)->header.flag=FSOH_MARKED;
33988 if(NULL!=o->_storage/*4*/)gc_mark9((o->_storage/*4*/));
33989 }
33990 }}
33991
33992 void gc_align_mark7(fsoc*c,gc7*p){
33993 gc7*b=((gc7*)(&(c->first_object)));
33994 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store7)))return;
33995 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
33996 if(((char*)p)<((char*)b))return;
33997 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
33998 if(p->header.flag==FSOH_UNMARKED){
33999 T7*o=(&(p->object));
34000 ((gc7*)o)->header.flag=FSOH_MARKED;
34001 if(NULL!=o->_storage/*4*/)gc_mark9((o->_storage/*4*/));
34002 }
34003 }
34004 }
34005 fsoc H7={{FSOC_SIZE,FSO_STORE_CHUNK,
34006 (void(*)(mch*,void*))gc_align_mark7,
34007 (void(*)(mch*))gc_sweep7},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc7))-1)};
34008
34009 T7*new7(void){
34010 gc7*n;
34011 fsoc*c;
34012 if(store_left7>1){
34013 store_left7--;
34014 n=store7++;
34015 }
34016 else if(gc_free7!=NULL){
34017 n=gc_free7;
34018 gc_free7=n->header.next;
34019 }
34020 else if(store_left7==1){
34021 store_left7=0;
34022 store_chunk7->header.state_type=FSO_USED_CHUNK;
34023 n=store7++;
34024 }
34025 else{
34026 c=gc_fsoc_get1();
34027 if(gc_free7!=NULL){
34028 n=gc_free7;
34029 gc_free7=n->header.next;
34030 }
34031 else{
34032 if(c==NULL)c=gc_fsoc_get2();
34033 store_chunk7=c;
34034 *store_chunk7=H7;
34035 store7=((gc7*)(&(store_chunk7->first_object)));
34036 store_left7=H7.count_minus_one;
34037 n=store7++;
34038 }
34039 }
34040 n->header.flag=FSOH_UNMARKED;
34041 n->object=M7;
34042 return((T7*)n);
34043 }
34044
34045 void gc_sweep39(fsoc*c){
34046 gc39*o1,*o2,*flt,flh;
34047 o1=((gc39*)(&(c->first_object)));
34048 if(c->header.state_type==FSO_STORE_CHUNK){
34049 for(;o1<store39;o1++){
34050 if((o1->header.flag)==FSOH_MARKED){
34051 o1->header.flag=FSOH_UNMARKED;
34052 }
34053 else{
34054 o1->header.next=gc_free39;
34055 gc_free39=o1;
34056 }
34057 }
34058 }
34059 else{
34060 int dead=1;
34061 flh.header.next=NULL;
34062 flt=&flh;
34063 o2=o1+c->count_minus_one;
34064 for(;o1<=o2;o2--){
34065 if((o2->header.flag)==FSOH_MARKED){
34066 o2->header.flag=FSOH_UNMARKED;
34067 dead=0;}
34068 else{
34069 flt->header.next=o2;
34070 flt=o2;
34071 }
34072 }
34073 if (dead){
34074 c->next=fsocfl;
34075 fsocfl=c;
34076 c->header.state_type=FSO_FREE_CHUNK;
34077 }
34078 else if(flh.header.next!=NULL){
34079 flt->header.next=gc_free39;
34080 gc_free39=flh.header.next;
34081 }
34082 }
34083 }
34084
34085 void gc_mark39(T39*o){
34086 se_gc_check_id(o,39);
34087 {if(((gc39*)o)->header.flag==FSOH_UNMARKED){
34088 ((gc39*)o)->header.flag=FSOH_MARKED;
34089 if(NULL!=o->_mem_lnk/*20*/)gc_mark43((T43*)(o->_mem_lnk/*20*/));
34090 if(NULL!=o->_last_link/*12*/)gc_mark43((T43*)(o->_last_link/*12*/));
34091 if(NULL!=o->_first_link/*8*/)gc_mark43((T43*)(o->_first_link/*8*/));
34092 }
34093 }}
34094
34095 void gc_align_mark39(fsoc*c,gc39*p){
34096 gc39*b=((gc39*)(&(c->first_object)));
34097 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store39)))return;
34098 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34099 if(((char*)p)<((char*)b))return;
34100 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34101 if(p->header.flag==FSOH_UNMARKED){
34102 T39*o=(&(p->object));
34103 ((gc39*)o)->header.flag=FSOH_MARKED;
34104 if(NULL!=o->_mem_lnk/*20*/)gc_mark43((T43*)(o->_mem_lnk/*20*/));
34105 if(NULL!=o->_last_link/*12*/)gc_mark43((T43*)(o->_last_link/*12*/));
34106 if(NULL!=o->_first_link/*8*/)gc_mark43((T43*)(o->_first_link/*8*/));
34107 }
34108 }
34109 }
34110 fsoc H39={{FSOC_SIZE,FSO_STORE_CHUNK,
34111 (void(*)(mch*,void*))gc_align_mark39,
34112 (void(*)(mch*))gc_sweep39},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc39))-1)};
34113
34114 T39*new39(void){
34115 gc39*n;
34116 fsoc*c;
34117 if(store_left39>1){
34118 store_left39--;
34119 n=store39++;
34120 }
34121 else if(gc_free39!=NULL){
34122 n=gc_free39;
34123 gc_free39=n->header.next;
34124 }
34125 else if(store_left39==1){
34126 store_left39=0;
34127 store_chunk39->header.state_type=FSO_USED_CHUNK;
34128 n=store39++;
34129 }
34130 else{
34131 c=gc_fsoc_get1();
34132 if(gc_free39!=NULL){
34133 n=gc_free39;
34134 gc_free39=n->header.next;
34135 }
34136 else{
34137 if(c==NULL)c=gc_fsoc_get2();
34138 store_chunk39=c;
34139 *store_chunk39=H39;
34140 store39=((gc39*)(&(store_chunk39->first_object)));
34141 store_left39=H39.count_minus_one;
34142 n=store39++;
34143 }
34144 }
34145 n->header.flag=FSOH_UNMARKED;
34146 n->object=M39;
34147 return((T39*)n);
34148 }
34149
34150 void gc_sweep127(fsoc*c){
34151 gc127*o1,*o2,*flt,flh;
34152 o1=((gc127*)(&(c->first_object)));
34153 if(c->header.state_type==FSO_STORE_CHUNK){
34154 for(;o1<store127;o1++){
34155 if((o1->header.flag)==FSOH_MARKED){
34156 o1->header.flag=FSOH_UNMARKED;
34157 }
34158 else{
34159 o1->header.next=gc_free127;
34160 gc_free127=o1;
34161 }
34162 }
34163 }
34164 else{
34165 int dead=1;
34166 flh.header.next=NULL;
34167 flt=&flh;
34168 o2=o1+c->count_minus_one;
34169 for(;o1<=o2;o2--){
34170 if((o2->header.flag)==FSOH_MARKED){
34171 o2->header.flag=FSOH_UNMARKED;
34172 dead=0;}
34173 else{
34174 flt->header.next=o2;
34175 flt=o2;
34176 }
34177 }
34178 if (dead){
34179 c->next=fsocfl;
34180 fsocfl=c;
34181 c->header.state_type=FSO_FREE_CHUNK;
34182 }
34183 else if(flh.header.next!=NULL){
34184 flt->header.next=gc_free127;
34185 gc_free127=flh.header.next;
34186 }
34187 }
34188 }
34189
34190 void gc_mark127(T127*o){
34191 se_gc_check_id(o,127);
34192 {if(((gc127*)o)->header.flag==FSOH_UNMARKED){
34193 ((gc127*)o)->header.flag=FSOH_MARKED;
34194 if(NULL!=o->_main/*4*/)gc_mark117((T117*)(o->_main/*4*/));
34195 }
34196 }}
34197
34198 void gc_align_mark127(fsoc*c,gc127*p){
34199 gc127*b=((gc127*)(&(c->first_object)));
34200 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store127)))return;
34201 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34202 if(((char*)p)<((char*)b))return;
34203 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34204 if(p->header.flag==FSOH_UNMARKED){
34205 T127*o=(&(p->object));
34206 ((gc127*)o)->header.flag=FSOH_MARKED;
34207 if(NULL!=o->_main/*4*/)gc_mark117((T117*)(o->_main/*4*/));
34208 }
34209 }
34210 }
34211 fsoc H127={{FSOC_SIZE,FSO_STORE_CHUNK,
34212 (void(*)(mch*,void*))gc_align_mark127,
34213 (void(*)(mch*))gc_sweep127},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc127))-1)};
34214
34215 T127*new127(void){
34216 gc127*n;
34217 fsoc*c;
34218 if(store_left127>1){
34219 store_left127--;
34220 n=store127++;
34221 }
34222 else if(gc_free127!=NULL){
34223 n=gc_free127;
34224 gc_free127=n->header.next;
34225 }
34226 else if(store_left127==1){
34227 store_left127=0;
34228 store_chunk127->header.state_type=FSO_USED_CHUNK;
34229 n=store127++;
34230 }
34231 else{
34232 c=gc_fsoc_get1();
34233 if(gc_free127!=NULL){
34234 n=gc_free127;
34235 gc_free127=n->header.next;
34236 }
34237 else{
34238 if(c==NULL)c=gc_fsoc_get2();
34239 store_chunk127=c;
34240 *store_chunk127=H127;
34241 store127=((gc127*)(&(store_chunk127->first_object)));
34242 store_left127=H127.count_minus_one;
34243 n=store127++;
34244 }
34245 }
34246 n->header.flag=FSOH_UNMARKED;
34247 n->object=M127;
34248 return((T127*)n);
34249 }
34250
34251 void gc_mark9(T9 o){
34252 (((rsoh*)o)-1)->header.magic_flag=RSOH_MARKED;
34253 }
34254
34255 T9 new9(int size){
34256 size=(size*sizeof(T3))+sizeof(rsoh);
34257 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
34258 if (size<=(na_env9.store_left)){
34259 rsoh*r=na_env9.store;
34260 na_env9.store_left-=size;
34261 if(na_env9.store_left>sizeof(rsoh)){
34262 r->header.size=size;
34263 na_env9.store=((rsoh*)(((char*)(na_env9.store))+size));
34264 }
34265 else {
34266 r->header.size=size+na_env9.store_left;
34267 na_env9.store_left=0;
34268 }
34269 (r->header.magic_flag)=RSOH_UNMARKED;
34270 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
34271 return((T9)(r+1));
34272 }
34273 return((T9)new_na(&na_env9,size));
34274 }
34275
34276 void gc_sweep98(fsoc*c){
34277 gc98*o1,*o2,*flt,flh;
34278 o1=((gc98*)(&(c->first_object)));
34279 if(c->header.state_type==FSO_STORE_CHUNK){
34280 for(;o1<store98;o1++){
34281 if((o1->header.flag)==FSOH_MARKED){
34282 o1->header.flag=FSOH_UNMARKED;
34283 }
34284 else{
34285 o1->header.next=gc_free98;
34286 gc_free98=o1;
34287 }
34288 }
34289 }
34290 else{
34291 int dead=1;
34292 flh.header.next=NULL;
34293 flt=&flh;
34294 o2=o1+c->count_minus_one;
34295 for(;o1<=o2;o2--){
34296 if((o2->header.flag)==FSOH_MARKED){
34297 o2->header.flag=FSOH_UNMARKED;
34298 dead=0;}
34299 else{
34300 flt->header.next=o2;
34301 flt=o2;
34302 }
34303 }
34304 if (dead){
34305 c->next=fsocfl;
34306 fsocfl=c;
34307 c->header.state_type=FSO_FREE_CHUNK;
34308 }
34309 else if(flh.header.next!=NULL){
34310 flt->header.next=gc_free98;
34311 gc_free98=flh.header.next;
34312 }
34313 }
34314 }
34315
34316 void gc_mark98(T98*o){
34317 se_gc_check_id(o,98);
34318 {if(((gc98*)o)->header.flag==FSOH_UNMARKED){
34319 ((gc98*)o)->header.flag=FSOH_MARKED;
34320 if(NULL!=o->_textimg/*41*/)gc_mark50((T50*)(o->_textimg/*41*/));
34321 if(NULL!=o->_string/*33*/)gc_mark7((T7*)(o->_string/*33*/));
34322 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
34323 }
34324 }}
34325
34326 void gc_align_mark98(fsoc*c,gc98*p){
34327 gc98*b=((gc98*)(&(c->first_object)));
34328 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store98)))return;
34329 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34330 if(((char*)p)<((char*)b))return;
34331 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34332 if(p->header.flag==FSOH_UNMARKED){
34333 T98*o=(&(p->object));
34334 ((gc98*)o)->header.flag=FSOH_MARKED;
34335 if(NULL!=o->_textimg/*41*/)gc_mark50((T50*)(o->_textimg/*41*/));
34336 if(NULL!=o->_string/*33*/)gc_mark7((T7*)(o->_string/*33*/));
34337 if(NULL!=o->_signal_table/*5*/)gc_mark45((T45*)(o->_signal_table/*5*/));
34338 }
34339 }
34340 }
34341 fsoc H98={{FSOC_SIZE,FSO_STORE_CHUNK,
34342 (void(*)(mch*,void*))gc_align_mark98,
34343 (void(*)(mch*))gc_sweep98},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc98))-1)};
34344
34345 T98*new98(void){
34346 gc98*n;
34347 fsoc*c;
34348 if(store_left98>1){
34349 store_left98--;
34350 n=store98++;
34351 }
34352 else if(gc_free98!=NULL){
34353 n=gc_free98;
34354 gc_free98=n->header.next;
34355 }
34356 else if(store_left98==1){
34357 store_left98=0;
34358 store_chunk98->header.state_type=FSO_USED_CHUNK;
34359 n=store98++;
34360 }
34361 else{
34362 c=gc_fsoc_get1();
34363 if(gc_free98!=NULL){
34364 n=gc_free98;
34365 gc_free98=n->header.next;
34366 }
34367 else{
34368 if(c==NULL)c=gc_fsoc_get2();
34369 store_chunk98=c;
34370 *store_chunk98=H98;
34371 store98=((gc98*)(&(store_chunk98->first_object)));
34372 store_left98=H98.count_minus_one;
34373 n=store98++;
34374 }
34375 }
34376 n->header.flag=FSOH_UNMARKED;
34377 n->object=M98;
34378 return((T98*)n);
34379 }
34380
34381 void gc_sweep104(fsoc*c){
34382 gc104*o1,*o2,*flt,flh;
34383 o1=((gc104*)(&(c->first_object)));
34384 if(c->header.state_type==FSO_STORE_CHUNK){
34385 for(;o1<store104;o1++){
34386 if((o1->header.flag)==FSOH_MARKED){
34387 o1->header.flag=FSOH_UNMARKED;
34388 }
34389 else{
34390 o1->header.next=gc_free104;
34391 gc_free104=o1;
34392 }
34393 }
34394 }
34395 else{
34396 int dead=1;
34397 flh.header.next=NULL;
34398 flt=&flh;
34399 o2=o1+c->count_minus_one;
34400 for(;o1<=o2;o2--){
34401 if((o2->header.flag)==FSOH_MARKED){
34402 o2->header.flag=FSOH_UNMARKED;
34403 dead=0;}
34404 else{
34405 flt->header.next=o2;
34406 flt=o2;
34407 }
34408 }
34409 if (dead){
34410 c->next=fsocfl;
34411 fsocfl=c;
34412 c->header.state_type=FSO_FREE_CHUNK;
34413 }
34414 else if(flh.header.next!=NULL){
34415 flt->header.next=gc_free104;
34416 gc_free104=flh.header.next;
34417 }
34418 }
34419 }
34420
34421 void gc_mark104(T104*o){
34422 se_gc_check_id(o,104);
34423 {if(((gc104*)o)->header.flag==FSOH_UNMARKED){
34424 ((gc104*)o)->header.flag=FSOH_MARKED;
34425 if(NULL!=o->_score_l/*20*/)gc_mark107((T107*)(o->_score_l/*20*/));
34426 if(NULL!=o->_time_l/*16*/)gc_mark107((T107*)(o->_time_l/*16*/));
34427 if(NULL!=o->_name_l/*12*/)gc_mark107((T107*)(o->_name_l/*12*/));
34428 if(NULL!=o->_level_l/*8*/)gc_mark107((T107*)(o->_level_l/*8*/));
34429 if(NULL!=o->_name/*4*/)gc_mark7((T7*)(o->_name/*4*/));
34430 }
34431 }}
34432
34433 void gc_align_mark104(fsoc*c,gc104*p){
34434 gc104*b=((gc104*)(&(c->first_object)));
34435 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store104)))return;
34436 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34437 if(((char*)p)<((char*)b))return;
34438 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34439 if(p->header.flag==FSOH_UNMARKED){
34440 T104*o=(&(p->object));
34441 ((gc104*)o)->header.flag=FSOH_MARKED;
34442 if(NULL!=o->_score_l/*20*/)gc_mark107((T107*)(o->_score_l/*20*/));
34443 if(NULL!=o->_time_l/*16*/)gc_mark107((T107*)(o->_time_l/*16*/));
34444 if(NULL!=o->_name_l/*12*/)gc_mark107((T107*)(o->_name_l/*12*/));
34445 if(NULL!=o->_level_l/*8*/)gc_mark107((T107*)(o->_level_l/*8*/));
34446 if(NULL!=o->_name/*4*/)gc_mark7((T7*)(o->_name/*4*/));
34447 }
34448 }
34449 }
34450 fsoc H104={{FSOC_SIZE,FSO_STORE_CHUNK,
34451 (void(*)(mch*,void*))gc_align_mark104,
34452 (void(*)(mch*))gc_sweep104},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc104))-1)};
34453
34454 T104*new104(void){
34455 gc104*n;
34456 fsoc*c;
34457 if(store_left104>1){
34458 store_left104--;
34459 n=store104++;
34460 }
34461 else if(gc_free104!=NULL){
34462 n=gc_free104;
34463 gc_free104=n->header.next;
34464 }
34465 else if(store_left104==1){
34466 store_left104=0;
34467 store_chunk104->header.state_type=FSO_USED_CHUNK;
34468 n=store104++;
34469 }
34470 else{
34471 c=gc_fsoc_get1();
34472 if(gc_free104!=NULL){
34473 n=gc_free104;
34474 gc_free104=n->header.next;
34475 }
34476 else{
34477 if(c==NULL)c=gc_fsoc_get2();
34478 store_chunk104=c;
34479 *store_chunk104=H104;
34480 store104=((gc104*)(&(store_chunk104->first_object)));
34481 store_left104=H104.count_minus_one;
34482 n=store104++;
34483 }
34484 }
34485 n->header.flag=FSOH_UNMARKED;
34486 n->object=M104;
34487 return((T104*)n);
34488 }
34489
34490 void gc_sweep131(fsoc*c){
34491 gc131*o1,*o2,*flt,flh;
34492 o1=((gc131*)(&(c->first_object)));
34493 if(c->header.state_type==FSO_STORE_CHUNK){
34494 for(;o1<store131;o1++){
34495 if((o1->header.flag)==FSOH_MARKED){
34496 o1->header.flag=FSOH_UNMARKED;
34497 }
34498 else{
34499 o1->header.next=gc_free131;
34500 gc_free131=o1;
34501 }
34502 }
34503 }
34504 else{
34505 int dead=1;
34506 flh.header.next=NULL;
34507 flt=&flh;
34508 o2=o1+c->count_minus_one;
34509 for(;o1<=o2;o2--){
34510 if((o2->header.flag)==FSOH_MARKED){
34511 o2->header.flag=FSOH_UNMARKED;
34512 dead=0;}
34513 else{
34514 flt->header.next=o2;
34515 flt=o2;
34516 }
34517 }
34518 if (dead){
34519 c->next=fsocfl;
34520 fsocfl=c;
34521 c->header.state_type=FSO_FREE_CHUNK;
34522 }
34523 else if(flh.header.next!=NULL){
34524 flt->header.next=gc_free131;
34525 gc_free131=flh.header.next;
34526 }
34527 }
34528 }
34529
34530 void gc_mark131(T131*o){
34531 se_gc_check_id(o,131);
34532 {if(((gc131*)o)->header.flag==FSOH_UNMARKED){
34533 ((gc131*)o)->header.flag=FSOH_MARKED;
34534 if(NULL!=o->_cache_node/*20*/)gc_mark132((T132*)(o->_cache_node/*20*/));
34535 if(NULL!=o->_buckets/*4*/)gc_mark133((o->_buckets/*4*/));
34536 }
34537 }}
34538
34539 void gc_align_mark131(fsoc*c,gc131*p){
34540 gc131*b=((gc131*)(&(c->first_object)));
34541 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store131)))return;
34542 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34543 if(((char*)p)<((char*)b))return;
34544 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34545 if(p->header.flag==FSOH_UNMARKED){
34546 T131*o=(&(p->object));
34547 ((gc131*)o)->header.flag=FSOH_MARKED;
34548 if(NULL!=o->_cache_node/*20*/)gc_mark132((T132*)(o->_cache_node/*20*/));
34549 if(NULL!=o->_buckets/*4*/)gc_mark133((o->_buckets/*4*/));
34550 }
34551 }
34552 }
34553 fsoc H131={{FSOC_SIZE,FSO_STORE_CHUNK,
34554 (void(*)(mch*,void*))gc_align_mark131,
34555 (void(*)(mch*))gc_sweep131},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc131))-1)};
34556
34557 T131*new131(void){
34558 gc131*n;
34559 fsoc*c;
34560 if(store_left131>1){
34561 store_left131--;
34562 n=store131++;
34563 }
34564 else if(gc_free131!=NULL){
34565 n=gc_free131;
34566 gc_free131=n->header.next;
34567 }
34568 else if(store_left131==1){
34569 store_left131=0;
34570 store_chunk131->header.state_type=FSO_USED_CHUNK;
34571 n=store131++;
34572 }
34573 else{
34574 c=gc_fsoc_get1();
34575 if(gc_free131!=NULL){
34576 n=gc_free131;
34577 gc_free131=n->header.next;
34578 }
34579 else{
34580 if(c==NULL)c=gc_fsoc_get2();
34581 store_chunk131=c;
34582 *store_chunk131=H131;
34583 store131=((gc131*)(&(store_chunk131->first_object)));
34584 store_left131=H131.count_minus_one;
34585 n=store131++;
34586 }
34587 }
34588 n->header.flag=FSOH_UNMARKED;
34589 n->object=M131;
34590 return((T131*)n);
34591 }
34592
34593 void gc_sweep28(fsoc*c){
34594 gc28*o1,*o2,*flt,flh;
34595 o1=((gc28*)(&(c->first_object)));
34596 if(c->header.state_type==FSO_STORE_CHUNK){
34597 for(;o1<store28;o1++){
34598 if((o1->header.flag)==FSOH_MARKED){
34599 o1->header.flag=FSOH_UNMARKED;
34600 }
34601 else{
34602 o1->header.next=gc_free28;
34603 gc_free28=o1;
34604 }
34605 }
34606 }
34607 else{
34608 int dead=1;
34609 flh.header.next=NULL;
34610 flt=&flh;
34611 o2=o1+c->count_minus_one;
34612 for(;o1<=o2;o2--){
34613 if((o2->header.flag)==FSOH_MARKED){
34614 o2->header.flag=FSOH_UNMARKED;
34615 dead=0;}
34616 else{
34617 flt->header.next=o2;
34618 flt=o2;
34619 }
34620 }
34621 if (dead){
34622 c->next=fsocfl;
34623 fsocfl=c;
34624 c->header.state_type=FSO_FREE_CHUNK;
34625 }
34626 else if(flh.header.next!=NULL){
34627 flt->header.next=gc_free28;
34628 gc_free28=flh.header.next;
34629 }
34630 }
34631 }
34632
34633 void gc_mark28(T28*o){
34634 se_gc_check_id(o,28);
34635 {((gc28*)o)->header.flag=FSOH_MARKED;
34636
34637 }}
34638
34639 void gc_align_mark28(fsoc*c,gc28*p){
34640 gc28*b=((gc28*)(&(c->first_object)));
34641 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store28)))return;
34642 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34643 if(((char*)p)<((char*)b))return;
34644 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34645 if(p->header.flag==FSOH_UNMARKED){
34646 T28*o=(&(p->object));
34647 ((gc28*)o)->header.flag=FSOH_MARKED;
34648 }
34649 }
34650 }
34651 fsoc H28={{FSOC_SIZE,FSO_STORE_CHUNK,
34652 (void(*)(mch*,void*))gc_align_mark28,
34653 (void(*)(mch*))gc_sweep28},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc28))-1)};
34654
34655 T28*new28(void){
34656 gc28*n;
34657 fsoc*c;
34658 if(store_left28>1){
34659 store_left28--;
34660 n=store28++;
34661 }
34662 else if(gc_free28!=NULL){
34663 n=gc_free28;
34664 gc_free28=n->header.next;
34665 }
34666 else if(store_left28==1){
34667 store_left28=0;
34668 store_chunk28->header.state_type=FSO_USED_CHUNK;
34669 n=store28++;
34670 }
34671 else{
34672 c=gc_fsoc_get1();
34673 if(gc_free28!=NULL){
34674 n=gc_free28;
34675 gc_free28=n->header.next;
34676 }
34677 else{
34678 if(c==NULL)c=gc_fsoc_get2();
34679 store_chunk28=c;
34680 *store_chunk28=H28;
34681 store28=((gc28*)(&(store_chunk28->first_object)));
34682 store_left28=H28.count_minus_one;
34683 n=store28++;
34684 }
34685 }
34686 n->header.flag=FSOH_UNMARKED;
34687 n->object=M28;
34688 return((T28*)n);
34689 }
34690
34691 void gc_sweep112(fsoc*c){
34692 gc112*o1,*o2,*flt,flh;
34693 o1=((gc112*)(&(c->first_object)));
34694 if(c->header.state_type==FSO_STORE_CHUNK){
34695 for(;o1<store112;o1++){
34696 if((o1->header.flag)==FSOH_MARKED){
34697 o1->header.flag=FSOH_UNMARKED;
34698 }
34699 else{
34700 o1->header.next=gc_free112;
34701 gc_free112=o1;
34702 }
34703 }
34704 }
34705 else{
34706 int dead=1;
34707 flh.header.next=NULL;
34708 flt=&flh;
34709 o2=o1+c->count_minus_one;
34710 for(;o1<=o2;o2--){
34711 if((o2->header.flag)==FSOH_MARKED){
34712 o2->header.flag=FSOH_UNMARKED;
34713 dead=0;}
34714 else{
34715 flt->header.next=o2;
34716 flt=o2;
34717 }
34718 }
34719 if (dead){
34720 c->next=fsocfl;
34721 fsocfl=c;
34722 c->header.state_type=FSO_FREE_CHUNK;
34723 }
34724 else if(flh.header.next!=NULL){
34725 flt->header.next=gc_free112;
34726 gc_free112=flh.header.next;
34727 }
34728 }
34729 }
34730
34731 void gc_mark112(T112*o){
34732 se_gc_check_id(o,112);
34733 {if(((gc112*)o)->header.flag==FSOH_UNMARKED){
34734 ((gc112*)o)->header.flag=FSOH_MARKED;
34735 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
34736 }
34737 }}
34738
34739 void gc_align_mark112(fsoc*c,gc112*p){
34740 gc112*b=((gc112*)(&(c->first_object)));
34741 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store112)))return;
34742 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34743 if(((char*)p)<((char*)b))return;
34744 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34745 if(p->header.flag==FSOH_UNMARKED){
34746 T112*o=(&(p->object));
34747 ((gc112*)o)->header.flag=FSOH_MARKED;
34748 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
34749 }
34750 }
34751 }
34752 fsoc H112={{FSOC_SIZE,FSO_STORE_CHUNK,
34753 (void(*)(mch*,void*))gc_align_mark112,
34754 (void(*)(mch*))gc_sweep112},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc112))-1)};
34755
34756 T112*new112(void){
34757 gc112*n;
34758 fsoc*c;
34759 if(store_left112>1){
34760 store_left112--;
34761 n=store112++;
34762 }
34763 else if(gc_free112!=NULL){
34764 n=gc_free112;
34765 gc_free112=n->header.next;
34766 }
34767 else if(store_left112==1){
34768 store_left112=0;
34769 store_chunk112->header.state_type=FSO_USED_CHUNK;
34770 n=store112++;
34771 }
34772 else{
34773 c=gc_fsoc_get1();
34774 if(gc_free112!=NULL){
34775 n=gc_free112;
34776 gc_free112=n->header.next;
34777 }
34778 else{
34779 if(c==NULL)c=gc_fsoc_get2();
34780 store_chunk112=c;
34781 *store_chunk112=H112;
34782 store112=((gc112*)(&(store_chunk112->first_object)));
34783 store_left112=H112.count_minus_one;
34784 n=store112++;
34785 }
34786 }
34787 n->header.flag=FSOH_UNMARKED;
34788 n->object=M112;
34789 return((T112*)n);
34790 }
34791
34792 void gc_sweep67(fsoc*c){
34793 gc67*o1,*o2,*flt,flh;
34794 o1=((gc67*)(&(c->first_object)));
34795 if(c->header.state_type==FSO_STORE_CHUNK){
34796 for(;o1<store67;o1++){
34797 if((o1->header.flag)==FSOH_MARKED){
34798 o1->header.flag=FSOH_UNMARKED;
34799 }
34800 else{
34801 o1->header.next=gc_free67;
34802 gc_free67=o1;
34803 }
34804 }
34805 }
34806 else{
34807 int dead=1;
34808 flh.header.next=NULL;
34809 flt=&flh;
34810 o2=o1+c->count_minus_one;
34811 for(;o1<=o2;o2--){
34812 if((o2->header.flag)==FSOH_MARKED){
34813 o2->header.flag=FSOH_UNMARKED;
34814 dead=0;}
34815 else{
34816 flt->header.next=o2;
34817 flt=o2;
34818 }
34819 }
34820 if (dead){
34821 c->next=fsocfl;
34822 fsocfl=c;
34823 c->header.state_type=FSO_FREE_CHUNK;
34824 }
34825 else if(flh.header.next!=NULL){
34826 flt->header.next=gc_free67;
34827 gc_free67=flh.header.next;
34828 }
34829 }
34830 }
34831
34832 void gc_mark67(T67*o){
34833 se_gc_check_id(o,67);
34834 {begin:
34835 if(((gc67*)o)->header.flag==FSOH_UNMARKED){
34836 ((gc67*)o)->header.flag=FSOH_MARKED;
34837 if(NULL!=o->_item/*4*/)gc_mark65((T65*)(o->_item/*4*/));
34838 o=(void*)o->_next;
34839 if((o!=NULL))goto begin;
34840 }
34841 }}
34842
34843 void gc_align_mark67(fsoc*c,gc67*p){
34844 gc67*b=((gc67*)(&(c->first_object)));
34845 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store67)))return;
34846 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34847 if(((char*)p)<((char*)b))return;
34848 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34849 if(p->header.flag==FSOH_UNMARKED){
34850 T67*o=(&(p->object));
34851 begin:
34852 ((gc67*)o)->header.flag=FSOH_MARKED;
34853 if(NULL!=o->_item/*4*/)gc_mark65((T65*)(o->_item/*4*/));
34854 o=(void*)o->_next;
34855 if((o!=NULL)&&(((gc67*)o)->header.flag==FSOH_UNMARKED))goto begin;
34856 }
34857 }
34858 }
34859 fsoc H67={{FSOC_SIZE,FSO_STORE_CHUNK,
34860 (void(*)(mch*,void*))gc_align_mark67,
34861 (void(*)(mch*))gc_sweep67},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc67))-1)};
34862
34863 T67*new67(void){
34864 gc67*n;
34865 fsoc*c;
34866 if(store_left67>1){
34867 store_left67--;
34868 n=store67++;
34869 }
34870 else if(gc_free67!=NULL){
34871 n=gc_free67;
34872 gc_free67=n->header.next;
34873 }
34874 else if(store_left67==1){
34875 store_left67=0;
34876 store_chunk67->header.state_type=FSO_USED_CHUNK;
34877 n=store67++;
34878 }
34879 else{
34880 c=gc_fsoc_get1();
34881 if(gc_free67!=NULL){
34882 n=gc_free67;
34883 gc_free67=n->header.next;
34884 }
34885 else{
34886 if(c==NULL)c=gc_fsoc_get2();
34887 store_chunk67=c;
34888 *store_chunk67=H67;
34889 store67=((gc67*)(&(store_chunk67->first_object)));
34890 store_left67=H67.count_minus_one;
34891 n=store67++;
34892 }
34893 }
34894 n->header.flag=FSOH_UNMARKED;
34895 n->object=M67;
34896 return((T67*)n);
34897 }
34898
34899 void gc_sweep137(fsoc*c){
34900 gc137*o1,*o2,*flt,flh;
34901 o1=((gc137*)(&(c->first_object)));
34902 if(c->header.state_type==FSO_STORE_CHUNK){
34903 for(;o1<store137;o1++){
34904 if((o1->header.flag)==FSOH_MARKED){
34905 o1->header.flag=FSOH_UNMARKED;
34906 }
34907 else{
34908 o1->header.next=gc_free137;
34909 gc_free137=o1;
34910 }
34911 }
34912 }
34913 else{
34914 int dead=1;
34915 flh.header.next=NULL;
34916 flt=&flh;
34917 o2=o1+c->count_minus_one;
34918 for(;o1<=o2;o2--){
34919 if((o2->header.flag)==FSOH_MARKED){
34920 o2->header.flag=FSOH_UNMARKED;
34921 dead=0;}
34922 else{
34923 flt->header.next=o2;
34924 flt=o2;
34925 }
34926 }
34927 if (dead){
34928 c->next=fsocfl;
34929 fsocfl=c;
34930 c->header.state_type=FSO_FREE_CHUNK;
34931 }
34932 else if(flh.header.next!=NULL){
34933 flt->header.next=gc_free137;
34934 gc_free137=flh.header.next;
34935 }
34936 }
34937 }
34938
34939 void gc_mark137(T137*o){
34940 se_gc_check_id(o,137);
34941 {if(((gc137*)o)->header.flag==FSOH_UNMARKED){
34942 ((gc137*)o)->header.flag=FSOH_MARKED;
34943 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
34944 }
34945 }}
34946
34947 void gc_align_mark137(fsoc*c,gc137*p){
34948 gc137*b=((gc137*)(&(c->first_object)));
34949 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store137)))return;
34950 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
34951 if(((char*)p)<((char*)b))return;
34952 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
34953 if(p->header.flag==FSOH_UNMARKED){
34954 T137*o=(&(p->object));
34955 ((gc137*)o)->header.flag=FSOH_MARKED;
34956 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
34957 }
34958 }
34959 }
34960 fsoc H137={{FSOC_SIZE,FSO_STORE_CHUNK,
34961 (void(*)(mch*,void*))gc_align_mark137,
34962 (void(*)(mch*))gc_sweep137},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc137))-1)};
34963
34964 T137*new137(void){
34965 gc137*n;
34966 fsoc*c;
34967 if(store_left137>1){
34968 store_left137--;
34969 n=store137++;
34970 }
34971 else if(gc_free137!=NULL){
34972 n=gc_free137;
34973 gc_free137=n->header.next;
34974 }
34975 else if(store_left137==1){
34976 store_left137=0;
34977 store_chunk137->header.state_type=FSO_USED_CHUNK;
34978 n=store137++;
34979 }
34980 else{
34981 c=gc_fsoc_get1();
34982 if(gc_free137!=NULL){
34983 n=gc_free137;
34984 gc_free137=n->header.next;
34985 }
34986 else{
34987 if(c==NULL)c=gc_fsoc_get2();
34988 store_chunk137=c;
34989 *store_chunk137=H137;
34990 store137=((gc137*)(&(store_chunk137->first_object)));
34991 store_left137=H137.count_minus_one;
34992 n=store137++;
34993 }
34994 }
34995 n->header.flag=FSOH_UNMARKED;
34996 n->object=M137;
34997 return((T137*)n);
34998 }
34999
35000 void gc_sweep74(fsoc*c){
35001 gc74*o1,*o2,*flt,flh;
35002 o1=((gc74*)(&(c->first_object)));
35003 if(c->header.state_type==FSO_STORE_CHUNK){
35004 for(;o1<store74;o1++){
35005 if((o1->header.flag)==FSOH_MARKED){
35006 o1->header.flag=FSOH_UNMARKED;
35007 }
35008 else{
35009 o1->header.next=gc_free74;
35010 gc_free74=o1;
35011 }
35012 }
35013 }
35014 else{
35015 int dead=1;
35016 flh.header.next=NULL;
35017 flt=&flh;
35018 o2=o1+c->count_minus_one;
35019 for(;o1<=o2;o2--){
35020 if((o2->header.flag)==FSOH_MARKED){
35021 o2->header.flag=FSOH_UNMARKED;
35022 dead=0;}
35023 else{
35024 flt->header.next=o2;
35025 flt=o2;
35026 }
35027 }
35028 if (dead){
35029 c->next=fsocfl;
35030 fsocfl=c;
35031 c->header.state_type=FSO_FREE_CHUNK;
35032 }
35033 else if(flh.header.next!=NULL){
35034 flt->header.next=gc_free74;
35035 gc_free74=flh.header.next;
35036 }
35037 }
35038 }
35039
35040 void gc_mark74(T74*o){
35041 se_gc_check_id(o,74);
35042 {if(((gc74*)o)->header.flag==FSOH_UNMARKED){
35043 ((gc74*)o)->header.flag=FSOH_MARKED;
35044 if(NULL!=o->_neighbour/*8*/)gc_mark80((T80*)(o->_neighbour/*8*/));
35045 }
35046 }}
35047
35048 void gc_align_mark74(fsoc*c,gc74*p){
35049 gc74*b=((gc74*)(&(c->first_object)));
35050 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store74)))return;
35051 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35052 if(((char*)p)<((char*)b))return;
35053 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35054 if(p->header.flag==FSOH_UNMARKED){
35055 T74*o=(&(p->object));
35056 ((gc74*)o)->header.flag=FSOH_MARKED;
35057 if(NULL!=o->_neighbour/*8*/)gc_mark80((T80*)(o->_neighbour/*8*/));
35058 }
35059 }
35060 }
35061 fsoc H74={{FSOC_SIZE,FSO_STORE_CHUNK,
35062 (void(*)(mch*,void*))gc_align_mark74,
35063 (void(*)(mch*))gc_sweep74},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc74))-1)};
35064
35065 T74*new74(void){
35066 gc74*n;
35067 fsoc*c;
35068 if(store_left74>1){
35069 store_left74--;
35070 n=store74++;
35071 }
35072 else if(gc_free74!=NULL){
35073 n=gc_free74;
35074 gc_free74=n->header.next;
35075 }
35076 else if(store_left74==1){
35077 store_left74=0;
35078 store_chunk74->header.state_type=FSO_USED_CHUNK;
35079 n=store74++;
35080 }
35081 else{
35082 c=gc_fsoc_get1();
35083 if(gc_free74!=NULL){
35084 n=gc_free74;
35085 gc_free74=n->header.next;
35086 }
35087 else{
35088 if(c==NULL)c=gc_fsoc_get2();
35089 store_chunk74=c;
35090 *store_chunk74=H74;
35091 store74=((gc74*)(&(store_chunk74->first_object)));
35092 store_left74=H74.count_minus_one;
35093 n=store74++;
35094 }
35095 }
35096 n->header.flag=FSOH_UNMARKED;
35097 n->object=M74;
35098 return((T74*)n);
35099 }
35100
35101 void gc_sweep64(fsoc*c){
35102 gc64*o1,*o2,*flt,flh;
35103 o1=((gc64*)(&(c->first_object)));
35104 if(c->header.state_type==FSO_STORE_CHUNK){
35105 for(;o1<store64;o1++){
35106 if((o1->header.flag)==FSOH_MARKED){
35107 o1->header.flag=FSOH_UNMARKED;
35108 }
35109 else{
35110 o1->header.next=gc_free64;
35111 gc_free64=o1;
35112 }
35113 }
35114 }
35115 else{
35116 int dead=1;
35117 flh.header.next=NULL;
35118 flt=&flh;
35119 o2=o1+c->count_minus_one;
35120 for(;o1<=o2;o2--){
35121 if((o2->header.flag)==FSOH_MARKED){
35122 o2->header.flag=FSOH_UNMARKED;
35123 dead=0;}
35124 else{
35125 flt->header.next=o2;
35126 flt=o2;
35127 }
35128 }
35129 if (dead){
35130 c->next=fsocfl;
35131 fsocfl=c;
35132 c->header.state_type=FSO_FREE_CHUNK;
35133 }
35134 else if(flh.header.next!=NULL){
35135 flt->header.next=gc_free64;
35136 gc_free64=flh.header.next;
35137 }
35138 }
35139 }
35140
35141 void gc_mark64(T64*o){
35142 se_gc_check_id(o,64);
35143 {if(((gc64*)o)->header.flag==FSOH_UNMARKED){
35144 ((gc64*)o)->header.flag=FSOH_MARKED;
35145 if(NULL!=o->_storage/*4*/)gc_mark69((o->_storage/*4*/));
35146 }
35147 }}
35148
35149 void gc_align_mark64(fsoc*c,gc64*p){
35150 gc64*b=((gc64*)(&(c->first_object)));
35151 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store64)))return;
35152 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35153 if(((char*)p)<((char*)b))return;
35154 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35155 if(p->header.flag==FSOH_UNMARKED){
35156 T64*o=(&(p->object));
35157 ((gc64*)o)->header.flag=FSOH_MARKED;
35158 if(NULL!=o->_storage/*4*/)gc_mark69((o->_storage/*4*/));
35159 }
35160 }
35161 }
35162 fsoc H64={{FSOC_SIZE,FSO_STORE_CHUNK,
35163 (void(*)(mch*,void*))gc_align_mark64,
35164 (void(*)(mch*))gc_sweep64},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc64))-1)};
35165
35166 T64*new64(void){
35167 gc64*n;
35168 fsoc*c;
35169 if(store_left64>1){
35170 store_left64--;
35171 n=store64++;
35172 }
35173 else if(gc_free64!=NULL){
35174 n=gc_free64;
35175 gc_free64=n->header.next;
35176 }
35177 else if(store_left64==1){
35178 store_left64=0;
35179 store_chunk64->header.state_type=FSO_USED_CHUNK;
35180 n=store64++;
35181 }
35182 else{
35183 c=gc_fsoc_get1();
35184 if(gc_free64!=NULL){
35185 n=gc_free64;
35186 gc_free64=n->header.next;
35187 }
35188 else{
35189 if(c==NULL)c=gc_fsoc_get2();
35190 store_chunk64=c;
35191 *store_chunk64=H64;
35192 store64=((gc64*)(&(store_chunk64->first_object)));
35193 store_left64=H64.count_minus_one;
35194 n=store64++;
35195 }
35196 }
35197 n->header.flag=FSOH_UNMARKED;
35198 n->object=M64;
35199 return((T64*)n);
35200 }
35201
35202 void gc_sweep16(fsoc*c){
35203 gc16*o1,*o2,*flt,flh;
35204 o1=((gc16*)(&(c->first_object)));
35205 if(c->header.state_type==FSO_STORE_CHUNK){
35206 for(;o1<store16;o1++){
35207 if((o1->header.flag)==FSOH_MARKED){
35208 o1->header.flag=FSOH_UNMARKED;
35209 }
35210 else{
35211 o1->header.next=gc_free16;
35212 gc_free16=o1;
35213 }
35214 }
35215 }
35216 else{
35217 int dead=1;
35218 flh.header.next=NULL;
35219 flt=&flh;
35220 o2=o1+c->count_minus_one;
35221 for(;o1<=o2;o2--){
35222 if((o2->header.flag)==FSOH_MARKED){
35223 o2->header.flag=FSOH_UNMARKED;
35224 dead=0;}
35225 else{
35226 flt->header.next=o2;
35227 flt=o2;
35228 }
35229 }
35230 if (dead){
35231 c->next=fsocfl;
35232 fsocfl=c;
35233 c->header.state_type=FSO_FREE_CHUNK;
35234 }
35235 else if(flh.header.next!=NULL){
35236 flt->header.next=gc_free16;
35237 gc_free16=flh.header.next;
35238 }
35239 }
35240 }
35241
35242 void gc_mark16(T16*o){
35243 se_gc_check_id(o,16);
35244 {if(((gc16*)o)->header.flag==FSOH_UNMARKED){
35245 ((gc16*)o)->header.flag=FSOH_MARKED;
35246 if(NULL!=o->_rand/*120*/)gc_mark77((T77*)(o->_rand/*120*/));
35247 if(NULL!=o->_open_list/*116*/)gc_mark86((T86*)(o->_open_list/*116*/));
35248 if(NULL!=o->_disconnected_terminal_color/*112*/)gc_mark51((T51*)(o->_disconnected_terminal_color/*112*/));
35249 if(NULL!=o->_connected_terminal_color/*108*/)gc_mark51((T51*)(o->_connected_terminal_color/*108*/));
35250 if(NULL!=o->_disconnected_pipe_color/*104*/)gc_mark51((T51*)(o->_disconnected_pipe_color/*104*/));
35251 if(NULL!=o->_connected_pipe_color/*100*/)gc_mark51((T51*)(o->_connected_pipe_color/*100*/));
35252 if(NULL!=o->_server_top/*96*/)gc_mark74((T74*)(o->_server_top/*96*/));
35253 if(NULL!=o->_server_bottom/*92*/)gc_mark74((T74*)(o->_server_bottom/*92*/));
35254 if(NULL!=o->_time_image/*88*/)gc_mark50((T50*)(o->_time_image/*88*/));
35255 if(NULL!=o->_best_image/*84*/)gc_mark50((T50*)(o->_best_image/*84*/));
35256 if(NULL!=o->_move_image/*80*/)gc_mark50((T50*)(o->_move_image/*80*/));
35257 if(NULL!=o->_current_window/*76*/)Xgc_mark29((T0*)(o->_current_window/*76*/));
35258 if(NULL!=o->_widget_list/*56*/)gc_mark39((T39*)(o->_widget_list/*56*/));
35259 if(NULL!=o->_hs_window/*52*/)gc_mark99((T99*)(o->_hs_window/*52*/));
35260 if(NULL!=o->_newhs_window/*48*/)gc_mark97((T97*)(o->_newhs_window/*48*/));
35261 if(NULL!=o->_options_window/*44*/)gc_mark117((T117*)(o->_options_window/*44*/));
35262 if(NULL!=o->_quit_button/*40*/)gc_mark113((T113*)(o->_quit_button/*40*/));
35263 if(NULL!=o->_hs_button/*36*/)gc_mark113((T113*)(o->_hs_button/*36*/));
35264 if(NULL!=o->_options_button/*32*/)gc_mark113((T113*)(o->_options_button/*32*/));
35265 if(NULL!=o->_new_game_button/*28*/)gc_mark113((T113*)(o->_new_game_button/*28*/));
35266 if(NULL!=o->_current_setting/*16*/)gc_mark68((T68*)(o->_current_setting/*16*/));
35267 if(NULL!=o->_current_preset/*12*/)gc_mark65((T65*)(o->_current_preset/*12*/));
35268 if(NULL!=o->_board/*8*/)gc_mark75((T75*)(o->_board/*8*/));
35269 if(NULL!=o->_io_score/*4*/)gc_mark130((T130*)(o->_io_score/*4*/));
35270 }
35271 }}
35272
35273 void gc_align_mark16(fsoc*c,gc16*p){
35274 gc16*b=((gc16*)(&(c->first_object)));
35275 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store16)))return;
35276 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35277 if(((char*)p)<((char*)b))return;
35278 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35279 if(p->header.flag==FSOH_UNMARKED){
35280 T16*o=(&(p->object));
35281 ((gc16*)o)->header.flag=FSOH_MARKED;
35282 if(NULL!=o->_rand/*120*/)gc_mark77((T77*)(o->_rand/*120*/));
35283 if(NULL!=o->_open_list/*116*/)gc_mark86((T86*)(o->_open_list/*116*/));
35284 if(NULL!=o->_disconnected_terminal_color/*112*/)gc_mark51((T51*)(o->_disconnected_terminal_color/*112*/));
35285 if(NULL!=o->_connected_terminal_color/*108*/)gc_mark51((T51*)(o->_connected_terminal_color/*108*/));
35286 if(NULL!=o->_disconnected_pipe_color/*104*/)gc_mark51((T51*)(o->_disconnected_pipe_color/*104*/));
35287 if(NULL!=o->_connected_pipe_color/*100*/)gc_mark51((T51*)(o->_connected_pipe_color/*100*/));
35288 if(NULL!=o->_server_top/*96*/)gc_mark74((T74*)(o->_server_top/*96*/));
35289 if(NULL!=o->_server_bottom/*92*/)gc_mark74((T74*)(o->_server_bottom/*92*/));
35290 if(NULL!=o->_time_image/*88*/)gc_mark50((T50*)(o->_time_image/*88*/));
35291 if(NULL!=o->_best_image/*84*/)gc_mark50((T50*)(o->_best_image/*84*/));
35292 if(NULL!=o->_move_image/*80*/)gc_mark50((T50*)(o->_move_image/*80*/));
35293 if(NULL!=o->_current_window/*76*/)Xgc_mark29((T0*)(o->_current_window/*76*/));
35294 if(NULL!=o->_widget_list/*56*/)gc_mark39((T39*)(o->_widget_list/*56*/));
35295 if(NULL!=o->_hs_window/*52*/)gc_mark99((T99*)(o->_hs_window/*52*/));
35296 if(NULL!=o->_newhs_window/*48*/)gc_mark97((T97*)(o->_newhs_window/*48*/));
35297 if(NULL!=o->_options_window/*44*/)gc_mark117((T117*)(o->_options_window/*44*/));
35298 if(NULL!=o->_quit_button/*40*/)gc_mark113((T113*)(o->_quit_button/*40*/));
35299 if(NULL!=o->_hs_button/*36*/)gc_mark113((T113*)(o->_hs_button/*36*/));
35300 if(NULL!=o->_options_button/*32*/)gc_mark113((T113*)(o->_options_button/*32*/));
35301 if(NULL!=o->_new_game_button/*28*/)gc_mark113((T113*)(o->_new_game_button/*28*/));
35302 if(NULL!=o->_current_setting/*16*/)gc_mark68((T68*)(o->_current_setting/*16*/));
35303 if(NULL!=o->_current_preset/*12*/)gc_mark65((T65*)(o->_current_preset/*12*/));
35304 if(NULL!=o->_board/*8*/)gc_mark75((T75*)(o->_board/*8*/));
35305 if(NULL!=o->_io_score/*4*/)gc_mark130((T130*)(o->_io_score/*4*/));
35306 }
35307 }
35308 }
35309 fsoc H16={{FSOC_SIZE,FSO_STORE_CHUNK,
35310 (void(*)(mch*,void*))gc_align_mark16,
35311 (void(*)(mch*))gc_sweep16},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc16))-1)};
35312
35313 T16*new16(void){
35314 gc16*n;
35315 fsoc*c;
35316 if(store_left16>1){
35317 store_left16--;
35318 n=store16++;
35319 }
35320 else if(gc_free16!=NULL){
35321 n=gc_free16;
35322 gc_free16=n->header.next;
35323 }
35324 else if(store_left16==1){
35325 store_left16=0;
35326 store_chunk16->header.state_type=FSO_USED_CHUNK;
35327 n=store16++;
35328 }
35329 else{
35330 c=gc_fsoc_get1();
35331 if(gc_free16!=NULL){
35332 n=gc_free16;
35333 gc_free16=n->header.next;
35334 }
35335 else{
35336 if(c==NULL)c=gc_fsoc_get2();
35337 store_chunk16=c;
35338 *store_chunk16=H16;
35339 store16=((gc16*)(&(store_chunk16->first_object)));
35340 store_left16=H16.count_minus_one;
35341 n=store16++;
35342 }
35343 }
35344 n->header.flag=FSOH_UNMARKED;
35345 n->object=M16;
35346 return((T16*)n);
35347 }
35348
35349 void gc_sweep125(fsoc*c){
35350 gc125*o1,*o2,*flt,flh;
35351 o1=((gc125*)(&(c->first_object)));
35352 if(c->header.state_type==FSO_STORE_CHUNK){
35353 for(;o1<store125;o1++){
35354 if((o1->header.flag)==FSOH_MARKED){
35355 o1->header.flag=FSOH_UNMARKED;
35356 }
35357 else{
35358 o1->header.next=gc_free125;
35359 gc_free125=o1;
35360 }
35361 }
35362 }
35363 else{
35364 int dead=1;
35365 flh.header.next=NULL;
35366 flt=&flh;
35367 o2=o1+c->count_minus_one;
35368 for(;o1<=o2;o2--){
35369 if((o2->header.flag)==FSOH_MARKED){
35370 o2->header.flag=FSOH_UNMARKED;
35371 dead=0;}
35372 else{
35373 flt->header.next=o2;
35374 flt=o2;
35375 }
35376 }
35377 if (dead){
35378 c->next=fsocfl;
35379 fsocfl=c;
35380 c->header.state_type=FSO_FREE_CHUNK;
35381 }
35382 else if(flh.header.next!=NULL){
35383 flt->header.next=gc_free125;
35384 gc_free125=flh.header.next;
35385 }
35386 }
35387 }
35388
35389 void gc_mark125(T125*o){
35390 se_gc_check_id(o,125);
35391 {if(((gc125*)o)->header.flag==FSOH_UNMARKED){
35392 ((gc125*)o)->header.flag=FSOH_MARKED;
35393 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
35394 }
35395 }}
35396
35397 void gc_align_mark125(fsoc*c,gc125*p){
35398 gc125*b=((gc125*)(&(c->first_object)));
35399 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store125)))return;
35400 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35401 if(((char*)p)<((char*)b))return;
35402 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35403 if(p->header.flag==FSOH_UNMARKED){
35404 T125*o=(&(p->object));
35405 ((gc125*)o)->header.flag=FSOH_MARKED;
35406 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
35407 }
35408 }
35409 }
35410 fsoc H125={{FSOC_SIZE,FSO_STORE_CHUNK,
35411 (void(*)(mch*,void*))gc_align_mark125,
35412 (void(*)(mch*))gc_sweep125},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc125))-1)};
35413
35414 T125*new125(void){
35415 gc125*n;
35416 fsoc*c;
35417 if(store_left125>1){
35418 store_left125--;
35419 n=store125++;
35420 }
35421 else if(gc_free125!=NULL){
35422 n=gc_free125;
35423 gc_free125=n->header.next;
35424 }
35425 else if(store_left125==1){
35426 store_left125=0;
35427 store_chunk125->header.state_type=FSO_USED_CHUNK;
35428 n=store125++;
35429 }
35430 else{
35431 c=gc_fsoc_get1();
35432 if(gc_free125!=NULL){
35433 n=gc_free125;
35434 gc_free125=n->header.next;
35435 }
35436 else{
35437 if(c==NULL)c=gc_fsoc_get2();
35438 store_chunk125=c;
35439 *store_chunk125=H125;
35440 store125=((gc125*)(&(store_chunk125->first_object)));
35441 store_left125=H125.count_minus_one;
35442 n=store125++;
35443 }
35444 }
35445 n->header.flag=FSOH_UNMARKED;
35446 n->object=M125;
35447 return((T125*)n);
35448 }
35449
35450 void gc_sweep86(fsoc*c){
35451 gc86*o1,*o2,*flt,flh;
35452 o1=((gc86*)(&(c->first_object)));
35453 if(c->header.state_type==FSO_STORE_CHUNK){
35454 for(;o1<store86;o1++){
35455 if((o1->header.flag)==FSOH_MARKED){
35456 o1->header.flag=FSOH_UNMARKED;
35457 }
35458 else{
35459 o1->header.next=gc_free86;
35460 gc_free86=o1;
35461 }
35462 }
35463 }
35464 else{
35465 int dead=1;
35466 flh.header.next=NULL;
35467 flt=&flh;
35468 o2=o1+c->count_minus_one;
35469 for(;o1<=o2;o2--){
35470 if((o2->header.flag)==FSOH_MARKED){
35471 o2->header.flag=FSOH_UNMARKED;
35472 dead=0;}
35473 else{
35474 flt->header.next=o2;
35475 flt=o2;
35476 }
35477 }
35478 if (dead){
35479 c->next=fsocfl;
35480 fsocfl=c;
35481 c->header.state_type=FSO_FREE_CHUNK;
35482 }
35483 else if(flh.header.next!=NULL){
35484 flt->header.next=gc_free86;
35485 gc_free86=flh.header.next;
35486 }
35487 }
35488 }
35489
35490 void gc_mark86(T86*o){
35491 se_gc_check_id(o,86);
35492 {if(((gc86*)o)->header.flag==FSOH_UNMARKED){
35493 ((gc86*)o)->header.flag=FSOH_MARKED;
35494 if(NULL!=o->_mem_lnk/*20*/)gc_mark87((T87*)(o->_mem_lnk/*20*/));
35495 if(NULL!=o->_last_link/*12*/)gc_mark87((T87*)(o->_last_link/*12*/));
35496 if(NULL!=o->_first_link/*8*/)gc_mark87((T87*)(o->_first_link/*8*/));
35497 }
35498 }}
35499
35500 void gc_align_mark86(fsoc*c,gc86*p){
35501 gc86*b=((gc86*)(&(c->first_object)));
35502 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store86)))return;
35503 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35504 if(((char*)p)<((char*)b))return;
35505 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35506 if(p->header.flag==FSOH_UNMARKED){
35507 T86*o=(&(p->object));
35508 ((gc86*)o)->header.flag=FSOH_MARKED;
35509 if(NULL!=o->_mem_lnk/*20*/)gc_mark87((T87*)(o->_mem_lnk/*20*/));
35510 if(NULL!=o->_last_link/*12*/)gc_mark87((T87*)(o->_last_link/*12*/));
35511 if(NULL!=o->_first_link/*8*/)gc_mark87((T87*)(o->_first_link/*8*/));
35512 }
35513 }
35514 }
35515 fsoc H86={{FSOC_SIZE,FSO_STORE_CHUNK,
35516 (void(*)(mch*,void*))gc_align_mark86,
35517 (void(*)(mch*))gc_sweep86},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc86))-1)};
35518
35519 T86*new86(void){
35520 gc86*n;
35521 fsoc*c;
35522 if(store_left86>1){
35523 store_left86--;
35524 n=store86++;
35525 }
35526 else if(gc_free86!=NULL){
35527 n=gc_free86;
35528 gc_free86=n->header.next;
35529 }
35530 else if(store_left86==1){
35531 store_left86=0;
35532 store_chunk86->header.state_type=FSO_USED_CHUNK;
35533 n=store86++;
35534 }
35535 else{
35536 c=gc_fsoc_get1();
35537 if(gc_free86!=NULL){
35538 n=gc_free86;
35539 gc_free86=n->header.next;
35540 }
35541 else{
35542 if(c==NULL)c=gc_fsoc_get2();
35543 store_chunk86=c;
35544 *store_chunk86=H86;
35545 store86=((gc86*)(&(store_chunk86->first_object)));
35546 store_left86=H86.count_minus_one;
35547 n=store86++;
35548 }
35549 }
35550 n->header.flag=FSOH_UNMARKED;
35551 n->object=M86;
35552 return((T86*)n);
35553 }
35554
35555 void gc_sweep138(fsoc*c){
35556 gc138*o1,*o2,*flt,flh;
35557 o1=((gc138*)(&(c->first_object)));
35558 if(c->header.state_type==FSO_STORE_CHUNK){
35559 for(;o1<store138;o1++){
35560 if((o1->header.flag)==FSOH_MARKED){
35561 o1->header.flag=FSOH_UNMARKED;
35562 }
35563 else{
35564 o1->header.next=gc_free138;
35565 gc_free138=o1;
35566 }
35567 }
35568 }
35569 else{
35570 int dead=1;
35571 flh.header.next=NULL;
35572 flt=&flh;
35573 o2=o1+c->count_minus_one;
35574 for(;o1<=o2;o2--){
35575 if((o2->header.flag)==FSOH_MARKED){
35576 o2->header.flag=FSOH_UNMARKED;
35577 dead=0;}
35578 else{
35579 flt->header.next=o2;
35580 flt=o2;
35581 }
35582 }
35583 if (dead){
35584 c->next=fsocfl;
35585 fsocfl=c;
35586 c->header.state_type=FSO_FREE_CHUNK;
35587 }
35588 else if(flh.header.next!=NULL){
35589 flt->header.next=gc_free138;
35590 gc_free138=flh.header.next;
35591 }
35592 }
35593 }
35594
35595 void gc_mark138(T138*o){
35596 se_gc_check_id(o,138);
35597 {if(((gc138*)o)->header.flag==FSOH_UNMARKED){
35598 ((gc138*)o)->header.flag=FSOH_MARKED;
35599 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
35600 }
35601 }}
35602
35603 void gc_align_mark138(fsoc*c,gc138*p){
35604 gc138*b=((gc138*)(&(c->first_object)));
35605 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store138)))return;
35606 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35607 if(((char*)p)<((char*)b))return;
35608 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35609 if(p->header.flag==FSOH_UNMARKED){
35610 T138*o=(&(p->object));
35611 ((gc138*)o)->header.flag=FSOH_MARKED;
35612 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
35613 }
35614 }
35615 }
35616 fsoc H138={{FSOC_SIZE,FSO_STORE_CHUNK,
35617 (void(*)(mch*,void*))gc_align_mark138,
35618 (void(*)(mch*))gc_sweep138},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc138))-1)};
35619
35620 T138*new138(void){
35621 gc138*n;
35622 fsoc*c;
35623 if(store_left138>1){
35624 store_left138--;
35625 n=store138++;
35626 }
35627 else if(gc_free138!=NULL){
35628 n=gc_free138;
35629 gc_free138=n->header.next;
35630 }
35631 else if(store_left138==1){
35632 store_left138=0;
35633 store_chunk138->header.state_type=FSO_USED_CHUNK;
35634 n=store138++;
35635 }
35636 else{
35637 c=gc_fsoc_get1();
35638 if(gc_free138!=NULL){
35639 n=gc_free138;
35640 gc_free138=n->header.next;
35641 }
35642 else{
35643 if(c==NULL)c=gc_fsoc_get2();
35644 store_chunk138=c;
35645 *store_chunk138=H138;
35646 store138=((gc138*)(&(store_chunk138->first_object)));
35647 store_left138=H138.count_minus_one;
35648 n=store138++;
35649 }
35650 }
35651 n->header.flag=FSOH_UNMARKED;
35652 n->object=M138;
35653 return((T138*)n);
35654 }
35655
35656 void gc_mark85(T85 o){
35657 (((rsoh*)o)-1)->header.magic_flag=RSOH_MARKED;
35658 }
35659
35660 T85 new85(int size){
35661 size=(size*sizeof(T2))+sizeof(rsoh);
35662 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
35663 if (size<=(na_env85.store_left)){
35664 rsoh*r=na_env85.store;
35665 na_env85.store_left-=size;
35666 if(na_env85.store_left>sizeof(rsoh)){
35667 r->header.size=size;
35668 na_env85.store=((rsoh*)(((char*)(na_env85.store))+size));
35669 }
35670 else {
35671 r->header.size=size+na_env85.store_left;
35672 na_env85.store_left=0;
35673 }
35674 (r->header.magic_flag)=RSOH_UNMARKED;
35675 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
35676 return((T85)(r+1));
35677 }
35678 return((T85)new_na(&na_env85,size));
35679 }
35680
35681 void gc_sweep146(fsoc*c){
35682 gc146*o1,*o2,*flt,flh;
35683 o1=((gc146*)(&(c->first_object)));
35684 if(c->header.state_type==FSO_STORE_CHUNK){
35685 for(;o1<store146;o1++){
35686 if((o1->header.flag)==FSOH_MARKED){
35687 o1->header.flag=FSOH_UNMARKED;
35688 }
35689 else{
35690 o1->header.next=gc_free146;
35691 gc_free146=o1;
35692 }
35693 }
35694 }
35695 else{
35696 int dead=1;
35697 flh.header.next=NULL;
35698 flt=&flh;
35699 o2=o1+c->count_minus_one;
35700 for(;o1<=o2;o2--){
35701 if((o2->header.flag)==FSOH_MARKED){
35702 o2->header.flag=FSOH_UNMARKED;
35703 dead=0;}
35704 else{
35705 flt->header.next=o2;
35706 flt=o2;
35707 }
35708 }
35709 if (dead){
35710 c->next=fsocfl;
35711 fsocfl=c;
35712 c->header.state_type=FSO_FREE_CHUNK;
35713 }
35714 else if(flh.header.next!=NULL){
35715 flt->header.next=gc_free146;
35716 gc_free146=flh.header.next;
35717 }
35718 }
35719 }
35720
35721 void gc_mark146(T146*o){
35722 se_gc_check_id(o,146);
35723 {if(((gc146*)o)->header.flag==FSOH_UNMARKED){
35724 ((gc146*)o)->header.flag=FSOH_MARKED;
35725 if(NULL!=o->_path/*4*/)gc_mark7((T7*)(o->_path/*4*/));
35726 }
35727 }}
35728
35729 void gc_align_mark146(fsoc*c,gc146*p){
35730 gc146*b=((gc146*)(&(c->first_object)));
35731 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store146)))return;
35732 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35733 if(((char*)p)<((char*)b))return;
35734 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35735 if(p->header.flag==FSOH_UNMARKED){
35736 T146*o=(&(p->object));
35737 ((gc146*)o)->header.flag=FSOH_MARKED;
35738 if(NULL!=o->_path/*4*/)gc_mark7((T7*)(o->_path/*4*/));
35739 }
35740 }
35741 }
35742 fsoc H146={{FSOC_SIZE,FSO_STORE_CHUNK,
35743 (void(*)(mch*,void*))gc_align_mark146,
35744 (void(*)(mch*))gc_sweep146},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc146))-1)};
35745
35746 T146*new146(void){
35747 gc146*n;
35748 fsoc*c;
35749 if(store_left146>1){
35750 store_left146--;
35751 n=store146++;
35752 }
35753 else if(gc_free146!=NULL){
35754 n=gc_free146;
35755 gc_free146=n->header.next;
35756 }
35757 else if(store_left146==1){
35758 store_left146=0;
35759 store_chunk146->header.state_type=FSO_USED_CHUNK;
35760 n=store146++;
35761 }
35762 else{
35763 c=gc_fsoc_get1();
35764 if(gc_free146!=NULL){
35765 n=gc_free146;
35766 gc_free146=n->header.next;
35767 }
35768 else{
35769 if(c==NULL)c=gc_fsoc_get2();
35770 store_chunk146=c;
35771 *store_chunk146=H146;
35772 store146=((gc146*)(&(store_chunk146->first_object)));
35773 store_left146=H146.count_minus_one;
35774 n=store146++;
35775 }
35776 }
35777 n->header.flag=FSOH_UNMARKED;
35778 n->object=M146;
35779 return((T146*)n);
35780 }
35781
35782 void gc_sweep106(fsoc*c){
35783 gc106*o1,*o2,*flt,flh;
35784 o1=((gc106*)(&(c->first_object)));
35785 if(c->header.state_type==FSO_STORE_CHUNK){
35786 for(;o1<store106;o1++){
35787 if((o1->header.flag)==FSOH_MARKED){
35788 o1->header.flag=FSOH_UNMARKED;
35789 }
35790 else{
35791 o1->header.next=gc_free106;
35792 gc_free106=o1;
35793 }
35794 }
35795 }
35796 else{
35797 int dead=1;
35798 flh.header.next=NULL;
35799 flt=&flh;
35800 o2=o1+c->count_minus_one;
35801 for(;o1<=o2;o2--){
35802 if((o2->header.flag)==FSOH_MARKED){
35803 o2->header.flag=FSOH_UNMARKED;
35804 dead=0;}
35805 else{
35806 flt->header.next=o2;
35807 flt=o2;
35808 }
35809 }
35810 if (dead){
35811 c->next=fsocfl;
35812 fsocfl=c;
35813 c->header.state_type=FSO_FREE_CHUNK;
35814 }
35815 else if(flh.header.next!=NULL){
35816 flt->header.next=gc_free106;
35817 gc_free106=flh.header.next;
35818 }
35819 }
35820 }
35821
35822 void gc_mark106(T106*o){
35823 se_gc_check_id(o,106);
35824 {begin:
35825 if(((gc106*)o)->header.flag==FSOH_UNMARKED){
35826 ((gc106*)o)->header.flag=FSOH_MARKED;
35827 if(NULL!=o->_item/*4*/)gc_mark104((T104*)(o->_item/*4*/));
35828 o=(void*)o->_next;
35829 if((o!=NULL))goto begin;
35830 }
35831 }}
35832
35833 void gc_align_mark106(fsoc*c,gc106*p){
35834 gc106*b=((gc106*)(&(c->first_object)));
35835 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store106)))return;
35836 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35837 if(((char*)p)<((char*)b))return;
35838 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35839 if(p->header.flag==FSOH_UNMARKED){
35840 T106*o=(&(p->object));
35841 begin:
35842 ((gc106*)o)->header.flag=FSOH_MARKED;
35843 if(NULL!=o->_item/*4*/)gc_mark104((T104*)(o->_item/*4*/));
35844 o=(void*)o->_next;
35845 if((o!=NULL)&&(((gc106*)o)->header.flag==FSOH_UNMARKED))goto begin;
35846 }
35847 }
35848 }
35849 fsoc H106={{FSOC_SIZE,FSO_STORE_CHUNK,
35850 (void(*)(mch*,void*))gc_align_mark106,
35851 (void(*)(mch*))gc_sweep106},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc106))-1)};
35852
35853 T106*new106(void){
35854 gc106*n;
35855 fsoc*c;
35856 if(store_left106>1){
35857 store_left106--;
35858 n=store106++;
35859 }
35860 else if(gc_free106!=NULL){
35861 n=gc_free106;
35862 gc_free106=n->header.next;
35863 }
35864 else if(store_left106==1){
35865 store_left106=0;
35866 store_chunk106->header.state_type=FSO_USED_CHUNK;
35867 n=store106++;
35868 }
35869 else{
35870 c=gc_fsoc_get1();
35871 if(gc_free106!=NULL){
35872 n=gc_free106;
35873 gc_free106=n->header.next;
35874 }
35875 else{
35876 if(c==NULL)c=gc_fsoc_get2();
35877 store_chunk106=c;
35878 *store_chunk106=H106;
35879 store106=((gc106*)(&(store_chunk106->first_object)));
35880 store_left106=H106.count_minus_one;
35881 n=store106++;
35882 }
35883 }
35884 n->header.flag=FSOH_UNMARKED;
35885 n->object=M106;
35886 return((T106*)n);
35887 }
35888
35889 void gc_sweep66(fsoc*c){
35890 gc66*o1,*o2,*flt,flh;
35891 o1=((gc66*)(&(c->first_object)));
35892 if(c->header.state_type==FSO_STORE_CHUNK){
35893 for(;o1<store66;o1++){
35894 if((o1->header.flag)==FSOH_MARKED){
35895 o1->header.flag=FSOH_UNMARKED;
35896 }
35897 else{
35898 o1->header.next=gc_free66;
35899 gc_free66=o1;
35900 }
35901 }
35902 }
35903 else{
35904 int dead=1;
35905 flh.header.next=NULL;
35906 flt=&flh;
35907 o2=o1+c->count_minus_one;
35908 for(;o1<=o2;o2--){
35909 if((o2->header.flag)==FSOH_MARKED){
35910 o2->header.flag=FSOH_UNMARKED;
35911 dead=0;}
35912 else{
35913 flt->header.next=o2;
35914 flt=o2;
35915 }
35916 }
35917 if (dead){
35918 c->next=fsocfl;
35919 fsocfl=c;
35920 c->header.state_type=FSO_FREE_CHUNK;
35921 }
35922 else if(flh.header.next!=NULL){
35923 flt->header.next=gc_free66;
35924 gc_free66=flh.header.next;
35925 }
35926 }
35927 }
35928
35929 void gc_mark66(T66*o){
35930 se_gc_check_id(o,66);
35931 {if(((gc66*)o)->header.flag==FSOH_UNMARKED){
35932 ((gc66*)o)->header.flag=FSOH_MARKED;
35933 if(NULL!=o->_mem_lnk/*20*/)gc_mark67((T67*)(o->_mem_lnk/*20*/));
35934 if(NULL!=o->_last_link/*12*/)gc_mark67((T67*)(o->_last_link/*12*/));
35935 if(NULL!=o->_first_link/*8*/)gc_mark67((T67*)(o->_first_link/*8*/));
35936 }
35937 }}
35938
35939 void gc_align_mark66(fsoc*c,gc66*p){
35940 gc66*b=((gc66*)(&(c->first_object)));
35941 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store66)))return;
35942 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
35943 if(((char*)p)<((char*)b))return;
35944 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
35945 if(p->header.flag==FSOH_UNMARKED){
35946 T66*o=(&(p->object));
35947 ((gc66*)o)->header.flag=FSOH_MARKED;
35948 if(NULL!=o->_mem_lnk/*20*/)gc_mark67((T67*)(o->_mem_lnk/*20*/));
35949 if(NULL!=o->_last_link/*12*/)gc_mark67((T67*)(o->_last_link/*12*/));
35950 if(NULL!=o->_first_link/*8*/)gc_mark67((T67*)(o->_first_link/*8*/));
35951 }
35952 }
35953 }
35954 fsoc H66={{FSOC_SIZE,FSO_STORE_CHUNK,
35955 (void(*)(mch*,void*))gc_align_mark66,
35956 (void(*)(mch*))gc_sweep66},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc66))-1)};
35957
35958 T66*new66(void){
35959 gc66*n;
35960 fsoc*c;
35961 if(store_left66>1){
35962 store_left66--;
35963 n=store66++;
35964 }
35965 else if(gc_free66!=NULL){
35966 n=gc_free66;
35967 gc_free66=n->header.next;
35968 }
35969 else if(store_left66==1){
35970 store_left66=0;
35971 store_chunk66->header.state_type=FSO_USED_CHUNK;
35972 n=store66++;
35973 }
35974 else{
35975 c=gc_fsoc_get1();
35976 if(gc_free66!=NULL){
35977 n=gc_free66;
35978 gc_free66=n->header.next;
35979 }
35980 else{
35981 if(c==NULL)c=gc_fsoc_get2();
35982 store_chunk66=c;
35983 *store_chunk66=H66;
35984 store66=((gc66*)(&(store_chunk66->first_object)));
35985 store_left66=H66.count_minus_one;
35986 n=store66++;
35987 }
35988 }
35989 n->header.flag=FSOH_UNMARKED;
35990 n->object=M66;
35991 return((T66*)n);
35992 }
35993
35994 void gc_sweep116(fsoc*c){
35995 gc116*o1,*o2,*flt,flh;
35996 o1=((gc116*)(&(c->first_object)));
35997 if(c->header.state_type==FSO_STORE_CHUNK){
35998 for(;o1<store116;o1++){
35999 if((o1->header.flag)==FSOH_MARKED){
36000 o1->header.flag=FSOH_UNMARKED;
36001 }
36002 else{
36003 o1->header.next=gc_free116;
36004 gc_free116=o1;
36005 }
36006 }
36007 }
36008 else{
36009 int dead=1;
36010 flh.header.next=NULL;
36011 flt=&flh;
36012 o2=o1+c->count_minus_one;
36013 for(;o1<=o2;o2--){
36014 if((o2->header.flag)==FSOH_MARKED){
36015 o2->header.flag=FSOH_UNMARKED;
36016 dead=0;}
36017 else{
36018 flt->header.next=o2;
36019 flt=o2;
36020 }
36021 }
36022 if (dead){
36023 c->next=fsocfl;
36024 fsocfl=c;
36025 c->header.state_type=FSO_FREE_CHUNK;
36026 }
36027 else if(flh.header.next!=NULL){
36028 flt->header.next=gc_free116;
36029 gc_free116=flh.header.next;
36030 }
36031 }
36032 }
36033
36034 void gc_mark116(T116*o){
36035 se_gc_check_id(o,116);
36036 {if(((gc116*)o)->header.flag==FSOH_UNMARKED){
36037 ((gc116*)o)->header.flag=FSOH_MARKED;
36038 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
36039 }
36040 }}
36041
36042 void gc_align_mark116(fsoc*c,gc116*p){
36043 gc116*b=((gc116*)(&(c->first_object)));
36044 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store116)))return;
36045 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
36046 if(((char*)p)<((char*)b))return;
36047 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
36048 if(p->header.flag==FSOH_UNMARKED){
36049 T116*o=(&(p->object));
36050 ((gc116*)o)->header.flag=FSOH_MARKED;
36051 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
36052 }
36053 }
36054 }
36055 fsoc H116={{FSOC_SIZE,FSO_STORE_CHUNK,
36056 (void(*)(mch*,void*))gc_align_mark116,
36057 (void(*)(mch*))gc_sweep116},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc116))-1)};
36058
36059 T116*new116(void){
36060 gc116*n;
36061 fsoc*c;
36062 if(store_left116>1){
36063 store_left116--;
36064 n=store116++;
36065 }
36066 else if(gc_free116!=NULL){
36067 n=gc_free116;
36068 gc_free116=n->header.next;
36069 }
36070 else if(store_left116==1){
36071 store_left116=0;
36072 store_chunk116->header.state_type=FSO_USED_CHUNK;
36073 n=store116++;
36074 }
36075 else{
36076 c=gc_fsoc_get1();
36077 if(gc_free116!=NULL){
36078 n=gc_free116;
36079 gc_free116=n->header.next;
36080 }
36081 else{
36082 if(c==NULL)c=gc_fsoc_get2();
36083 store_chunk116=c;
36084 *store_chunk116=H116;
36085 store116=((gc116*)(&(store_chunk116->first_object)));
36086 store_left116=H116.count_minus_one;
36087 n=store116++;
36088 }
36089 }
36090 n->header.flag=FSOH_UNMARKED;
36091 n->object=M116;
36092 return((T116*)n);
36093 }
36094
36095 void gc_sweep132(fsoc*c){
36096 gc132*o1,*o2,*flt,flh;
36097 o1=((gc132*)(&(c->first_object)));
36098 if(c->header.state_type==FSO_STORE_CHUNK){
36099 for(;o1<store132;o1++){
36100 if((o1->header.flag)==FSOH_MARKED){
36101 o1->header.flag=FSOH_UNMARKED;
36102 }
36103 else{
36104 o1->header.next=gc_free132;
36105 gc_free132=o1;
36106 }
36107 }
36108 }
36109 else{
36110 int dead=1;
36111 flh.header.next=NULL;
36112 flt=&flh;
36113 o2=o1+c->count_minus_one;
36114 for(;o1<=o2;o2--){
36115 if((o2->header.flag)==FSOH_MARKED){
36116 o2->header.flag=FSOH_UNMARKED;
36117 dead=0;}
36118 else{
36119 flt->header.next=o2;
36120 flt=o2;
36121 }
36122 }
36123 if (dead){
36124 c->next=fsocfl;
36125 fsocfl=c;
36126 c->header.state_type=FSO_FREE_CHUNK;
36127 }
36128 else if(flh.header.next!=NULL){
36129 flt->header.next=gc_free132;
36130 gc_free132=flh.header.next;
36131 }
36132 }
36133 }
36134
36135 void gc_mark132(T132*o){
36136 se_gc_check_id(o,132);
36137 {begin:
36138 if(((gc132*)o)->header.flag==FSOH_UNMARKED){
36139 ((gc132*)o)->header.flag=FSOH_MARKED;
36140 if(NULL!=o->_key/*8*/)gc_mark7((T7*)(o->_key/*8*/));
36141 if(NULL!=o->_item/*4*/)gc_mark96((T96*)(o->_item/*4*/));
36142 o=(void*)o->_next;
36143 if((o!=NULL))goto begin;
36144 }
36145 }}
36146
36147 void gc_align_mark132(fsoc*c,gc132*p){
36148 gc132*b=((gc132*)(&(c->first_object)));
36149 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store132)))return;
36150 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
36151 if(((char*)p)<((char*)b))return;
36152 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
36153 if(p->header.flag==FSOH_UNMARKED){
36154 T132*o=(&(p->object));
36155 begin:
36156 ((gc132*)o)->header.flag=FSOH_MARKED;
36157 if(NULL!=o->_key/*8*/)gc_mark7((T7*)(o->_key/*8*/));
36158 if(NULL!=o->_item/*4*/)gc_mark96((T96*)(o->_item/*4*/));
36159 o=(void*)o->_next;
36160 if((o!=NULL)&&(((gc132*)o)->header.flag==FSOH_UNMARKED))goto begin;
36161 }
36162 }
36163 }
36164 fsoc H132={{FSOC_SIZE,FSO_STORE_CHUNK,
36165 (void(*)(mch*,void*))gc_align_mark132,
36166 (void(*)(mch*))gc_sweep132},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc132))-1)};
36167
36168 T132*new132(void){
36169 gc132*n;
36170 fsoc*c;
36171 if(store_left132>1){
36172 store_left132--;
36173 n=store132++;
36174 }
36175 else if(gc_free132!=NULL){
36176 n=gc_free132;
36177 gc_free132=n->header.next;
36178 }
36179 else if(store_left132==1){
36180 store_left132=0;
36181 store_chunk132->header.state_type=FSO_USED_CHUNK;
36182 n=store132++;
36183 }
36184 else{
36185 c=gc_fsoc_get1();
36186 if(gc_free132!=NULL){
36187 n=gc_free132;
36188 gc_free132=n->header.next;
36189 }
36190 else{
36191 if(c==NULL)c=gc_fsoc_get2();
36192 store_chunk132=c;
36193 *store_chunk132=H132;
36194 store132=((gc132*)(&(store_chunk132->first_object)));
36195 store_left132=H132.count_minus_one;
36196 n=store132++;
36197 }
36198 }
36199 n->header.flag=FSOH_UNMARKED;
36200 n->object=M132;
36201 return((T132*)n);
36202 }
36203
36204 void gc_sweep136(fsoc*c){
36205 gc136*o1,*o2,*flt,flh;
36206 o1=((gc136*)(&(c->first_object)));
36207 if(c->header.state_type==FSO_STORE_CHUNK){
36208 for(;o1<store136;o1++){
36209 if((o1->header.flag)==FSOH_MARKED){
36210 o1->header.flag=FSOH_UNMARKED;
36211 }
36212 else{
36213 o1->header.next=gc_free136;
36214 gc_free136=o1;
36215 }
36216 }
36217 }
36218 else{
36219 int dead=1;
36220 flh.header.next=NULL;
36221 flt=&flh;
36222 o2=o1+c->count_minus_one;
36223 for(;o1<=o2;o2--){
36224 if((o2->header.flag)==FSOH_MARKED){
36225 o2->header.flag=FSOH_UNMARKED;
36226 dead=0;}
36227 else{
36228 flt->header.next=o2;
36229 flt=o2;
36230 }
36231 }
36232 if (dead){
36233 c->next=fsocfl;
36234 fsocfl=c;
36235 c->header.state_type=FSO_FREE_CHUNK;
36236 }
36237 else if(flh.header.next!=NULL){
36238 flt->header.next=gc_free136;
36239 gc_free136=flh.header.next;
36240 }
36241 }
36242 }
36243
36244 void gc_mark136(T136*o){
36245 se_gc_check_id(o,136);
36246 {if(((gc136*)o)->header.flag==FSOH_UNMARKED){
36247 ((gc136*)o)->header.flag=FSOH_MARKED;
36248 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
36249 }
36250 }}
36251
36252 void gc_align_mark136(fsoc*c,gc136*p){
36253 gc136*b=((gc136*)(&(c->first_object)));
36254 if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store136)))return;
36255 if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
36256 if(((char*)p)<((char*)b))return;
36257 if(((((char*)p)-((char*)b))%sizeof(*p))==0){
36258 if(p->header.flag==FSOH_UNMARKED){
36259 T136*o=(&(p->object));
36260 ((gc136*)o)->header.flag=FSOH_MARKED;
36261 if(NULL!=o->_main/*4*/)gc_mark16((T16*)(o->_main/*4*/));
36262 }
36263 }
36264 }
36265 fsoc H136={{FSOC_SIZE,FSO_STORE_CHUNK,
36266 (void(*)(mch*,void*))gc_align_mark136,
36267 (void(*)(mch*))gc_sweep136},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc136))-1)};
36268
36269 T136*new136(void){
36270 gc136*n;
36271 fsoc*c;
36272 if(store_left136>1){
36273 store_left136--;
36274 n=store136++;
36275 }
36276 else if(gc_free136!=NULL){
36277 n=gc_free136;
36278 gc_free136=n->header.next;
36279 }
36280 else if(store_left136==1){
36281 store_left136=0;
36282 store_chunk136->header.state_type=FSO_USED_CHUNK;
36283 n=store136++;
36284 }
36285 else{
36286 c=gc_fsoc_get1();
36287 if(gc_free136!=NULL){
36288 n=gc_free136;
36289 gc_free136=n->header.next;
36290 }
36291 else{
36292 if(c==NULL)c=gc_fsoc_get2();
36293 store_chunk136=c;
36294 *store_chunk136=H136;
36295 store136=((gc136*)(&(store_chunk136->first_object)));
36296 store_left136=H136.count_minus_one;
36297 n=store136++;
36298 }
36299 }
36300 n->header.flag=FSOH_UNMARKED;
36301 n->object=M136;
36302 return((T136*)n);
36303 }
36304
36305 void gc_mark133(T133 o){
36306 rsoh*h=((rsoh*)o)-1;
36307 if((h->header.magic_flag)==RSOH_UNMARKED){
36308 h->header.magic_flag=RSOH_MARKED;
36309 {T0* e;
36310 T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
36311 for(;((void*)p)>=((void*)o);p--){
36312 e=*p;
36313 if(NULL!=e)gc_mark132((T132*)(e));
36314
36315 }
36316 }
36317 }}
36318
36319 T133 new133(int size){
36320 size=(size*sizeof(T0*))+sizeof(rsoh);
36321 if((size%sizeof(double))!=0)size+=(sizeof(double)-(size%sizeof(double)));
36322 if (size<=(na_env133.store_left)){
36323 rsoh*r=na_env133.store;
36324 na_env133.store_left-=size;
36325 if(na_env133.store_left>sizeof(rsoh)){
36326 r->header.size=size;
36327 na_env133.store=((rsoh*)(((char*)(na_env133.store))+size));
36328 }
36329 else {
36330 r->header.size=size+na_env133.store_left;
36331 na_env133.store_left=0;
36332 }
36333 (r->header.magic_flag)=RSOH_UNMARKED;
36334 ((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
36335 return((T133)(r+1));
36336 }
36337 return((T133)new_na(&na_env133,size));
36338 }
36339
36340 void Xgc_mark29(T0*o){
36341 {int i=o->id;
36342 if (i <= 99) {
36343 if (i <= 97) {
36344 gc_mark97((T97*)o);
36345 }else{
36346 gc_mark99((T99*)o);
36347 }}else{
36348 gc_mark117((T117*)o);
36349 }}}
36350
36351 void Xgc_mark25(T0*o){
36352 {int i=o->id;
36353 if (i <= 128) {
36354 if (i <= 116) {
36355 if (i <= 114) {
36356 if (i <= 112) {
36357 gc_mark112((T112*)o);
36358 }else{
36359 gc_mark114((T114*)o);
36360 }}else{
36361 gc_mark116((T116*)o);
36362 }}else{
36363 if (i <= 127) {
36364 if (i <= 125) {
36365 gc_mark125((T125*)o);
36366 }else{
36367 gc_mark127((T127*)o);
36368 }}else{
36369 gc_mark128((T128*)o);
36370 }}}else{
36371 if (i <= 136) {
36372 if (i <= 135) {
36373 if (i <= 129) {
36374 gc_mark129((T129*)o);
36375 }else{
36376 gc_mark135((T135*)o);
36377 }}else{
36378 gc_mark136((T136*)o);
36379 }}else{
36380 if (i <= 137) {
36381 gc_mark137((T137*)o);
36382 }else{
36383 gc_mark138((T138*)o);
36384 }}}}}
36385
36386 void Xgc_mark30(T0*o){
36387 {int i=o->id;
36388 if (i <= 107) {
36389 if (i <= 98) {
36390 if (i <= 97) {
36391 gc_mark97((T97*)o);
36392 }else{
36393 gc_mark98((T98*)o);
36394 }}else{
36395 if (i <= 99) {
36396 gc_mark99((T99*)o);
36397 }else{
36398 gc_mark107((T107*)o);
36399 }}}else{
36400 if (i <= 117) {
36401 if (i <= 113) {
36402 gc_mark113((T113*)o);
36403 }else{
36404 gc_mark117((T117*)o);
36405 }}else{
36406 if (i <= 120) {
36407 gc_mark120((T120*)o);
36408 }else{
36409 gc_mark126((T126*)o);
36410 }}}}}
36411
36412 void X25execute(se_dump_stack*caller,se_position position,T0*C){
36413 static se_frame_descriptor fd={"execute (late bind.)",0,0,"",1};
36414 se_dump_stack ds;
36415 ds.fd=&fd;
36416 ds.p=0;
36417 ds.caller=caller;
36418 {Tid id=vc(C,position)->id;
36419 switch(id){
36420 case 112:r112execute(&ds,((T112*)C));
36421
36422 break;
36423 case 114:r114execute(&ds,((T114*)C));
36424
36425 break;
36426 case 116:r116execute(&ds,((T116*)C));
36427
36428 break;
36429 case 125:r125execute(&ds,((T125*)C));
36430
36431 break;
36432 case 127:r127execute(&ds,((T127*)C));
36433
36434 break;
36435 case 128:r128execute(&ds,((T128*)C));
36436
36437 break;
36438 case 129:r129execute(&ds,((T129*)C));
36439
36440 break;
36441 case 135:r135execute(&ds,((T135*)C));
36442
36443 break;
36444 case 136:r136execute(&ds,((T136*)C));
36445
36446 break;
36447 case 137:r137execute(&ds,((T137*)C));
36448
36449 break;
36450 case 138:r138execute(&ds,((T138*)C));
36451
36452 break;
36453 default: error2(C,position);
36454 }
36455 }
36456 se_dst=caller;
36457 }
36458
36459 T2 X70count(se_dump_stack*caller,se_position position,T0*C){
36460 T2 R=0;
36461 static se_frame_descriptor fd={"count (late bind.)",0,0,"",1};
36462 se_dump_stack ds;
36463 ds.fd=&fd;
36464 ds.p=0;
36465 ds.caller=caller;
36466 {Tid id=vc(C,position)->id;
36467 switch(id){
36468 case 64:R=(r64count(&ds,se_i64(&ds,((T64*)C))));
36469
36470 break;
36471 case 118:R=(r118count(&ds,se_i118(&ds,((T118*)C))));
36472
36473 break;
36474 default: error2(C,position);
36475 }
36476 }
36477 se_dst=caller;
36478 return R;
36479 }
36480
36481 T2 X70upper(se_dump_stack*caller,se_position position,T0*C){
36482 T2 R=0;
36483 static se_frame_descriptor fd={"upper (late bind.)",0,0,"",1};
36484 se_dump_stack ds;
36485 ds.fd=&fd;
36486 ds.p=0;
36487 ds.caller=caller;
36488 {Tid id=vc(C,position)->id;
36489 switch(id){
36490 case 64:R=((/*RF2*/(se_i64(&ds,((T64*)C)))->_upper/*12*/));
36491
36492 break;
36493 case 118:R=((/*RF2*/(se_i118(&ds,((T118*)C)))->_upper/*4*/));
36494
36495 break;
36496 default: error2(C,position);
36497 }
36498 }
36499 se_dst=caller;
36500 return R;
36501 }
36502
36503 T0* X70item(se_dump_stack*caller,se_position position,T0*C,T2 a1){
36504 T0* R=NULL;
36505 static se_frame_descriptor fd={"item (late bind.)",0,0,"",1};
36506 se_dump_stack ds;
36507 ds.fd=&fd;
36508 ds.p=0;
36509 ds.caller=caller;
36510 {Tid id=vc(C,position)->id;
36511 switch(id){
36512 case 64:R=(r64item(&ds,se_i64(&ds,((T64*)C)),a1));
36513
36514 break;
36515 case 118:R=(r118item(&ds,se_i118(&ds,((T118*)C)),a1));
36516
36517 break;
36518 default: error2(C,position);
36519 }
36520 }
36521 se_dst=caller;
36522 return R;
36523 }
36524
36525 T2 X70lower(se_dump_stack*caller,se_position position,T0*C){
36526 T2 R=0;
36527 static se_frame_descriptor fd={"lower (late bind.)",0,0,"",1};
36528 se_dump_stack ds;
36529 ds.fd=&fd;
36530 ds.p=0;
36531 ds.caller=caller;
36532 {Tid id=vc(C,position)->id;
36533 switch(id){
36534 case 64:R=((/*RF2*/(se_i64(&ds,((T64*)C)))->_lower/*16*/));
36535
36536 break;
36537 case 118:R=(1);
36538
36539 break;
36540 default: error2(C,position);
36541 }
36542 }
36543 se_dst=caller;
36544 return R;
36545 }
36546
36547 void X70add_last(se_dump_stack*caller,se_position position,T0*C,T0* a1){
36548 static se_frame_descriptor fd={"add_last (late bind.)",0,0,"",1};
36549 se_dump_stack ds;
36550 ds.fd=&fd;
36551 ds.p=0;
36552 ds.caller=caller;
36553 {Tid id=vc(C,position)->id;
36554 switch(id){
36555 case 64:r64add_last(&ds,se_i64(&ds,((T64*)C)),a1);
36556
36557 break;
36558 case 118:r118add_last(&ds,se_i118(&ds,((T118*)C)),a1);
36559
36560 break;
36561 default: error2(C,position);
36562 }
36563 }
36564 se_dst=caller;
36565 }
36566
36567 T6 X10is_equal(se_dump_stack*caller,se_position position,T0*C,T0* a1){
36568 T6 R=0;
36569 static se_frame_descriptor fd={"is_equal (late bind.)",0,0,"",1};
36570 se_dump_stack ds;
36571 ds.fd=&fd;
36572 ds.p=0;
36573 ds.caller=caller;
36574 {Tid id=vc(C,position)->id;
36575 switch(id){
36576 case 7:R=(r7is_equal(&ds,se_i7(&ds,((T7*)C)),a1));
36577
36578 break;
36579 case 16:R=(r16is_equal(&ds,((T16*)C),a1));
36580
36581 break;
36582 case 28:R=(r28is_equal(&ds,((T28*)C),a1));
36583
36584 break;
36585 case 39:R=(r39is_equal(&ds,se_i39(&ds,((T39*)C)),a1));
36586
36587 break;
36588 case 41:R=(r41is_equal(&ds,((T41*)C),a1));
36589
36590 break;
36591 case 43:R=(r43is_equal(&ds,((T43*)C),a1));
36592
36593 break;
36594 case 45:R=(r45is_equal(&ds,se_i45(&ds,((T45*)C)),a1));
36595
36596 break;
36597 case 47:R=(r47is_equal(&ds,((T47*)C),a1));
36598
36599 break;
36600 case 50:R=(r50is_equal(&ds,((T50*)C),a1));
36601
36602 break;
36603 case 51:R=(r51is_equal(&ds,((T51*)C),a1));
36604
36605 break;
36606 case 53:R=(r53is_equal(&ds,((T53*)C),a1));
36607
36608 break;
36609 case 54:R=(r54is_equal(&ds,((T54*)C),a1));
36610
36611 break;
36612 case 55:R=(r55is_equal(&ds,((T55*)C),a1));
36613
36614 break;
36615 case 57:R=(r57is_equal(&ds,((T57*)C),a1));
36616
36617 break;
36618 case 64:R=(r64is_equal(&ds,se_i64(&ds,((T64*)C)),a1));
36619
36620 break;
36621 case 65:R=(r65is_equal(&ds,((T65*)C),a1));
36622
36623 break;
36624 case 66:R=(r66is_equal(&ds,se_i66(&ds,((T66*)C)),a1));
36625
36626 break;
36627 case 67:R=(r67is_equal(&ds,((T67*)C),a1));
36628
36629 break;
36630 case 68:R=(r68is_equal(&ds,((T68*)C),a1));
36631
36632 break;
36633 case 74:R=(r74is_equal(&ds,((T74*)C),a1));
36634
36635 break;
36636 case 75:R=(r75is_equal(&ds,se_i75(&ds,((T75*)C)),a1));
36637
36638 break;
36639 case 77:R=(r77is_equal(&ds,se_i77(&ds,((T77*)C)),a1));
36640
36641 break;
36642 case 80:R=(r80is_equal(&ds,se_i80(&ds,((T80*)C)),a1));
36643
36644 break;
36645 case 83:R=(r83is_equal(&ds,se_i83(&ds,((T83*)C)),a1));
36646
36647 break;
36648 case 86:R=(r86is_equal(&ds,se_i86(&ds,((T86*)C)),a1));
36649
36650 break;
36651 case 87:R=(r87is_equal(&ds,((T87*)C),a1));
36652
36653 break;
36654 case 96:R=(r96is_equal(&ds,((T96*)C),a1));
36655
36656 break;
36657 case 97:R=(r97is_equal(&ds,((T97*)C),a1));
36658
36659 break;
36660 case 98:R=(r98is_equal(&ds,((T98*)C),a1));
36661
36662 break;
36663 case 99:R=(r99is_equal(&ds,((T99*)C),a1));
36664
36665 break;
36666 case 104:R=(r104is_equal(&ds,((T104*)C),a1));
36667
36668 break;
36669 case 105:R=(r105is_equal(&ds,se_i105(&ds,((T105*)C)),a1));
36670
36671 break;
36672 case 106:R=(r106is_equal(&ds,((T106*)C),a1));
36673
36674 break;
36675 case 107:R=(r107is_equal(&ds,((T107*)C),a1));
36676
36677 break;
36678 case 112:R=(r112is_equal(&ds,((T112*)C),a1));
36679
36680 break;
36681 case 113:R=(r113is_equal(&ds,((T113*)C),a1));
36682
36683 break;
36684 case 114:R=(r114is_equal(&ds,((T114*)C),a1));
36685
36686 break;
36687 case 116:R=(r116is_equal(&ds,((T116*)C),a1));
36688
36689 break;
36690 case 117:R=(r117is_equal(&ds,((T117*)C),a1));
36691
36692 break;
36693 case 118:R=(r118is_equal(&ds,se_i118(&ds,((T118*)C)),a1));
36694
36695 break;
36696 case 120:R=(r120is_equal(&ds,((T120*)C),a1));
36697
36698 break;
36699 case 121:R=(r121is_equal(&ds,((T121*)C),a1));
36700
36701 break;
36702 case 122:R=(r122is_equal(&ds,((T122*)C),a1));
36703
36704 break;
36705 case 125:R=(r125is_equal(&ds,((T125*)C),a1));
36706
36707 break;
36708 case 126:R=(r126is_equal(&ds,((T126*)C),a1));
36709
36710 break;
36711 case 127:R=(r127is_equal(&ds,((T127*)C),a1));
36712
36713 break;
36714 case 128:R=(r128is_equal(&ds,((T128*)C),a1));
36715
36716 break;
36717 case 129:R=(r129is_equal(&ds,((T129*)C),a1));
36718
36719 break;
36720 case 130:R=(r130is_equal(&ds,((T130*)C),a1));
36721
36722 break;
36723 case 131:R=(r131is_equal(&ds,se_i131(&ds,((T131*)C)),a1));
36724
36725 break;
36726 case 132:R=(r132is_equal(&ds,((T132*)C),a1));
36727
36728 break;
36729 case 135:R=(r135is_equal(&ds,((T135*)C),a1));
36730
36731 break;
36732 case 136:R=(r136is_equal(&ds,((T136*)C),a1));
36733
36734 break;
36735 case 137:R=(r137is_equal(&ds,((T137*)C),a1));
36736
36737 break;
36738 case 138:R=(r138is_equal(&ds,((T138*)C),a1));
36739
36740 break;
36741 case 140:R=(r140is_equal(&ds,((T140*)C),a1));
36742
36743 break;
36744 case 146:R=(r146is_equal(&ds,((T146*)C),a1));
36745
36746 break;
36747 case 151:R=(r151is_equal(&ds,((T151*)C),a1));
36748
36749 break;
36750 case 153:R=(r153is_equal(&ds,se_i153(&ds,((T153*)C)),a1));
36751
36752 break;
36753 default: error2(C,position);
36754 }
36755 }
36756 se_dst=caller;
36757 return R;
36758 }
36759
36760 T6 X10standard_is_equal(se_dump_stack*caller,se_position position,T0*C,T0* a1){
36761 T6 R=0;
36762 static se_frame_descriptor fd={"standard_is_equal (late bind.)",0,0,"",1};
36763 se_dump_stack ds;
36764 ds.fd=&fd;
36765 ds.p=0;
36766 ds.caller=caller;
36767 {Tid id=vc(C,position)->id;
36768 switch(id){
36769 case 7:R=(r7standard_is_equal(&ds,se_i7(&ds,((T7*)C)),a1));
36770
36771 break;
36772 case 16:R=(r16standard_is_equal(&ds,((T16*)C),a1));
36773
36774 break;
36775 case 28:R=(r28standard_is_equal(&ds,((T28*)C),a1));
36776
36777 break;
36778 case 39:R=(r39standard_is_equal(&ds,se_i39(&ds,((T39*)C)),a1));
36779
36780 break;
36781 case 41:R=(r41standard_is_equal(&ds,((T41*)C),a1));
36782
36783 break;
36784 case 43:R=(r43standard_is_equal(&ds,((T43*)C),a1));
36785
36786 break;
36787 case 45:R=(r45standard_is_equal(&ds,se_i45(&ds,((T45*)C)),a1));
36788
36789 break;
36790 case 47:R=(r47standard_is_equal(&ds,((T47*)C),a1));
36791
36792 break;
36793 case 50:R=(r50standard_is_equal(&ds,((T50*)C),a1));
36794
36795 break;
36796 case 51:R=(r51standard_is_equal(&ds,((T51*)C),a1));
36797
36798 break;
36799 case 53:R=(r53standard_is_equal(&ds,((T53*)C),a1));
36800
36801 break;
36802 case 54:R=(r54standard_is_equal(&ds,((T54*)C),a1));
36803
36804 break;
36805 case 55:R=(r55standard_is_equal(&ds,((T55*)C),a1));
36806
36807 break;
36808 case 57:R=(r57standard_is_equal(&ds,((T57*)C),a1));
36809
36810 break;
36811 case 64:R=(r64standard_is_equal(&ds,se_i64(&ds,((T64*)C)),a1));
36812
36813 break;
36814 case 65:R=(r65standard_is_equal(&ds,((T65*)C),a1));
36815
36816 break;
36817 case 66:R=(r66standard_is_equal(&ds,se_i66(&ds,((T66*)C)),a1));
36818
36819 break;
36820 case 67:R=(r67standard_is_equal(&ds,((T67*)C),a1));
36821
36822 break;
36823 case 68:R=(r68standard_is_equal(&ds,((T68*)C),a1));
36824
36825 break;
36826 case 74:R=(r74standard_is_equal(&ds,((T74*)C),a1));
36827
36828 break;
36829 case 75:R=(r75standard_is_equal(&ds,se_i75(&ds,((T75*)C)),a1));
36830
36831 break;
36832 case 77:R=(r77standard_is_equal(&ds,se_i77(&ds,((T77*)C)),a1));
36833
36834 break;
36835 case 80:R=(r80standard_is_equal(&ds,se_i80(&ds,((T80*)C)),a1));
36836
36837 break;
36838 case 83:R=(r83standard_is_equal(&ds,se_i83(&ds,((T83*)C)),a1));
36839
36840 break;
36841 case 86:R=(r86standard_is_equal(&ds,se_i86(&ds,((T86*)C)),a1));
36842
36843 break;
36844 case 87:R=(r87standard_is_equal(&ds,((T87*)C),a1));
36845
36846 break;
36847 case 96:R=(r96standard_is_equal(&ds,((T96*)C),a1));
36848
36849 break;
36850 case 97:R=(r97standard_is_equal(&ds,((T97*)C),a1));
36851
36852 break;
36853 case 98:R=(r98standard_is_equal(&ds,((T98*)C),a1));
36854
36855 break;
36856 case 99:R=(r99standard_is_equal(&ds,((T99*)C),a1));
36857
36858 break;
36859 case 104:R=(r104standard_is_equal(&ds,((T104*)C),a1));
36860
36861 break;
36862 case 105:R=(r105standard_is_equal(&ds,se_i105(&ds,((T105*)C)),a1));
36863
36864 break;
36865 case 106:R=(r106standard_is_equal(&ds,((T106*)C),a1));
36866
36867 break;
36868 case 107:R=(r107standard_is_equal(&ds,((T107*)C),a1));
36869
36870 break;
36871 case 112:R=(r112standard_is_equal(&ds,((T112*)C),a1));
36872
36873 break;
36874 case 113:R=(r113standard_is_equal(&ds,((T113*)C),a1));
36875
36876 break;
36877 case 114:R=(r114standard_is_equal(&ds,((T114*)C),a1));
36878
36879 break;
36880 case 116:R=(r116standard_is_equal(&ds,((T116*)C),a1));
36881
36882 break;
36883 case 117:R=(r117standard_is_equal(&ds,((T117*)C),a1));
36884
36885 break;
36886 case 118:R=(r118standard_is_equal(&ds,se_i118(&ds,((T118*)C)),a1));
36887
36888 break;
36889 case 120:R=(r120standard_is_equal(&ds,((T120*)C),a1));
36890
36891 break;
36892 case 121:R=(r121standard_is_equal(&ds,((T121*)C),a1));
36893
36894 break;
36895 case 122:R=(r122standard_is_equal(&ds,((T122*)C),a1));
36896
36897 break;
36898 case 125:R=(r125standard_is_equal(&ds,((T125*)C),a1));
36899
36900 break;
36901 case 126:R=(r126standard_is_equal(&ds,((T126*)C),a1));
36902
36903 break;
36904 case 127:R=(r127standard_is_equal(&ds,((T127*)C),a1));
36905
36906 break;
36907 case 128:R=(r128standard_is_equal(&ds,((T128*)C),a1));
36908
36909 break;
36910 case 129:R=(r129standard_is_equal(&ds,((T129*)C),a1));
36911
36912 break;
36913 case 130:R=(r130standard_is_equal(&ds,((T130*)C),a1));
36914
36915 break;
36916 case 131:R=(r131standard_is_equal(&ds,se_i131(&ds,((T131*)C)),a1));
36917
36918 break;
36919 case 132:R=(r132standard_is_equal(&ds,((T132*)C),a1));
36920
36921 break;
36922 case 135:R=(r135standard_is_equal(&ds,((T135*)C),a1));
36923
36924 break;
36925 case 136:R=(r136standard_is_equal(&ds,((T136*)C),a1));
36926
36927 break;
36928 case 137:R=(r137standard_is_equal(&ds,((T137*)C),a1));
36929
36930 break;
36931 case 138:R=(r138standard_is_equal(&ds,((T138*)C),a1));
36932
36933 break;
36934 case 140:R=(r140standard_is_equal(&ds,((T140*)C),a1));
36935
36936 break;
36937 case 146:R=(r146standard_is_equal(&ds,((T146*)C),a1));
36938
36939 break;
36940 case 151:R=(r151standard_is_equal(&ds,((T151*)C),a1));
36941
36942 break;
36943 case 153:R=(r153standard_is_equal(&ds,se_i153(&ds,((T153*)C)),a1));
36944
36945 break;
36946 default: error2(C,position);
36947 }
36948 }
36949 se_dst=caller;
36950 return R;
36951 }
36952
36953 T0* X10twin(se_dump_stack*caller,se_position position,T0*C){
36954 T0* R=NULL;
36955 static se_frame_descriptor fd={"twin (late bind.)",0,0,"",1};
36956 se_dump_stack ds;
36957 ds.fd=&fd;
36958 ds.p=0;
36959 ds.caller=caller;
36960 {Tid id=vc(C,position)->id;
36961 switch(id){
36962 case 7:R=(r7twin(&ds,se_i7(&ds,((T7*)C))));
36963
36964 break;
36965 case 16:R=(r16twin(&ds,((T16*)C)));
36966
36967 break;
36968 case 28:R=(r28twin(&ds,((T28*)C)));
36969
36970 break;
36971 case 39:R=(r39twin(&ds,se_i39(&ds,((T39*)C))));
36972
36973 break;
36974 case 41:R=(r41twin(&ds,((T41*)C)));
36975
36976 break;
36977 case 43:R=(r43twin(&ds,((T43*)C)));
36978
36979 break;
36980 case 45:R=(r45twin(&ds,se_i45(&ds,((T45*)C))));
36981
36982 break;
36983 case 47:R=(r47twin(&ds,((T47*)C)));
36984
36985 break;
36986 case 50:R=(r50twin(&ds,((T50*)C)));
36987
36988 break;
36989 case 51:R=(r51twin(&ds,((T51*)C)));
36990
36991 break;
36992 case 53:R=(r53twin(&ds,((T53*)C)));
36993
36994 break;
36995 case 54:R=(r54twin(&ds,((T54*)C)));
36996
36997 break;
36998 case 55:R=(r55twin(&ds,((T55*)C)));
36999
37000 break;
37001 case 57:R=(r57twin(&ds,((T57*)C)));
37002
37003 break;
37004 case 64:R=(r64twin(&ds,se_i64(&ds,((T64*)C))));
37005
37006 break;
37007 case 65:R=(r65twin(&ds,((T65*)C)));
37008
37009 break;
37010 case 66:R=(r66twin(&ds,se_i66(&ds,((T66*)C))));
37011
37012 break;
37013 case 67:R=(r67twin(&ds,((T67*)C)));
37014
37015 break;
37016 case 68:R=(r68twin(&ds,((T68*)C)));
37017
37018 break;
37019 case 74:R=(r74twin(&ds,((T74*)C)));
37020
37021 break;
37022 case 75:R=(r75twin(&ds,se_i75(&ds,((T75*)C))));
37023
37024 break;
37025 case 77:R=(r77twin(&ds,se_i77(&ds,((T77*)C))));
37026
37027 break;
37028 case 80:R=(r80twin(&ds,se_i80(&ds,((T80*)C))));
37029
37030 break;
37031 case 83:R=(r83twin(&ds,se_i83(&ds,((T83*)C))));
37032
37033 break;
37034 case 86:R=(r86twin(&ds,se_i86(&ds,((T86*)C))));
37035
37036 break;
37037 case 87:R=(r87twin(&ds,((T87*)C)));
37038
37039 break;
37040 case 96:R=(r96twin(&ds,((T96*)C)));
37041
37042 break;
37043 case 97:R=(r97twin(&ds,((T97*)C)));
37044
37045 break;
37046 case 98:R=(r98twin(&ds,((T98*)C)));
37047
37048 break;
37049 case 99:R=(r99twin(&ds,((T99*)C)));
37050
37051 break;
37052 case 104:R=(r104twin(&ds,((T104*)C)));
37053
37054 break;
37055 case 105:R=(r105twin(&ds,se_i105(&ds,((T105*)C))));
37056
37057 break;
37058 case 106:R=(r106twin(&ds,((T106*)C)));
37059
37060 break;
37061 case 107:R=(r107twin(&ds,((T107*)C)));
37062
37063 break;
37064 case 112:R=(r112twin(&ds,((T112*)C)));
37065
37066 break;
37067 case 113:R=(r113twin(&ds,((T113*)C)));
37068
37069 break;
37070 case 114:R=(r114twin(&ds,((T114*)C)));
37071
37072 break;
37073 case 116:R=(r116twin(&ds,((T116*)C)));
37074
37075 break;
37076 case 117:R=(r117twin(&ds,((T117*)C)));
37077
37078 break;
37079 case 118:R=(r118twin(&ds,se_i118(&ds,((T118*)C))));
37080
37081 break;
37082 case 120:R=(r120twin(&ds,((T120*)C)));
37083
37084 break;
37085 case 121:R=(r121twin(&ds,((T121*)C)));
37086
37087 break;
37088 case 122:R=(r122twin(&ds,((T122*)C)));
37089
37090 break;
37091 case 125:R=(r125twin(&ds,((T125*)C)));
37092
37093 break;
37094 case 126:R=(r126twin(&ds,((T126*)C)));
37095
37096 break;
37097 case 127:R=(r127twin(&ds,((T127*)C)));
37098
37099 break;
37100 case 128:R=(r128twin(&ds,((T128*)C)));
37101
37102 break;
37103 case 129:R=(r129twin(&ds,((T129*)C)));
37104
37105 break;
37106 case 130:R=(r130twin(&ds,((T130*)C)));
37107
37108 break;
37109 case 131:R=(r131twin(&ds,se_i131(&ds,((T131*)C))));
37110
37111 break;
37112 case 132:R=(r132twin(&ds,((T132*)C)));
37113
37114 break;
37115 case 135:R=(r135twin(&ds,((T135*)C)));
37116
37117 break;
37118 case 136:R=(r136twin(&ds,((T136*)C)));
37119
37120 break;
37121 case 137:R=(r137twin(&ds,((T137*)C)));
37122
37123 break;
37124 case 138:R=(r138twin(&ds,((T138*)C)));
37125
37126 break;
37127 case 140:R=(r140twin(&ds,((T140*)C)));
37128
37129 break;
37130 case 146:R=(r146twin(&ds,((T146*)C)));
37131
37132 break;
37133 case 151:R=(r151twin(&ds,((T151*)C)));
37134
37135 break;
37136 case 153:R=(r153twin(&ds,se_i153(&ds,((T153*)C))));
37137
37138 break;
37139 default: error2(C,position);
37140 }
37141 }
37142 se_dst=caller;
37143 return R;
37144 }
37145
37146 void X29process_event(se_dump_stack*caller,se_position position,T0*C,T0* a1){
37147 static se_frame_descriptor fd={"process_event (late bind.)",0,0,"",1};
37148 se_dump_stack ds;
37149 ds.fd=&fd;
37150 ds.p=0;
37151 ds.caller=caller;
37152 {Tid id=vc(C,position)->id;
37153 switch(id){
37154 case 97:r97process_event(&ds,((T97*)C),a1);
37155
37156 break;
37157 case 99:r99process_event(&ds,((T99*)C),a1);
37158
37159 break;
37160 case 117:r117process_event(&ds,((T117*)C),a1);
37161
37162 break;
37163 default: error2(C,position);
37164 }
37165 }
37166 se_dst=caller;
37167 }
37168
37169 void X29update(se_dump_stack*caller,se_position position,T0*C){
37170 static se_frame_descriptor fd={"update (late bind.)",0,0,"",1};
37171 se_dump_stack ds;
37172 ds.fd=&fd;
37173 ds.p=0;
37174 ds.caller=caller;
37175 {Tid id=vc(C,position)->id;
37176 switch(id){
37177 case 97:r97update(&ds,((T97*)C));
37178
37179 break;
37180 case 99:r99update(&ds,((T99*)C));
37181
37182 break;
37183 case 117:r117update(&ds,((T117*)C));
37184
37185 break;
37186 default: error2(C,position);
37187 }
37188 }
37189 se_dst=caller;
37190 }
37191
37192 T2 X30offsetx(se_dump_stack*caller,se_position position,T0*C){
37193 T2 R=0;
37194 static se_frame_descriptor fd={"offsetx (late bind.)",0,0,"",1};
37195 se_dump_stack ds;
37196 ds.fd=&fd;
37197 ds.p=0;
37198 ds.caller=caller;
37199 {Tid id=vc(C,position)->id;
37200 switch(id){
37201 case 97:R=((/*RF2*/(((T97*)C))->_offsetx/*9*/));
37202
37203 break;
37204 case 98:R=((/*RF2*/(((T98*)C))->_offsetx/*9*/));
37205
37206 break;
37207 case 99:R=((/*RF2*/(((T99*)C))->_offsetx/*9*/));
37208
37209 break;
37210 case 107:R=((/*RF2*/(((T107*)C))->_offsetx/*9*/));
37211
37212 break;
37213 case 113:R=((/*RF2*/(((T113*)C))->_offsetx/*9*/));
37214
37215 break;
37216 case 117:R=((/*RF2*/(((T117*)C))->_offsetx/*9*/));
37217
37218 break;
37219 case 120:R=((/*RF2*/(((T120*)C))->_offsetx/*9*/));
37220
37221 break;
37222 case 126:R=((/*RF2*/(((T126*)C))->_offsetx/*9*/));
37223
37224 break;
37225 default: error2(C,position);
37226 }
37227 }
37228 se_dst=caller;
37229 return R;
37230 }
37231
37232 T2 X30offsety(se_dump_stack*caller,se_position position,T0*C){
37233 T2 R=0;
37234 static se_frame_descriptor fd={"offsety (late bind.)",0,0,"",1};
37235 se_dump_stack ds;
37236 ds.fd=&fd;
37237 ds.p=0;
37238 ds.caller=caller;
37239 {Tid id=vc(C,position)->id;
37240 switch(id){
37241 case 97:R=((/*RF2*/(((T97*)C))->_offsety/*13*/));
37242
37243 break;
37244 case 98:R=((/*RF2*/(((T98*)C))->_offsety/*13*/));
37245
37246 break;
37247 case 99:R=((/*RF2*/(((T99*)C))->_offsety/*13*/));
37248
37249 break;
37250 case 107:R=((/*RF2*/(((T107*)C))->_offsety/*13*/));
37251
37252 break;
37253 case 113:R=((/*RF2*/(((T113*)C))->_offsety/*13*/));
37254
37255 break;
37256 case 117:R=((/*RF2*/(((T117*)C))->_offsety/*13*/));
37257
37258 break;
37259 case 120:R=((/*RF2*/(((T120*)C))->_offsety/*13*/));
37260
37261 break;
37262 case 126:R=((/*RF2*/(((T126*)C))->_offsety/*13*/));
37263
37264 break;
37265 default: error2(C,position);
37266 }
37267 }
37268 se_dst=caller;
37269 return R;
37270 }
37271
37272 T6 X30contains(se_dump_stack*caller,se_position position,T0*C,T2 a1,T2 a2){
37273 T6 R=0;
37274 static se_frame_descriptor fd={"contains (late bind.)",0,0,"",1};
37275 se_dump_stack ds;
37276 ds.fd=&fd;
37277 ds.p=0;
37278 ds.caller=caller;
37279 {Tid id=vc(C,position)->id;
37280 switch(id){
37281 case 97:R=(r97contains(&ds,((T97*)C),a1,a2));
37282
37283 break;
37284 case 98:R=(r98contains(&ds,((T98*)C),a1,a2));
37285
37286 break;
37287 case 99:R=(r99contains(&ds,((T99*)C),a1,a2));
37288
37289 break;
37290 case 107:R=(r107contains(&ds,((T107*)C),a1,a2));
37291
37292 break;
37293 case 113:R=(r113contains(&ds,((T113*)C),a1,a2));
37294
37295 break;
37296 case 117:R=(r117contains(&ds,((T117*)C),a1,a2));
37297
37298 break;
37299 case 120:R=(r120contains(&ds,((T120*)C),a1,a2));
37300
37301 break;
37302 case 126:R=(r126contains(&ds,((T126*)C),a1,a2));
37303
37304 break;
37305 default: error2(C,position);
37306 }
37307 }
37308 se_dst=caller;
37309 return R;
37310 }
37311
37312 void X30put_xy(se_dump_stack*caller,se_position position,T0*C,T2 a1,T2 a2){
37313 static se_frame_descriptor fd={"put_xy (late bind.)",0,0,"",1};
37314 se_dump_stack ds;
37315 ds.fd=&fd;
37316 ds.p=0;
37317 ds.caller=caller;
37318 {Tid id=vc(C,position)->id;
37319 switch(id){
37320 case 97:r97put_xy(&ds,((T97*)C),a1,a2);
37321
37322 break;
37323 case 98:r98put_xy(&ds,((T98*)C),a1,a2);
37324
37325 break;
37326 case 99:r99put_xy(&ds,((T99*)C),a1,a2);
37327
37328 break;
37329 case 107:r107put_xy(&ds,((T107*)C),a1,a2);
37330
37331 break;
37332 case 113:r113put_xy(&ds,((T113*)C),a1,a2);
37333
37334 break;
37335 case 117:r117put_xy(&ds,((T117*)C),a1,a2);
37336
37337 break;
37338 case 120:r120put_xy(&ds,((T120*)C),a1,a2);
37339
37340 break;
37341 case 126:r126put_xy(&ds,((T126*)C),a1,a2);
37342
37343 break;
37344 default: error2(C,position);
37345 }
37346 }
37347 se_dst=caller;
37348 }
37349
37350 void X30put_focus(se_dump_stack*caller,se_position position,T0*C,T6 a1){
37351 static se_frame_descriptor fd={"put_focus (late bind.)",0,0,"",1};
37352 se_dump_stack ds;
37353 ds.fd=&fd;
37354 ds.p=0;
37355 ds.caller=caller;
37356 {Tid id=vc(C,position)->id;
37357 switch(id){
37358 case 97:r97put_focus(&ds,((T97*)C),a1);
37359
37360 break;
37361 case 98:r98put_focus(&ds,((T98*)C),a1);
37362
37363 break;
37364 case 99:r99put_focus(&ds,((T99*)C),a1);
37365
37366 break;
37367 case 107:r107put_focus(&ds,((T107*)C),a1);
37368
37369 break;
37370 case 113:r113put_focus(&ds,((T113*)C),a1);
37371
37372 break;
37373 case 117:r117put_focus(&ds,((T117*)C),a1);
37374
37375 break;
37376 case 120:r120put_focus(&ds,((T120*)C),a1);
37377
37378 break;
37379 case 126:r126put_focus(&ds,((T126*)C),a1);
37380
37381 break;
37382 default: error2(C,position);
37383 }
37384 }
37385 se_dst=caller;
37386 }
37387
37388 T2 X30signal_cancel(se_dump_stack*caller,se_position position,T0*C){
37389 T2 R=0;
37390 static se_frame_descriptor fd={"signal_cancel (late bind.)",0,0,"",1};
37391 se_dump_stack ds;
37392 ds.fd=&fd;
37393 ds.p=0;
37394 ds.caller=caller;
37395 {Tid id=vc(C,position)->id;
37396 switch(id){
37397 case 97:R=(2);
37398
37399 break;
37400 case 98:R=(2);
37401
37402 break;
37403 case 99:R=(2);
37404
37405 break;
37406 case 107:R=(2);
37407
37408 break;
37409 case 113:R=(2);
37410
37411 break;
37412 case 117:R=(2);
37413
37414 break;
37415 case 120:R=(2);
37416
37417 break;
37418 case 126:R=(2);
37419
37420 break;
37421 default: error2(C,position);
37422 }
37423 }
37424 se_dst=caller;
37425 return R;
37426 }
37427
37428 void X30process_event(se_dump_stack*caller,se_position position,T0*C,T0* a1){
37429 static se_frame_descriptor fd={"process_event (late bind.)",0,0,"",1};
37430 se_dump_stack ds;
37431 ds.fd=&fd;
37432 ds.p=0;
37433 ds.caller=caller;
37434 {Tid id=vc(C,position)->id;
37435 switch(id){
37436 case 97:r97process_event(&ds,((T97*)C),a1);
37437
37438 break;
37439 case 98:r98process_event(&ds,((T98*)C),a1);
37440
37441 break;
37442 case 99:r99process_event(&ds,((T99*)C),a1);
37443
37444 break;
37445 case 107:r107process_event(&ds,((T107*)C),a1);
37446
37447 break;
37448 case 113:r113process_event(&ds,((T113*)C),a1);
37449
37450 break;
37451 case 117:r117process_event(&ds,((T117*)C),a1);
37452
37453 break;
37454 case 120:r120process_event(&ds,((T120*)C),a1);
37455
37456 break;
37457 case 126:r126process_event(&ds,((T126*)C),a1);
37458
37459 break;
37460 default: error2(C,position);
37461 }
37462 }
37463 se_dst=caller;
37464 }
37465
37466 void X30raise_signal(se_dump_stack*caller,se_position position,T0*C,T2 a1){
37467 static se_frame_descriptor fd={"raise_signal (late bind.)",0,0,"",1};
37468 se_dump_stack ds;
37469 ds.fd=&fd;
37470 ds.p=0;
37471 ds.caller=caller;
37472 {Tid id=vc(C,position)->id;
37473 switch(id){
37474 case 97:r97raise_signal(&ds,((T97*)C),a1);
37475
37476 break;
37477 case 98:r98raise_signal(&ds,((T98*)C),a1);
37478
37479 break;
37480 case 99:r99raise_signal(&ds,((T99*)C),a1);
37481
37482 break;
37483 case 107:r107raise_signal(&ds,((T107*)C),a1);
37484
37485 break;
37486 case 113:r113raise_signal(&ds,((T113*)C),a1);
37487
37488 break;
37489 case 117:r117raise_signal(&ds,((T117*)C),a1);
37490
37491 break;
37492 case 120:r120raise_signal(&ds,((T120*)C),a1);
37493
37494 break;
37495 case 126:r126raise_signal(&ds,((T126*)C),a1);
37496
37497 break;
37498 default: error2(C,position);
37499 }
37500 }
37501 se_dst=caller;
37502 }
37503
37504 T2 X30signal_activate(se_dump_stack*caller,se_position position,T0*C){
37505 T2 R=0;
37506 static se_frame_descriptor fd={"signal_activate (late bind.)",0,0,"",1};
37507 se_dump_stack ds;
37508 ds.fd=&fd;
37509 ds.p=0;
37510 ds.caller=caller;
37511 {Tid id=vc(C,position)->id;
37512 switch(id){
37513 case 97:R=(1);
37514
37515 break;
37516 case 98:R=(1);
37517
37518 break;
37519 case 99:R=(1);
37520
37521 break;
37522 case 107:R=(1);
37523
37524 break;
37525 case 113:R=(1);
37526
37527 break;
37528 case 117:R=(1);
37529
37530 break;
37531 case 120:R=(1);
37532
37533 break;
37534 case 126:R=(1);
37535
37536 break;
37537 default: error2(C,position);
37538 }
37539 }
37540 se_dst=caller;
37541 return R;
37542 }
37543
37544 void X30update(se_dump_stack*caller,se_position position,T0*C){
37545 static se_frame_descriptor fd={"update (late bind.)",0,0,"",1};
37546 se_dump_stack ds;
37547 ds.fd=&fd;
37548 ds.p=0;
37549 ds.caller=caller;
37550 {Tid id=vc(C,position)->id;
37551 switch(id){
37552 case 97:r97update(&ds,((T97*)C));
37553
37554 break;
37555 case 98:r98update(&ds,((T98*)C));
37556
37557 break;
37558 case 99:r99update(&ds,((T99*)C));
37559
37560 break;
37561 case 107:r107update(&ds,((T107*)C));
37562
37563 break;
37564 case 113:r113update(&ds,((T113*)C));
37565
37566 break;
37567 case 117:r117update(&ds,((T117*)C));
37568
37569 break;
37570 case 120:r120update(&ds,((T120*)C));
37571
37572 break;
37573 case 126:r126update(&ds,((T126*)C));
37574
37575 break;
37576 default: error2(C,position);
37577 }
37578 }
37579 se_dst=caller;
37580 }
37581
37582 #ifdef __cplusplus
37583 }
37584 #endif
A puzzle game: connect all terminals to the server