summaryrefslogtreecommitdiff
path: root/xinput_ivy.c
diff options
context:
space:
mode:
Diffstat (limited to 'xinput_ivy.c')
-rw-r--r--xinput_ivy.c3617
1 files changed, 2232 insertions, 1385 deletions
diff --git a/xinput_ivy.c b/xinput_ivy.c
index 12a0e83..022dc77 100644
--- a/xinput_ivy.c
+++ b/xinput_ivy.c
@@ -2221,18 +2221,20 @@ T317 M317={317,(void*)0};
T311 M311={311,(void*)0};
T308 M308={308,(void*)0};
T307 M307={(void*)0,0,(void*)0};
-T302 M302={302,(void*)0};
-T300 M300={(void*)0,(void*)0,(void*)0};
-T298 M298={(void*)0,0,0};
+T304 M304={304,(void*)0};
+T303 M303={(void*)0,(void*)0,(void*)0};
+T300 M300={(void*)0,0,0};
T297 M297={297,(void*)0};
T296 M296={0,0,(void*)0};
T293 M293={293,(void*)0};
+T292 M292={(void*)0,(void*)0,(void*)0};
T290 M290={(void*)0,(void*)0,(void*)0};
T289 M289={289,(void*)0};
T288 M288={(void*)0,0,0,0,(void*)0};
T287 M287={287,(void*)0};
+T284 M284={(void*)0,(void*)0,(void*)0};
T280 M280={(void*)0,0,0};
-T154 M154={0,0,{{0},0},0,0,(void*)0,0,(void*)0,0,(void*)0,0,0};
+T153 M153={0,0,{{0},0},0,0,(void*)0,0,(void*)0,0,(void*)0,0,0};
T279 M279={(void*)0,0,0};
T160 M160={(void*)0};
T277 M277={(void*)0,0,0};
@@ -2245,19 +2247,19 @@ T268 M268={(void*)0,0,0,0,(void*)0};
T146 M146={0,0,0};
T266 M266={(void*)0,0,0};
T149 M149={0};
-T265 M265={(void*)0,0,0};
+T260 M260={(void*)0,0,0};
T148 M148={0,0,(void*)0,(void*)0,(void*)0};
-T264 M264={(void*)0,0,0};
-T262 M262={(void*)0,0,0,0,(void*)0};
T261 M261={(void*)0,0,0};
-T260 M260={(void*)0,0,0};
+T264 M264={(void*)0,0,0,0,(void*)0};
+T263 M263={(void*)0,0,0};
+T262 M262={(void*)0,0,0};
T259 M259={(void*)0,0,0,0,(void*)0};
T258 M258={(void*)0,0,0};
T256 M256={(void*)0,0,0,0};
T255 M255={(void*)0,0,0,0,0};
T253 M253={(void*)0,0,0,0,(void*)0};
T250 M250={(void*)0,0,0,0,(void*)0};
-T153 M153={153,(void*)0,(void*)0,0,0,(void*)0,(void*)0,(void*)0,(void*)0};
+T154 M154={154,(void*)0,(void*)0,0,0,(void*)0,(void*)0,(void*)0,(void*)0};
T249 M249={(void*)0,0,0};
T248 M248={(void*)0,0,0};
T155 M155={(void*)0,(void*)0,(void*)0,(void*)0,0,0};
@@ -2267,13 +2269,13 @@ T133 M133={(void*)0,0,(void*)0,(void*)0};
T131 M131={131,0,0,0,(void*)0,(void*)0,(void*)0,(void*)0,(void*)0,(void*)0,0,(void*)0};
T53 M53={0,(void*)0,0};
T46 M46=(void*)0;
-T247 M247={(void*)0,0,0};
T191 M191={(void*)0};
T246 M246={(void*)0,0,0};
T150 M150=0;
T68 M68={0,(void*)0,(void*)0,0,0,0,(void*)0,(void*)0,(void*)0,(void*)0,(void*)0,(void*)0,(void*)0,(void*)0};
T43 M43=(void*)0;
T70 M70={(void*)0,0,0,0,0,0,0,0,0,0,0,0,0,(void*)0,(void*)0,0,(void*)0,(void*)0,(void*)0,0,0,0,0,0,0,0,0,0,0,0,0,0};
+T247 M247={(void*)0,0,0};
T7 M7={(void*)0,0,0};
T71 M71={71,0,0,(void*)0,(void*)0,0,(void*)0,0,(void*)0,(void*)0,(void*)0,(void*)0};
T65 M65={0,0,(void*)0,(void*)0,(void*)0,(void*)0};
@@ -2281,14 +2283,11 @@ T25 M25={(void*)0,(void*)0,(void*)0,(void*)0,0,0,0,(void*)0};
/*Aliased storage area or unicode storage.*/
char*s25_0="";
char*s25_21190322=" Status: ";
-char*s25_674125196="This tool get data from wacom pen screen and is\n able to send them to applications using ivy bus.\n\nOptions:\n -help: print this help.\n\n -list_devices: all available devices are listed.\n\n -pad=name: report pad data from the pad device with this name.\n\n -wacom_pointer=name: report pointer data from the pointer device with\n this name. Ex: stylus.\n\n -bus=[address]:port: specify the ivy bus (default is :3110).\n\n -b [address]:port: specify the ivy bus (default is :3110) (added for\n compatibility with other ivy tools).\n\n -application=name: specify the application name on the ivy bus\n (default is wacom).\n\n -identifier=id: this identifier will be used in ivy messages\n device_id value (default is \"default\").\n\n -x_offset=n: specify the x-offset for the wacom device\n for the display configuration (default is 0).\n\n -y_offset=n: "
-" specify the y-offset for the wacom device\n for the display configuration (default is 0).\n\n\011""-crop=xmin,ymin,xmax,ymax: outside this area, move events are not reported\n\011"" (values are integers in device coordinates). Hires values\n\011""\011""\011""\011""\011""\011""\011""\011""are mapped to [0,1] inside this window and over when outside.\n\n -prediction=t: change the prediction time for the physical position.\n (default is 25ms).\n\n -ignore=n: number of messages to ignore before sending a new\n position message (this reduces message frequency).\n (default is 0 => \176""120message/s).\n\011""\nOptions are considered in the order they appear in the command line. A new\nvalue overrides the previous one. \"wacom_pointer\" and \"pad\" are created where they\nappear, with known information.\n\nMessages:\n slider_event device_id=radar_wacom value=4 side=left time=4523271\n device_id: identifier (see options).\n "
-" value: new slider value (0 when the\n\011""\011""\011""\011""\011""\011""\011""\011""\011""\011""finger leaves the slider).\n side: left or right.\n time: event time (ms), X server reference.\n\n pad_event device_id=radar_wacom button=12 status=left time=4523271\n device_id: identifier (see options).\n button: button identifier.\n status: up or down.\n time: event time (ms), X server reference.\n\n button_event device_id=radar_wacom button=2 status=up x=1290 y=325\n presure=307 tilt_x=-20 tilt_y=15 wheel=0 predicted_x=1272 predicted_y=322\n type=123 serial_number=429389 time=4523271 hires_x=0.827 hires_y=0.231\n proximity=unchanged\n pointer_event device_id=radar_wacom x=1290 y=325\n presure=307 tilt_x=-20 tilt_y=15 wheel=0 predicted_x=1272 predicted_y=322\n type=123 serial_number=429389 time=4523271 hires_x=0.827 hires_y=0.231\n proximity=unchanged\n device_id: identifier (see opti"
-"ons).\n button: button identifier.\n status: up or down.\n x: pointer position (display coordinates).\n y: pointer position (display coordinates).\n presure: presure value ([0, 1023] for intuos 3).\n tilt_x: device tilt in degrees.\n tilt_y: device tilt in degrees.\n wheel: rotation value (device type dependent value).\n predicted_x: predicted position. It is expected to be\n the current position of the real device.\n predicted_y: predicted position. It is expected to be\n the current position of the real device.\n type: the type of the device (pen, eraser, mouse,\n cursor, airbrush...).\n serial_number: the serial number of the device.\n time: event"
-" time (ms), X server reference.\n hires_x: pointer position (device coordinates, in range [0,1]).\n hires_y: pointer position (device coordinates, in range [0,1]).\n proximity: unchanged, in, out\n";
char*s25_314746909=" status=up time=";
char*s70_190991=" type=";
char*s70_475="In";
+char*s70_112207026=" crop=(.*)";
+char*s70_220157120="^CHANGE_CROP device_id=";
char*s13_1432888418="Some feature is not yet implemented (i.e. feature `not_yet_implemented\' of\nclass ANY has been called somewhere). Just run this code under the debugger\nto know the `not_yet_implemented\' caller. If this is a feature of the\nSmartEiffel library, you may consider to post your implementation on the\nSmartEiffel mailing list.\n e-mail: SmartEiffel@loria.fr\n Happy debug and thanks in advance.\n http://SmartEiffel.loria.fr\n The SmartEiffel team.\n\nThe error occured in the type ";
char*s70_697="up";
char*s70_1961093439="marker_pen_2181";
@@ -2299,6 +2298,7 @@ char*s13_1210=".\n\n";
char*s70_1756148648=" predicted_x=";
char*s70_1756148653=" predicted_y=";
char*s25_1948078333="slider_event device_id=";
+char*s25_92383297="-application=";
char*s70_1461=" x=";
char*s70_1466=" y=";
char*s70_23436791=" presure=";
@@ -2316,6 +2316,7 @@ char*s25_1370426634="Detection de l\'option crop : ";
char*s70_2179769="pointer";
char*s25_751291742="\" is not a valid y_offset (an integer is needed).\n";
char*s25_1554692325="Missing bus identifier after -b option.\n";
+char*s70_2097616536="Recieved CHANGE_CROP message with invalid crop definition: ";
char*s25_357338863="\" is not a valid time (a real number is needed).\n";
char*s70_2676="Out";
char*s70_1874520032="stroke_pen_2098";
@@ -2334,6 +2335,11 @@ char*s70_188916=" time=";
char*s25_447643634="\" is not a valid pointer name.\n";
char*s70_2057747851="grip_pen_eraser_2091";
char*s25_3479972=" (Type: ";
+char*s25_1126339109="This tool get data from wacom pen screen and is\n able to send them to applications using ivy bus.\n\nOptions:\n -help: print this help.\n\n -list_devices: all available devices are listed.\n\n -pad=name: report pad data from the pad device with this name.\n\n -wacom_pointer=name: report pointer data from the pointer device with\n this name. Ex: stylus.\n\n -bus=[address]:port: specify the ivy bus (default is :3110).\n\n -b [address]:port: specify the ivy bus (default is :3110) (added for\n compatibility with other ivy tools).\n\n -application=name: specify the application name on the ivy bus\n (default is wacom).\n\n -identifier=id: this identifier will be used in ivy messages\n device_id value (default is \"default\").\n\n -x_offset=n: specify the x-offset for the wacom device\n for the display configuration (default is 0).\n\n -y_offset=n: "
+" specify the y-offset for the wacom device\n for the display configuration (default is 0).\n\n\011""-crop=xmin,ymin,xmax,ymax: outside this area, move events are not reported\n\011"" (values are integers in device coordinates). Hires values\n\011""\011""\011""\011""\011""\011""\011""\011""are mapped to [0,1] inside this window and over when outside.\n\n -prediction=t: change the prediction time for the physical position.\n (default is 25ms).\n\n -ignore=n: number of messages to ignore before sending a new\n position message (this reduces message frequency).\n (default is 0 => \176""120message/s).\n\011""\nOptions are considered in the order they appear in the command line. A new\nvalue overrides the previous one. \"wacom_pointer\" and \"pad\" are created where they\nappear, with known information.\n\nMessages:\n slider_event device_id=radar_wacom value=4 side=left time=4523271\n device_id: identifier (see options).\n "
+" value: new slider value (0 when the\n\011""\011""\011""\011""\011""\011""\011""\011""\011""\011""finger leaves the slider).\n side: left or right.\n time: event time (ms), X server reference.\n\n pad_event device_id=radar_wacom button=12 status=left time=4523271\n device_id: identifier (see options).\n button: button identifier.\n status: up or down.\n time: event time (ms), X server reference.\n\n button_event device_id=radar_wacom button=2 status=up x=1290 y=325\n presure=307 tilt_x=-20 tilt_y=15 wheel=0 predicted_x=1272 predicted_y=322\n type=123 serial_number=429389 time=4523271 hires_x=0.827 hires_y=0.231\n proximity=unchanged\n pointer_event device_id=radar_wacom x=1290 y=325\n presure=307 tilt_x=-20 tilt_y=15 wheel=0 predicted_x=1272 predicted_y=322\n type=123 serial_number=429389 time=4523271 hires_x=0.827 hires_y=0.231\n proximity=unchanged\n device_id: identifier (see opti"
+"ons).\n button: button identifier.\n status: up or down.\n x: pointer position (display coordinates).\n y: pointer position (display coordinates).\n presure: presure value ([0, 1023] for intuos 3).\n tilt_x: device tilt in degrees.\n tilt_y: device tilt in degrees.\n wheel: rotation value (device type dependent value).\n predicted_x: predicted position. It is expected to be\n the current position of the real device.\n predicted_y: predicted position. It is expected to be\n the current position of the real device.\n type: the type of the device (pen, eraser, mouse,\n cursor, airbrush...).\n serial_number: the serial number of the device.\n time: event"
+" time (ms), X server reference.\n hires_x: pointer position (device coordinates, in range [0,1]).\n hires_y: pointer position (device coordinates, in range [0,1]).\n proximity: unchanged, in, out\n\nCrop configuration can be changed dynamically sending a CHANGE_CROP message:\n CHANGE_CROP device_id=radar_wacom crop=52320,14596,86600,38102\n";
char*s25_557679246=" available)";
char*s25_1638797568=" side=right time=";
char*s25_1260406502="Unknown option ";
@@ -3453,7 +3459,7 @@ void mark_stack_and_registers(void){
}
#endif
-unsigned int fsoc_count_ceil=308;
+unsigned int fsoc_count_ceil=320;
unsigned int rsoc_count_ceil=87;
/*INTEGER_16*/T2 r10to_integer_32(T10 C){
@@ -3666,14 +3672,14 @@ R=((T6)(tmp0/*or else*/));
return R;
}/*--*/
-/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/T334 r334realloc(T334 C,T2 a1,T2 a2){
-T334 R=(void*)0;
-R=new334(a2);
-r334copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
+/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/T335 r335realloc(T335 C,T2 a1,T2 a2){
+T335 R=(void*)0;
+R=new335(a2);
+r335copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
return R;
}/*--*/
-/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r334copy_from(T334 C,T334 a1,T2 a2){
+/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r335copy_from(T335 C,T335 a1,T2 a2){
T2 _i=0;
_i=a2;
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -3683,7 +3689,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r334clear_all(T334 C,T2 a1){
+/*NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r335clear_all(T335 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3694,7 +3700,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]*/void r333clear_all(T333 C,T2 a1){
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]*/void r334clear_all(T334 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3705,14 +3711,14 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[JOB]*/T332 r332realloc(T332 C,T2 a1,T2 a2){
-T332 R=(void*)0;
-R=new332(a2);
-r332copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
+/*NATIVE_ARRAY[JOB]*/T333 r333realloc(T333 C,T2 a1,T2 a2){
+T333 R=(void*)0;
+R=new333(a2);
+r333copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
return R;
}/*--*/
-/*NATIVE_ARRAY[JOB]*/void r332copy_from(T332 C,T332 a1,T2 a2){
+/*NATIVE_ARRAY[JOB]*/void r333copy_from(T333 C,T333 a1,T2 a2){
T2 _i=0;
_i=a2;
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -3722,7 +3728,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[JOB]*/void r332clear_all(T332 C,T2 a1){
+/*NATIVE_ARRAY[JOB]*/void r333clear_all(T333 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3733,7 +3739,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[JOB]*/void r332remove(T332 C,T2 a1,T2 a2){
+/*NATIVE_ARRAY[JOB]*/void r333remove(T333 C,T2 a1,T2 a2){
T2 _i=0;
_i=a1;
while(!((_i)==(a2)))
@@ -3859,14 +3865,14 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[BUTTON_RANGE]*/T304 r304realloc(T304 C,T2 a1,T2 a2){
-T304 R=(void*)0;
-R=new304(a2);
-r304copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
+/*NATIVE_ARRAY[BUTTON_RANGE]*/T298 r298realloc(T298 C,T2 a1,T2 a2){
+T298 R=(void*)0;
+R=new298(a2);
+r298copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
return R;
}/*--*/
-/*NATIVE_ARRAY[BUTTON_RANGE]*/void r304copy_from(T304 C,T304 a1,T2 a2){
+/*NATIVE_ARRAY[BUTTON_RANGE]*/void r298copy_from(T298 C,T298 a1,T2 a2){
T2 _i=0;
_i=a2;
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -3876,7 +3882,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[BUTTON_RANGE]*/void r304clear_all(T304 C,T2 a1){
+/*NATIVE_ARRAY[BUTTON_RANGE]*/void r298clear_all(T298 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3887,14 +3893,14 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[AXES_RANGE]*/T303 r303realloc(T303 C,T2 a1,T2 a2){
-T303 R=(void*)0;
-R=new303(a2);
-r303copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
+/*NATIVE_ARRAY[AXES_RANGE]*/T299 r299realloc(T299 C,T2 a1,T2 a2){
+T299 R=(void*)0;
+R=new299(a2);
+r299copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
return R;
}/*--*/
-/*NATIVE_ARRAY[AXES_RANGE]*/void r303copy_from(T303 C,T303 a1,T2 a2){
+/*NATIVE_ARRAY[AXES_RANGE]*/void r299copy_from(T299 C,T299 a1,T2 a2){
T2 _i=0;
_i=a2;
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -3904,7 +3910,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[AXES_RANGE]*/void r303clear_all(T303 C,T2 a1){
+/*NATIVE_ARRAY[AXES_RANGE]*/void r299clear_all(T299 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3915,7 +3921,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]*/void r301clear_all(T301 C,T2 a1){
+/*NATIVE_ARRAY[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]*/void r302clear_all(T302 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3926,7 +3932,7 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r299clear_all(T299 C,T2 a1){
+/*NATIVE_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r301clear_all(T301 C,T2 a1){
T0* _v=(void*)0;
T2 _i=0;
_i=a1;
@@ -3948,13 +3954,6 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[INTEGER_32]*/T294 r294realloc(T294 C,T2 a1,T2 a2){
-T294 R=(void*)0;
-R=new294(a2);
-r294copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
-return R;
-}/*--*/
-
/*NATIVE_ARRAY[INTEGER_32]*/void r294set_slice_with(T294 C,T2 a1,T2 a2,T2 a3){
T2 _i=0;
_i=a2;
@@ -3965,6 +3964,13 @@ _i=((int32_t)(_i))+(INT32_C(1));
}
}/*--*/
+/*NATIVE_ARRAY[INTEGER_32]*/T294 r294realloc(T294 C,T2 a1,T2 a2){
+T294 R=(void*)0;
+R=new294(a2);
+r294copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
+return R;
+}/*--*/
+
/*NATIVE_ARRAY[INTEGER_32]*/void r294copy_from(T294 C,T294 a1,T2 a2){
T2 _i=0;
_i=a2;
@@ -4025,23 +4031,23 @@ r282copy_from(R,C,((int32_t)(a1))-(INT32_C(1)));
return R;
}/*--*/
-/*NATIVE_ARRAY[IVY_CLIENT]*/void r282copy_from(T282 C,T282 a1,T2 a2){
+/*NATIVE_ARRAY[IVY_CLIENT]*/void r282clear_all(T282 C,T2 a1){
+T0* _v=(void*)0;
T2 _i=0;
-_i=a2;
+_i=a1;
while(!(((int32_t)(_i))<(INT32_C(0))))
{
-(C)[_i]=((a1)[_i]);
+(C)[_i]=(_v);
_i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[IVY_CLIENT]*/void r282clear_all(T282 C,T2 a1){
-T0* _v=(void*)0;
+/*NATIVE_ARRAY[IVY_CLIENT]*/void r282copy_from(T282 C,T282 a1,T2 a2){
T2 _i=0;
-_i=a1;
+_i=a2;
while(!(((int32_t)(_i))<(INT32_C(0))))
{
-(C)[_i]=(_v);
+(C)[_i]=((a1)[_i]);
_i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
@@ -4116,6 +4122,17 @@ _i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
+/*NATIVE_ARRAY[X_INPUT_DEVICE]*/void r265clear_all(T265 C,T2 a1){
+T0* _v=(void*)0;
+T2 _i=0;
+_i=a1;
+while(!(((int32_t)(_i))<(INT32_C(0))))
+{
+(C)[_i]=(_v);
+_i=((int32_t)(_i))-(INT32_C(1));
+}
+}/*--*/
+
/*NATIVE_ARRAY[STRING]*/T267 r267realloc(T267 C,T2 a1,T2 a2){
T267 R=(void*)0;
R=new267(a2);
@@ -4165,17 +4182,6 @@ _i=((int32_t)(_i))+(INT32_C(1));
}
}/*--*/
-/*NATIVE_ARRAY[X_INPUT_DEVICE]*/void r263clear_all(T263 C,T2 a1){
-T0* _v=(void*)0;
-T2 _i=0;
-_i=a1;
-while(!(((int32_t)(_i))<(INT32_C(0))))
-{
-(C)[_i]=(_v);
-_i=((int32_t)(_i))-(INT32_C(1));
-}
-}/*--*/
-
/*NATIVE_ARRAY[CHARACTER]*/void r9fast_replace_all(T9 C,T3 a1,T3 a2,T2 a3){
T2 _i=0;
_i=a3;
@@ -4459,6 +4465,19 @@ _i=((int32_t)(_i))+(INT32_C(1));
/*SFN*/(C->_count/*3p*/)=((int32_t)((/*RF2*/(C)->_count/*3p*/)))-(_len);
}
}/*--*/
+
+/*STRING*/void r7copy(T7* C,T0* a1){
+T2 _c=0;
+_c=(/*RF2*/(((T7*)a1))->_count/*3p*/);
+if(((int32_t)(_c))>(INT32_C(0))){
+if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))<(_c)){
+/*SFN*/(C->_storage/*3p*/)=new9(_c);
+/*SFN*/(C->_capacity/*3p*/)=_c;
+}
+r9copy_from((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(((T7*)a1))->_storage/*3p*/),((int32_t)(_c))-(INT32_C(1)));
+}
+/*SFN*/(C->_count/*3p*/)=_c;
+}/*--*/
T0*oBC7string_buffer=(void*)0;
int fBC7string_buffer=0;
@@ -4490,19 +4509,6 @@ oBC7split_buffer=tmp0/*new*/;
return oBC7split_buffer;
}/*--*/
-/*STRING*/void r7copy(T7* C,T0* a1){
-T2 _c=0;
-_c=(/*RF2*/(((T7*)a1))->_count/*3p*/);
-if(((int32_t)(_c))>(INT32_C(0))){
-if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))<(_c)){
-/*SFN*/(C->_storage/*3p*/)=new9(_c);
-/*SFN*/(C->_capacity/*3p*/)=_c;
-}
-r9copy_from((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(((T7*)a1))->_storage/*3p*/),((int32_t)(_c))-(INT32_C(1)));
-}
-/*SFN*/(C->_count/*3p*/)=_c;
-}/*--*/
-
/*STRING*/T0* r7split(T7* C){
T0* R=(void*)0;
if(((int32_t)((/*RF2*/(C)->_count/*3p*/)))>(INT32_C(0))){
@@ -4871,6 +4877,13 @@ R=((T6)(((int32_t)(_state))>=(INT32_C(3))));
return R;
}/*--*/
+/*STRING*/T0* r7twin(T7* C){
+T0* R=(void*)0;
+R=(void*)new7();
+r7copy(((T7*)R),((T0*)C));
+return R;
+}/*--*/
+
/*STRING*/void r7remove_tail(T7* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_count/*3p*/))){
/*SFN*/(C->_count/*3p*/)=INT32_C(0);
@@ -4880,10 +4893,28 @@ else{
}
}/*--*/
-/*STRING*/T0* r7twin(T7* C){
-T0* R=(void*)0;
-R=(void*)new7();
-r7copy(((T7*)R),((T0*)C));
+/*STRING*/T6 r7has_prefix(T7* C,T0* a1){
+/*[INTERNAL_C_LOCAL list*/
+T6 tmp0;
+/*INTERNAL_C_LOCAL list]*/
+T6 R=0;
+T2 _i=0;
+if(((int32_t)((/*RF2*/(((T7*)a1))->_count/*3p*/)))<=((/*RF2*/(C)->_count/*3p*/))){
+_i=(/*RF2*/(((T7*)a1))->_count/*3p*/);
+while(1){
+tmp0/*or else*/=((T6)((_i)==(INT8_C(0))));
+if(tmp0/*or else*/){
+}
+else{
+tmp0/*or else*/=((T6)((r7item(C,_i))!=(r7item(((T7*)a1),_i))));
+}
+if(tmp0/*or else*/){
+break;
+}
+_i=((int32_t)(_i))-(INT32_C(1));
+}
+R=((T6)((_i)==(INT8_C(0))));
+}
return R;
}/*--*/
@@ -5101,36 +5132,36 @@ R=r9fast_occurrences((/*RF2*/(C)->_storage/*3p*/),a1,((int32_t)((/*RF2*/(C)->_co
return R;
}/*--*/
-/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r298make(T298* C,T2 a1){
+/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r300make(T300* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
-/*SFN*/(C->_storage/*3p*/)=new334(a1);
+/*SFN*/(C->_storage/*3p*/)=new335(a1);
/*SFN*/(C->_capacity/*3p*/)=a1;
}
else{
if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
-r334clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
+r335clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
}
}
}
/*SFN*/(C->_upper/*3p*/)=((int32_t)(a1))-(INT32_C(1));
}/*--*/
-/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r298add_last(T298* C,T0* a1){
+/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r300add_last(T300* C,T0* a1){
T2 _new_capacity=0;
if(((int32_t)(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1))))<=(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))-(INT32_C(1)))){
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
else{
if(((/*RF2*/(C)->_capacity/*3p*/))==(INT8_C(0))){
-/*SFN*/(C->_storage/*3p*/)=new334(INT32_C(2));
+/*SFN*/(C->_storage/*3p*/)=new335(INT32_C(2));
/*SFN*/(C->_capacity/*3p*/)=INT32_C(2);
/*SFN*/(C->_upper/*3p*/)=INT32_C(0);
}
else{
_new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
-/*SFN*/(C->_storage/*3p*/)=r334realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
+/*SFN*/(C->_storage/*3p*/)=r335realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
/*SFN*/(C->_capacity/*3p*/)=_new_capacity;
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
@@ -5138,7 +5169,7 @@ _new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
((/*RF2*/(C)->_storage/*3p*/))[(/*RF2*/(C)->_upper/*3p*/)]=(a1);
}/*--*/
-/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r298mark_native_arrays(T298* C){
+/*FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]*/void r300mark_native_arrays(T300* C){
T2 _i=0;
_i=(/*RF2*/(C)->_upper/*3p*/);
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -5150,21 +5181,48 @@ if(NULL!=elt)gc_mark244((T244*)(elt));
}
}/*--*/
+/*FAST_ARRAY[JOB]*/void r280move(T280* C,T2 a1,T2 a2,T2 a3){
+T0* _default_value=(void*)0;
+T2 _i=0;
+if((a3)==(INT8_C(0))){
+}
+else{
+if(((int32_t)(a3))<(INT32_C(0))){
+_i=a1;
+while(!(((int32_t)(_i))>(a2)))
+{
+((/*RF2*/(C)->_storage/*3p*/))[((int32_t)(_i))+(a3)]=(((/*RF2*/(C)->_storage/*3p*/))[_i]);
+((/*RF2*/(C)->_storage/*3p*/))[_i]=(_default_value);
+_i=((int32_t)(_i))+(INT32_C(1));
+}
+}
+else{
+_i=a2;
+while(!(((int32_t)(_i))<(a1)))
+{
+((/*RF2*/(C)->_storage/*3p*/))[((int32_t)(_i))+(a3)]=(((/*RF2*/(C)->_storage/*3p*/))[_i]);
+((/*RF2*/(C)->_storage/*3p*/))[_i]=(_default_value);
+_i=((int32_t)(_i))-(INT32_C(1));
+}
+}
+}
+}/*--*/
+
/*FAST_ARRAY[JOB]*/void r280remove(T280* C,T2 a1){
-r332remove((/*RF2*/(C)->_storage/*3p*/),a1,(/*RF2*/(C)->_upper/*3p*/));
+r333remove((/*RF2*/(C)->_storage/*3p*/),a1,(/*RF2*/(C)->_upper/*3p*/));
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))-(INT32_C(1));
}/*--*/
/*FAST_ARRAY[JOB]*/void r280make(T280* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
-/*SFN*/(C->_storage/*3p*/)=new332(a1);
+/*SFN*/(C->_storage/*3p*/)=new333(a1);
/*SFN*/(C->_capacity/*3p*/)=a1;
}
else{
if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
-r332clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
+r333clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
}
}
}
@@ -5178,13 +5236,13 @@ if(((int32_t)(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1))))<=(((int32_t
}
else{
if(((/*RF2*/(C)->_capacity/*3p*/))==(INT8_C(0))){
-/*SFN*/(C->_storage/*3p*/)=new332(INT32_C(2));
+/*SFN*/(C->_storage/*3p*/)=new333(INT32_C(2));
/*SFN*/(C->_capacity/*3p*/)=INT32_C(2);
/*SFN*/(C->_upper/*3p*/)=INT32_C(0);
}
else{
_new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
-/*SFN*/(C->_storage/*3p*/)=r332realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
+/*SFN*/(C->_storage/*3p*/)=r333realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
/*SFN*/(C->_capacity/*3p*/)=_new_capacity;
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
@@ -5221,33 +5279,6 @@ r280move(C,a2,((int32_t)((/*RF2*/(C)->_upper/*3p*/)))-(INT32_C(1)),INT32_C(1));
}
}/*--*/
-/*FAST_ARRAY[JOB]*/void r280move(T280* C,T2 a1,T2 a2,T2 a3){
-T0* _default_value=(void*)0;
-T2 _i=0;
-if((a3)==(INT8_C(0))){
-}
-else{
-if(((int32_t)(a3))<(INT32_C(0))){
-_i=a1;
-while(!(((int32_t)(_i))>(a2)))
-{
-((/*RF2*/(C)->_storage/*3p*/))[((int32_t)(_i))+(a3)]=(((/*RF2*/(C)->_storage/*3p*/))[_i]);
-((/*RF2*/(C)->_storage/*3p*/))[_i]=(_default_value);
-_i=((int32_t)(_i))+(INT32_C(1));
-}
-}
-else{
-_i=a2;
-while(!(((int32_t)(_i))<(a1)))
-{
-((/*RF2*/(C)->_storage/*3p*/))[((int32_t)(_i))+(a3)]=(((/*RF2*/(C)->_storage/*3p*/))[_i]);
-((/*RF2*/(C)->_storage/*3p*/))[_i]=(_default_value);
-_i=((int32_t)(_i))-(INT32_C(1));
-}
-}
-}
-}/*--*/
-
/*FAST_ARRAY[TOPLEVEL_WINDOW]*/void r279make(T279* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
/*SFN*/(C->_storage/*3p*/)=new331(a1);
@@ -5380,36 +5411,36 @@ if(NULL!=elt)gc_mark146((T146*)(elt));
}
}/*--*/
-/*FAST_ARRAY[BUTTON_RANGE]*/void r265make(T265* C,T2 a1){
+/*FAST_ARRAY[BUTTON_RANGE]*/void r260make(T260* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
-/*SFN*/(C->_storage/*3p*/)=new304(a1);
+/*SFN*/(C->_storage/*3p*/)=new298(a1);
/*SFN*/(C->_capacity/*3p*/)=a1;
}
else{
if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
-r304clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
+r298clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
}
}
}
/*SFN*/(C->_upper/*3p*/)=((int32_t)(a1))-(INT32_C(1));
}/*--*/
-/*FAST_ARRAY[BUTTON_RANGE]*/void r265add_last(T265* C,T0* a1){
+/*FAST_ARRAY[BUTTON_RANGE]*/void r260add_last(T260* C,T0* a1){
T2 _new_capacity=0;
if(((int32_t)(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1))))<=(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))-(INT32_C(1)))){
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
else{
if(((/*RF2*/(C)->_capacity/*3p*/))==(INT8_C(0))){
-/*SFN*/(C->_storage/*3p*/)=new304(INT32_C(2));
+/*SFN*/(C->_storage/*3p*/)=new298(INT32_C(2));
/*SFN*/(C->_capacity/*3p*/)=INT32_C(2);
/*SFN*/(C->_upper/*3p*/)=INT32_C(0);
}
else{
_new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
-/*SFN*/(C->_storage/*3p*/)=r304realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
+/*SFN*/(C->_storage/*3p*/)=r298realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
/*SFN*/(C->_capacity/*3p*/)=_new_capacity;
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
@@ -5417,7 +5448,7 @@ _new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
((/*RF2*/(C)->_storage/*3p*/))[(/*RF2*/(C)->_upper/*3p*/)]=(a1);
}/*--*/
-/*FAST_ARRAY[BUTTON_RANGE]*/void r265mark_native_arrays(T265* C){
+/*FAST_ARRAY[BUTTON_RANGE]*/void r260mark_native_arrays(T260* C){
T2 _i=0;
_i=(/*RF2*/(C)->_upper/*3p*/);
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -5429,36 +5460,36 @@ if(NULL!=elt)gc_mark149((T149*)(elt));
}
}/*--*/
-/*FAST_ARRAY[AXES_RANGE]*/void r264make(T264* C,T2 a1){
+/*FAST_ARRAY[AXES_RANGE]*/void r261make(T261* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
-/*SFN*/(C->_storage/*3p*/)=new303(a1);
+/*SFN*/(C->_storage/*3p*/)=new299(a1);
/*SFN*/(C->_capacity/*3p*/)=a1;
}
else{
if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
-r303clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
+r299clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
}
}
}
/*SFN*/(C->_upper/*3p*/)=((int32_t)(a1))-(INT32_C(1));
}/*--*/
-/*FAST_ARRAY[AXES_RANGE]*/void r264add_last(T264* C,T0* a1){
+/*FAST_ARRAY[AXES_RANGE]*/void r261add_last(T261* C,T0* a1){
T2 _new_capacity=0;
if(((int32_t)(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1))))<=(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))-(INT32_C(1)))){
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
else{
if(((/*RF2*/(C)->_capacity/*3p*/))==(INT8_C(0))){
-/*SFN*/(C->_storage/*3p*/)=new303(INT32_C(2));
+/*SFN*/(C->_storage/*3p*/)=new299(INT32_C(2));
/*SFN*/(C->_capacity/*3p*/)=INT32_C(2);
/*SFN*/(C->_upper/*3p*/)=INT32_C(0);
}
else{
_new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
-/*SFN*/(C->_storage/*3p*/)=r303realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
+/*SFN*/(C->_storage/*3p*/)=r299realloc((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_capacity/*3p*/),_new_capacity);
/*SFN*/(C->_capacity/*3p*/)=_new_capacity;
/*SFN*/(C->_upper/*3p*/)=((int32_t)((/*RF2*/(C)->_upper/*3p*/)))+(INT32_C(1));
}
@@ -5466,7 +5497,7 @@ _new_capacity=((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))*(INT32_C(2));
((/*RF2*/(C)->_storage/*3p*/))[(/*RF2*/(C)->_upper/*3p*/)]=(a1);
}/*--*/
-/*FAST_ARRAY[AXES_RANGE]*/void r264mark_native_arrays(T264* C){
+/*FAST_ARRAY[AXES_RANGE]*/void r261mark_native_arrays(T261* C){
T2 _i=0;
_i=(/*RF2*/(C)->_upper/*3p*/);
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -5478,30 +5509,30 @@ if(NULL!=elt)gc_mark148((T148*)(elt));
}
}/*--*/
-/*FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r261make(T261* C,T2 a1){
+/*FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r263make(T263* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
-/*SFN*/(C->_storage/*3p*/)=new299(a1);
+/*SFN*/(C->_storage/*3p*/)=new301(a1);
/*SFN*/(C->_capacity/*3p*/)=a1;
}
else{
if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
-r299clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
+r301clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
}
}
}
/*SFN*/(C->_upper/*3p*/)=((int32_t)(a1))-(INT32_C(1));
}/*--*/
-/*FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r261mark_native_arrays(T261* C){
+/*FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]*/void r263mark_native_arrays(T263* C){
T2 _i=0;
_i=(/*RF2*/(C)->_upper/*3p*/);
while(!(((int32_t)(_i))<(INT32_C(0))))
{
{/*mark_item*/
T0* elt=(/*RF2*/(C)->_storage/*3p*/)[_i];
-if(NULL!=elt)gc_mark260((T260*)(elt));
+if(NULL!=elt)gc_mark262((T262*)(elt));
/*mark_item*/}_i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
@@ -5537,10 +5568,6 @@ T0* _value=(void*)0;
r256set_all_with(C,_value);
}/*--*/
-/*ARRAY[STRING]*/void r256set_all_with(T256* C,T0* a1){
-r267set_all_with((/*RF2*/(C)->_storage/*4p*/),a1,((int32_t)((/*RF2*/(C)->_upper/*4p*/)))-((/*RF2*/(C)->_lower/*4p*/)));
-}/*--*/
-
/*ARRAY[STRING]*/void r256copy(T256* C,T0* a1){
T2 _needed_capacity=0;
/*SFN*/(C->_lower/*4p*/)=(/*RF2*/(((T256*)a1))->_lower/*4p*/);
@@ -5555,6 +5582,10 @@ r267copy_from((/*RF2*/(C)->_storage/*4p*/),(/*RF2*/(((T256*)a1))->_storage/*4p*/
}
}/*--*/
+/*ARRAY[STRING]*/void r256set_all_with(T256* C,T0* a1){
+r267set_all_with((/*RF2*/(C)->_storage/*4p*/),a1,((int32_t)((/*RF2*/(C)->_upper/*4p*/)))-((/*RF2*/(C)->_lower/*4p*/)));
+}/*--*/
+
/*ARRAY[STRING]*/T0* r256twin(T256* C){
T0* R=(void*)0;
R=(void*)new256();
@@ -5733,7 +5764,7 @@ while(!(((int32_t)(_i))<(INT32_C(0))))
{
{/*mark_item*/
T0* elt=(/*RF2*/(C)->_storage/*3p*/)[_i];
-if(NULL!=elt)gc_mark153((T153*)(elt));
+if(NULL!=elt)gc_mark154((T154*)(elt));
/*mark_item*/}_i=((int32_t)(_i))-(INT32_C(1));
}
}/*--*/
@@ -5811,6 +5842,34 @@ if(NULL!=elt)gc_mark155((T155*)(elt));
}
}/*--*/
+/*FAST_ARRAY[X_INPUT_DEVICE]*/void r246make(T246* C,T2 a1){
+if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
+/*SFN*/(C->_storage/*3p*/)=new265(a1);
+/*SFN*/(C->_capacity/*3p*/)=a1;
+}
+else{
+if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
+/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
+if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
+r265clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
+}
+}
+}
+/*SFN*/(C->_upper/*3p*/)=((int32_t)(a1))-(INT32_C(1));
+}/*--*/
+
+/*FAST_ARRAY[X_INPUT_DEVICE]*/void r246mark_native_arrays(T246* C){
+T2 _i=0;
+_i=(/*RF2*/(C)->_upper/*3p*/);
+while(!(((int32_t)(_i))<(INT32_C(0))))
+{
+{/*mark_item*/
+T0* elt=(/*RF2*/(C)->_storage/*3p*/)[_i];
+if(NULL!=elt)gc_mark68((T68*)(elt));
+/*mark_item*/}_i=((int32_t)(_i))-(INT32_C(1));
+}
+}/*--*/
+
/*FAST_ARRAY[STRING]*/void r247make(T247* C,T2 a1){
if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
/*SFN*/(C->_storage/*3p*/)=new267(a1);
@@ -5873,34 +5932,6 @@ if(NULL!=elt)gc_mark7((T7*)(elt));
}
}/*--*/
-/*FAST_ARRAY[X_INPUT_DEVICE]*/void r246make(T246* C,T2 a1){
-if(((int32_t)(a1))>((/*RF2*/(C)->_capacity/*3p*/))){
-/*SFN*/(C->_storage/*3p*/)=new263(a1);
-/*SFN*/(C->_capacity/*3p*/)=a1;
-}
-else{
-if(((int32_t)((/*RF2*/(C)->_capacity/*3p*/)))>(INT32_C(0))){
-/*SFN*/(C->_upper/*3p*/)=r2max((/*RF2*/(C)->_upper/*3p*/),((int32_t)(a1))-(INT32_C(1)));
-if(((int32_t)((/*RF2*/(C)->_upper/*3p*/)))>=(INT32_C(0))){
-r263clear_all((/*RF2*/(C)->_storage/*3p*/),(/*RF2*/(C)->_upper/*3p*/));
-}
-}
-}
-/*SFN*/(C->_upper/*3p*/)=((int32_t)(a1))-(INT32_C(1));
-}/*--*/
-
-/*FAST_ARRAY[X_INPUT_DEVICE]*/void r246mark_native_arrays(T246* C){
-T2 _i=0;
-_i=(/*RF2*/(C)->_upper/*3p*/);
-while(!(((int32_t)(_i))<(INT32_C(0))))
-{
-{/*mark_item*/
-T0* elt=(/*RF2*/(C)->_storage/*3p*/)[_i];
-if(NULL!=elt)gc_mark68((T68*)(elt));
-/*mark_item*/}_i=((int32_t)(_i))-(INT32_C(1));
-}
-}/*--*/
-
/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[SENSITIVE,POINTER]]*/void r329set_item(T329* C,T0* a1){
/*SFN*/(C->_item/*ip*/)=a1;
}/*--*/
@@ -5933,11 +5964,11 @@ if(NULL!=elt)gc_mark68((T68*)(elt));
/*SFN*/(C->_next/*3p*/)=a3;
}/*--*/
-/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]*/void r302set_item(T302* C,T0* a1){
+/*WEAK_REFERENCE[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]*/void r304set_item(T304* C,T0* a1){
/*SFN*/(C->_item/*ip*/)=a1;
}/*--*/
-/*HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r300make(T300* C,T0* a1,T0* a2,T0* a3){
+/*HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r303make(T303* C,T0* a1,T0* a2,T0* a3){
/*SFN*/(C->_item/*3p*/)=a1;
/*SFN*/(C->_key/*3p*/)=a2;
/*SFN*/(C->_next/*3p*/)=a3;
@@ -5957,6 +5988,12 @@ if(NULL!=elt)gc_mark68((T68*)(elt));
/*SFN*/(C->_item/*ip*/)=a1;
}/*--*/
+/*HASHED_DICTIONARY_NODE[POINTER,STRING]*/void r292make(T292* C,T8 a1,T0* a2,T0* a3){
+/*SFN*/(C->_item/*3p*/)=a1;
+/*SFN*/(C->_key/*3p*/)=a2;
+/*SFN*/(C->_next/*3p*/)=a3;
+}/*--*/
+
/*HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/void r290make(T290* C,T0* a1,T0* a2,T0* a3){
/*SFN*/(C->_item/*3p*/)=a1;
/*SFN*/(C->_key/*3p*/)=a2;
@@ -6187,7 +6224,7 @@ return R;
/*HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]*/void r288special_common_dictionary(T288* C,T0* a1){
T2 _new_capacity=0;
_new_capacity=INT32_C(53);
-/*SFN*/(C->_buckets/*5p*/)=new333(_new_capacity);
+/*SFN*/(C->_buckets/*5p*/)=new334(_new_capacity);
/*SFN*/(C->_capacity/*5p*/)=_new_capacity;
/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
/*SFN*/(C->_count/*5p*/)=INT32_C(0);
@@ -6198,12 +6235,12 @@ _new_capacity=INT32_C(53);
T2 _i=0;
T2 _idx=0;
T2 _new_capacity=0;
-T333 _old_buckets=(void*)0;
+T334 _old_buckets=(void*)0;
T0* _node1=(void*)0;
T0* _node2=(void*)0;
_new_capacity=r288prime_capacity(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+(INT32_C(1)));
_old_buckets=(/*RF2*/(C)->_buckets/*5p*/);
-/*SFN*/(C->_buckets/*5p*/)=new333(_new_capacity);
+/*SFN*/(C->_buckets/*5p*/)=new334(_new_capacity);
_i=((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))-(INT32_C(1));
/*SFN*/(C->_capacity/*5p*/)=_new_capacity;
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -6239,6 +6276,12 @@ _node=r288new_node(C,a1,a2,((/*RF2*/(C)->_buckets/*5p*/))[_idx]);
/*SFN*/(C->_item/*ip*/)=a1;
}/*--*/
+/*HASHED_DICTIONARY_NODE[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r284make(T284* C,T0* a1,T0* a2,T0* a3){
+/*SFN*/(C->_item/*3p*/)=a1;
+/*SFN*/(C->_key/*3p*/)=a2;
+/*SFN*/(C->_next/*3p*/)=a3;
+}/*--*/
+
/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T0* r276reference_at(T276* C,T8 a1){
/*[INTERNAL_C_LOCAL list*/
T6 tmp0;
@@ -6266,6 +6309,10 @@ R=(/*RF2*/(((T327*)_node))->_item/*3p*/);
return R;
}/*--*/
+/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/void r276make(T276* C){
+r276create_with_capacity(C,INT32_C(53));
+}/*--*/
+
/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T6 r276key_safe_equal(T8 a1,T8 a2){
T6 R=0;
if((a1)==(a2)){
@@ -6277,10 +6324,6 @@ R=((T6)((a1)==(a2)));
return R;
}/*--*/
-/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/void r276make(T276* C){
-r276create_with_capacity(C,INT32_C(53));
-}/*--*/
-
/*HASHED_DICTIONARY[SENSITIVE,POINTER]*/T2 r276prime_capacity(T2 a1){
T2 R=0;
R=(int32_t)(((uint32_t)(a1))+((uint32_t)(((int32_t)(a1))/(INT32_C(2)))));
@@ -6765,6 +6808,10 @@ R=(/*RF2*/(((T307*)_node))->_item/*3p*/);
return R;
}/*--*/
+/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/void r268make(T268* C){
+r268create_with_capacity(C,INT32_C(53));
+}/*--*/
+
/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T6 r268key_safe_equal(T2 a1,T2 a2){
T6 R=0;
if((a1)==(a2)){
@@ -6776,10 +6823,6 @@ R=((T6)((a1)==(a2)));
return R;
}/*--*/
-/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/void r268make(T268* C){
-r268create_with_capacity(C,INT32_C(53));
-}/*--*/
-
/*HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]*/T2 r268prime_capacity(T2 a1){
T2 R=0;
R=(int32_t)(((uint32_t)(a1))+((uint32_t)(((int32_t)(a1))/(INT32_C(2)))));
@@ -7035,7 +7078,11 @@ _i=((int32_t)(_i))-(INT32_C(1));
/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r262reference_at(T262* C,T0* a1){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r264make(T264* C){
+r264create_with_capacity(C,INT32_C(53));
+}/*--*/
+
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r264reference_at(T264* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T6 tmp0;
/*INTERNAL_C_LOCAL list]*/
@@ -7049,20 +7096,20 @@ tmp0/*or else*/=((T6)((_node)==((void*)((void*)0))));
if(tmp0/*or else*/){
}
else{
-tmp0/*or else*/=((T6)(r262key_safe_equal((/*RF2*/(((T300*)_node))->_key/*3p*/),a1)));
+tmp0/*or else*/=((T6)(r264key_safe_equal((/*RF2*/(((T303*)_node))->_key/*3p*/),a1)));
}
if(tmp0/*or else*/){
break;
}
-_node=(/*RF2*/(((T300*)_node))->_next/*3p*/);
+_node=(/*RF2*/(((T303*)_node))->_next/*3p*/);
}
if((_node)!=((void*)((void*)0))){
-R=(/*RF2*/(((T300*)_node))->_item/*3p*/);
+R=(/*RF2*/(((T303*)_node))->_item/*3p*/);
}
return R;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T6 r262key_safe_equal(T0* a1,T0* a2){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T6 r264key_safe_equal(T0* a1,T0* a2){
T6 R=0;
if((a1)==((void*)(a2))){
R=((T6)(1));
@@ -7073,23 +7120,19 @@ R=((T6)(!memcmp(((T73*)/*no_dispatch.e*/a1),(a2),sizeof(T73))));
return R;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r262make(T262* C){
-r262create_with_capacity(C,INT32_C(53));
-}/*--*/
-
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T2 r262prime_capacity(T2 a1){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T2 r264prime_capacity(T2 a1){
T2 R=0;
R=(int32_t)(((uint32_t)(a1))+((uint32_t)(((int32_t)(a1))/(INT32_C(2)))));
if(((int32_t)(R))>(INT32_C(0))){
-R=r262prime_number_ceiling(R);
+R=r264prime_number_ceiling(R);
}
else{
-R=r262prime_number_ceiling(INT32_C(2147483647));
+R=r264prime_number_ceiling(INT32_C(2147483647));
}
return R;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T2 r262prime_number_ceiling(T2 a1){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T2 r264prime_number_ceiling(T2 a1){
T2 R=0;
if(((int32_t)(a1))<=(INT32_C(98317))){
if(((int32_t)(a1))<=(INT32_C(769))){
@@ -7235,7 +7278,7 @@ R=INT32_C(2147483647);
return R;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T6 r262should_increase_capacity(T2 a1,T2 a2){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T6 r264should_increase_capacity(T2 a1,T2 a2){
/*[INTERNAL_C_LOCAL list*/
T6 tmp0;
/*INTERNAL_C_LOCAL list]*/
@@ -7248,7 +7291,7 @@ R=((T6)(tmp0/*and then*/));
return R;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r262common_free_nodes(void){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r264common_free_nodes(void){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
@@ -7267,53 +7310,53 @@ r288add(((T288*)/*no_dispatch.e*/oBC143common_free_nodes),_fn,(T0*)(t[288]));
return oBC143common_free_nodes;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r262new_node(T262* C,T0* a1,T0* a2,T0* a3){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/T0* r264new_node(T264* C,T0* a1,T0* a2,T0* a3){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
T0* R=(void*)0;
-R=(/*RF2*/((T302*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/);
+R=(/*RF2*/((T304*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/);
if((R)==((void*)((void*)0))){
-tmp0/*new*/=((T0*)(new300()));
-r300make(((T300*)tmp0/*new*/),a1,a2,a3);
+tmp0/*new*/=((T0*)(new303()));
+r303make(((T303*)tmp0/*new*/),a1,a2,a3);
R=tmp0/*new*/;
/*tmp0.unlock*/
}
else{
-(/*RF2*/((T302*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/)=(/*RF2*/(((T300*)R))->_next/*3p*/);
-r300make(((T300*)R),a1,a2,a3);
+(/*RF2*/((T304*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/)=(/*RF2*/(((T303*)R))->_next/*3p*/);
+r303make(((T303*)R),a1,a2,a3);
}
return R;
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r262create_with_capacity(T262* C,T2 a1){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r264create_with_capacity(T264* C,T2 a1){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
-/*SFN*/(C->_free_nodes/*5p*/)=r288fast_reference_at(((T288*)/*no_dispatch.e*/r262common_free_nodes()),(T0*)(t[262]));
+/*SFN*/(C->_free_nodes/*5p*/)=r288fast_reference_at(((T288*)/*no_dispatch.e*/r264common_free_nodes()),(T0*)(t[264]));
if(((/*RF2*/(C)->_free_nodes/*5p*/))==((void*)((void*)0))){
-tmp0/*new*/=((T0*)(new302()));
-r302set_item(((T302*)tmp0/*new*/),(void*)0);
+tmp0/*new*/=((T0*)(new304()));
+r304set_item(((T304*)tmp0/*new*/),(void*)0);
/*SFN*/(C->_free_nodes/*5p*/)=tmp0/*new*/;
/*tmp0.unlock*/
-r288add(((T288*)/*no_dispatch.e*/r262common_free_nodes()),(/*RF2*/(C)->_free_nodes/*5p*/),(T0*)(t[262]));
+r288add(((T288*)/*no_dispatch.e*/r264common_free_nodes()),(/*RF2*/(C)->_free_nodes/*5p*/),(T0*)(t[264]));
}
-/*SFN*/(C->_buckets/*5p*/)=new301(a1);
+/*SFN*/(C->_buckets/*5p*/)=new302(a1);
/*SFN*/(C->_capacity/*5p*/)=a1;
/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
/*SFN*/(C->_count/*5p*/)=INT32_C(0);
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r262increase_capacity(T262* C){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r264increase_capacity(T264* C){
T2 _i=0;
T2 _idx=0;
T2 _new_capacity=0;
-T301 _old_buckets=(void*)0;
+T302 _old_buckets=(void*)0;
T0* _node1=(void*)0;
T0* _node2=(void*)0;
-_new_capacity=r262prime_capacity(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+(INT32_C(1)));
+_new_capacity=r264prime_capacity(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+(INT32_C(1)));
_old_buckets=(/*RF2*/(C)->_buckets/*5p*/);
-/*SFN*/(C->_buckets/*5p*/)=new301(_new_capacity);
+/*SFN*/(C->_buckets/*5p*/)=new302(_new_capacity);
_i=((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))-(INT32_C(1));
/*SFN*/(C->_capacity/*5p*/)=_new_capacity;
while(!(((int32_t)(_i))<(INT32_C(0))))
@@ -7321,9 +7364,9 @@ while(!(((int32_t)(_i))<(INT32_C(0))))
_node1=(_old_buckets)[_i];
while(!((_node1)==((void*)((void*)0))))
{
-_node2=(/*RF2*/(((T300*)_node1))->_next/*3p*/);
-_idx=((int32_t)(r73hash_code(((T73*)/*no_dispatch.e*/(/*RF2*/(((T300*)_node1))->_key/*3p*/)))))%((/*RF2*/(C)->_capacity/*5p*/));
-(/*RF2*/(((T300*)_node1))->_next/*3p*/)=((/*RF2*/(C)->_buckets/*5p*/))[_idx];
+_node2=(/*RF2*/(((T303*)_node1))->_next/*3p*/);
+_idx=((int32_t)(r73hash_code(((T73*)/*no_dispatch.e*/(/*RF2*/(((T303*)_node1))->_key/*3p*/)))))%((/*RF2*/(C)->_capacity/*5p*/));
+(/*RF2*/(((T303*)_node1))->_next/*3p*/)=((/*RF2*/(C)->_buckets/*5p*/))[_idx];
((/*RF2*/(C)->_buckets/*5p*/))[_idx]=(_node1);
_node1=_node2;
}
@@ -7332,35 +7375,35 @@ _i=((int32_t)(_i))-(INT32_C(1));
/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
}/*--*/
-/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r262add(T262* C,T0* a1,T0* a2){
+/*HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]*/void r264add(T264* C,T0* a1,T0* a2){
T2 _idx=0;
T0* _node=(void*)0;
/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
-if(r262should_increase_capacity((/*RF2*/(C)->_capacity/*5p*/),(/*RF2*/(C)->_count/*5p*/))){
-r262increase_capacity(C);
+if(r264should_increase_capacity((/*RF2*/(C)->_capacity/*5p*/),(/*RF2*/(C)->_count/*5p*/))){
+r264increase_capacity(C);
}
_idx=((int32_t)(r73hash_code(((T73*)/*no_dispatch.e*/a2))))%((/*RF2*/(C)->_capacity/*5p*/));
-_node=r262new_node(C,a1,a2,((/*RF2*/(C)->_buckets/*5p*/))[_idx]);
+_node=r264new_node(C,a1,a2,((/*RF2*/(C)->_buckets/*5p*/))[_idx]);
((/*RF2*/(C)->_buckets/*5p*/))[_idx]=(_node);
/*SFN*/(C->_count/*5p*/)=((int32_t)((/*RF2*/(C)->_count/*5p*/)))+(INT32_C(1));
}/*--*/
-/*SIGNAL_1[X_INPUT_DEVICE]*/void r260emit(T260* C,T0* a1){
+/*SIGNAL_1[X_INPUT_DEVICE]*/void r262emit(T262* C,T0* a1){
/*SFN*/(C->_index/*3p*/)=INT32_C(0);
-/*SFN*/(C->_last/*3p*/)=(/*RF2*/((T298*)((/*RF2*/(C)->_callbacks/*3p*/)))->_upper/*3p*/);
+/*SFN*/(C->_last/*3p*/)=(/*RF2*/((T300*)((/*RF2*/(C)->_callbacks/*3p*/)))->_upper/*3p*/);
while(!(((int32_t)((/*RF2*/(C)->_index/*3p*/)))>((/*RF2*/(C)->_last/*3p*/))))
{
-agent_launcher_X_INPUT_DEVICE(((/*RF2*/((T298*)((/*RF2*/(C)->_callbacks/*3p*/)))->_storage/*3p*/))[(/*RF2*/(C)->_index/*3p*/)],a1);
+agent_launcher_X_INPUT_DEVICE(((/*RF2*/((T300*)((/*RF2*/(C)->_callbacks/*3p*/)))->_storage/*3p*/))[(/*RF2*/(C)->_index/*3p*/)],a1);
/*SFN*/(C->_index/*3p*/)=((int32_t)((/*RF2*/(C)->_index/*3p*/)))+(INT32_C(1));
}
}/*--*/
-/*SIGNAL_1[X_INPUT_DEVICE]*/void r260make(T260* C){
+/*SIGNAL_1[X_INPUT_DEVICE]*/void r262make(T262* C){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
-tmp0/*new*/=((T0*)(new298()));
-r298make(((T298*)tmp0/*new*/),INT32_C(0));
+tmp0/*new*/=((T0*)(new300()));
+r300make(((T300*)tmp0/*new*/),INT32_C(0));
/*SFN*/(C->_callbacks/*3p*/)=tmp0/*new*/;
/*tmp0.unlock*/
}/*--*/
@@ -7416,6 +7459,10 @@ R=(/*RF2*/(((T296*)_node))->_item/*3p*/);
return R;
}/*--*/
+/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/void r259make(T259* C){
+r259create_with_capacity(C,INT32_C(53));
+}/*--*/
+
/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T6 r259key_safe_equal(T2 a1,T2 a2){
T6 R=0;
if((a1)==(a2)){
@@ -7427,10 +7474,6 @@ R=((T6)((a1)==(a2)));
return R;
}/*--*/
-/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/void r259make(T259* C){
-r259create_with_capacity(C,INT32_C(53));
-}/*--*/
-
/*HASHED_DICTIONARY[INTEGER_32,INTEGER_32]*/T2 r259prime_capacity(T2 a1){
T2 R=0;
R=(int32_t)(((uint32_t)(a1))+((uint32_t)(((int32_t)(a1))/(INT32_C(2)))));
@@ -7686,6 +7729,33 @@ _i=((int32_t)(_i))-(INT32_C(1));
/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
}/*--*/
+/*RING_ARRAY[INTEGER_32]*/void r255move(T255* C,T2 a1,T2 a2,T2 a3){
+T2 _default_value=0;
+T2 _i=0;
+if((a3)==(INT8_C(0))){
+}
+else{
+if(((int32_t)(a3))<(INT32_C(0))){
+_i=a1;
+while(!(((int32_t)(_i))>(a2)))
+{
+r255put(C,r255item(C,_i),((int32_t)(_i))+(a3));
+r255put(C,_default_value,_i);
+_i=((int32_t)(_i))+(INT32_C(1));
+}
+}
+else{
+_i=a2;
+while(!(((int32_t)(_i))<(a1)))
+{
+r255put(C,r255item(C,_i),((int32_t)(_i))+(a3));
+r255put(C,_default_value,_i);
+_i=((int32_t)(_i))-(INT32_C(1));
+}
+}
+}
+}/*--*/
+
/*RING_ARRAY[INTEGER_32]*/void r255remove_first(T255* C){
/*SFN*/(C->_lower/*5p*/)=((int32_t)((/*RF2*/(C)->_lower/*5p*/)))+(INT32_C(1));
/*SFN*/(C->_storage_lower/*5p*/)=((int32_t)((/*RF2*/(C)->_storage_lower/*5p*/)))+(INT32_C(1));
@@ -7694,6 +7764,12 @@ if(((/*RF2*/(C)->_storage_lower/*5p*/))==((/*RF2*/(C)->_capacity/*5p*/))){
}
}/*--*/
+/*RING_ARRAY[INTEGER_32]*/T2 r255wrap_point(T255* C){
+T2 R=0;
+R=((int32_t)(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+((/*RF2*/(C)->_lower/*5p*/))))-((/*RF2*/(C)->_storage_lower/*5p*/));
+return R;
+}/*--*/
+
/*RING_ARRAY[INTEGER_32]*/void r255make_space_for_one(T255* C){
T2 _old_capacity=0;
T2 _s_u=0;
@@ -7737,6 +7813,10 @@ R=r255storage_index(C,(/*RF2*/(C)->_upper/*5p*/));
return R;
}/*--*/
+/*RING_ARRAY[INTEGER_32]*/void r255put(T255* C,T2 a1,T2 a2){
+((/*RF2*/(C)->_storage/*5p*/))[r255storage_index(C,a2)]=(a1);
+}/*--*/
+
/*RING_ARRAY[INTEGER_32]*/T2 r255storage_index(T255* C,T2 a1){
T2 R=0;
R=((int32_t)(((int32_t)(a1))-((/*RF2*/(C)->_lower/*5p*/))))+((/*RF2*/(C)->_storage_lower/*5p*/));
@@ -7746,10 +7826,6 @@ R=((int32_t)(R))-((/*RF2*/(C)->_capacity/*5p*/));
return R;
}/*--*/
-/*RING_ARRAY[INTEGER_32]*/void r255put(T255* C,T2 a1,T2 a2){
-((/*RF2*/(C)->_storage/*5p*/))[r255storage_index(C,a2)]=(a1);
-}/*--*/
-
/*RING_ARRAY[INTEGER_32]*/void r255clear_all(T255* C){
T2 _value=0;
r255set_all_with(C,_value);
@@ -7812,41 +7888,179 @@ R=((/*RF2*/(C)->_storage/*5p*/))[r255storage_index(C,a1)];
return R;
}/*--*/
-/*RING_ARRAY[INTEGER_32]*/T2 r255wrap_point(T255* C){
+/*HASHED_DICTIONARY[POINTER,STRING]*/void r253make(T253* C){
+r253create_with_capacity(C,INT32_C(53));
+}/*--*/
+
+/*HASHED_DICTIONARY[POINTER,STRING]*/T2 r253prime_capacity(T2 a1){
T2 R=0;
-R=((int32_t)(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+((/*RF2*/(C)->_lower/*5p*/))))-((/*RF2*/(C)->_storage_lower/*5p*/));
+R=(int32_t)(((uint32_t)(a1))+((uint32_t)(((int32_t)(a1))/(INT32_C(2)))));
+if(((int32_t)(R))>(INT32_C(0))){
+R=r253prime_number_ceiling(R);
+}
+else{
+R=r253prime_number_ceiling(INT32_C(2147483647));
+}
return R;
}/*--*/
-/*RING_ARRAY[INTEGER_32]*/void r255move(T255* C,T2 a1,T2 a2,T2 a3){
-T2 _default_value=0;
-T2 _i=0;
-if((a3)==(INT8_C(0))){
+/*HASHED_DICTIONARY[POINTER,STRING]*/T2 r253prime_number_ceiling(T2 a1){
+T2 R=0;
+if(((int32_t)(a1))<=(INT32_C(98317))){
+if(((int32_t)(a1))<=(INT32_C(769))){
+if(((int32_t)(a1))<=(INT32_C(53))){
+if(((int32_t)(a1))<=(INT32_C(11))){
+R=INT32_C(11);
}
else{
-if(((int32_t)(a3))<(INT32_C(0))){
-_i=a1;
-while(!(((int32_t)(_i))>(a2)))
-{
-r255put(C,r255item(C,_i),((int32_t)(_i))+(a3));
-r255put(C,_default_value,_i);
-_i=((int32_t)(_i))+(INT32_C(1));
+if(((int32_t)(a1))<=(INT32_C(23))){
+R=INT32_C(23);
+}
+else{
+R=INT32_C(53);
+}
}
}
else{
-_i=a2;
-while(!(((int32_t)(_i))<(a1)))
-{
-r255put(C,r255item(C,_i),((int32_t)(_i))+(a3));
-r255put(C,_default_value,_i);
-_i=((int32_t)(_i))-(INT32_C(1));
+if(((int32_t)(a1))<=(INT32_C(193))){
+if(((int32_t)(a1))<=(INT32_C(97))){
+R=INT32_C(97);
+}
+else{
+R=INT32_C(193);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(389))){
+R=INT32_C(389);
+}
+else{
+R=INT32_C(769);
+}
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(12289))){
+if(((int32_t)(a1))<=(INT32_C(3079))){
+if(((int32_t)(a1))<=(INT32_C(1543))){
+R=INT32_C(1543);
+}
+else{
+R=INT32_C(3079);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(6151))){
+R=INT32_C(6151);
+}
+else{
+R=INT32_C(12289);
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(24593))){
+R=INT32_C(24593);
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(49157))){
+R=INT32_C(49157);
+}
+else{
+R=INT32_C(98317);
+}
+}
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(12582917))){
+if(((int32_t)(a1))<=(INT32_C(1572869))){
+if(((int32_t)(a1))<=(INT32_C(393241))){
+if(((int32_t)(a1))<=(INT32_C(196613))){
+R=INT32_C(196613);
+}
+else{
+R=INT32_C(393241);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(786433))){
+R=INT32_C(786433);
+}
+else{
+R=INT32_C(1572869);
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(3145739))){
+R=INT32_C(3145739);
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(6291469))){
+R=INT32_C(6291469);
+}
+else{
+R=INT32_C(12582917);
+}
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(201326611))){
+if(((int32_t)(a1))<=(INT32_C(50331653))){
+if(((int32_t)(a1))<=(INT32_C(25165843))){
+R=INT32_C(25165843);
+}
+else{
+R=INT32_C(50331653);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(100663319))){
+R=INT32_C(100663319);
+}
+else{
+R=INT32_C(201326611);
}
}
}
+else{
+if(((int32_t)(a1))<=(INT32_C(805306457))){
+if(((int32_t)(a1))<=(INT32_C(402653189))){
+R=INT32_C(402653189);
+}
+else{
+R=INT32_C(805306457);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(1610612741))){
+R=INT32_C(1610612741);
+}
+else{
+R=INT32_C(2147483647);
+}
+}
+}
+}
+}
+return R;
}/*--*/
-/*HASHED_DICTIONARY[POINTER,STRING]*/void r253make(T253* C){
-r253create_with_capacity(C,INT32_C(53));
+/*HASHED_DICTIONARY[POINTER,STRING]*/T6 r253should_increase_capacity(T2 a1,T2 a2){
+/*[INTERNAL_C_LOCAL list*/
+T6 tmp0;
+/*INTERNAL_C_LOCAL list]*/
+T6 R=0;
+tmp0/*and then*/=((T6)(((int32_t)(a2))>((int32_t)(((uint32_t)(((int32_t)(a1))/(INT32_C(3))))*((uint32_t)(INT32_C(2)))))));
+if(tmp0/*and then*/){
+tmp0/*and then*/=((T6)(((int32_t)(a1))<(INT32_C(2147483647))));
+}
+R=((T6)(tmp0/*and then*/));
+return R;
}/*--*/
/*HASHED_DICTIONARY[POINTER,STRING]*/T0* r253common_free_nodes(void){
@@ -7868,6 +8082,25 @@ r288add(((T288*)/*no_dispatch.e*/oBC143common_free_nodes),_fn,(T0*)(t[288]));
return oBC143common_free_nodes;
}/*--*/
+/*HASHED_DICTIONARY[POINTER,STRING]*/T0* r253new_node(T253* C,T8 a1,T0* a2,T0* a3){
+/*[INTERNAL_C_LOCAL list*/
+T0* tmp0;
+/*INTERNAL_C_LOCAL list]*/
+T0* R=(void*)0;
+R=(/*RF2*/((T293*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/);
+if((R)==((void*)((void*)0))){
+tmp0/*new*/=((T0*)(new292()));
+r292make(((T292*)tmp0/*new*/),a1,a2,a3);
+R=tmp0/*new*/;
+/*tmp0.unlock*/
+}
+else{
+(/*RF2*/((T293*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/)=(/*RF2*/(((T292*)R))->_next/*3p*/);
+r292make(((T292*)R),a1,a2,a3);
+}
+return R;
+}/*--*/
+
/*HASHED_DICTIONARY[POINTER,STRING]*/void r253create_with_capacity(T253* C,T2 a1){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -7886,10 +8119,222 @@ r288add(((T288*)/*no_dispatch.e*/r253common_free_nodes()),(/*RF2*/(C)->_free_nod
/*SFN*/(C->_count/*5p*/)=INT32_C(0);
}/*--*/
+/*HASHED_DICTIONARY[POINTER,STRING]*/void r253increase_capacity(T253* C){
+T2 _i=0;
+T2 _idx=0;
+T2 _new_capacity=0;
+T291 _old_buckets=(void*)0;
+T0* _node1=(void*)0;
+T0* _node2=(void*)0;
+_new_capacity=r253prime_capacity(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+(INT32_C(1)));
+_old_buckets=(/*RF2*/(C)->_buckets/*5p*/);
+/*SFN*/(C->_buckets/*5p*/)=new291(_new_capacity);
+_i=((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))-(INT32_C(1));
+/*SFN*/(C->_capacity/*5p*/)=_new_capacity;
+while(!(((int32_t)(_i))<(INT32_C(0))))
+{
+_node1=(_old_buckets)[_i];
+while(!((_node1)==((void*)((void*)0))))
+{
+_node2=(/*RF2*/(((T292*)_node1))->_next/*3p*/);
+_idx=((int32_t)(r7hash_code((T7*)((/*RF2*/(((T292*)_node1))->_key/*3p*/)))))%((/*RF2*/(C)->_capacity/*5p*/));
+(/*RF2*/(((T292*)_node1))->_next/*3p*/)=((/*RF2*/(C)->_buckets/*5p*/))[_idx];
+((/*RF2*/(C)->_buckets/*5p*/))[_idx]=(_node1);
+_node1=_node2;
+}
+_i=((int32_t)(_i))-(INT32_C(1));
+}
+/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
+}/*--*/
+
+/*HASHED_DICTIONARY[POINTER,STRING]*/void r253add(T253* C,T8 a1,T0* a2){
+T2 _idx=0;
+T0* _node=(void*)0;
+/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
+if(r253should_increase_capacity((/*RF2*/(C)->_capacity/*5p*/),(/*RF2*/(C)->_count/*5p*/))){
+r253increase_capacity(C);
+}
+_idx=((int32_t)(r7hash_code(((T7*)a2))))%((/*RF2*/(C)->_capacity/*5p*/));
+_node=r253new_node(C,a1,a2,((/*RF2*/(C)->_buckets/*5p*/))[_idx]);
+((/*RF2*/(C)->_buckets/*5p*/))[_idx]=(_node);
+/*SFN*/(C->_count/*5p*/)=((int32_t)((/*RF2*/(C)->_count/*5p*/)))+(INT32_C(1));
+}/*--*/
+
/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r250make(T250* C){
r250create_with_capacity(C,INT32_C(53));
}/*--*/
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/T2 r250prime_capacity(T2 a1){
+T2 R=0;
+R=(int32_t)(((uint32_t)(a1))+((uint32_t)(((int32_t)(a1))/(INT32_C(2)))));
+if(((int32_t)(R))>(INT32_C(0))){
+R=r250prime_number_ceiling(R);
+}
+else{
+R=r250prime_number_ceiling(INT32_C(2147483647));
+}
+return R;
+}/*--*/
+
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/T2 r250prime_number_ceiling(T2 a1){
+T2 R=0;
+if(((int32_t)(a1))<=(INT32_C(98317))){
+if(((int32_t)(a1))<=(INT32_C(769))){
+if(((int32_t)(a1))<=(INT32_C(53))){
+if(((int32_t)(a1))<=(INT32_C(11))){
+R=INT32_C(11);
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(23))){
+R=INT32_C(23);
+}
+else{
+R=INT32_C(53);
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(193))){
+if(((int32_t)(a1))<=(INT32_C(97))){
+R=INT32_C(97);
+}
+else{
+R=INT32_C(193);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(389))){
+R=INT32_C(389);
+}
+else{
+R=INT32_C(769);
+}
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(12289))){
+if(((int32_t)(a1))<=(INT32_C(3079))){
+if(((int32_t)(a1))<=(INT32_C(1543))){
+R=INT32_C(1543);
+}
+else{
+R=INT32_C(3079);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(6151))){
+R=INT32_C(6151);
+}
+else{
+R=INT32_C(12289);
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(24593))){
+R=INT32_C(24593);
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(49157))){
+R=INT32_C(49157);
+}
+else{
+R=INT32_C(98317);
+}
+}
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(12582917))){
+if(((int32_t)(a1))<=(INT32_C(1572869))){
+if(((int32_t)(a1))<=(INT32_C(393241))){
+if(((int32_t)(a1))<=(INT32_C(196613))){
+R=INT32_C(196613);
+}
+else{
+R=INT32_C(393241);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(786433))){
+R=INT32_C(786433);
+}
+else{
+R=INT32_C(1572869);
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(3145739))){
+R=INT32_C(3145739);
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(6291469))){
+R=INT32_C(6291469);
+}
+else{
+R=INT32_C(12582917);
+}
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(201326611))){
+if(((int32_t)(a1))<=(INT32_C(50331653))){
+if(((int32_t)(a1))<=(INT32_C(25165843))){
+R=INT32_C(25165843);
+}
+else{
+R=INT32_C(50331653);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(100663319))){
+R=INT32_C(100663319);
+}
+else{
+R=INT32_C(201326611);
+}
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(805306457))){
+if(((int32_t)(a1))<=(INT32_C(402653189))){
+R=INT32_C(402653189);
+}
+else{
+R=INT32_C(805306457);
+}
+}
+else{
+if(((int32_t)(a1))<=(INT32_C(1610612741))){
+R=INT32_C(1610612741);
+}
+else{
+R=INT32_C(2147483647);
+}
+}
+}
+}
+}
+return R;
+}/*--*/
+
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/T6 r250should_increase_capacity(T2 a1,T2 a2){
+/*[INTERNAL_C_LOCAL list*/
+T6 tmp0;
+/*INTERNAL_C_LOCAL list]*/
+T6 R=0;
+tmp0/*and then*/=((T6)(((int32_t)(a2))>((int32_t)(((uint32_t)(((int32_t)(a1))/(INT32_C(3))))*((uint32_t)(INT32_C(2)))))));
+if(tmp0/*and then*/){
+tmp0/*and then*/=((T6)(((int32_t)(a1))<(INT32_C(2147483647))));
+}
+R=((T6)(tmp0/*and then*/));
+return R;
+}/*--*/
+
/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/T0* r250common_free_nodes(void){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -7909,6 +8354,25 @@ r288add(((T288*)/*no_dispatch.e*/oBC143common_free_nodes),_fn,(T0*)(t[288]));
return oBC143common_free_nodes;
}/*--*/
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/T0* r250new_node(T250* C,T0* a1,T0* a2,T0* a3){
+/*[INTERNAL_C_LOCAL list*/
+T0* tmp0;
+/*INTERNAL_C_LOCAL list]*/
+T0* R=(void*)0;
+R=(/*RF2*/((T287*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/);
+if((R)==((void*)((void*)0))){
+tmp0/*new*/=((T0*)(new284()));
+r284make(((T284*)tmp0/*new*/),a1,a2,a3);
+R=tmp0/*new*/;
+/*tmp0.unlock*/
+}
+else{
+(/*RF2*/((T287*)((/*RF2*/(C)->_free_nodes/*5p*/)))->_item/*ip*/)=(/*RF2*/(((T284*)R))->_next/*3p*/);
+r284make(((T284*)R),a1,a2,a3);
+}
+return R;
+}/*--*/
+
/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r250create_with_capacity(T250* C,T2 a1){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -7927,17 +8391,58 @@ r288add(((T288*)/*no_dispatch.e*/r250common_free_nodes()),(/*RF2*/(C)->_free_nod
/*SFN*/(C->_count/*5p*/)=INT32_C(0);
}/*--*/
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r250increase_capacity(T250* C){
+T2 _i=0;
+T2 _idx=0;
+T2 _new_capacity=0;
+T283 _old_buckets=(void*)0;
+T0* _node1=(void*)0;
+T0* _node2=(void*)0;
+_new_capacity=r250prime_capacity(((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))+(INT32_C(1)));
+_old_buckets=(/*RF2*/(C)->_buckets/*5p*/);
+/*SFN*/(C->_buckets/*5p*/)=new283(_new_capacity);
+_i=((int32_t)((/*RF2*/(C)->_capacity/*5p*/)))-(INT32_C(1));
+/*SFN*/(C->_capacity/*5p*/)=_new_capacity;
+while(!(((int32_t)(_i))<(INT32_C(0))))
+{
+_node1=(_old_buckets)[_i];
+while(!((_node1)==((void*)((void*)0))))
+{
+_node2=(/*RF2*/(((T284*)_node1))->_next/*3p*/);
+_idx=((int32_t)(r7hash_code((T7*)((/*RF2*/(((T284*)_node1))->_key/*3p*/)))))%((/*RF2*/(C)->_capacity/*5p*/));
+(/*RF2*/(((T284*)_node1))->_next/*3p*/)=((/*RF2*/(C)->_buckets/*5p*/))[_idx];
+((/*RF2*/(C)->_buckets/*5p*/))[_idx]=(_node1);
+_node1=_node2;
+}
+_i=((int32_t)(_i))-(INT32_C(1));
+}
+/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
+}/*--*/
+
+/*HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]*/void r250add(T250* C,T0* a1,T0* a2){
+T2 _idx=0;
+T0* _node=(void*)0;
+/*SFN*/(C->_cache_user/*5p*/)=INT32_C(-1);
+if(r250should_increase_capacity((/*RF2*/(C)->_capacity/*5p*/),(/*RF2*/(C)->_count/*5p*/))){
+r250increase_capacity(C);
+}
+_idx=((int32_t)(r7hash_code(((T7*)a2))))%((/*RF2*/(C)->_capacity/*5p*/));
+_node=r250new_node(C,a1,a2,((/*RF2*/(C)->_buckets/*5p*/))[_idx]);
+((/*RF2*/(C)->_buckets/*5p*/))[_idx]=(_node);
+/*SFN*/(C->_count/*5p*/)=((int32_t)((/*RF2*/(C)->_count/*5p*/)))+(INT32_C(1));
+}/*--*/
+
/*STREAM_EXCEPTION*/void r113make(T113* C,T0* a1){
/*SFN*/(C->_stream/*ip*/)=a1;
}/*--*/
/*STREAM_EXCEPTION*/void r113expect(T113* C,T0* a1){
-r154when_exception(((T154*)a1),(/*RF2*/(C)->_stream/*ip*/));
+r153when_exception(((T153*)a1),(/*RF2*/(C)->_stream/*ip*/));
}/*--*/
/*STREAM_EXCEPTION*/T6 r113occurred(T113* C,T0* a1){
T6 R=0;
-R=((T6)(r154is_exception(((T154*)a1),(/*RF2*/(C)->_stream/*ip*/))));
+R=((T6)(r153is_exception(((T153*)a1),(/*RF2*/(C)->_stream/*ip*/))));
return R;
}/*--*/
@@ -7946,12 +8451,12 @@ return R;
}/*--*/
/*CAN_READ_DATA_FROM_STREAM*/void r123expect(T123* C,T0* a1){
-r154when_data(((T154*)a1),(/*RF2*/(C)->_input_stream/*ip*/));
+r153when_data(((T153*)a1),(/*RF2*/(C)->_input_stream/*ip*/));
}/*--*/
/*CAN_READ_DATA_FROM_STREAM*/T6 r123occurred(T123* C,T0* a1){
T6 R=0;
-R=((T6)(r154is_data(((T154*)a1),(/*RF2*/(C)->_input_stream/*ip*/))));
+R=((T6)(r153is_data(((T153*)a1),(/*RF2*/(C)->_input_stream/*ip*/))));
return R;
}/*--*/
@@ -8004,70 +8509,70 @@ basic_microsecond_update;
/*SFN*/(C->_microsecond/**/)=basic_microsecond_microsecond;
}/*--*/
-/*EVENTS_SET*/T6 r154has_exception(T154* C,T2 a1){
+/*EVENTS_SET*/T6 r153has_exception(T153* C,T2 a1){
T6 R=0;
R=((T6)(sequencer_is_ready((/*RF2*/(C)->_exception_set/*12p*/),a1)));
return R;
}/*--*/
-/*EVENTS_SET*/void r154expect_readable(T154* C,T2 a1){
+/*EVENTS_SET*/void r153expect_readable(T153* C,T2 a1){
sequencer_watch((/*RF2*/(C)->_read_set/*12p*/),a1);
/*SFN*/(C->_read_size/*12p*/)=((int32_t)((/*RF2*/(C)->_read_size/*12p*/)))+(INT32_C(1));
/*SFN*/(C->_highest/*12p*/)=r2max((/*RF2*/(C)->_highest/*12p*/),a1);
}/*--*/
-/*EVENTS_SET*/void r154when_data(T154* C,T0* a1){
+/*EVENTS_SET*/void r153when_data(T153* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T2 tmp0;
/*INTERNAL_C_LOCAL list]*/
/*[inspectDynamicDispatch*/
switch(((a1)->id)){
-case 153:
-tmp0/*descriptor*/=(/*RF2*/(((T153*)a1))->_filtered_descriptor/*i8p*/);
+case 154:
+tmp0/*descriptor*/=(/*RF2*/(((T154*)a1))->_filtered_descriptor/*i8p*/);
break;
default:;
tmp0/*descriptor*/=(/*RF2*/(((T134*)a1))->_descriptor/*i2p*/);
}
/*inspect]*/
-r154expect_readable(C,tmp0/*descriptor*/);
+r153expect_readable(C,tmp0/*descriptor*/);
}/*--*/
-/*EVENTS_SET*/T6 r154can_read(T154* C,T2 a1){
+/*EVENTS_SET*/T6 r153can_read(T153* C,T2 a1){
T6 R=0;
R=((T6)(sequencer_is_ready((/*RF2*/(C)->_read_set/*12p*/),a1)));
return R;
}/*--*/
-/*EVENTS_SET*/T6 r154is_data(T154* C,T0* a1){
+/*EVENTS_SET*/T6 r153is_data(T153* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T2 tmp0;
/*INTERNAL_C_LOCAL list]*/
T6 R=0;
/*[inspectDynamicDispatch*/
switch(((a1)->id)){
-case 153:
-tmp0/*descriptor*/=(/*RF2*/(((T153*)a1))->_filtered_descriptor/*i8p*/);
+case 154:
+tmp0/*descriptor*/=(/*RF2*/(((T154*)a1))->_filtered_descriptor/*i8p*/);
break;
default:;
tmp0/*descriptor*/=(/*RF2*/(((T134*)a1))->_descriptor/*i2p*/);
}
/*inspect]*/
-R=((T6)(r154can_read(C,tmp0/*descriptor*/)));
+R=((T6)(r153can_read(C,tmp0/*descriptor*/)));
return R;
}/*--*/
-/*EVENTS_SET*/void r154when_exception(T154* C,T0* a1){
-r154expect_exception(C,(/*RF2*/(((T153*)/*no_dispatch.e*/a1))->_filtered_descriptor/*i8p*/));
-}/*--*/
-
-/*EVENTS_SET*/void r154make(T154* C){
+/*EVENTS_SET*/void r153make(T153* C){
/*SFN*/(C->_read_set/*12p*/)=sequencer_create_set;
/*SFN*/(C->_write_set/*12p*/)=sequencer_create_set;
/*SFN*/(C->_exception_set/*12p*/)=sequencer_create_set;
-r154reset(C);
+r153reset(C);
}/*--*/
-/*EVENTS_SET*/T6 r154event_occurred(T154* C,T0* a1){
+/*EVENTS_SET*/void r153when_exception(T153* C,T0* a1){
+r153expect_exception(C,(/*RF2*/(((T154*)/*no_dispatch.e*/a1))->_filtered_descriptor/*i8p*/));
+}/*--*/
+
+/*EVENTS_SET*/T6 r153event_occurred(T153* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T6 tmp0;
/*INTERNAL_C_LOCAL list]*/
@@ -8085,17 +8590,18 @@ R=((T6)(tmp0/*occurred*/));
return R;
}/*--*/
-/*EVENTS_SET*/T6 r154is_exception(T154* C,T0* a1){
+/*EVENTS_SET*/T6 r153is_exception(T153* C,T0* a1){
T6 R=0;
-R=((T6)(r154has_exception(C,(/*RF2*/(((T153*)/*no_dispatch.e*/a1))->_filtered_descriptor/*i8p*/))));
+R=((T6)(r153has_exception(C,(/*RF2*/(((T154*)/*no_dispatch.e*/a1))->_filtered_descriptor/*i8p*/))));
return R;
}/*--*/
-/*EVENTS_SET*/void r154wait(T154* C){
+/*EVENTS_SET*/void r153wait(T153* C){
T192 _now={{0},0};
T2 _s=0;
T2 _us=0;
T5 _remaining=0;
+T2 _status=0;
if((/*RF2*/(C)->_expiration_valid/*12p*/)){
r192update(&_now);
if(r192_ix_60(&_now,(/*RF2*/(C)->_expiration/*12p*/))){
@@ -8110,20 +8616,23 @@ _remaining=((T5)((/*RF2*/(C)->_timeout/*12p*/)))/(INT32_C(1000));
}
_s=((int32_t)(floor(_remaining)));
_us=((int32_t)(floor(((_remaining)-(/*IC*/(T5)(_s)))*(/*IC*/(T5)(INT32_C(1000000))))));
-while(!((sequencer_wait(((int32_t)((/*RF2*/(C)->_highest/*12p*/)))+(INT32_C(1)),(/*RF2*/(C)->_read_set/*12p*/),(/*RF2*/(C)->_read_size/*12p*/),(/*RF2*/(C)->_write_set/*12p*/),(/*RF2*/(C)->_write_size/*12p*/),(/*RF2*/(C)->_exception_set/*12p*/),(/*RF2*/(C)->_exception_size/*12p*/),_s,_us))!=(INT8_C(-1))))
-{
+_status=sequencer_wait(((int32_t)((/*RF2*/(C)->_highest/*12p*/)))+(INT32_C(1)),(/*RF2*/(C)->_read_set/*12p*/),(/*RF2*/(C)->_read_size/*12p*/),(/*RF2*/(C)->_write_set/*12p*/),(/*RF2*/(C)->_write_size/*12p*/),(/*RF2*/(C)->_exception_set/*12p*/),(/*RF2*/(C)->_exception_size/*12p*/),_s,_us);
+if((_status)==(INT8_C(-1))){
+sequencer_reset((/*RF2*/(C)->_read_set/*12p*/));
+sequencer_reset((/*RF2*/(C)->_write_set/*12p*/));
+sequencer_reset((/*RF2*/(C)->_exception_set/*12p*/));
}
/*SFN*/(C->_queryable/*12p*/)=((T6)(1));
/*SFN*/(C->_current_time_valid/*12p*/)=((T6)(0));
}/*--*/
-/*EVENTS_SET*/void r154expect_exception(T154* C,T2 a1){
+/*EVENTS_SET*/void r153expect_exception(T153* C,T2 a1){
sequencer_watch((/*RF2*/(C)->_exception_set/*12p*/),a1);
/*SFN*/(C->_exception_size/*12p*/)=((int32_t)((/*RF2*/(C)->_exception_size/*12p*/)))+(INT32_C(1));
/*SFN*/(C->_highest/*12p*/)=r2max((/*RF2*/(C)->_highest/*12p*/),a1);
}/*--*/
-/*EVENTS_SET*/void r154reset(T154* C){
+/*EVENTS_SET*/void r153reset(T153* C){
/*SFN*/(C->_timeout/*12p*/)=INT32_C(2147483647);
/*SFN*/(C->_expiration_valid/*12p*/)=((T6)(0));
/*SFN*/(C->_current_time_valid/*12p*/)=((T6)(0));
@@ -8137,7 +8646,7 @@ sequencer_reset((/*RF2*/(C)->_exception_set/*12p*/));
/*SFN*/(C->_queryable/*12p*/)=((T6)(0));
}/*--*/
-/*EVENTS_SET*/void r154expect(T154* C,T0* a1){
+/*EVENTS_SET*/void r153expect(T153* C,T0* a1){
/*[inspectDynamicDispatch*/
switch(((a1)->id)){
case 123:
@@ -8185,11 +8694,11 @@ _nb_axes=((int32_t)(_nb_axes))-(INT32_C(1));
}
}/*--*/
-/*IVY_CLIENT*/void r153process_incomming_data(T153* C){
+/*IVY_CLIENT*/void r154process_incomming_data(T154* C){
read_callback((/*RF2*/(C)->_read_function/*i8p*/),(T0*)C,(/*RF2*/(C)->_filtered_descriptor/*i8p*/),(/*RF2*/(C)->_data/*i8p*/));
}/*--*/
-/*IVY_CLIENT*/T0* r153event_can_read(T153* C){
+/*IVY_CLIENT*/T0* r154event_can_read(T154* C){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
@@ -8205,7 +8714,7 @@ R=(/*RF2*/(C)->_can_read/*i8p*/);
return R;
}/*--*/
-/*IVY_CLIENT*/void r153make(T153* C,T2 a1,T8 a2,T8 a3,T8 a4,T8 a5){
+/*IVY_CLIENT*/void r154make(T154* C,T2 a1,T8 a2,T8 a3,T8 a4,T8 a5){
/*SFN*/(C->_filtered_descriptor/*i8p*/)=a1;
/*SFN*/(C->_data/*i8p*/)=a2;
/*SFN*/(C->_delete_function/*i8p*/)=a3;
@@ -8214,19 +8723,20 @@ return R;
/*SFN*/(C->_is_connected/*i8p*/)=((T6)(1));
}/*--*/
-/*IVY_CLIENT*/void r153disconnect(T153* C){
+/*IVY_CLIENT*/void r154disconnect(T154* C){
if((NULL!=(/*RF2*/(C)->_delete_function/*i8p*/))){
delete_callback((/*RF2*/(C)->_delete_function/*i8p*/),(/*RF2*/(C)->_data/*i8p*/));
}
+/*SFN*/(C->_is_connected/*i8p*/)=((T6)(0));
}/*--*/
-/*IVY_CLIENT*/void r153dispose(T153* C){
+/*IVY_CLIENT*/void r154dispose(T154* C){
if((/*RF2*/(C)->_is_connected/*i8p*/)){
-r153disconnect(C);
+r154disconnect(C);
}
}/*--*/
-/*IVY_CLIENT*/T0* r153event_exception(T153* C){
+/*IVY_CLIENT*/T0* r154event_exception(T154* C){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
@@ -8268,8 +8778,8 @@ r280make(((T280*)tmp0/*new*/),INT32_C(0));
r280make(((T280*)tmp0/*new*/),INT32_C(0));
/*SFN*/(C->_ready_jobs/*6p*/)=tmp0/*new*/;
/*tmp0.unlock*/
-/*reusing tmp0*/tmp0/*new*/=((T0*)(new154()));
-r154make(((T154*)tmp0/*new*/));
+/*reusing tmp0*/tmp0/*new*/=((T0*)(new153()));
+r153make(((T153*)tmp0/*new*/));
/*SFN*/(C->_events/*6p*/)=tmp0/*new*/;
/*tmp0.unlock*/
/*SFN*/(C->_pause/*6p*/)=((T6)(1));
@@ -8348,7 +8858,7 @@ if(tmp1/*or else*/){
break;
}
_i=INT32_C(0);
-r154reset((T154*)((/*RF2*/(C)->_events/*6p*/)));
+r153reset((T153*)((/*RF2*/(C)->_events/*6p*/)));
while(!(((int32_t)(_i))>((/*RF2*/((T280*)((/*RF2*/(C)->_job_list/*6p*/)))->_upper/*3p*/))))
{
_job=((/*RF2*/((T280*)((/*RF2*/(C)->_job_list/*6p*/)))->_storage/*3p*/))[_i];
@@ -8379,7 +8889,7 @@ _i=((int32_t)(_i))+(INT32_C(1));
}
}
if((r280is_empty((T280*)((/*RF2*/(C)->_job_list/*6p*/))))==(0)){
-r154wait((T154*)((/*RF2*/(C)->_events/*6p*/)));
+r153wait((T153*)((/*RF2*/(C)->_events/*6p*/)));
_i=INT32_C(0);
_selected_priority=INT32_MIN;
(/*RF2*/((T280*)((/*RF2*/(C)->_ready_jobs/*6p*/)))->_upper/*3p*/)=INT32_C(-1);
@@ -8607,11 +9117,6 @@ oBC26vision=tmp0/*new*/;
return oBC26vision;
}/*--*/
-/*EVENT_CATCHER*/void r131prepare(T131* C,T0* a1){
-basic_vision_flush;
-r154expect(((T154*)a1),r134event_can_read((T134*)((/*RF2*/(C)->_graphic_connection/*i11p*/))));
-}/*--*/
-
/*EVENT_CATCHER*/void r131make(T131* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -8651,9 +9156,14 @@ r268make(((T268*)tmp0/*new*/));
/*tmp0.unlock*/
}/*--*/
+/*EVENT_CATCHER*/void r131prepare(T131* C,T0* a1){
+basic_vision_flush;
+r153expect(((T153*)a1),r134event_can_read((T134*)((/*RF2*/(C)->_graphic_connection/*i11p*/))));
+}/*--*/
+
/*EVENT_CATCHER*/T6 r131is_ready(T131* C,T0* a1){
T6 R=0;
-R=((T6)(r154event_occurred(((T154*)a1),r134event_can_read((T134*)((/*RF2*/(C)->_graphic_connection/*i11p*/))))));
+R=((T6)(r153event_occurred(((T153*)a1),r134event_can_read((T134*)((/*RF2*/(C)->_graphic_connection/*i11p*/))))));
return R;
}/*--*/
@@ -8866,6 +9376,11 @@ _i=((int32_t)(_i))+(INT32_C(1));
}
}/*--*/
+/*STD_INPUT_OUTPUT*/void r46put_line(T0* a1){
+r46put_string(a1);
+r53filtered_put_character((T53*)(r46std_output()),((T3)'\n'));
+}/*--*/
+
/*X_INPUT_EXTENSION*/void r191make(T191* C){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -8989,12 +9504,12 @@ r7from_external_copy(((T7*)tmp1/*new*/),x_device_info_name(a1,a2));
r266make(((T266*)tmp1/*new*/),INT32_C(0));
/*SFN*/(C->_key_capabilities/*14p*/)=tmp1/*new*/;
/*tmp1.unlock*/
-/*reusing tmp1*/tmp1/*new*/=((T0*)(new265()));
-r265make(((T265*)tmp1/*new*/),INT32_C(0));
+/*reusing tmp1*/tmp1/*new*/=((T0*)(new260()));
+r260make(((T260*)tmp1/*new*/),INT32_C(0));
/*SFN*/(C->_button_capabilities/*14p*/)=tmp1/*new*/;
/*tmp1.unlock*/
-/*reusing tmp1*/tmp1/*new*/=((T0*)(new264()));
-r264make(((T264*)tmp1/*new*/),INT32_C(0));
+/*reusing tmp1*/tmp1/*new*/=((T0*)(new261()));
+r261make(((T261*)tmp1/*new*/),INT32_C(0));
/*SFN*/(C->_axes_capabilities/*14p*/)=tmp1/*new*/;
/*tmp1.unlock*/
_i=x_device_info_num_classes(a1,a2);
@@ -9014,21 +9529,21 @@ if(x_is_button_class_info(_current_class_info)){
r149make(((T149*)tmp1/*new*/),_current_class_info);
_button=tmp1/*new*/;
/*tmp1.unlock*/
-r265add_last((T265*)((/*RF2*/(C)->_button_capabilities/*14p*/)),_button);
+r260add_last((T260*)((/*RF2*/(C)->_button_capabilities/*14p*/)),_button);
}
else{
/*reusing tmp1*/tmp1/*new*/=((T0*)(new148()));
r148make(((T148*)tmp1/*new*/),_current_class_info);
_axes=tmp1/*new*/;
/*tmp1.unlock*/
-r264add_last((T264*)((/*RF2*/(C)->_axes_capabilities/*14p*/)),_axes);
+r261add_last((T261*)((/*RF2*/(C)->_axes_capabilities/*14p*/)),_axes);
}
}
_current_class_info=x_next_class_info(_current_class_info);
_i=((int32_t)(_i))-(INT32_C(1));
}
-/*reusing tmp1*/tmp1/*new*/=((T0*)(new262()));
-r262make(((T262*)tmp1/*new*/));
+/*reusing tmp1*/tmp1/*new*/=((T0*)(new264()));
+r264make(((T264*)tmp1/*new*/));
/*SFN*/(C->_actions/*14p*/)=tmp1/*new*/;
/*tmp1.unlock*/
/*reusing tmp1*/tmp1/*new*/=((T0*)(new259()));
@@ -9046,11 +9561,11 @@ T2 _event_index=0;
T0* _action_list=(void*)0;
T0* _signal=(void*)0;
_event_index=r259at((T259*)((/*RF2*/(C)->_events_indexes/*14p*/)),a1);
-_action_list=r262reference_at((T262*)((/*RF2*/(C)->_actions/*14p*/)),a2);
+_action_list=r264reference_at((T264*)((/*RF2*/(C)->_actions/*14p*/)),a2);
if((_action_list)!=((void*)((void*)0))){
-_signal=((/*RF2*/(((T261*)_action_list))->_storage/*3p*/))[_event_index];
+_signal=((/*RF2*/(((T263*)_action_list))->_storage/*3p*/))[_event_index];
if((_signal)!=((void*)((void*)0))){
-r260emit(((T260*)_signal),(T0*)C);
+r262emit(((T262*)_signal),(T0*)C);
}
}
}/*--*/
@@ -9082,24 +9597,24 @@ T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
T0* _action_list=(void*)0;
T0* _signal=(void*)0;
-_action_list=r262reference_at((T262*)((/*RF2*/(C)->_actions/*14p*/)),a2);
+_action_list=r264reference_at((T264*)((/*RF2*/(C)->_actions/*14p*/)),a2);
if((_action_list)==((void*)((void*)0))){
-tmp0/*new*/=((T0*)(new261()));
-r261make(((T261*)tmp0/*new*/),r258count((T258*)((/*RF2*/(C)->_events_id/*14p*/))));
+tmp0/*new*/=((T0*)(new263()));
+r263make(((T263*)tmp0/*new*/),r258count((T258*)((/*RF2*/(C)->_events_id/*14p*/))));
_action_list=tmp0/*new*/;
/*tmp0.unlock*/
-r262add((T262*)((/*RF2*/(C)->_actions/*14p*/)),_action_list,a2);
+r264add((T264*)((/*RF2*/(C)->_actions/*14p*/)),_action_list,a2);
x_device_select_events((/*RF2*/(((T73*)/*no_dispatch.e*/a2))->_widget/*9p*/),(/*RF2*/(C)->_events_classes/*14p*/));
}
-_signal=((/*RF2*/(((T261*)_action_list))->_storage/*3p*/))[a1];
+_signal=((/*RF2*/(((T263*)_action_list))->_storage/*3p*/))[a1];
if((_signal)==((void*)((void*)0))){
-/*reusing tmp0*/tmp0/*new*/=((T0*)(new260()));
-r260make(((T260*)tmp0/*new*/));
+/*reusing tmp0*/tmp0/*new*/=((T0*)(new262()));
+r262make(((T262*)tmp0/*new*/));
_signal=tmp0/*new*/;
/*tmp0.unlock*/
-((/*RF2*/(((T261*)_action_list))->_storage/*3p*/))[a1]=(_signal);
+((/*RF2*/(((T263*)_action_list))->_storage/*3p*/))[a1]=(_signal);
}
-r298add_last((T298*)((/*RF2*/(((T260*)_signal))->_callbacks/*3p*/)),a3);
+r300add_last((T300*)((/*RF2*/(((T262*)_signal))->_callbacks/*3p*/)),a3);
}/*--*/
/*X_INPUT_DEVICE*/void r68when_moved(T68* C,T0* a1,T0* a2){
@@ -9143,6 +9658,103 @@ r43put_string(a1);
io_putc(((T3)'\n'),(stderr));
}/*--*/
+
+/*agent launcher*/static void _agenT70f70l203c34(se_agenT70f70l203c34*u,T0* open_a1){
+T0* closed_C=(u->closed_C);
+r70reconfigure_crop(((T70*)closed_C),open_a1);
+}/*--*/
+
+/*agent creation*/T0*agenT70f70l203c34(T0* closed_C){
+se_agenT70f70l203c34*u=(void*)new_agent(251);
+u->creation_mold_id=0;
+u->afp=_agenT70f70l203c34;
+u->gc_mark_agent_mold=gc_mark_agenT70f70l203c34;
+u->closed_C=closed_C;
+return((T0*)u);
+}/*--*/
+
+void gc_mark_agenT70f70l203c34(se_agenT70f70l203c34*u){
+gc_agent*gcu=(gc_agent*)u;
+if (gcu->header.flag==FSOH_UNMARKED){
+gcu->header.flag=FSOH_MARKED;
+gc_mark(u->closed_C);
+}
+}/*--*/
+
+/*WACOM_POINTER*/void r70move(T70* C,T0* a1){
+/*[INTERNAL_C_LOCAL list*/
+T6 tmp0;
+T6 tmp1;
+T6 tmp2;
+/*INTERNAL_C_LOCAL list]*/
+T2 _x=0;
+T2 _y=0;
+T2 _presure=0;
+T5 _t3=0;
+T0* _message=(void*)0;
+_x=r68motion_axis_data(INT32_C(1));
+_y=r68motion_axis_data(INT32_C(2));
+r255remove_first((T255*)((/*RF2*/(C)->_x_history/*32p*/)));
+r255add_last((T255*)((/*RF2*/(C)->_x_history/*32p*/)),_x);
+r255remove_first((T255*)((/*RF2*/(C)->_y_history/*32p*/)));
+r255add_last((T255*)((/*RF2*/(C)->_y_history/*32p*/)),_y);
+r255remove_first((T255*)((/*RF2*/(C)->_time_history/*32p*/)));
+r255add_last((T255*)((/*RF2*/(C)->_time_history/*32p*/)),x_device_event_time);
+_t3=r70mean((/*RF2*/(C)->_time_history/*32p*/));
+if(((T5)((_t3)))!=(((T5)((/*RF2*/(C)->_t2/*32p*/))))){
+r70update_predicted_position(C,r70mean((/*RF2*/(C)->_x_history/*32p*/)),r70mean((/*RF2*/(C)->_y_history/*32p*/)),_t3);
+}
+_presure=r68motion_axis_data(INT32_C(3));
+if((/*RF2*/(C)->_cropping/*32p*/)){
+tmp0/*or else*/=((T6)(((int32_t)(_x))<((/*RF2*/(C)->_x_min_crop/*32p*/))));
+if(tmp0/*or else*/){
+}
+else{
+tmp0/*or else*/=((T6)(((int32_t)(_y))<((/*RF2*/(C)->_y_min_crop/*32p*/))));
+}
+tmp1/*or else*/=((T6)(tmp0/*or else*/));
+if(tmp1/*or else*/){
+}
+else{
+tmp1/*or else*/=((T6)(((int32_t)(_x))>((/*RF2*/(C)->_x_max_crop/*32p*/))));
+}
+tmp2/*or else*/=((T6)(tmp1/*or else*/));
+if(tmp2/*or else*/){
+}
+else{
+tmp2/*or else*/=((T6)(((int32_t)(_y))>((/*RF2*/(C)->_y_max_crop/*32p*/))));
+}
+if(tmp2/*or else*/){
+/*SFN*/(C->_ignored_counter/*32p*/)=INT32_C(-1);
+}
+}
+/*auto-unlock tmp0*/tmp0/*and then*/=((T6)(((int32_t)((/*RF2*/(C)->_ignored_counter/*32p*/)))<((/*RF2*/(C)->_ignore_rate/*32p*/))));
+if(tmp0/*and then*/){
+tmp0/*and then*/=((T6)((((/*RF2*/(C)->_old_presure/*32p*/))==(INT8_C(0)))==((_presure)==(INT8_C(0)))));
+}
+if(tmp0/*and then*/){
+/*SFN*/(C->_ignored_counter/*32p*/)=((int32_t)((/*RF2*/(C)->_ignored_counter/*32p*/)))+(INT32_C(1));
+}
+else{
+/*SFN*/(C->_ignored_counter/*32p*/)=INT32_C(0);
+_message=ms25_0bc70;
+r7copy(((T7*)_message),(/*RF2*/(C)->_pointer_message_header/*32p*/));
+r70print_data_in(C,_message,_x,_y,_presure,r68motion_axis_data(INT32_C(4)),r68motion_axis_data(INT32_C(5)),r68motion_axis_data(INT32_C(6)),x_device_event_time,ms70_56246305);
+r71send_message((T71*)((/*RF2*/((T25*)((/*RF2*/(C)->_xinput_ivy/*32p*/)))->_ivy/*8p*/)),_message);
+}
+/*SFN*/(C->_old_presure/*32p*/)=_presure;
+}/*--*/
+
+/*WACOM_POINTER*/void r70crop_identifier(T70* C,T0* a1){
+T0* _msg=(void*)0;
+_msg=ms25_0bc70c11;
+(/*RF2*/(((T7*)_msg))->_count/*3p*/)=INT32_C(0);
+r7append(((T7*)_msg),ms70_220157120);
+r7append(((T7*)_msg),a1);
+r7append(((T7*)_msg),ms70_112207026);
+r71subscribe((T71*)((/*RF2*/((T25*)((/*RF2*/(C)->_xinput_ivy/*32p*/)))->_ivy/*8p*/)),_msg,agenT70f70l203c34((T0*)C));
+}/*--*/
+
/*WACOM_POINTER*/void r70set_message_header(T70* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -9215,7 +9827,7 @@ _t3=r70mean((/*RF2*/(C)->_time_history/*32p*/));
if(((T5)((_t3)))!=(((T5)((/*RF2*/(C)->_t2/*32p*/))))){
r70update_predicted_position(C,r70mean((/*RF2*/(C)->_x_history/*32p*/)),r70mean((/*RF2*/(C)->_y_history/*32p*/)),_t3);
}
-_message=ms25_0bc70;
+_message=ms25_0bc70c15;
r7copy(((T7*)_message),(/*RF2*/(C)->_button_message_header/*32p*/));
r7append(((T7*)_message),ms25_4487261bc70);
r2append_in(x_device_button_event_number,_message);
@@ -9227,7 +9839,7 @@ else{
r7append(((T7*)_message),ms70_697);
}
_presure=r68motion_axis_data(INT32_C(3));
-r70print_data_in(C,_message,_x,_y,_presure,r68motion_axis_data(INT32_C(4)),r68motion_axis_data(INT32_C(5)),r68motion_axis_data(INT32_C(6)),x_device_event_time,ms70_56246305);
+r70print_data_in(C,_message,_x,_y,_presure,r68motion_axis_data(INT32_C(4)),r68motion_axis_data(INT32_C(5)),r68motion_axis_data(INT32_C(6)),x_device_event_time,ms70_56246305bc70);
r71send_message((T71*)((/*RF2*/((T25*)((/*RF2*/(C)->_xinput_ivy/*32p*/)))->_ivy/*8p*/)),_message);
}/*--*/
@@ -9255,7 +9867,7 @@ _proximity_status=ms70_475;
else{
_proximity_status=ms70_2676;
}
-_message=ms25_0bc70c15;
+_message=ms25_0bc70c15l379;
r7copy(((T7*)_message),(/*RF2*/(C)->_pointer_message_header/*32p*/));
r70print_data_in(C,_message,_x,_y,r68proximity_axis_data(INT32_C(3)),r68proximity_axis_data(INT32_C(4)),r68proximity_axis_data(INT32_C(5)),r68proximity_axis_data(INT32_C(6)),x_device_event_time,_proximity_status);
r71send_message((T71*)((/*RF2*/((T25*)((/*RF2*/(C)->_xinput_ivy/*32p*/)))->_ivy/*8p*/)),_message);
@@ -9324,6 +9936,14 @@ r2append_in(a1,R);
/*inspect]*/
return R;
}/*--*/
+T0*oBC13io=(void*)0;
+
+/*WACOM_POINTER*/T0* r70twin(T70* C){
+T0* R=(void*)0;
+R=((void*)new70());
+*((T70*)R)=*C;
+return R;
+}/*--*/
/*WACOM_POINTER*/T5 r70mean(T0* a1){
T5 R=0;
@@ -9339,11 +9959,14 @@ R=((T5)(_sum))/(/*IC*/(T11)(r255count(((T255*)a1))));
return R;
}/*--*/
-/*WACOM_POINTER*/T0* r70twin(T70* C){
-T0* R=(void*)0;
-R=((void*)new70());
-*((T70*)R)=*C;
-return R;
+/*WACOM_POINTER*/void r70reconfigure_crop(T70* C,T0* a1){
+if(r70is_valid_crop(((/*RF2*/(((T247*)a1))->_storage/*3p*/))[INT32_C(0)])){
+r70set_crop(C,((/*RF2*/(((T247*)a1))->_storage/*3p*/))[INT32_C(0)]);
+}
+else{
+r46put_string(ms70_2097616536);
+r46put_line(((/*RF2*/(((T247*)a1))->_storage/*3p*/))[INT32_C(0)]);
+}
}/*--*/
/*WACOM_POINTER*/void r70set_crop(T70* C,T0* a1){
@@ -9431,7 +10054,7 @@ r2append_in(r70device_to_screen_y(C,(/*RF2*/(C)->_predicted_y/*32p*/)),a1);
r7append(((T7*)a1),ms70_190991);
r7append(((T7*)a1),r70type_to_name(/*IC*/(T2)(r2high_16(a5))));
r7append(((T7*)a1),ms70_2112369621);
-r2append_in((((r10to_integer_32(r2high_16(a6)))<<(INT8_C(16)))|/*IC*/(T2)(r2high_16(a7))),a1);
+r2append_in((((r10to_integer_32(r2high_16(a6)))<<(INT8_C(16)))|(/*0x0000FFFF*/INT32_C(65535)&/*IC*/(T2)(r2high_16(a7)))),a1);
r7append(((T7*)a1),ms70_188916);
r2append_in(a8,a1);
r7append(((T7*)a1),ms70_22702411);
@@ -9452,70 +10075,6 @@ r7append(((T7*)a1),ms70_586741066);
r7append(((T7*)a1),a9);
}/*--*/
-/*WACOM_POINTER*/void r70move(T70* C,T0* a1){
-/*[INTERNAL_C_LOCAL list*/
-T6 tmp0;
-T6 tmp1;
-T6 tmp2;
-/*INTERNAL_C_LOCAL list]*/
-T2 _x=0;
-T2 _y=0;
-T2 _presure=0;
-T5 _t3=0;
-T0* _message=(void*)0;
-_x=r68motion_axis_data(INT32_C(1));
-_y=r68motion_axis_data(INT32_C(2));
-r255remove_first((T255*)((/*RF2*/(C)->_x_history/*32p*/)));
-r255add_last((T255*)((/*RF2*/(C)->_x_history/*32p*/)),_x);
-r255remove_first((T255*)((/*RF2*/(C)->_y_history/*32p*/)));
-r255add_last((T255*)((/*RF2*/(C)->_y_history/*32p*/)),_y);
-r255remove_first((T255*)((/*RF2*/(C)->_time_history/*32p*/)));
-r255add_last((T255*)((/*RF2*/(C)->_time_history/*32p*/)),x_device_event_time);
-_t3=r70mean((/*RF2*/(C)->_time_history/*32p*/));
-if(((T5)((_t3)))!=(((T5)((/*RF2*/(C)->_t2/*32p*/))))){
-r70update_predicted_position(C,r70mean((/*RF2*/(C)->_x_history/*32p*/)),r70mean((/*RF2*/(C)->_y_history/*32p*/)),_t3);
-}
-_presure=r68motion_axis_data(INT32_C(3));
-if((/*RF2*/(C)->_cropping/*32p*/)){
-tmp0/*or else*/=((T6)(((int32_t)(_x))<((/*RF2*/(C)->_x_min_crop/*32p*/))));
-if(tmp0/*or else*/){
-}
-else{
-tmp0/*or else*/=((T6)(((int32_t)(_y))<((/*RF2*/(C)->_y_min_crop/*32p*/))));
-}
-tmp1/*or else*/=((T6)(tmp0/*or else*/));
-if(tmp1/*or else*/){
-}
-else{
-tmp1/*or else*/=((T6)(((int32_t)(_x))>((/*RF2*/(C)->_x_max_crop/*32p*/))));
-}
-tmp2/*or else*/=((T6)(tmp1/*or else*/));
-if(tmp2/*or else*/){
-}
-else{
-tmp2/*or else*/=((T6)(((int32_t)(_y))>((/*RF2*/(C)->_y_max_crop/*32p*/))));
-}
-if(tmp2/*or else*/){
-/*SFN*/(C->_ignored_counter/*32p*/)=INT32_C(-1);
-}
-}
-/*auto-unlock tmp0*/tmp0/*and then*/=((T6)(((int32_t)((/*RF2*/(C)->_ignored_counter/*32p*/)))<((/*RF2*/(C)->_ignore_rate/*32p*/))));
-if(tmp0/*and then*/){
-tmp0/*and then*/=((T6)((((/*RF2*/(C)->_old_presure/*32p*/))==(INT8_C(0)))==((_presure)==(INT8_C(0)))));
-}
-if(tmp0/*and then*/){
-/*SFN*/(C->_ignored_counter/*32p*/)=((int32_t)((/*RF2*/(C)->_ignored_counter/*32p*/)))+(INT32_C(1));
-}
-else{
-/*SFN*/(C->_ignored_counter/*32p*/)=INT32_C(0);
-_message=ms25_0bc70c16;
-r7copy(((T7*)_message),(/*RF2*/(C)->_pointer_message_header/*32p*/));
-r70print_data_in(C,_message,_x,_y,_presure,r68motion_axis_data(INT32_C(4)),r68motion_axis_data(INT32_C(5)),r68motion_axis_data(INT32_C(6)),x_device_event_time,ms70_56246305bc70);
-r71send_message((T71*)((/*RF2*/((T25*)((/*RF2*/(C)->_xinput_ivy/*32p*/)))->_ivy/*8p*/)),_message);
-}
-/*SFN*/(C->_old_presure/*32p*/)=_presure;
-}/*--*/
-
/*IVY*/void r71start(T71* C,T0* a1){
if(((/*RF2*/(((T7*)a1))->_count/*3p*/))==(INT8_C(0))){
IvyStart(NULL/*_POINTER*/);
@@ -9526,17 +10085,6 @@ IvyStart(r7to_external(((T7*)a1)));
/*SFN*/(C->_started/*i11p*/)=((T6)(1));
}/*--*/
-/*IVY*/void r71prepare(T71* C,T0* a1){
-T2 _i=0;
-_i=INT32_C(0);
-while(!(((int32_t)(_i))>((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_upper/*3p*/))))
-{
-r154expect(((T154*)a1),r153event_can_read((T153*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])));
-r154expect(((T154*)a1),r153event_exception((T153*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])));
-_i=((int32_t)(_i))+(INT32_C(1));
-}
-}/*--*/
-
/*IVY*/void r71make(T71* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -9563,6 +10111,17 @@ r249make(((T249*)tmp0/*new*/),INT32_C(0));
/*tmp0.unlock*/
}/*--*/
+/*IVY*/void r71prepare(T71* C,T0* a1){
+T2 _i=0;
+_i=INT32_C(0);
+while(!(((int32_t)(_i))>((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_upper/*3p*/))))
+{
+r153expect(((T153*)a1),r154event_can_read((T154*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])));
+r153expect(((T153*)a1),r154event_exception((T154*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])));
+_i=((int32_t)(_i))+(INT32_C(1));
+}
+}/*--*/
+
/*IVY*/T6 r71is_ready(T71* C,T0* a1){
/*[INTERNAL_C_LOCAL list*/
T6 tmp0;
@@ -9581,11 +10140,11 @@ tmp0/*or else*/=((T6)(R));
if(tmp0/*or else*/){
break;
}
-tmp1/*or else*/=((T6)(r154event_occurred(((T154*)a1),r153event_exception((T153*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])))));
+tmp1/*or else*/=((T6)(r153event_occurred(((T153*)a1),r154event_exception((T154*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])))));
if(tmp1/*or else*/){
}
else{
-tmp1/*or else*/=((T6)(r154event_occurred(((T154*)a1),r153event_can_read((T153*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])))));
+tmp1/*or else*/=((T6)(r153event_occurred(((T153*)a1),r154event_can_read((T154*)(((/*RF2*/((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)))->_storage/*3p*/))[_i])))));
}
R=((T6)(tmp1/*or else*/));
_i=((int32_t)(_i))+(INT32_C(1));
@@ -9602,20 +10161,29 @@ _i=INT32_C(0);
while(!(((int32_t)(_i))>((/*RF2*/((T249*)((/*RF2*/(C)->_tmp_client_list/*i11p*/)))->_upper/*3p*/))))
{
_client=((/*RF2*/((T249*)((/*RF2*/(C)->_tmp_client_list/*i11p*/)))->_storage/*3p*/))[_i];
-if(r154event_occurred((T154*)((/*RF2*/(C)->_events_set/*i11p*/)),r153event_exception(((T153*)_client)))){
-r153disconnect(((T153*)_client));
+if(r153event_occurred((T153*)((/*RF2*/(C)->_events_set/*i11p*/)),r154event_exception(((T154*)_client)))){
+r154disconnect(((T154*)_client));
}
else{
-if(r154event_occurred((T154*)((/*RF2*/(C)->_events_set/*i11p*/)),r153event_can_read(((T153*)_client)))){
-r153process_incomming_data(((T153*)_client));
+if(r153event_occurred((T153*)((/*RF2*/(C)->_events_set/*i11p*/)),r154event_can_read(((T154*)_client)))){
+r154process_incomming_data(((T154*)_client));
}
_i=((int32_t)(_i))+(INT32_C(1));
}
}
}/*--*/
+/*IVY*/void r71subscribe(T71* C,T0* a1,T0* a2){
+T0* _pattern_copy=(void*)0;
+T8 _bind_id=(void*)0;
+_pattern_copy=r7twin(((T7*)a1));
+_bind_id=bind_message(r7to_external(((T7*)_pattern_copy)),a2);
+r253add((T253*)((/*RF2*/(C)->_pattern_list/*i11p*/)),_bind_id,_pattern_copy);
+r250add((T250*)((/*RF2*/(C)->_callback_list/*i11p*/)),a2,_pattern_copy);
+}/*--*/
+
/*IVY*/void r71channel_down(T71* C,T0* a1){
-r153disconnect(((T153*)a1));
+r154disconnect(((T154*)a1));
r249remove((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)),r249fast_index_of((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)),a1,INT32_C(0)));
}/*--*/
@@ -9642,8 +10210,8 @@ agent_launcher_FAST_ARRAY__STRING__(a1,_match_list);
T0* tmp0;
/*INTERNAL_C_LOCAL list]*/
T0* R=(void*)0;
-tmp0/*new*/=((T0*)(new153()));
-r153make(((T153*)tmp0/*new*/),a1,a2,a3,a4,a5);
+tmp0/*new*/=((T0*)(new154()));
+r154make(((T154*)tmp0/*new*/),a1,a2,a3,a4,a5);
R=tmp0/*new*/;
/*tmp0.unlock*/
r249add_last((T249*)((/*RF2*/(C)->_ivy_clients/*i11p*/)),R);
@@ -9707,7 +10275,6 @@ r131make(((T131*)tmp0/*new*/),(/*RF2*/(C)->_graphic_connection/*6p*/));
/*SFN*/(C->_widget/*6p*/)=(/*RF2*/((T131*)((/*RF2*/(C)->_event_catcher/*6p*/)))->_widget/*i11p*/);
r155add_job((T155*)(r133current_loop(((T133*)/*no_dispatch.e*/(/*RF2*/(C)->_loop_stack/*6p*/)))),(/*RF2*/(C)->_event_catcher/*6p*/));
}/*--*/
-T0*oBC13io=(void*)0;
T0*oBC65root_window=(void*)0;
int fBC65root_window=0;
@@ -9738,21 +10305,21 @@ r65crash(C);
}/*--*/
-/*agent launcher*/static void _agenT25f25l206c40(se_agenT25f25l206c40*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l227c40(se_agenT25f25l227c40*u,T0* open_a2){
T0* closed_C=(u->closed_C);
r70proximity(((T70*)closed_C),(T6)(0),open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l206c40(T0* closed_C){
-se_agenT25f25l206c40*u=(void*)new_agent(244);
-u->creation_mold_id=0;
-u->afp=_agenT25f25l206c40;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l206c40;
+/*agent creation*/T0*agenT25f25l227c40(T0* closed_C){
+se_agenT25f25l227c40*u=(void*)new_agent(244);
+u->creation_mold_id=1;
+u->afp=_agenT25f25l227c40;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l227c40;
u->closed_C=closed_C;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l206c40(se_agenT25f25l206c40*u){
+void gc_mark_agenT25f25l227c40(se_agenT25f25l227c40*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9761,21 +10328,21 @@ gc_mark(u->closed_C);
}/*--*/
-/*agent launcher*/static void _agenT25f25l205c39(se_agenT25f25l205c39*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l226c39(se_agenT25f25l226c39*u,T0* open_a2){
T0* closed_C=(u->closed_C);
r70proximity(((T70*)closed_C),(T6)(1),open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l205c39(T0* closed_C){
-se_agenT25f25l205c39*u=(void*)new_agent(244);
-u->creation_mold_id=1;
-u->afp=_agenT25f25l205c39;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l205c39;
+/*agent creation*/T0*agenT25f25l226c39(T0* closed_C){
+se_agenT25f25l226c39*u=(void*)new_agent(244);
+u->creation_mold_id=2;
+u->afp=_agenT25f25l226c39;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l226c39;
u->closed_C=closed_C;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l205c39(se_agenT25f25l205c39*u){
+void gc_mark_agenT25f25l226c39(se_agenT25f25l226c39*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9784,21 +10351,21 @@ gc_mark(u->closed_C);
}/*--*/
-/*agent launcher*/static void _agenT25f25l204c42(se_agenT25f25l204c42*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l225c42(se_agenT25f25l225c42*u,T0* open_a2){
T0* closed_C=(u->closed_C);
r70button(((T70*)closed_C),(T6)(0),open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l204c42(T0* closed_C){
-se_agenT25f25l204c42*u=(void*)new_agent(244);
-u->creation_mold_id=2;
-u->afp=_agenT25f25l204c42;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l204c42;
+/*agent creation*/T0*agenT25f25l225c42(T0* closed_C){
+se_agenT25f25l225c42*u=(void*)new_agent(244);
+u->creation_mold_id=3;
+u->afp=_agenT25f25l225c42;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l225c42;
u->closed_C=closed_C;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l204c42(se_agenT25f25l204c42*u){
+void gc_mark_agenT25f25l225c42(se_agenT25f25l225c42*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9807,21 +10374,21 @@ gc_mark(u->closed_C);
}/*--*/
-/*agent launcher*/static void _agenT25f25l203c41(se_agenT25f25l203c41*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l224c41(se_agenT25f25l224c41*u,T0* open_a2){
T0* closed_C=(u->closed_C);
r70button(((T70*)closed_C),(T6)(1),open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l203c41(T0* closed_C){
-se_agenT25f25l203c41*u=(void*)new_agent(244);
-u->creation_mold_id=3;
-u->afp=_agenT25f25l203c41;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l203c41;
+/*agent creation*/T0*agenT25f25l224c41(T0* closed_C){
+se_agenT25f25l224c41*u=(void*)new_agent(244);
+u->creation_mold_id=4;
+u->afp=_agenT25f25l224c41;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l224c41;
u->closed_C=closed_C;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l203c41(se_agenT25f25l203c41*u){
+void gc_mark_agenT25f25l224c41(se_agenT25f25l224c41*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9830,21 +10397,21 @@ gc_mark(u->closed_C);
}/*--*/
-/*agent launcher*/static void _agenT25f25l202c32(se_agenT25f25l202c32*u,T0* open_a1){
+/*agent launcher*/static void _agenT25f25l223c32(se_agenT25f25l223c32*u,T0* open_a1){
T0* closed_C=(u->closed_C);
r70move(((T70*)closed_C),open_a1);
}/*--*/
-/*agent creation*/T0*agenT25f25l202c32(T0* closed_C){
-se_agenT25f25l202c32*u=(void*)new_agent(244);
-u->creation_mold_id=4;
-u->afp=_agenT25f25l202c32;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l202c32;
+/*agent creation*/T0*agenT25f25l223c32(T0* closed_C){
+se_agenT25f25l223c32*u=(void*)new_agent(244);
+u->creation_mold_id=5;
+u->afp=_agenT25f25l223c32;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l223c32;
u->closed_C=closed_C;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l202c32(se_agenT25f25l202c32*u){
+void gc_mark_agenT25f25l223c32(se_agenT25f25l223c32*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9853,23 +10420,23 @@ gc_mark(u->closed_C);
}/*--*/
-/*agent launcher*/static void _agenT25f25l185c38(se_agenT25f25l185c38*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l205c38(se_agenT25f25l205c38*u,T0* open_a2){
T0* closed_C=(u->closed_C);
T0* closed_a1=(u->closed_a1);
r25pad_button_released(((T25*)closed_C),closed_a1,open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l185c38(T0* closed_C,T0* closed_a1){
-se_agenT25f25l185c38*u=(void*)new_agent(244);
-u->creation_mold_id=5;
-u->afp=_agenT25f25l185c38;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l185c38;
+/*agent creation*/T0*agenT25f25l205c38(T0* closed_C,T0* closed_a1){
+se_agenT25f25l205c38*u=(void*)new_agent(244);
+u->creation_mold_id=6;
+u->afp=_agenT25f25l205c38;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l205c38;
u->closed_C=closed_C;
u->closed_a1=closed_a1;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l185c38(se_agenT25f25l185c38*u){
+void gc_mark_agenT25f25l205c38(se_agenT25f25l205c38*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9879,23 +10446,23 @@ gc_mark(u->closed_a1);
}/*--*/
-/*agent launcher*/static void _agenT25f25l184c37(se_agenT25f25l184c37*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l204c37(se_agenT25f25l204c37*u,T0* open_a2){
T0* closed_C=(u->closed_C);
T0* closed_a1=(u->closed_a1);
r25pad_button_pressed(((T25*)closed_C),closed_a1,open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l184c37(T0* closed_C,T0* closed_a1){
-se_agenT25f25l184c37*u=(void*)new_agent(244);
-u->creation_mold_id=6;
-u->afp=_agenT25f25l184c37;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l184c37;
+/*agent creation*/T0*agenT25f25l204c37(T0* closed_C,T0* closed_a1){
+se_agenT25f25l204c37*u=(void*)new_agent(244);
+u->creation_mold_id=7;
+u->afp=_agenT25f25l204c37;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l204c37;
u->closed_C=closed_C;
u->closed_a1=closed_a1;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l184c37(se_agenT25f25l184c37*u){
+void gc_mark_agenT25f25l204c37(se_agenT25f25l204c37*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9905,23 +10472,23 @@ gc_mark(u->closed_a1);
}/*--*/
-/*agent launcher*/static void _agenT25f25l179c36(se_agenT25f25l179c36*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l199c36(se_agenT25f25l199c36*u,T0* open_a2){
T0* closed_C=(u->closed_C);
T0* closed_a1=(u->closed_a1);
r25left_slider_out(((T25*)closed_C),closed_a1,open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l179c36(T0* closed_C,T0* closed_a1){
-se_agenT25f25l179c36*u=(void*)new_agent(244);
-u->creation_mold_id=7;
-u->afp=_agenT25f25l179c36;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l179c36;
+/*agent creation*/T0*agenT25f25l199c36(T0* closed_C,T0* closed_a1){
+se_agenT25f25l199c36*u=(void*)new_agent(244);
+u->creation_mold_id=8;
+u->afp=_agenT25f25l199c36;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l199c36;
u->closed_C=closed_C;
u->closed_a1=closed_a1;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l179c36(se_agenT25f25l179c36*u){
+void gc_mark_agenT25f25l199c36(se_agenT25f25l199c36*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -9931,23 +10498,23 @@ gc_mark(u->closed_a1);
}/*--*/
-/*agent launcher*/static void _agenT25f25l178c28(se_agenT25f25l178c28*u,T0* open_a2){
+/*agent launcher*/static void _agenT25f25l198c28(se_agenT25f25l198c28*u,T0* open_a2){
T0* closed_C=(u->closed_C);
T0* closed_a1=(u->closed_a1);
r25slider_event(((T25*)closed_C),closed_a1,open_a2);
}/*--*/
-/*agent creation*/T0*agenT25f25l178c28(T0* closed_C,T0* closed_a1){
-se_agenT25f25l178c28*u=(void*)new_agent(244);
-u->creation_mold_id=8;
-u->afp=_agenT25f25l178c28;
-u->gc_mark_agent_mold=gc_mark_agenT25f25l178c28;
+/*agent creation*/T0*agenT25f25l198c28(T0* closed_C,T0* closed_a1){
+se_agenT25f25l198c28*u=(void*)new_agent(244);
+u->creation_mold_id=9;
+u->afp=_agenT25f25l198c28;
+u->gc_mark_agent_mold=gc_mark_agenT25f25l198c28;
u->closed_C=closed_C;
u->closed_a1=closed_a1;
return((T0*)u);
}/*--*/
-void gc_mark_agenT25f25l178c28(se_agenT25f25l178c28*u){
+void gc_mark_agenT25f25l198c28(se_agenT25f25l198c28*u){
gc_agent*gcu=(gc_agent*)u;
if (gcu->header.flag==FSOH_UNMARKED){
gcu->header.flag=FSOH_MARKED;
@@ -10571,7 +11138,6 @@ r43put_string(se_ms(40,s25_1554692325));
}
break;
case 7:
-r7copy((T7*)((/*RF2*/(C)->_application_name/*8p*/)),_value);
break;
case 8:
r7copy((T7*)((/*RF2*/(C)->_device_id/*8p*/)),_value);
@@ -10687,7 +11253,7 @@ _i=((int32_t)(_i))+(INT32_C(1));
}/*--*/
/*XINPUT_IVY*/void r25print_help(void){
-r46put_string(se_ms(4362,s25_674125196));
+r46put_string(se_ms(4506,s25_1126339109));
}/*--*/
/*XINPUT_IVY*/T6 r25init_pad(T25* C,T0* a1){
@@ -10700,20 +11266,35 @@ R=((T6)(1));
_message_header=se_ms(23,s25_1948078333);
r7append(((T7*)_message_header),(/*RF2*/(C)->_device_id/*8p*/));
r7append(((T7*)_message_header),ms25_946366);
-r68when_moved(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l178c28((T0*)C,_message_header));
-r68when_proximity_out(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l179c36((T0*)C,_message_header));
+r68when_moved(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l198c28((T0*)C,_message_header));
+r68when_proximity_out(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l199c36((T0*)C,_message_header));
_message_header=se_ms(20,s25_1666922512);
r7append(((T7*)_message_header),(/*RF2*/(C)->_device_id/*8p*/));
r7append(((T7*)_message_header),ms25_4487261);
-r68when_button_pressed(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l184c37((T0*)C,_message_header));
-r68when_button_released(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l185c38((T0*)C,_message_header));
+r68when_button_pressed(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l204c37((T0*)C,_message_header));
+r68when_button_released(((T68*)_pad),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l205c38((T0*)C,_message_header));
}
return R;
}/*--*/
+/*XINPUT_IVY*/void r25decode_application_name_option(T25* C){
+T2 _i=0;
+T2 _equal_index=0;
+_i=INT32_C(1);
+while(!(((int32_t)(_i))>(r25argument_count())))
+{
+if(r7has_prefix((T7*)(((/*RF2*/((T247*)(r25command_arguments()))->_storage/*3p*/))[_i]),ms25_92383297)){
+r7copy((T7*)((/*RF2*/(C)->_application_name/*8p*/)),((/*RF2*/((T247*)(r25command_arguments()))->_storage/*3p*/))[_i]);
+_equal_index=r7first_index_of((T7*)((/*RF2*/(C)->_application_name/*8p*/)),((T3)'\075'));
+r7remove_head((T7*)((/*RF2*/(C)->_application_name/*8p*/)),_equal_index);
+}
+_i=((int32_t)(_i))+(INT32_C(1));
+}
+}/*--*/
+
/*XINPUT_IVY*/void r25left_slider_out(T25* C,T0* a1,T0* a2){
T0* _message=(void*)0;
-_message=ms25_0bc25c15l376;
+_message=ms25_0bc25c15l400;
r7copy(((T7*)_message),a1);
r7extend(((T7*)_message),((T3)'0'));
r7append(((T7*)_message),ms25_1403610646bc25);
@@ -10732,6 +11313,12 @@ r2append_in(x_device_event_time,_message);
r71send_message((T71*)((/*RF2*/(C)->_ivy/*8p*/)),_message);
}/*--*/
+/*XINPUT_IVY*/T2 r25argument_count(void){
+T2 R=0;
+R=(/*RF2*/((T247*)(r25command_arguments()))->_upper/*3p*/);
+return R;
+}/*--*/
+
/*XINPUT_IVY*/void r25pad_button_released(T25* C,T0* a1,T0* a2){
T0* _message=(void*)0;
_message=ms25_0bc25;
@@ -10742,12 +11329,6 @@ r2append_in(x_device_event_time,_message);
r71send_message((T71*)((/*RF2*/(C)->_ivy/*8p*/)),_message);
}/*--*/
-/*XINPUT_IVY*/T2 r25argument_count(void){
-T2 R=0;
-R=(/*RF2*/((T247*)(r25command_arguments()))->_upper/*3p*/);
-return R;
-}/*--*/
-
/*XINPUT_IVY*/void r25make(T25* C){
/*[INTERNAL_C_LOCAL list*/
T0* tmp0;
@@ -10757,12 +11338,13 @@ T6 _ready=0;
/*SFN*/(C->_ivy_bus/*8p*/)=se_ms(0,s25_0);
/*SFN*/(C->_device_id/*8p*/)=se_ms(7,s25_1957581);
/*SFN*/(C->_screen/*8p*/)=((/*UT*/(void)((T65*)(r25vision()))),r65root_window());
-_ready=((T6)(r25decode_options(C)));
-if(_ready){
+r25decode_application_name_option(C);
tmp0/*new*/=((T0*)(new71()));
r71make(((T71*)tmp0/*new*/),(/*RF2*/(C)->_application_name/*8p*/));
/*SFN*/(C->_ivy/*8p*/)=tmp0/*new*/;
/*tmp0.unlock*/
+_ready=((T6)(r25decode_options(C)));
+if(_ready){
r71start((T71*)((/*RF2*/(C)->_ivy/*8p*/)),(/*RF2*/(C)->_ivy_bus/*8p*/));
r155add_job((T155*)(r133current_loop(((T133*)/*no_dispatch.e*/(/*RF2*/((T65*)(r25vision()))->_loop_stack/*6p*/)))),(/*RF2*/(C)->_ivy/*8p*/));
r65start((T65*)(r25vision()));
@@ -10819,11 +11401,12 @@ _wacom_pointer=r70twin(((T70*)a1));
_message_header=se_ms(17,s25_765567725);
r7append(((T7*)_message_header),(/*RF2*/(C)->_device_id/*8p*/));
r70set_message_header(((T70*)_wacom_pointer),_message_header);
-r68when_moved(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l202c32(_wacom_pointer));
-r68when_button_pressed(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l203c41(_wacom_pointer));
-r68when_button_released(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l204c42(_wacom_pointer));
-r68when_proximity_in(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l205c39(_wacom_pointer));
-r68when_proximity_out(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l206c40(_wacom_pointer));
+r70crop_identifier(((T70*)_wacom_pointer),(/*RF2*/(C)->_device_id/*8p*/));
+r68when_moved(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l223c32(_wacom_pointer));
+r68when_button_pressed(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l224c41(_wacom_pointer));
+r68when_button_released(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l225c42(_wacom_pointer));
+r68when_proximity_in(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l226c39(_wacom_pointer));
+r68when_proximity_out(((T68*)_pointer),(/*RF2*/(C)->_screen/*8p*/),agenT25f25l227c40(_wacom_pointer));
}
return R;
}/*--*/
@@ -10878,45 +11461,49 @@ r71send_message((T71*)((/*RF2*/(C)->_ivy/*8p*/)),_message);
void agent_launcher_FAST_ARRAY__STRING__(/*agent*/T0*a,T0* a1){
/*PROCEDURE[TUPLE[FAST_ARRAY[STRING]]]*/switch(((se_agent0*)a)->creation_mold_id){
+case 0:{
+((se_agenT70f70l203c34*)a)->afp(((/*agent*/void*)a),a1);
+break;
+}
}
}/*--*/
void agent_launcher_X_INPUT_DEVICE(/*agent*/T0*a,T0* a1){
/*PROCEDURE[TUPLE[X_INPUT_DEVICE]]*/switch(((se_agent0*)a)->creation_mold_id){
-case 0:{
-((se_agenT25f25l206c40*)a)->afp(((/*agent*/void*)a),a1);
-break;
-}
case 1:{
-((se_agenT25f25l205c39*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l227c40*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 2:{
-((se_agenT25f25l204c42*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l226c39*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 3:{
-((se_agenT25f25l203c41*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l225c42*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 4:{
-((se_agenT25f25l202c32*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l224c41*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 5:{
-((se_agenT25f25l185c38*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l223c32*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 6:{
-((se_agenT25f25l184c37*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l205c38*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 7:{
-((se_agenT25f25l179c36*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l204c37*)a)->afp(((/*agent*/void*)a),a1);
break;
}
case 8:{
-((se_agenT25f25l178c28*)a)->afp(((/*agent*/void*)a),a1);
+((se_agenT25f25l199c36*)a)->afp(((/*agent*/void*)a),a1);
+break;
+}
+case 9:{
+((se_agenT25f25l198c28*)a)->afp(((/*agent*/void*)a),a1);
break;
}
}
@@ -11090,17 +11677,19 @@ void gc_align_mark_agent (fsoc * c, gc_agent * p) {
}
#endif /* SE_GC_LIB */
-T0*ms25_0bc70c16;
T0*ms25_0bc70c15;
+T0*ms25_0bc70c11;
T0*ms70_952626;
T0*ms70_15980;
-T0*ms25_0bc25c15l376;
+T0*ms25_0bc25c15l400;
+T0*ms25_92383297;
T0*ms25_0bc70c15l97;
T0*ms70_1874520032;
T0*ms70_22702416;
T0*ms70_22702411;
T0*ms25_0bc25;
T0*ms25_0bc70;
+T0*ms70_2097616536;
T0*ms70_2057747851;
T0*ms25_1403610646;
T0*ms70_1257860908;
@@ -11110,6 +11699,7 @@ T0*ms25_0;
T0*ms70_188916;
T0*ms25_1959886733;
T0*ms25_0bc25c15;
+T0*ms70_112207026;
T0*ms25_3479972;
T0*ms70_2112369621;
T0*ms25_21190322;
@@ -11119,6 +11709,7 @@ T0*ms70_10739017;
T0*ms25_314746909;
T0*ms70_1961093439;
T0*ms25_1638797568;
+T0*ms70_220157120;
T0*ms70_1699147265;
T0*ms70_475;
T0*ms70_697;
@@ -11145,6 +11736,7 @@ T0*ms70_104371267;
T0*ms70_56246305bc70;
T0*ms70_56246305;
T0*ms25_946366;
+T0*ms25_0bc70c15l379;
T0*se_ms(int c,char*e){
/* Allocate a Manifest STRING.*/
@@ -11166,17 +11758,19 @@ memcpy(s->_storage,e,c+1);
return((T0*)s);}/*--*/
void se_msi1(void){
-ms25_0bc70c16=se_ms(0,s25_0);
ms25_0bc70c15=se_ms(0,s25_0);
+ms25_0bc70c11=se_ms(0,s25_0);
ms70_952626=se_ms(7,s70_952626);
ms70_15980=se_ms(4,s70_15980);
-ms25_0bc25c15l376=se_ms(0,s25_0);
+ms25_0bc25c15l400=se_ms(0,s25_0);
+ms25_92383297=se_ms(13,s25_92383297);
ms25_0bc70c15l97=se_ms(0,s25_0);
ms70_1874520032=se_ms(15,s70_1874520032);
ms70_22702416=se_ms(9,s70_22702416);
ms70_22702411=se_ms(9,s70_22702411);
ms25_0bc25=se_ms(0,s25_0);
ms25_0bc70=se_ms(0,s25_0);
+ms70_2097616536=se_ms(59,s70_2097616536);
ms70_2057747851=se_ms(20,s70_2057747851);
ms25_1403610646=se_ms(16,s25_1403610646);
ms70_1257860908=se_ms(11,s70_1257860908);
@@ -11186,6 +11780,7 @@ ms25_0=se_ms(0,s25_0);
ms70_188916=se_ms(6,s70_188916);
ms25_1959886733=se_ms(13,s25_1959886733);
ms25_0bc25c15=se_ms(0,s25_0);
+ms70_112207026=se_ms(10,s70_112207026);
ms25_3479972=se_ms(8,s25_3479972);
ms70_2112369621=se_ms(15,s70_2112369621);
ms25_21190322=se_ms(9,s25_21190322);
@@ -11195,6 +11790,7 @@ ms70_10739017=se_ms(8,s70_10739017);
ms25_314746909=se_ms(16,s25_314746909);
ms70_1961093439=se_ms(15,s70_1961093439);
ms25_1638797568=se_ms(17,s25_1638797568);
+ms70_220157120=se_ms(23,s70_220157120);
ms70_1699147265=se_ms(23,s70_1699147265);
ms70_475=se_ms(2,s70_475);
ms70_697=se_ms(2,s70_697);
@@ -11212,32 +11808,35 @@ ms70_1461=se_ms(3,s70_1461);
ms70_1466=se_ms(3,s70_1466);
ms70_2676=se_ms(3,s70_2676);
ms70_4725666=se_ms(8,s70_4725666);
+se_msi2();}/*--*/
+
+void se_msi2(void){
ms70_4725661=se_ms(8,s70_4725661);
ms25_4487261=se_ms(8,s25_4487261);
ms70_1501987274=se_ms(20,s70_1501987274);
ms70_104371129=se_ms(13,s70_104371129);
-se_msi2();}/*--*/
-
-void se_msi2(void){
ms25_1403610646bc25=se_ms(16,s25_1403610646);
ms70_104371267=se_ms(13,s70_104371267);
ms70_56246305bc70=se_ms(9,s70_56246305);
ms70_56246305=se_ms(9,s70_56246305);
ms25_946366=se_ms(7,s25_946366);
+ms25_0bc70c15l379=se_ms(0,s25_0);
}/*--*/
void manifest_string_mark1(void){
-gc_mark7((T7*)ms25_0bc70c16);
gc_mark7((T7*)ms25_0bc70c15);
+gc_mark7((T7*)ms25_0bc70c11);
gc_mark7((T7*)ms70_952626);
gc_mark7((T7*)ms70_15980);
-gc_mark7((T7*)ms25_0bc25c15l376);
+gc_mark7((T7*)ms25_0bc25c15l400);
+gc_mark7((T7*)ms25_92383297);
gc_mark7((T7*)ms25_0bc70c15l97);
gc_mark7((T7*)ms70_1874520032);
gc_mark7((T7*)ms70_22702416);
gc_mark7((T7*)ms70_22702411);
gc_mark7((T7*)ms25_0bc25);
gc_mark7((T7*)ms25_0bc70);
+gc_mark7((T7*)ms70_2097616536);
gc_mark7((T7*)ms70_2057747851);
gc_mark7((T7*)ms25_1403610646);
gc_mark7((T7*)ms70_1257860908);
@@ -11247,6 +11846,7 @@ gc_mark7((T7*)ms25_0);
gc_mark7((T7*)ms70_188916);
gc_mark7((T7*)ms25_1959886733);
gc_mark7((T7*)ms25_0bc25c15);
+gc_mark7((T7*)ms70_112207026);
gc_mark7((T7*)ms25_3479972);
gc_mark7((T7*)ms70_2112369621);
gc_mark7((T7*)ms25_21190322);
@@ -11256,6 +11856,7 @@ gc_mark7((T7*)ms70_10739017);
gc_mark7((T7*)ms25_314746909);
gc_mark7((T7*)ms70_1961093439);
gc_mark7((T7*)ms25_1638797568);
+gc_mark7((T7*)ms70_220157120);
gc_mark7((T7*)ms70_1699147265);
gc_mark7((T7*)ms70_475);
gc_mark7((T7*)ms70_697);
@@ -11282,13 +11883,14 @@ gc_mark7((T7*)ms70_104371267);
gc_mark7((T7*)ms70_56246305bc70);
gc_mark7((T7*)ms70_56246305);
gc_mark7((T7*)ms25_946366);
+gc_mark7((T7*)ms25_0bc70c15l379);
}/*--*/
void once_function_mark(void){
/*NON_VOID_NO_DISPATCH:*/
+gc_mark46((T46*)(oBC13io));
gc_mark9((oBC102sprintf_buffer));
gc_mark43((T43*)(oBC13std_error));
-gc_mark46((T46*)(oBC13io));
/*Ordinary once functions:*/
if(NULL!=oBC30command_arguments)gc_mark247((T247*)(oBC30command_arguments));
if(NULL!=oBC26vision)gc_mark65((T65*)(oBC26vision));
@@ -11308,6 +11910,13 @@ gcmt_tail_addr=(((char*)(gcmt[gcmt_used-1]))+(gcmt[gcmt_used-1])->size);
((gc25*)eiffel_root_object)->header.flag=FSOH_UNMARKED;
gc_free113=(void*)0;
gc_free123=(void*)0;
+if(na_env338.store_left>0){
+na_env338.store->header.size=na_env338.store_left;
+na_env338.store->header.magic_flag=RSOH_FREE;
+na_env338.store_left=0;
+}
+na_env338.chunk_list=NULL;
+na_env338.store_chunk=NULL;
if(na_env337.store_left>0){
na_env337.store->header.size=na_env337.store_left;
na_env337.store->header.magic_flag=RSOH_FREE;
@@ -11343,13 +11952,6 @@ na_env333.store_left=0;
}
na_env333.chunk_list=NULL;
na_env333.store_chunk=NULL;
-if(na_env332.store_left>0){
-na_env332.store->header.size=na_env332.store_left;
-na_env332.store->header.magic_flag=RSOH_FREE;
-na_env332.store_left=0;
-}
-na_env332.chunk_list=NULL;
-na_env332.store_chunk=NULL;
if(na_env331.store_left>0){
na_env331.store->header.size=na_env331.store_left;
na_env331.store->header.magic_flag=RSOH_FREE;
@@ -11420,29 +12022,13 @@ na_env305.store_left=0;
}
na_env305.chunk_list=NULL;
na_env305.store_chunk=NULL;
-if(na_env304.store_left>0){
-na_env304.store->header.size=na_env304.store_left;
-na_env304.store->header.magic_flag=RSOH_FREE;
-na_env304.store_left=0;
-}
-na_env304.chunk_list=NULL;
-na_env304.store_chunk=NULL;
-if(na_env303.store_left>0){
-na_env303.store->header.size=na_env303.store_left;
-na_env303.store->header.magic_flag=RSOH_FREE;
-na_env303.store_left=0;
-}
-na_env303.chunk_list=NULL;
-na_env303.store_chunk=NULL;
-gc_free302=(void*)0;
-if(na_env301.store_left>0){
-na_env301.store->header.size=na_env301.store_left;
-na_env301.store->header.magic_flag=RSOH_FREE;
-na_env301.store_left=0;
+if(na_env298.store_left>0){
+na_env298.store->header.size=na_env298.store_left;
+na_env298.store->header.magic_flag=RSOH_FREE;
+na_env298.store_left=0;
}
-na_env301.chunk_list=NULL;
-na_env301.store_chunk=NULL;
-gc_free300=(void*)0;
+na_env298.chunk_list=NULL;
+na_env298.store_chunk=NULL;
if(na_env299.store_left>0){
na_env299.store->header.size=na_env299.store_left;
na_env299.store->header.magic_flag=RSOH_FREE;
@@ -11450,7 +12036,23 @@ na_env299.store_left=0;
}
na_env299.chunk_list=NULL;
na_env299.store_chunk=NULL;
-gc_free298=(void*)0;
+gc_free304=(void*)0;
+if(na_env302.store_left>0){
+na_env302.store->header.size=na_env302.store_left;
+na_env302.store->header.magic_flag=RSOH_FREE;
+na_env302.store_left=0;
+}
+na_env302.chunk_list=NULL;
+na_env302.store_chunk=NULL;
+gc_free303=(void*)0;
+if(na_env301.store_left>0){
+na_env301.store->header.size=na_env301.store_left;
+na_env301.store->header.magic_flag=RSOH_FREE;
+na_env301.store_left=0;
+}
+na_env301.chunk_list=NULL;
+na_env301.store_chunk=NULL;
+gc_free300=(void*)0;
gc_free297=(void*)0;
gc_free296=(void*)0;
if(na_env295.store_left>0){
@@ -11468,6 +12070,7 @@ na_env294.store_left=0;
na_env294.chunk_list=NULL;
na_env294.store_chunk=NULL;
gc_free293=(void*)0;
+gc_free292=(void*)0;
if(na_env291.store_left>0){
na_env291.store->header.size=na_env291.store_left;
na_env291.store->header.magic_flag=RSOH_FREE;
@@ -11479,6 +12082,7 @@ gc_free290=(void*)0;
gc_free289=(void*)0;
gc_free288=(void*)0;
gc_free287=(void*)0;
+gc_free284=(void*)0;
if(na_env283.store_left>0){
na_env283.store->header.size=na_env283.store_left;
na_env283.store->header.magic_flag=RSOH_FREE;
@@ -11501,7 +12105,7 @@ na_env281.store_left=0;
na_env281.chunk_list=NULL;
na_env281.store_chunk=NULL;
gc_free280=(void*)0;
-gc_free154=(void*)0;
+gc_free153=(void*)0;
gc_free279=(void*)0;
gc_free160=(void*)0;
gc_free277=(void*)0;
@@ -11511,33 +12115,33 @@ gc_free273=(void*)0;
gc_free271=(void*)0;
gc_free269=(void*)0;
gc_free268=(void*)0;
-if(na_env267.store_left>0){
-na_env267.store->header.size=na_env267.store_left;
-na_env267.store->header.magic_flag=RSOH_FREE;
-na_env267.store_left=0;
-}
-na_env267.chunk_list=NULL;
-na_env267.store_chunk=NULL;
gc_free146=(void*)0;
gc_free266=(void*)0;
gc_free149=(void*)0;
-gc_free265=(void*)0;
+gc_free260=(void*)0;
gc_free148=(void*)0;
-gc_free264=(void*)0;
-if(na_env263.store_left>0){
-na_env263.store->header.size=na_env263.store_left;
-na_env263.store->header.magic_flag=RSOH_FREE;
-na_env263.store_left=0;
+gc_free261=(void*)0;
+if(na_env265.store_left>0){
+na_env265.store->header.size=na_env265.store_left;
+na_env265.store->header.magic_flag=RSOH_FREE;
+na_env265.store_left=0;
}
-na_env263.chunk_list=NULL;
-na_env263.store_chunk=NULL;
+na_env265.chunk_list=NULL;
+na_env265.store_chunk=NULL;
+gc_free264=(void*)0;
+gc_free263=(void*)0;
gc_free262=(void*)0;
-gc_free261=(void*)0;
-gc_free260=(void*)0;
gc_free259=(void*)0;
gc_free258=(void*)0;
gc_free256=(void*)0;
gc_free255=(void*)0;
+if(na_env267.store_left>0){
+na_env267.store->header.size=na_env267.store_left;
+na_env267.store->header.magic_flag=RSOH_FREE;
+na_env267.store_left=0;
+}
+na_env267.chunk_list=NULL;
+na_env267.store_chunk=NULL;
if(na_env254.store_left>0){
na_env254.store->header.size=na_env254.store_left;
na_env254.store->header.magic_flag=RSOH_FREE;
@@ -11547,7 +12151,7 @@ na_env254.chunk_list=NULL;
na_env254.store_chunk=NULL;
gc_free253=(void*)0;
gc_free250=(void*)0;
-gc_free153=(void*)0;
+gc_free154=(void*)0;
gc_free249=(void*)0;
gc_free248=(void*)0;
gc_free155=(void*)0;
@@ -11557,12 +12161,12 @@ gc_free133=(void*)0;
gc_free131=(void*)0;
gc_free53=(void*)0;
gc_free46=(void*)0;
-gc_free247=(void*)0;
gc_free191=(void*)0;
gc_free246=(void*)0;
gc_free68=(void*)0;
gc_free43=(void*)0;
gc_free70=(void*)0;
+gc_free247=(void*)0;
if(na_env9.store_left>0){
na_env9.store->header.size=na_env9.store_left;
na_env9.store->header.magic_flag=RSOH_FREE;
@@ -11600,12 +12204,12 @@ gc123*store123=(void*)0;
int store_left123=0;
fsoc*store_chunk123=(void*)0;
gc123*gc_free123=(void*)0;
+na_env na_env338={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark338};
na_env na_env337={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark337};
na_env na_env336={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark336};
na_env na_env335={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark335};
na_env na_env334={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark334};
na_env na_env333={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark333};
-na_env na_env332={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark332};
na_env na_env331={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark331};
na_env na_env330={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark330};
gc329*store329=(void*)0;
@@ -11643,22 +12247,22 @@ fsoc*store_chunk307=(void*)0;
gc307*gc_free307=(void*)0;
na_env na_env306={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark306};
na_env na_env305={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark305};
-na_env na_env304={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark304};
-na_env na_env303={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark303};
-gc302*store302=(void*)0;
-int store_left302=0;
-fsoc*store_chunk302=(void*)0;
-gc302*gc_free302=(void*)0;
+na_env na_env298={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark298};
+na_env na_env299={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark299};
+gc304*store304=(void*)0;
+int store_left304=0;
+fsoc*store_chunk304=(void*)0;
+gc304*gc_free304=(void*)0;
+na_env na_env302={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark302};
+gc303*store303=(void*)0;
+int store_left303=0;
+fsoc*store_chunk303=(void*)0;
+gc303*gc_free303=(void*)0;
na_env na_env301={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark301};
gc300*store300=(void*)0;
int store_left300=0;
fsoc*store_chunk300=(void*)0;
gc300*gc_free300=(void*)0;
-na_env na_env299={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark299};
-gc298*store298=(void*)0;
-int store_left298=0;
-fsoc*store_chunk298=(void*)0;
-gc298*gc_free298=(void*)0;
gc297*store297=(void*)0;
int store_left297=0;
fsoc*store_chunk297=(void*)0;
@@ -11673,6 +12277,10 @@ gc293*store293=(void*)0;
int store_left293=0;
fsoc*store_chunk293=(void*)0;
gc293*gc_free293=(void*)0;
+gc292*store292=(void*)0;
+int store_left292=0;
+fsoc*store_chunk292=(void*)0;
+gc292*gc_free292=(void*)0;
na_env na_env291={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark291};
gc290*store290=(void*)0;
int store_left290=0;
@@ -11690,6 +12298,10 @@ gc287*store287=(void*)0;
int store_left287=0;
fsoc*store_chunk287=(void*)0;
gc287*gc_free287=(void*)0;
+gc284*store284=(void*)0;
+int store_left284=0;
+fsoc*store_chunk284=(void*)0;
+gc284*gc_free284=(void*)0;
na_env na_env283={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark283};
na_env na_env282={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark282};
na_env na_env281={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark281};
@@ -11697,10 +12309,10 @@ gc280*store280=(void*)0;
int store_left280=0;
fsoc*store_chunk280=(void*)0;
gc280*gc_free280=(void*)0;
-gc154*store154=(void*)0;
-int store_left154=0;
-fsoc*store_chunk154=(void*)0;
-gc154*gc_free154=(void*)0;
+gc153*store153=(void*)0;
+int store_left153=0;
+fsoc*store_chunk153=(void*)0;
+gc153*gc_free153=(void*)0;
gc279*store279=(void*)0;
int store_left279=0;
fsoc*store_chunk279=(void*)0;
@@ -11737,7 +12349,6 @@ gc268*store268=(void*)0;
int store_left268=0;
fsoc*store_chunk268=(void*)0;
gc268*gc_free268=(void*)0;
-na_env na_env267={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark267};
gc146*store146=(void*)0;
int store_left146=0;
fsoc*store_chunk146=(void*)0;
@@ -11750,31 +12361,31 @@ gc149*store149=(void*)0;
int store_left149=0;
fsoc*store_chunk149=(void*)0;
gc149*gc_free149=(void*)0;
-gc265*store265=(void*)0;
-int store_left265=0;
-fsoc*store_chunk265=(void*)0;
-gc265*gc_free265=(void*)0;
+gc260*store260=(void*)0;
+int store_left260=0;
+fsoc*store_chunk260=(void*)0;
+gc260*gc_free260=(void*)0;
gc148*store148=(void*)0;
int store_left148=0;
fsoc*store_chunk148=(void*)0;
gc148*gc_free148=(void*)0;
+gc261*store261=(void*)0;
+int store_left261=0;
+fsoc*store_chunk261=(void*)0;
+gc261*gc_free261=(void*)0;
+na_env na_env265={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark265};
gc264*store264=(void*)0;
int store_left264=0;
fsoc*store_chunk264=(void*)0;
gc264*gc_free264=(void*)0;
-na_env na_env263={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark263};
+gc263*store263=(void*)0;
+int store_left263=0;
+fsoc*store_chunk263=(void*)0;
+gc263*gc_free263=(void*)0;
gc262*store262=(void*)0;
int store_left262=0;
fsoc*store_chunk262=(void*)0;
gc262*gc_free262=(void*)0;
-gc261*store261=(void*)0;
-int store_left261=0;
-fsoc*store_chunk261=(void*)0;
-gc261*gc_free261=(void*)0;
-gc260*store260=(void*)0;
-int store_left260=0;
-fsoc*store_chunk260=(void*)0;
-gc260*gc_free260=(void*)0;
gc259*store259=(void*)0;
int store_left259=0;
fsoc*store_chunk259=(void*)0;
@@ -11791,6 +12402,7 @@ gc255*store255=(void*)0;
int store_left255=0;
fsoc*store_chunk255=(void*)0;
gc255*gc_free255=(void*)0;
+na_env na_env267={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark267};
na_env na_env254={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark254};
gc253*store253=(void*)0;
int store_left253=0;
@@ -11800,10 +12412,10 @@ gc250*store250=(void*)0;
int store_left250=0;
fsoc*store_chunk250=(void*)0;
gc250*gc_free250=(void*)0;
-gc153*store153=(void*)0;
-int store_left153=0;
-fsoc*store_chunk153=(void*)0;
-gc153*gc_free153=(void*)0;
+gc154*store154=(void*)0;
+int store_left154=0;
+fsoc*store_chunk154=(void*)0;
+gc154*gc_free154=(void*)0;
gc249*store249=(void*)0;
int store_left249=0;
fsoc*store_chunk249=(void*)0;
@@ -11840,10 +12452,6 @@ gc46*store46=(void*)0;
int store_left46=0;
fsoc*store_chunk46=(void*)0;
gc46*gc_free46=(void*)0;
-gc247*store247=(void*)0;
-int store_left247=0;
-fsoc*store_chunk247=(void*)0;
-gc247*gc_free247=(void*)0;
gc191*store191=(void*)0;
int store_left191=0;
fsoc*store_chunk191=(void*)0;
@@ -11864,6 +12472,10 @@ gc70*store70=(void*)0;
int store_left70=0;
fsoc*store_chunk70=(void*)0;
gc70*gc_free70=(void*)0;
+gc247*store247=(void*)0;
+int store_left247=0;
+fsoc*store_chunk247=(void*)0;
+gc247*gc_free247=(void*)0;
na_env na_env9={0,NULL,NULL,NULL,(void(*)(T0*))gc_mark9};
gc7*store7=(void*)0;
int store_left7=0;
@@ -11921,7 +12533,7 @@ c->header.state_type=FSO_FREE_CHUNK;
void gc_mark113(T113*o){
if(((gc113*)o)->header.flag==FSOH_UNMARKED){
((gc113*)o)->header.flag=FSOH_MARKED;
-/*ip*/if(NULL!=o->_stream)gc_mark153((T153*)(o->_stream));
+/*ip*/if(NULL!=o->_stream)gc_mark154((T154*)(o->_stream));
}
}/*--*/
@@ -11934,7 +12546,7 @@ if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
T113*o=(&(p->object));
((gc113*)o)->header.flag=FSOH_MARKED;
-/*ip*/if(NULL!=o->_stream)gc_mark153((T153*)(o->_stream));
+/*ip*/if(NULL!=o->_stream)gc_mark154((T154*)(o->_stream));
}
}
}/*--*/
@@ -12074,6 +12686,40 @@ n->object=M123;
return((T123*)n);
}/*--*/
+void gc_mark338(T338 o){
+if(NULL==gc_find_chunk(o))
+return; /* external NA */
+{rsoh*h=((rsoh*)o)-1;
+ if((h->header.magic_flag)==RSOH_UNMARKED){
+ h->header.magic_flag=RSOH_MARKED;
+ {T0* e;
+T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
+for(;((void*)p)>=((void*)o);p--){
+e=*p;
+}}}}
+}/*--*/
+
+T338 new338(unsigned int size){
+size=(size*sizeof(T0*))+sizeof(rsoh);
+size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
+if (size<=(na_env338.store_left)){
+rsoh*r=na_env338.store;
+na_env338.store_left-=size;
+if(na_env338.store_left>sizeof(rsoh)){
+r->header.size=size;
+na_env338.store=((rsoh*)(((char*)(na_env338.store))+size));
+}
+else {
+r->header.size=size+na_env338.store_left;
+na_env338.store_left=0;
+}
+(r->header.magic_flag)=RSOH_UNMARKED;
+((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
+return((T338)(r+1));
+}
+return((T338)new_na(&na_env338,size));
+}/*--*/
+
void gc_mark337(T337 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
@@ -12152,6 +12798,7 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
+if(NULL!=e)gc_mark244((T244*)(e));
}}}}
}/*--*/
@@ -12186,7 +12833,7 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
-if(NULL!=e)gc_mark244((T244*)(e));
+if(NULL!=e)gc_mark290((T290*)(e));
}}}}
}/*--*/
@@ -12221,7 +12868,7 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
-if(NULL!=e)gc_mark290((T290*)(e));
+if(NULL!=e)Xgc_mark72((T0*)(e));
}}}}
}/*--*/
@@ -12246,41 +12893,6 @@ return((T333)(r+1));
return((T333)new_na(&na_env333,size));
}/*--*/
-void gc_mark332(T332 o){
-if(NULL==gc_find_chunk(o))
-return; /* external NA */
-{rsoh*h=((rsoh*)o)-1;
- if((h->header.magic_flag)==RSOH_UNMARKED){
- h->header.magic_flag=RSOH_MARKED;
- {T0* e;
-T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
-for(;((void*)p)>=((void*)o);p--){
-e=*p;
-if(NULL!=e)Xgc_mark72((T0*)(e));
-}}}}
-}/*--*/
-
-T332 new332(unsigned int size){
-size=(size*sizeof(T0*))+sizeof(rsoh);
-size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env332.store_left)){
-rsoh*r=na_env332.store;
-na_env332.store_left-=size;
-if(na_env332.store_left>sizeof(rsoh)){
-r->header.size=size;
-na_env332.store=((rsoh*)(((char*)(na_env332.store))+size));
-}
-else {
-r->header.size=size+na_env332.store_left;
-na_env332.store_left=0;
-}
-(r->header.magic_flag)=RSOH_UNMARKED;
-((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T332)(r+1));
-}
-return((T332)new_na(&na_env332,size));
-}/*--*/
-
void gc_mark331(T331 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
@@ -13298,7 +13910,7 @@ return((T305)(r+1));
return((T305)new_na(&na_env305,size));
}/*--*/
-void gc_mark304(T304 o){
+void gc_mark298(T298 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
{rsoh*h=((rsoh*)o)-1;
@@ -13312,28 +13924,28 @@ if(NULL!=e)gc_mark149((T149*)(e));
}}}}
}/*--*/
-T304 new304(unsigned int size){
+T298 new298(unsigned int size){
size=(size*sizeof(T0*))+sizeof(rsoh);
size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env304.store_left)){
-rsoh*r=na_env304.store;
-na_env304.store_left-=size;
-if(na_env304.store_left>sizeof(rsoh)){
+if (size<=(na_env298.store_left)){
+rsoh*r=na_env298.store;
+na_env298.store_left-=size;
+if(na_env298.store_left>sizeof(rsoh)){
r->header.size=size;
-na_env304.store=((rsoh*)(((char*)(na_env304.store))+size));
+na_env298.store=((rsoh*)(((char*)(na_env298.store))+size));
}
else {
-r->header.size=size+na_env304.store_left;
-na_env304.store_left=0;
+r->header.size=size+na_env298.store_left;
+na_env298.store_left=0;
}
(r->header.magic_flag)=RSOH_UNMARKED;
((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T304)(r+1));
+return((T298)(r+1));
}
-return((T304)new_na(&na_env304,size));
+return((T298)new_na(&na_env298,size));
}/*--*/
-void gc_mark303(T303 o){
+void gc_mark299(T299 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
{rsoh*h=((rsoh*)o)-1;
@@ -13347,58 +13959,58 @@ if(NULL!=e)gc_mark148((T148*)(e));
}}}}
}/*--*/
-T303 new303(unsigned int size){
+T299 new299(unsigned int size){
size=(size*sizeof(T0*))+sizeof(rsoh);
size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env303.store_left)){
-rsoh*r=na_env303.store;
-na_env303.store_left-=size;
-if(na_env303.store_left>sizeof(rsoh)){
+if (size<=(na_env299.store_left)){
+rsoh*r=na_env299.store;
+na_env299.store_left-=size;
+if(na_env299.store_left>sizeof(rsoh)){
r->header.size=size;
-na_env303.store=((rsoh*)(((char*)(na_env303.store))+size));
+na_env299.store=((rsoh*)(((char*)(na_env299.store))+size));
}
else {
-r->header.size=size+na_env303.store_left;
-na_env303.store_left=0;
+r->header.size=size+na_env299.store_left;
+na_env299.store_left=0;
}
(r->header.magic_flag)=RSOH_UNMARKED;
((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T303)(r+1));
+return((T299)(r+1));
}
-return((T303)new_na(&na_env303,size));
+return((T299)new_na(&na_env299,size));
}/*--*/
-void gc_sweep302(fsoc*c){
-gc302*o1,*o2;
-o1=((gc302*)(&(c->first_object)));
+void gc_sweep304(fsoc*c){
+gc304*o1,*o2;
+o1=((gc304*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store302;o1++){
+for(;o1<store304;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
-gc_update_weak_ref_item302(&(o1->object));
+gc_update_weak_ref_item304(&(o1->object));
}
else{
-o1->header.next=gc_free302;
-gc_free302=o1;
+o1->header.next=gc_free304;
+gc_free304=o1;
}
}
}
else{
int dead=1;
-gc302* old_gc_free = gc_free302;
+gc304* old_gc_free = gc_free304;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
-gc_update_weak_ref_item302(&(o1->object));
+gc_update_weak_ref_item304(&(o1->object));
dead=0;}
else{
-o1->header.next=gc_free302;
-gc_free302=o1;
+o1->header.next=gc_free304;
+gc_free304=o1;
}
}
if (dead){
-gc_free302 = old_gc_free;
+gc_free304 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -13406,8 +14018,8 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_update_weak_ref_item302(T302* wr){
-gc300* obj_ptr = (gc300*)(wr->_item);
+void gc_update_weak_ref_item304(T304* wr){
+gc303* obj_ptr = (gc303*)(wr->_item);
if (obj_ptr != NULL){
int swept = (((void*)obj_ptr) <= ((void*)wr));
if (swept != (obj_ptr->header.flag == FSOH_UNMARKED))
@@ -13416,63 +14028,63 @@ wr->_item = NULL;
}
}/*--*/
-void gc_mark302(T302*o){
-((gc302*)o)->header.flag=FSOH_MARKED;
+void gc_mark304(T304*o){
+((gc304*)o)->header.flag=FSOH_MARKED;
}/*--*/
-void gc_align_mark302(fsoc*c,gc302*p){
-gc302*b=((gc302*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store302)))return;
+void gc_align_mark304(fsoc*c,gc304*p){
+gc304*b=((gc304*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store304)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T302*o=(&(p->object));
-((gc302*)o)->header.flag=FSOH_MARKED;
+T304*o=(&(p->object));
+((gc304*)o)->header.flag=FSOH_MARKED;
}
}
}/*--*/
-fsoc H302={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark302,
-(void(*)(mch*))gc_sweep302},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc302))-1)};
+fsoc H304={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark304,
+(void(*)(mch*))gc_sweep304},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc304))-1)};
-T302*new302(void){
-gc302*n;
+T304*new304(void){
+gc304*n;
fsoc*c;
-if(store_left302>1){
-store_left302--;
-n=store302++;
+if(store_left304>1){
+store_left304--;
+n=store304++;
}
-else if(gc_free302!=NULL){
-n=gc_free302;
-gc_free302=n->header.next;
+else if(gc_free304!=NULL){
+n=gc_free304;
+gc_free304=n->header.next;
}
-else if(store_left302==1){
-store_left302=0;
-store_chunk302->header.state_type=FSO_USED_CHUNK;
-n=store302++;
+else if(store_left304==1){
+store_left304=0;
+store_chunk304->header.state_type=FSO_USED_CHUNK;
+n=store304++;
}
else{
c=gc_fsoc_get1();
-if(gc_free302!=NULL){
-n=gc_free302;
-gc_free302=n->header.next;
+if(gc_free304!=NULL){
+n=gc_free304;
+gc_free304=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk302=c;
-*store_chunk302=H302;
-store302=((gc302*)(&(store_chunk302->first_object)));
-store_left302=H302.count_minus_one;
-n=store302++;
+store_chunk304=c;
+*store_chunk304=H304;
+store304=((gc304*)(&(store_chunk304->first_object)));
+store_left304=H304.count_minus_one;
+n=store304++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M302;
-return((T302*)n);
+n->object=M304;
+return((T304*)n);
}/*--*/
-void gc_mark301(T301 o){
+void gc_mark302(T302 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
{rsoh*h=((rsoh*)o)-1;
@@ -13482,60 +14094,60 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
-if(NULL!=e)gc_mark300((T300*)(e));
+if(NULL!=e)gc_mark303((T303*)(e));
}}}}
}/*--*/
-T301 new301(unsigned int size){
+T302 new302(unsigned int size){
size=(size*sizeof(T0*))+sizeof(rsoh);
size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env301.store_left)){
-rsoh*r=na_env301.store;
-na_env301.store_left-=size;
-if(na_env301.store_left>sizeof(rsoh)){
+if (size<=(na_env302.store_left)){
+rsoh*r=na_env302.store;
+na_env302.store_left-=size;
+if(na_env302.store_left>sizeof(rsoh)){
r->header.size=size;
-na_env301.store=((rsoh*)(((char*)(na_env301.store))+size));
+na_env302.store=((rsoh*)(((char*)(na_env302.store))+size));
}
else {
-r->header.size=size+na_env301.store_left;
-na_env301.store_left=0;
+r->header.size=size+na_env302.store_left;
+na_env302.store_left=0;
}
(r->header.magic_flag)=RSOH_UNMARKED;
((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T301)(r+1));
+return((T302)(r+1));
}
-return((T301)new_na(&na_env301,size));
+return((T302)new_na(&na_env302,size));
}/*--*/
-void gc_sweep300(fsoc*c){
-gc300*o1,*o2;
-o1=((gc300*)(&(c->first_object)));
+void gc_sweep303(fsoc*c){
+gc303*o1,*o2;
+o1=((gc303*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store300;o1++){
+for(;o1<store303;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free300;
-gc_free300=o1;
+o1->header.next=gc_free303;
+gc_free303=o1;
}
}
}
else{
int dead=1;
-gc300* old_gc_free = gc_free300;
+gc303* old_gc_free = gc_free303;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free300;
-gc_free300=o1;
+o1->header.next=gc_free303;
+gc_free303=o1;
}
}
if (dead){
-gc_free300 = old_gc_free;
+gc_free303 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -13543,75 +14155,75 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark300(T300*o){
+void gc_mark303(T303*o){
begin:
-if(((gc300*)o)->header.flag==FSOH_UNMARKED){
-((gc300*)o)->header.flag=FSOH_MARKED;
+if(((gc303*)o)->header.flag==FSOH_UNMARKED){
+((gc303*)o)->header.flag=FSOH_MARKED;
/*3p*/if(NULL!=o->_key)gc_mark73((T73*)(o->_key));
-/*3p*/if(NULL!=o->_item)gc_mark261((T261*)(o->_item));
+/*3p*/if(NULL!=o->_item)gc_mark263((T263*)(o->_item));
o=(void*)o->_next;
if((o!=NULL))goto begin;
}
}/*--*/
-void gc_align_mark300(fsoc*c,gc300*p){
-gc300*b=((gc300*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store300)))return;
+void gc_align_mark303(fsoc*c,gc303*p){
+gc303*b=((gc303*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store303)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T300*o=(&(p->object));
+T303*o=(&(p->object));
begin:
-((gc300*)o)->header.flag=FSOH_MARKED;
+((gc303*)o)->header.flag=FSOH_MARKED;
/*3p*/if(NULL!=o->_key)gc_mark73((T73*)(o->_key));
-/*3p*/if(NULL!=o->_item)gc_mark261((T261*)(o->_item));
+/*3p*/if(NULL!=o->_item)gc_mark263((T263*)(o->_item));
o=(void*)o->_next;
-if((o!=NULL)&&(((gc300*)o)->header.flag==FSOH_UNMARKED))goto begin;
+if((o!=NULL)&&(((gc303*)o)->header.flag==FSOH_UNMARKED))goto begin;
}
}
}/*--*/
-fsoc H300={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark300,
-(void(*)(mch*))gc_sweep300},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc300))-1)};
+fsoc H303={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark303,
+(void(*)(mch*))gc_sweep303},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc303))-1)};
-T300*new300(void){
-gc300*n;
+T303*new303(void){
+gc303*n;
fsoc*c;
-if(store_left300>1){
-store_left300--;
-n=store300++;
+if(store_left303>1){
+store_left303--;
+n=store303++;
}
-else if(gc_free300!=NULL){
-n=gc_free300;
-gc_free300=n->header.next;
+else if(gc_free303!=NULL){
+n=gc_free303;
+gc_free303=n->header.next;
}
-else if(store_left300==1){
-store_left300=0;
-store_chunk300->header.state_type=FSO_USED_CHUNK;
-n=store300++;
+else if(store_left303==1){
+store_left303=0;
+store_chunk303->header.state_type=FSO_USED_CHUNK;
+n=store303++;
}
else{
c=gc_fsoc_get1();
-if(gc_free300!=NULL){
-n=gc_free300;
-gc_free300=n->header.next;
+if(gc_free303!=NULL){
+n=gc_free303;
+gc_free303=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk300=c;
-*store_chunk300=H300;
-store300=((gc300*)(&(store_chunk300->first_object)));
-store_left300=H300.count_minus_one;
-n=store300++;
+store_chunk303=c;
+*store_chunk303=H303;
+store303=((gc303*)(&(store_chunk303->first_object)));
+store_left303=H303.count_minus_one;
+n=store303++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M300;
-return((T300*)n);
+n->object=M303;
+return((T303*)n);
}/*--*/
-void gc_mark299(T299 o){
+void gc_mark301(T301 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
{rsoh*h=((rsoh*)o)-1;
@@ -13621,60 +14233,60 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
-if(NULL!=e)gc_mark260((T260*)(e));
+if(NULL!=e)gc_mark262((T262*)(e));
}}}}
}/*--*/
-T299 new299(unsigned int size){
+T301 new301(unsigned int size){
size=(size*sizeof(T0*))+sizeof(rsoh);
size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env299.store_left)){
-rsoh*r=na_env299.store;
-na_env299.store_left-=size;
-if(na_env299.store_left>sizeof(rsoh)){
+if (size<=(na_env301.store_left)){
+rsoh*r=na_env301.store;
+na_env301.store_left-=size;
+if(na_env301.store_left>sizeof(rsoh)){
r->header.size=size;
-na_env299.store=((rsoh*)(((char*)(na_env299.store))+size));
+na_env301.store=((rsoh*)(((char*)(na_env301.store))+size));
}
else {
-r->header.size=size+na_env299.store_left;
-na_env299.store_left=0;
+r->header.size=size+na_env301.store_left;
+na_env301.store_left=0;
}
(r->header.magic_flag)=RSOH_UNMARKED;
((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T299)(r+1));
+return((T301)(r+1));
}
-return((T299)new_na(&na_env299,size));
+return((T301)new_na(&na_env301,size));
}/*--*/
-void gc_sweep298(fsoc*c){
-gc298*o1,*o2;
-o1=((gc298*)(&(c->first_object)));
+void gc_sweep300(fsoc*c){
+gc300*o1,*o2;
+o1=((gc300*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store298;o1++){
+for(;o1<store300;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free298;
-gc_free298=o1;
+o1->header.next=gc_free300;
+gc_free300=o1;
}
}
}
else{
int dead=1;
-gc298* old_gc_free = gc_free298;
+gc300* old_gc_free = gc_free300;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free298;
-gc_free298=o1;
+o1->header.next=gc_free300;
+gc_free300=o1;
}
}
if (dead){
-gc_free298 = old_gc_free;
+gc_free300 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -13682,80 +14294,80 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark298(T298*o){
-if(((gc298*)o)->header.flag==FSOH_UNMARKED){
-((gc298*)o)->header.flag=FSOH_MARKED;
+void gc_mark300(T300*o){
+if(((gc300*)o)->header.flag==FSOH_UNMARKED){
+((gc300*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T334 na=o->_storage;
+T335 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r298mark_native_arrays(o);
+r300mark_native_arrays(o);
}
}
}}
}/*--*/
-void gc_align_mark298(fsoc*c,gc298*p){
-gc298*b=((gc298*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store298)))return;
+void gc_align_mark300(fsoc*c,gc300*p){
+gc300*b=((gc300*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store300)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T298*o=(&(p->object));
-((gc298*)o)->header.flag=FSOH_MARKED;
+T300*o=(&(p->object));
+((gc300*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T334 na=o->_storage;
+T335 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r298mark_native_arrays(o);
+r300mark_native_arrays(o);
}
}
}}
}
}/*--*/
-fsoc H298={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark298,
-(void(*)(mch*))gc_sweep298},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc298))-1)};
+fsoc H300={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark300,
+(void(*)(mch*))gc_sweep300},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc300))-1)};
-T298*new298(void){
-gc298*n;
+T300*new300(void){
+gc300*n;
fsoc*c;
-if(store_left298>1){
-store_left298--;
-n=store298++;
+if(store_left300>1){
+store_left300--;
+n=store300++;
}
-else if(gc_free298!=NULL){
-n=gc_free298;
-gc_free298=n->header.next;
+else if(gc_free300!=NULL){
+n=gc_free300;
+gc_free300=n->header.next;
}
-else if(store_left298==1){
-store_left298=0;
-store_chunk298->header.state_type=FSO_USED_CHUNK;
-n=store298++;
+else if(store_left300==1){
+store_left300=0;
+store_chunk300->header.state_type=FSO_USED_CHUNK;
+n=store300++;
}
else{
c=gc_fsoc_get1();
-if(gc_free298!=NULL){
-n=gc_free298;
-gc_free298=n->header.next;
+if(gc_free300!=NULL){
+n=gc_free300;
+gc_free300=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk298=c;
-*store_chunk298=H298;
-store298=((gc298*)(&(store_chunk298->first_object)));
-store_left298=H298.count_minus_one;
-n=store298++;
+store_chunk300=c;
+*store_chunk300=H300;
+store300=((gc300*)(&(store_chunk300->first_object)));
+store_left300=H300.count_minus_one;
+n=store300++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M298;
-return((T298*)n);
+n->object=M300;
+return((T300*)n);
}/*--*/
void gc_sweep297(fsoc*c){
@@ -14031,7 +14643,7 @@ if(c->header.state_type==FSO_STORE_CHUNK){
for(;o1<store293;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
-gc_update_weak_ref_item_polymorph(&(o1->object._item));
+gc_update_weak_ref_item293(&(o1->object));
}
else{
o1->header.next=gc_free293;
@@ -14046,7 +14658,7 @@ o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
-gc_update_weak_ref_item_polymorph(&(o1->object._item));
+gc_update_weak_ref_item293(&(o1->object));
dead=0;}
else{
o1->header.next=gc_free293;
@@ -14062,6 +14674,16 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
+void gc_update_weak_ref_item293(T293* wr){
+gc292* obj_ptr = (gc292*)(wr->_item);
+if (obj_ptr != NULL){
+int swept = (((void*)obj_ptr) <= ((void*)wr));
+if (swept != (obj_ptr->header.flag == FSOH_UNMARKED))
+/* (already swept) xor marked */
+wr->_item = NULL;
+}
+}/*--*/
+
void gc_mark293(T293*o){
((gc293*)o)->header.flag=FSOH_MARKED;
}/*--*/
@@ -14118,6 +14740,108 @@ n->object=M293;
return((T293*)n);
}/*--*/
+void gc_sweep292(fsoc*c){
+gc292*o1,*o2;
+o1=((gc292*)(&(c->first_object)));
+if(c->header.state_type==FSO_STORE_CHUNK){
+for(;o1<store292;o1++){
+if((o1->header.flag)==FSOH_MARKED){
+o1->header.flag=FSOH_UNMARKED;
+}
+else{
+o1->header.next=gc_free292;
+gc_free292=o1;
+}
+}
+}
+else{
+int dead=1;
+gc292* old_gc_free = gc_free292;
+o2=o1+c->count_minus_one;
+for(;o1<=o2;o1++){
+if((o1->header.flag)==FSOH_MARKED){
+o1->header.flag=FSOH_UNMARKED;
+dead=0;}
+else{
+o1->header.next=gc_free292;
+gc_free292=o1;
+}
+}
+if (dead){
+gc_free292 = old_gc_free;
+c->next=fsocfl;
+fsocfl=c;
+c->header.state_type=FSO_FREE_CHUNK;
+}
+}
+}/*--*/
+
+void gc_mark292(T292*o){
+begin:
+if(((gc292*)o)->header.flag==FSOH_UNMARKED){
+((gc292*)o)->header.flag=FSOH_MARKED;
+/*3p*/if(NULL!=o->_key)gc_mark7((T7*)(o->_key));
+o=(void*)o->_next;
+if((o!=NULL))goto begin;
+}
+}/*--*/
+
+void gc_align_mark292(fsoc*c,gc292*p){
+gc292*b=((gc292*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store292)))return;
+if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
+if(((char*)p)<((char*)b))return;
+if(((((char*)p)-((char*)b))%sizeof(*p))==0){
+if(p->header.flag==FSOH_UNMARKED){
+T292*o=(&(p->object));
+begin:
+((gc292*)o)->header.flag=FSOH_MARKED;
+/*3p*/if(NULL!=o->_key)gc_mark7((T7*)(o->_key));
+o=(void*)o->_next;
+if((o!=NULL)&&(((gc292*)o)->header.flag==FSOH_UNMARKED))goto begin;
+}
+}
+}/*--*/
+fsoc H292={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark292,
+(void(*)(mch*))gc_sweep292},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc292))-1)};
+
+T292*new292(void){
+gc292*n;
+fsoc*c;
+if(store_left292>1){
+store_left292--;
+n=store292++;
+}
+else if(gc_free292!=NULL){
+n=gc_free292;
+gc_free292=n->header.next;
+}
+else if(store_left292==1){
+store_left292=0;
+store_chunk292->header.state_type=FSO_USED_CHUNK;
+n=store292++;
+}
+else{
+c=gc_fsoc_get1();
+if(gc_free292!=NULL){
+n=gc_free292;
+gc_free292=n->header.next;
+}
+else{
+if(c==NULL)c=gc_fsoc_get2();
+store_chunk292=c;
+*store_chunk292=H292;
+store292=((gc292*)(&(store_chunk292->first_object)));
+store_left292=H292.count_minus_one;
+n=store292++;
+}
+}
+n->header.flag=FSOH_UNMARKED;
+n->object=M292;
+return((T292*)n);
+}/*--*/
+
void gc_mark291(T291 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
@@ -14128,6 +14852,7 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
+if(NULL!=e)gc_mark292((T292*)(e));
}}}}
}/*--*/
@@ -14400,7 +15125,7 @@ void gc_mark288(T288*o){
if(((gc288*)o)->header.flag==FSOH_UNMARKED){
((gc288*)o)->header.flag=FSOH_MARKED;
/*5p*/if(NULL!=o->_free_nodes)gc_mark289((T289*)(o->_free_nodes));
-/*5p*/if(NULL!=o->_buckets)gc_mark333((o->_buckets));
+/*5p*/if(NULL!=o->_buckets)gc_mark334((o->_buckets));
}
}/*--*/
@@ -14414,7 +15139,7 @@ if(p->header.flag==FSOH_UNMARKED){
T288*o=(&(p->object));
((gc288*)o)->header.flag=FSOH_MARKED;
/*5p*/if(NULL!=o->_free_nodes)gc_mark289((T289*)(o->_free_nodes));
-/*5p*/if(NULL!=o->_buckets)gc_mark333((o->_buckets));
+/*5p*/if(NULL!=o->_buckets)gc_mark334((o->_buckets));
}
}
}/*--*/
@@ -14465,7 +15190,7 @@ if(c->header.state_type==FSO_STORE_CHUNK){
for(;o1<store287;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
-gc_update_weak_ref_item_polymorph(&(o1->object._item));
+gc_update_weak_ref_item287(&(o1->object));
}
else{
o1->header.next=gc_free287;
@@ -14480,7 +15205,7 @@ o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
-gc_update_weak_ref_item_polymorph(&(o1->object._item));
+gc_update_weak_ref_item287(&(o1->object));
dead=0;}
else{
o1->header.next=gc_free287;
@@ -14496,6 +15221,16 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
+void gc_update_weak_ref_item287(T287* wr){
+gc284* obj_ptr = (gc284*)(wr->_item);
+if (obj_ptr != NULL){
+int swept = (((void*)obj_ptr) <= ((void*)wr));
+if (swept != (obj_ptr->header.flag == FSOH_UNMARKED))
+/* (already swept) xor marked */
+wr->_item = NULL;
+}
+}/*--*/
+
void gc_mark287(T287*o){
((gc287*)o)->header.flag=FSOH_MARKED;
}/*--*/
@@ -14552,6 +15287,110 @@ n->object=M287;
return((T287*)n);
}/*--*/
+void gc_sweep284(fsoc*c){
+gc284*o1,*o2;
+o1=((gc284*)(&(c->first_object)));
+if(c->header.state_type==FSO_STORE_CHUNK){
+for(;o1<store284;o1++){
+if((o1->header.flag)==FSOH_MARKED){
+o1->header.flag=FSOH_UNMARKED;
+}
+else{
+o1->header.next=gc_free284;
+gc_free284=o1;
+}
+}
+}
+else{
+int dead=1;
+gc284* old_gc_free = gc_free284;
+o2=o1+c->count_minus_one;
+for(;o1<=o2;o1++){
+if((o1->header.flag)==FSOH_MARKED){
+o1->header.flag=FSOH_UNMARKED;
+dead=0;}
+else{
+o1->header.next=gc_free284;
+gc_free284=o1;
+}
+}
+if (dead){
+gc_free284 = old_gc_free;
+c->next=fsocfl;
+fsocfl=c;
+c->header.state_type=FSO_FREE_CHUNK;
+}
+}
+}/*--*/
+
+void gc_mark284(T284*o){
+begin:
+if(((gc284*)o)->header.flag==FSOH_UNMARKED){
+((gc284*)o)->header.flag=FSOH_MARKED;
+/*3p*/if(NULL!=o->_key)gc_mark7((T7*)(o->_key));
+/*3p*/if(NULL!=o->_item)gc_mark251((T251*)(o->_item));
+o=(void*)o->_next;
+if((o!=NULL))goto begin;
+}
+}/*--*/
+
+void gc_align_mark284(fsoc*c,gc284*p){
+gc284*b=((gc284*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store284)))return;
+if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
+if(((char*)p)<((char*)b))return;
+if(((((char*)p)-((char*)b))%sizeof(*p))==0){
+if(p->header.flag==FSOH_UNMARKED){
+T284*o=(&(p->object));
+begin:
+((gc284*)o)->header.flag=FSOH_MARKED;
+/*3p*/if(NULL!=o->_key)gc_mark7((T7*)(o->_key));
+/*3p*/if(NULL!=o->_item)gc_mark251((T251*)(o->_item));
+o=(void*)o->_next;
+if((o!=NULL)&&(((gc284*)o)->header.flag==FSOH_UNMARKED))goto begin;
+}
+}
+}/*--*/
+fsoc H284={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark284,
+(void(*)(mch*))gc_sweep284},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc284))-1)};
+
+T284*new284(void){
+gc284*n;
+fsoc*c;
+if(store_left284>1){
+store_left284--;
+n=store284++;
+}
+else if(gc_free284!=NULL){
+n=gc_free284;
+gc_free284=n->header.next;
+}
+else if(store_left284==1){
+store_left284=0;
+store_chunk284->header.state_type=FSO_USED_CHUNK;
+n=store284++;
+}
+else{
+c=gc_fsoc_get1();
+if(gc_free284!=NULL){
+n=gc_free284;
+gc_free284=n->header.next;
+}
+else{
+if(c==NULL)c=gc_fsoc_get2();
+store_chunk284=c;
+*store_chunk284=H284;
+store284=((gc284*)(&(store_chunk284->first_object)));
+store_left284=H284.count_minus_one;
+n=store284++;
+}
+}
+n->header.flag=FSOH_UNMARKED;
+n->object=M284;
+return((T284*)n);
+}/*--*/
+
void gc_mark283(T283 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
@@ -14562,6 +15401,7 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
+if(NULL!=e)gc_mark284((T284*)(e));
}}}}
}/*--*/
@@ -14596,7 +15436,7 @@ return; /* external NA */
T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
for(;((void*)p)>=((void*)o);p--){
e=*p;
-if(NULL!=e)gc_mark153((T153*)(e));
+if(NULL!=e)gc_mark154((T154*)(e));
}}}}
}/*--*/
@@ -14696,7 +15536,7 @@ void gc_mark280(T280*o){
if(((gc280*)o)->header.flag==FSOH_UNMARKED){
((gc280*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T332 na=o->_storage;
+T333 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
@@ -14717,7 +15557,7 @@ if(p->header.flag==FSOH_UNMARKED){
T280*o=(&(p->object));
((gc280*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T332 na=o->_storage;
+T333 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
@@ -14768,35 +15608,35 @@ n->object=M280;
return((T280*)n);
}/*--*/
-void gc_sweep154(fsoc*c){
-gc154*o1,*o2;
-o1=((gc154*)(&(c->first_object)));
+void gc_sweep153(fsoc*c){
+gc153*o1,*o2;
+o1=((gc153*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store154;o1++){
+for(;o1<store153;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free154;
-gc_free154=o1;
+o1->header.next=gc_free153;
+gc_free153=o1;
}
}
}
else{
int dead=1;
-gc154* old_gc_free = gc_free154;
+gc153* old_gc_free = gc_free153;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free154;
-gc_free154=o1;
+o1->header.next=gc_free153;
+gc_free153=o1;
}
}
if (dead){
-gc_free154 = old_gc_free;
+gc_free153 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -14804,60 +15644,60 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark154(T154*o){
-((gc154*)o)->header.flag=FSOH_MARKED;
+void gc_mark153(T153*o){
+((gc153*)o)->header.flag=FSOH_MARKED;
}/*--*/
-void gc_align_mark154(fsoc*c,gc154*p){
-gc154*b=((gc154*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store154)))return;
+void gc_align_mark153(fsoc*c,gc153*p){
+gc153*b=((gc153*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store153)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T154*o=(&(p->object));
-((gc154*)o)->header.flag=FSOH_MARKED;
+T153*o=(&(p->object));
+((gc153*)o)->header.flag=FSOH_MARKED;
}
}
}/*--*/
-fsoc H154={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark154,
-(void(*)(mch*))gc_sweep154},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc154))-1)};
+fsoc H153={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark153,
+(void(*)(mch*))gc_sweep153},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc153))-1)};
-T154*new154(void){
-gc154*n;
+T153*new153(void){
+gc153*n;
fsoc*c;
-if(store_left154>1){
-store_left154--;
-n=store154++;
+if(store_left153>1){
+store_left153--;
+n=store153++;
}
-else if(gc_free154!=NULL){
-n=gc_free154;
-gc_free154=n->header.next;
+else if(gc_free153!=NULL){
+n=gc_free153;
+gc_free153=n->header.next;
}
-else if(store_left154==1){
-store_left154=0;
-store_chunk154->header.state_type=FSO_USED_CHUNK;
-n=store154++;
+else if(store_left153==1){
+store_left153=0;
+store_chunk153->header.state_type=FSO_USED_CHUNK;
+n=store153++;
}
else{
c=gc_fsoc_get1();
-if(gc_free154!=NULL){
-n=gc_free154;
-gc_free154=n->header.next;
+if(gc_free153!=NULL){
+n=gc_free153;
+gc_free153=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk154=c;
-*store_chunk154=H154;
-store154=((gc154*)(&(store_chunk154->first_object)));
-store_left154=H154.count_minus_one;
-n=store154++;
+store_chunk153=c;
+*store_chunk153=H153;
+store153=((gc153*)(&(store_chunk153->first_object)));
+store_left153=H153.count_minus_one;
+n=store153++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M154;
-return((T154*)n);
+n->object=M153;
+return((T153*)n);
}/*--*/
void gc_sweep279(fsoc*c){
@@ -15782,41 +16622,6 @@ n->object=M268;
return((T268*)n);
}/*--*/
-void gc_mark267(T267 o){
-if(NULL==gc_find_chunk(o))
-return; /* external NA */
-{rsoh*h=((rsoh*)o)-1;
- if((h->header.magic_flag)==RSOH_UNMARKED){
- h->header.magic_flag=RSOH_MARKED;
- {T0* e;
-T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
-for(;((void*)p)>=((void*)o);p--){
-e=*p;
-if(NULL!=e)gc_mark7((T7*)(e));
-}}}}
-}/*--*/
-
-T267 new267(unsigned int size){
-size=(size*sizeof(T0*))+sizeof(rsoh);
-size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env267.store_left)){
-rsoh*r=na_env267.store;
-na_env267.store_left-=size;
-if(na_env267.store_left>sizeof(rsoh)){
-r->header.size=size;
-na_env267.store=((rsoh*)(((char*)(na_env267.store))+size));
-}
-else {
-r->header.size=size+na_env267.store_left;
-na_env267.store_left=0;
-}
-(r->header.magic_flag)=RSOH_UNMARKED;
-((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T267)(r+1));
-}
-return((T267)new_na(&na_env267,size));
-}/*--*/
-
void gc_sweep146(fsoc*c){
gc146*o1,*o2;
o1=((gc146*)(&(c->first_object)));
@@ -16113,35 +16918,35 @@ n->object=M149;
return((T149*)n);
}/*--*/
-void gc_sweep265(fsoc*c){
-gc265*o1,*o2;
-o1=((gc265*)(&(c->first_object)));
+void gc_sweep260(fsoc*c){
+gc260*o1,*o2;
+o1=((gc260*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store265;o1++){
+for(;o1<store260;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free265;
-gc_free265=o1;
+o1->header.next=gc_free260;
+gc_free260=o1;
}
}
}
else{
int dead=1;
-gc265* old_gc_free = gc_free265;
+gc260* old_gc_free = gc_free260;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free265;
-gc_free265=o1;
+o1->header.next=gc_free260;
+gc_free260=o1;
}
}
if (dead){
-gc_free265 = old_gc_free;
+gc_free260 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -16149,80 +16954,80 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark265(T265*o){
-if(((gc265*)o)->header.flag==FSOH_UNMARKED){
-((gc265*)o)->header.flag=FSOH_MARKED;
+void gc_mark260(T260*o){
+if(((gc260*)o)->header.flag==FSOH_UNMARKED){
+((gc260*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T304 na=o->_storage;
+T298 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r265mark_native_arrays(o);
+r260mark_native_arrays(o);
}
}
}}
}/*--*/
-void gc_align_mark265(fsoc*c,gc265*p){
-gc265*b=((gc265*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store265)))return;
+void gc_align_mark260(fsoc*c,gc260*p){
+gc260*b=((gc260*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store260)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T265*o=(&(p->object));
-((gc265*)o)->header.flag=FSOH_MARKED;
+T260*o=(&(p->object));
+((gc260*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T304 na=o->_storage;
+T298 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r265mark_native_arrays(o);
+r260mark_native_arrays(o);
}
}
}}
}
}/*--*/
-fsoc H265={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark265,
-(void(*)(mch*))gc_sweep265},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc265))-1)};
+fsoc H260={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark260,
+(void(*)(mch*))gc_sweep260},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc260))-1)};
-T265*new265(void){
-gc265*n;
+T260*new260(void){
+gc260*n;
fsoc*c;
-if(store_left265>1){
-store_left265--;
-n=store265++;
+if(store_left260>1){
+store_left260--;
+n=store260++;
}
-else if(gc_free265!=NULL){
-n=gc_free265;
-gc_free265=n->header.next;
+else if(gc_free260!=NULL){
+n=gc_free260;
+gc_free260=n->header.next;
}
-else if(store_left265==1){
-store_left265=0;
-store_chunk265->header.state_type=FSO_USED_CHUNK;
-n=store265++;
+else if(store_left260==1){
+store_left260=0;
+store_chunk260->header.state_type=FSO_USED_CHUNK;
+n=store260++;
}
else{
c=gc_fsoc_get1();
-if(gc_free265!=NULL){
-n=gc_free265;
-gc_free265=n->header.next;
+if(gc_free260!=NULL){
+n=gc_free260;
+gc_free260=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk265=c;
-*store_chunk265=H265;
-store265=((gc265*)(&(store_chunk265->first_object)));
-store_left265=H265.count_minus_one;
-n=store265++;
+store_chunk260=c;
+*store_chunk260=H260;
+store260=((gc260*)(&(store_chunk260->first_object)));
+store_left260=H260.count_minus_one;
+n=store260++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M265;
-return((T265*)n);
+n->object=M260;
+return((T260*)n);
}/*--*/
void gc_sweep148(fsoc*c){
@@ -16325,35 +17130,35 @@ n->object=M148;
return((T148*)n);
}/*--*/
-void gc_sweep264(fsoc*c){
-gc264*o1,*o2;
-o1=((gc264*)(&(c->first_object)));
+void gc_sweep261(fsoc*c){
+gc261*o1,*o2;
+o1=((gc261*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store264;o1++){
+for(;o1<store261;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free264;
-gc_free264=o1;
+o1->header.next=gc_free261;
+gc_free261=o1;
}
}
}
else{
int dead=1;
-gc264* old_gc_free = gc_free264;
+gc261* old_gc_free = gc_free261;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free264;
-gc_free264=o1;
+o1->header.next=gc_free261;
+gc_free261=o1;
}
}
if (dead){
-gc_free264 = old_gc_free;
+gc_free261 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -16361,83 +17166,83 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark264(T264*o){
-if(((gc264*)o)->header.flag==FSOH_UNMARKED){
-((gc264*)o)->header.flag=FSOH_MARKED;
+void gc_mark261(T261*o){
+if(((gc261*)o)->header.flag==FSOH_UNMARKED){
+((gc261*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T303 na=o->_storage;
+T299 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r264mark_native_arrays(o);
+r261mark_native_arrays(o);
}
}
}}
}/*--*/
-void gc_align_mark264(fsoc*c,gc264*p){
-gc264*b=((gc264*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store264)))return;
+void gc_align_mark261(fsoc*c,gc261*p){
+gc261*b=((gc261*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store261)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T264*o=(&(p->object));
-((gc264*)o)->header.flag=FSOH_MARKED;
+T261*o=(&(p->object));
+((gc261*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T303 na=o->_storage;
+T299 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r264mark_native_arrays(o);
+r261mark_native_arrays(o);
}
}
}}
}
}/*--*/
-fsoc H264={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark264,
-(void(*)(mch*))gc_sweep264},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc264))-1)};
+fsoc H261={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark261,
+(void(*)(mch*))gc_sweep261},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc261))-1)};
-T264*new264(void){
-gc264*n;
+T261*new261(void){
+gc261*n;
fsoc*c;
-if(store_left264>1){
-store_left264--;
-n=store264++;
+if(store_left261>1){
+store_left261--;
+n=store261++;
}
-else if(gc_free264!=NULL){
-n=gc_free264;
-gc_free264=n->header.next;
+else if(gc_free261!=NULL){
+n=gc_free261;
+gc_free261=n->header.next;
}
-else if(store_left264==1){
-store_left264=0;
-store_chunk264->header.state_type=FSO_USED_CHUNK;
-n=store264++;
+else if(store_left261==1){
+store_left261=0;
+store_chunk261->header.state_type=FSO_USED_CHUNK;
+n=store261++;
}
else{
c=gc_fsoc_get1();
-if(gc_free264!=NULL){
-n=gc_free264;
-gc_free264=n->header.next;
+if(gc_free261!=NULL){
+n=gc_free261;
+gc_free261=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk264=c;
-*store_chunk264=H264;
-store264=((gc264*)(&(store_chunk264->first_object)));
-store_left264=H264.count_minus_one;
-n=store264++;
+store_chunk261=c;
+*store_chunk261=H261;
+store261=((gc261*)(&(store_chunk261->first_object)));
+store_left261=H261.count_minus_one;
+n=store261++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M264;
-return((T264*)n);
+n->object=M261;
+return((T261*)n);
}/*--*/
-void gc_mark263(T263 o){
+void gc_mark265(T265 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
{rsoh*h=((rsoh*)o)-1;
@@ -16451,56 +17256,56 @@ if(NULL!=e)gc_mark68((T68*)(e));
}}}}
}/*--*/
-T263 new263(unsigned int size){
+T265 new265(unsigned int size){
size=(size*sizeof(T0*))+sizeof(rsoh);
size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
-if (size<=(na_env263.store_left)){
-rsoh*r=na_env263.store;
-na_env263.store_left-=size;
-if(na_env263.store_left>sizeof(rsoh)){
+if (size<=(na_env265.store_left)){
+rsoh*r=na_env265.store;
+na_env265.store_left-=size;
+if(na_env265.store_left>sizeof(rsoh)){
r->header.size=size;
-na_env263.store=((rsoh*)(((char*)(na_env263.store))+size));
+na_env265.store=((rsoh*)(((char*)(na_env265.store))+size));
}
else {
-r->header.size=size+na_env263.store_left;
-na_env263.store_left=0;
+r->header.size=size+na_env265.store_left;
+na_env265.store_left=0;
}
(r->header.magic_flag)=RSOH_UNMARKED;
((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
-return((T263)(r+1));
+return((T265)(r+1));
}
-return((T263)new_na(&na_env263,size));
+return((T265)new_na(&na_env265,size));
}/*--*/
-void gc_sweep262(fsoc*c){
-gc262*o1,*o2;
-o1=((gc262*)(&(c->first_object)));
+void gc_sweep264(fsoc*c){
+gc264*o1,*o2;
+o1=((gc264*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store262;o1++){
+for(;o1<store264;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free262;
-gc_free262=o1;
+o1->header.next=gc_free264;
+gc_free264=o1;
}
}
}
else{
int dead=1;
-gc262* old_gc_free = gc_free262;
+gc264* old_gc_free = gc_free264;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free262;
-gc_free262=o1;
+o1->header.next=gc_free264;
+gc_free264=o1;
}
}
if (dead){
-gc_free262 = old_gc_free;
+gc_free264 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -16508,97 +17313,97 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark262(T262*o){
-if(((gc262*)o)->header.flag==FSOH_UNMARKED){
-((gc262*)o)->header.flag=FSOH_MARKED;
-/*5p*/if(NULL!=o->_free_nodes)gc_mark302((T302*)(o->_free_nodes));
-/*5p*/if(NULL!=o->_buckets)gc_mark301((o->_buckets));
+void gc_mark264(T264*o){
+if(((gc264*)o)->header.flag==FSOH_UNMARKED){
+((gc264*)o)->header.flag=FSOH_MARKED;
+/*5p*/if(NULL!=o->_free_nodes)gc_mark304((T304*)(o->_free_nodes));
+/*5p*/if(NULL!=o->_buckets)gc_mark302((o->_buckets));
}
}/*--*/
-void gc_align_mark262(fsoc*c,gc262*p){
-gc262*b=((gc262*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store262)))return;
+void gc_align_mark264(fsoc*c,gc264*p){
+gc264*b=((gc264*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store264)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T262*o=(&(p->object));
-((gc262*)o)->header.flag=FSOH_MARKED;
-/*5p*/if(NULL!=o->_free_nodes)gc_mark302((T302*)(o->_free_nodes));
-/*5p*/if(NULL!=o->_buckets)gc_mark301((o->_buckets));
+T264*o=(&(p->object));
+((gc264*)o)->header.flag=FSOH_MARKED;
+/*5p*/if(NULL!=o->_free_nodes)gc_mark304((T304*)(o->_free_nodes));
+/*5p*/if(NULL!=o->_buckets)gc_mark302((o->_buckets));
}
}
}/*--*/
-fsoc H262={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark262,
-(void(*)(mch*))gc_sweep262},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc262))-1)};
+fsoc H264={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark264,
+(void(*)(mch*))gc_sweep264},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc264))-1)};
-T262*new262(void){
-gc262*n;
+T264*new264(void){
+gc264*n;
fsoc*c;
-if(store_left262>1){
-store_left262--;
-n=store262++;
+if(store_left264>1){
+store_left264--;
+n=store264++;
}
-else if(gc_free262!=NULL){
-n=gc_free262;
-gc_free262=n->header.next;
+else if(gc_free264!=NULL){
+n=gc_free264;
+gc_free264=n->header.next;
}
-else if(store_left262==1){
-store_left262=0;
-store_chunk262->header.state_type=FSO_USED_CHUNK;
-n=store262++;
+else if(store_left264==1){
+store_left264=0;
+store_chunk264->header.state_type=FSO_USED_CHUNK;
+n=store264++;
}
else{
c=gc_fsoc_get1();
-if(gc_free262!=NULL){
-n=gc_free262;
-gc_free262=n->header.next;
+if(gc_free264!=NULL){
+n=gc_free264;
+gc_free264=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk262=c;
-*store_chunk262=H262;
-store262=((gc262*)(&(store_chunk262->first_object)));
-store_left262=H262.count_minus_one;
-n=store262++;
+store_chunk264=c;
+*store_chunk264=H264;
+store264=((gc264*)(&(store_chunk264->first_object)));
+store_left264=H264.count_minus_one;
+n=store264++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M262;
-return((T262*)n);
+n->object=M264;
+return((T264*)n);
}/*--*/
-void gc_sweep261(fsoc*c){
-gc261*o1,*o2;
-o1=((gc261*)(&(c->first_object)));
+void gc_sweep263(fsoc*c){
+gc263*o1,*o2;
+o1=((gc263*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store261;o1++){
+for(;o1<store263;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free261;
-gc_free261=o1;
+o1->header.next=gc_free263;
+gc_free263=o1;
}
}
}
else{
int dead=1;
-gc261* old_gc_free = gc_free261;
+gc263* old_gc_free = gc_free263;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free261;
-gc_free261=o1;
+o1->header.next=gc_free263;
+gc_free263=o1;
}
}
if (dead){
-gc_free261 = old_gc_free;
+gc_free263 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -16606,111 +17411,111 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark261(T261*o){
-if(((gc261*)o)->header.flag==FSOH_UNMARKED){
-((gc261*)o)->header.flag=FSOH_MARKED;
+void gc_mark263(T263*o){
+if(((gc263*)o)->header.flag==FSOH_UNMARKED){
+((gc263*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T299 na=o->_storage;
+T301 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r261mark_native_arrays(o);
+r263mark_native_arrays(o);
}
}
}}
}/*--*/
-void gc_align_mark261(fsoc*c,gc261*p){
-gc261*b=((gc261*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store261)))return;
+void gc_align_mark263(fsoc*c,gc263*p){
+gc263*b=((gc263*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store263)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T261*o=(&(p->object));
-((gc261*)o)->header.flag=FSOH_MARKED;
+T263*o=(&(p->object));
+((gc263*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T299 na=o->_storage;
+T301 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
h->header.magic_flag=RSOH_MARKED;
-r261mark_native_arrays(o);
+r263mark_native_arrays(o);
}
}
}}
}
}/*--*/
-fsoc H261={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark261,
-(void(*)(mch*))gc_sweep261},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc261))-1)};
+fsoc H263={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark263,
+(void(*)(mch*))gc_sweep263},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc263))-1)};
-T261*new261(void){
-gc261*n;
+T263*new263(void){
+gc263*n;
fsoc*c;
-if(store_left261>1){
-store_left261--;
-n=store261++;
+if(store_left263>1){
+store_left263--;
+n=store263++;
}
-else if(gc_free261!=NULL){
-n=gc_free261;
-gc_free261=n->header.next;
+else if(gc_free263!=NULL){
+n=gc_free263;
+gc_free263=n->header.next;
}
-else if(store_left261==1){
-store_left261=0;
-store_chunk261->header.state_type=FSO_USED_CHUNK;
-n=store261++;
+else if(store_left263==1){
+store_left263=0;
+store_chunk263->header.state_type=FSO_USED_CHUNK;
+n=store263++;
}
else{
c=gc_fsoc_get1();
-if(gc_free261!=NULL){
-n=gc_free261;
-gc_free261=n->header.next;
+if(gc_free263!=NULL){
+n=gc_free263;
+gc_free263=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk261=c;
-*store_chunk261=H261;
-store261=((gc261*)(&(store_chunk261->first_object)));
-store_left261=H261.count_minus_one;
-n=store261++;
+store_chunk263=c;
+*store_chunk263=H263;
+store263=((gc263*)(&(store_chunk263->first_object)));
+store_left263=H263.count_minus_one;
+n=store263++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M261;
-return((T261*)n);
+n->object=M263;
+return((T263*)n);
}/*--*/
-void gc_sweep260(fsoc*c){
-gc260*o1,*o2;
-o1=((gc260*)(&(c->first_object)));
+void gc_sweep262(fsoc*c){
+gc262*o1,*o2;
+o1=((gc262*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store260;o1++){
+for(;o1<store262;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
-o1->header.next=gc_free260;
-gc_free260=o1;
+o1->header.next=gc_free262;
+gc_free262=o1;
}
}
}
else{
int dead=1;
-gc260* old_gc_free = gc_free260;
+gc262* old_gc_free = gc_free262;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
-o1->header.next=gc_free260;
-gc_free260=o1;
+o1->header.next=gc_free262;
+gc_free262=o1;
}
}
if (dead){
-gc_free260 = old_gc_free;
+gc_free262 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -16718,64 +17523,64 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark260(T260*o){
-if(((gc260*)o)->header.flag==FSOH_UNMARKED){
-((gc260*)o)->header.flag=FSOH_MARKED;
-/*3p*/if(NULL!=o->_callbacks)gc_mark298((T298*)(o->_callbacks));
+void gc_mark262(T262*o){
+if(((gc262*)o)->header.flag==FSOH_UNMARKED){
+((gc262*)o)->header.flag=FSOH_MARKED;
+/*3p*/if(NULL!=o->_callbacks)gc_mark300((T300*)(o->_callbacks));
}
}/*--*/
-void gc_align_mark260(fsoc*c,gc260*p){
-gc260*b=((gc260*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store260)))return;
+void gc_align_mark262(fsoc*c,gc262*p){
+gc262*b=((gc262*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store262)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T260*o=(&(p->object));
-((gc260*)o)->header.flag=FSOH_MARKED;
-/*3p*/if(NULL!=o->_callbacks)gc_mark298((T298*)(o->_callbacks));
+T262*o=(&(p->object));
+((gc262*)o)->header.flag=FSOH_MARKED;
+/*3p*/if(NULL!=o->_callbacks)gc_mark300((T300*)(o->_callbacks));
}
}
}/*--*/
-fsoc H260={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark260,
-(void(*)(mch*))gc_sweep260},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc260))-1)};
+fsoc H262={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark262,
+(void(*)(mch*))gc_sweep262},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc262))-1)};
-T260*new260(void){
-gc260*n;
+T262*new262(void){
+gc262*n;
fsoc*c;
-if(store_left260>1){
-store_left260--;
-n=store260++;
+if(store_left262>1){
+store_left262--;
+n=store262++;
}
-else if(gc_free260!=NULL){
-n=gc_free260;
-gc_free260=n->header.next;
+else if(gc_free262!=NULL){
+n=gc_free262;
+gc_free262=n->header.next;
}
-else if(store_left260==1){
-store_left260=0;
-store_chunk260->header.state_type=FSO_USED_CHUNK;
-n=store260++;
+else if(store_left262==1){
+store_left262=0;
+store_chunk262->header.state_type=FSO_USED_CHUNK;
+n=store262++;
}
else{
c=gc_fsoc_get1();
-if(gc_free260!=NULL){
-n=gc_free260;
-gc_free260=n->header.next;
+if(gc_free262!=NULL){
+n=gc_free262;
+gc_free262=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk260=c;
-*store_chunk260=H260;
-store260=((gc260*)(&(store_chunk260->first_object)));
-store_left260=H260.count_minus_one;
-n=store260++;
+store_chunk262=c;
+*store_chunk262=H262;
+store262=((gc262*)(&(store_chunk262->first_object)));
+store_left262=H262.count_minus_one;
+n=store262++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M260;
-return((T260*)n);
+n->object=M262;
+return((T262*)n);
}/*--*/
void gc_sweep259(fsoc*c){
@@ -17180,6 +17985,41 @@ n->object=M255;
return((T255*)n);
}/*--*/
+void gc_mark267(T267 o){
+if(NULL==gc_find_chunk(o))
+return; /* external NA */
+{rsoh*h=((rsoh*)o)-1;
+ if((h->header.magic_flag)==RSOH_UNMARKED){
+ h->header.magic_flag=RSOH_MARKED;
+ {T0* e;
+T0**p=((void*)(o+((((h->header.size)-sizeof(rsoh))/sizeof(e))-1)));
+for(;((void*)p)>=((void*)o);p--){
+e=*p;
+if(NULL!=e)gc_mark7((T7*)(e));
+}}}}
+}/*--*/
+
+T267 new267(unsigned int size){
+size=(size*sizeof(T0*))+sizeof(rsoh);
+size=((size+(sizeof(double)-1))&~(sizeof(double)-1));
+if (size<=(na_env267.store_left)){
+rsoh*r=na_env267.store;
+na_env267.store_left-=size;
+if(na_env267.store_left>sizeof(rsoh)){
+r->header.size=size;
+na_env267.store=((rsoh*)(((char*)(na_env267.store))+size));
+}
+else {
+r->header.size=size+na_env267.store_left;
+na_env267.store_left=0;
+}
+(r->header.magic_flag)=RSOH_UNMARKED;
+((void)memset((r+1),0,r->header.size-sizeof(rsoh)));
+return((T267)(r+1));
+}
+return((T267)new_na(&na_env267,size));
+}/*--*/
+
void gc_mark254(T254 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
@@ -17403,25 +18243,25 @@ n->object=M250;
return((T250*)n);
}/*--*/
-void gc_sweep153(fsoc*c){
-gc153*o1,*o2;
-o1=((gc153*)(&(c->first_object)));
+void gc_sweep154(fsoc*c){
+gc154*o1,*o2;
+o1=((gc154*)(&(c->first_object)));
if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store153;o1++){
+for(;o1<store154;o1++){
if((o1->header.flag)==FSOH_MARKED){
o1->header.flag=FSOH_UNMARKED;
}
else{
if((o1->header.flag)==FSOH_UNMARKED){
-r153dispose((T153*)o1);
-}o1->header.next=gc_free153;
-gc_free153=o1;
+r154dispose((T154*)o1);
+}o1->header.next=gc_free154;
+gc_free154=o1;
}
}
}
else{
int dead=1;
-gc153* old_gc_free = gc_free153;
+gc154* old_gc_free = gc_free154;
o2=o1+c->count_minus_one;
for(;o1<=o2;o1++){
if((o1->header.flag)==FSOH_MARKED){
@@ -17429,13 +18269,13 @@ o1->header.flag=FSOH_UNMARKED;
dead=0;}
else{
if((o1->header.flag)==FSOH_UNMARKED){
-r153dispose((T153*)o1);
-}o1->header.next=gc_free153;
-gc_free153=o1;
+r154dispose((T154*)o1);
+}o1->header.next=gc_free154;
+gc_free154=o1;
}
}
if (dead){
-gc_free153 = old_gc_free;
+gc_free154 = old_gc_free;
c->next=fsocfl;
fsocfl=c;
c->header.state_type=FSO_FREE_CHUNK;
@@ -17443,66 +18283,66 @@ c->header.state_type=FSO_FREE_CHUNK;
}
}/*--*/
-void gc_mark153(T153*o){
-if(((gc153*)o)->header.flag==FSOH_UNMARKED){
-((gc153*)o)->header.flag=FSOH_MARKED;
+void gc_mark154(T154*o){
+if(((gc154*)o)->header.flag==FSOH_UNMARKED){
+((gc154*)o)->header.flag=FSOH_MARKED;
/*i8p*/if(NULL!=o->_can_read)gc_mark123((T123*)(o->_can_read));
/*i8p*/if(NULL!=o->_stream_exception)gc_mark113((T113*)(o->_stream_exception));
}
}/*--*/
-void gc_align_mark153(fsoc*c,gc153*p){
-gc153*b=((gc153*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store153)))return;
+void gc_align_mark154(fsoc*c,gc154*p){
+gc154*b=((gc154*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store154)))return;
if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
if(((char*)p)<((char*)b))return;
if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
-T153*o=(&(p->object));
-((gc153*)o)->header.flag=FSOH_MARKED;
+T154*o=(&(p->object));
+((gc154*)o)->header.flag=FSOH_MARKED;
/*i8p*/if(NULL!=o->_can_read)gc_mark123((T123*)(o->_can_read));
/*i8p*/if(NULL!=o->_stream_exception)gc_mark113((T113*)(o->_stream_exception));
}
}
}/*--*/
-fsoc H153={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark153,
-(void(*)(mch*))gc_sweep153},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc153))-1)};
+fsoc H154={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark154,
+(void(*)(mch*))gc_sweep154},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc154))-1)};
-T153*new153(void){
-gc153*n;
+T154*new154(void){
+gc154*n;
fsoc*c;
-if(store_left153>1){
-store_left153--;
-n=store153++;
+if(store_left154>1){
+store_left154--;
+n=store154++;
}
-else if(gc_free153!=NULL){
-n=gc_free153;
-gc_free153=n->header.next;
+else if(gc_free154!=NULL){
+n=gc_free154;
+gc_free154=n->header.next;
}
-else if(store_left153==1){
-store_left153=0;
-store_chunk153->header.state_type=FSO_USED_CHUNK;
-n=store153++;
+else if(store_left154==1){
+store_left154=0;
+store_chunk154->header.state_type=FSO_USED_CHUNK;
+n=store154++;
}
else{
c=gc_fsoc_get1();
-if(gc_free153!=NULL){
-n=gc_free153;
-gc_free153=n->header.next;
+if(gc_free154!=NULL){
+n=gc_free154;
+gc_free154=n->header.next;
}
else{
if(c==NULL)c=gc_fsoc_get2();
-store_chunk153=c;
-*store_chunk153=H153;
-store153=((gc153*)(&(store_chunk153->first_object)));
-store_left153=H153.count_minus_one;
-n=store153++;
+store_chunk154=c;
+*store_chunk154=H154;
+store154=((gc154*)(&(store_chunk154->first_object)));
+store_left154=H154.count_minus_one;
+n=store154++;
}
}
n->header.flag=FSOH_UNMARKED;
-n->object=M153;
-return((T153*)n);
+n->object=M154;
+return((T154*)n);
}/*--*/
void gc_sweep249(fsoc*c){
@@ -17768,7 +18608,7 @@ c->header.state_type=FSO_FREE_CHUNK;
void gc_mark155(T155*o){
if(((gc155*)o)->header.flag==FSOH_UNMARKED){
((gc155*)o)->header.flag=FSOH_MARKED;
-/*6p*/if(NULL!=o->_events)gc_mark154((T154*)(o->_events));
+/*6p*/if(NULL!=o->_events)gc_mark153((T153*)(o->_events));
/*6p*/if(NULL!=o->_ready_jobs)gc_mark280((T280*)(o->_ready_jobs));
/*6p*/if(NULL!=o->_finished_jobs)gc_mark280((T280*)(o->_finished_jobs));
/*6p*/if(NULL!=o->_job_list)gc_mark280((T280*)(o->_job_list));
@@ -17784,7 +18624,7 @@ if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
T155*o=(&(p->object));
((gc155*)o)->header.flag=FSOH_MARKED;
-/*6p*/if(NULL!=o->_events)gc_mark154((T154*)(o->_events));
+/*6p*/if(NULL!=o->_events)gc_mark153((T153*)(o->_events));
/*6p*/if(NULL!=o->_ready_jobs)gc_mark280((T280*)(o->_ready_jobs));
/*6p*/if(NULL!=o->_finished_jobs)gc_mark280((T280*)(o->_finished_jobs));
/*6p*/if(NULL!=o->_job_list)gc_mark280((T280*)(o->_job_list));
@@ -18424,118 +19264,6 @@ n->header.flag=FSOH_UNMARKED;
return((T46*)n);
}/*--*/
-void gc_sweep247(fsoc*c){
-gc247*o1,*o2;
-o1=((gc247*)(&(c->first_object)));
-if(c->header.state_type==FSO_STORE_CHUNK){
-for(;o1<store247;o1++){
-if((o1->header.flag)==FSOH_MARKED){
-o1->header.flag=FSOH_UNMARKED;
-}
-else{
-o1->header.next=gc_free247;
-gc_free247=o1;
-}
-}
-}
-else{
-int dead=1;
-gc247* old_gc_free = gc_free247;
-o2=o1+c->count_minus_one;
-for(;o1<=o2;o1++){
-if((o1->header.flag)==FSOH_MARKED){
-o1->header.flag=FSOH_UNMARKED;
-dead=0;}
-else{
-o1->header.next=gc_free247;
-gc_free247=o1;
-}
-}
-if (dead){
-gc_free247 = old_gc_free;
-c->next=fsocfl;
-fsocfl=c;
-c->header.state_type=FSO_FREE_CHUNK;
-}
-}
-}/*--*/
-
-void gc_mark247(T247*o){
-if(((gc247*)o)->header.flag==FSOH_UNMARKED){
-((gc247*)o)->header.flag=FSOH_MARKED;
-/*3p*/{
-T267 na=o->_storage;
-if(gc_find_chunk(na)!=NULL){/* non external NA */
- rsoh*h=((rsoh*)na)-1;
- if((h->header.magic_flag)==RSOH_UNMARKED){
- h->header.magic_flag=RSOH_MARKED;
-r247mark_native_arrays(o);
-}
-}
-}}
-}/*--*/
-
-void gc_align_mark247(fsoc*c,gc247*p){
-gc247*b=((gc247*)(&(c->first_object)));
-if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store247)))return;
-if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
-if(((char*)p)<((char*)b))return;
-if(((((char*)p)-((char*)b))%sizeof(*p))==0){
-if(p->header.flag==FSOH_UNMARKED){
-T247*o=(&(p->object));
-((gc247*)o)->header.flag=FSOH_MARKED;
-/*3p*/{
-T267 na=o->_storage;
-if(gc_find_chunk(na)!=NULL){/* non external NA */
- rsoh*h=((rsoh*)na)-1;
- if((h->header.magic_flag)==RSOH_UNMARKED){
- h->header.magic_flag=RSOH_MARKED;
-r247mark_native_arrays(o);
-}
-}
-}}
-}
-}/*--*/
-fsoc H247={{FSOC_SIZE,FSO_STORE_CHUNK,
-(void(*)(mch*,void*))gc_align_mark247,
-(void(*)(mch*))gc_sweep247},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc247))-1)};
-
-T247*new247(void){
-gc247*n;
-fsoc*c;
-if(store_left247>1){
-store_left247--;
-n=store247++;
-}
-else if(gc_free247!=NULL){
-n=gc_free247;
-gc_free247=n->header.next;
-}
-else if(store_left247==1){
-store_left247=0;
-store_chunk247->header.state_type=FSO_USED_CHUNK;
-n=store247++;
-}
-else{
-c=gc_fsoc_get1();
-if(gc_free247!=NULL){
-n=gc_free247;
-gc_free247=n->header.next;
-}
-else{
-if(c==NULL)c=gc_fsoc_get2();
-store_chunk247=c;
-*store_chunk247=H247;
-store247=((gc247*)(&(store_chunk247->first_object)));
-store_left247=H247.count_minus_one;
-n=store247++;
-}
-}
-n->header.flag=FSOH_UNMARKED;
-n->object=M247;
-return((T247*)n);
-}/*--*/
-
void gc_sweep191(fsoc*c){
gc191*o1,*o2;
o1=((gc191*)(&(c->first_object)));
@@ -18672,7 +19400,7 @@ void gc_mark246(T246*o){
if(((gc246*)o)->header.flag==FSOH_UNMARKED){
((gc246*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T263 na=o->_storage;
+T265 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
@@ -18693,7 +19421,7 @@ if(p->header.flag==FSOH_UNMARKED){
T246*o=(&(p->object));
((gc246*)o)->header.flag=FSOH_MARKED;
/*3p*/{
-T263 na=o->_storage;
+T265 na=o->_storage;
if(gc_find_chunk(na)!=NULL){/* non external NA */
rsoh*h=((rsoh*)na)-1;
if((h->header.magic_flag)==RSOH_UNMARKED){
@@ -18785,9 +19513,9 @@ if(((gc68*)o)->header.flag==FSOH_UNMARKED){
((gc68*)o)->header.flag=FSOH_MARKED;
/*14p*/if(NULL!=o->_events_id)gc_mark258((T258*)(o->_events_id));
/*14p*/if(NULL!=o->_events_indexes)gc_mark259((T259*)(o->_events_indexes));
-/*14p*/if(NULL!=o->_actions)gc_mark262((T262*)(o->_actions));
-/*14p*/if(NULL!=o->_axes_capabilities)gc_mark264((T264*)(o->_axes_capabilities));
-/*14p*/if(NULL!=o->_button_capabilities)gc_mark265((T265*)(o->_button_capabilities));
+/*14p*/if(NULL!=o->_actions)gc_mark264((T264*)(o->_actions));
+/*14p*/if(NULL!=o->_axes_capabilities)gc_mark261((T261*)(o->_axes_capabilities));
+/*14p*/if(NULL!=o->_button_capabilities)gc_mark260((T260*)(o->_button_capabilities));
/*14p*/if(NULL!=o->_key_capabilities)gc_mark266((T266*)(o->_key_capabilities));
/*14p*/if(NULL!=o->_type)gc_mark7((T7*)(o->_type));
/*14p*/if(NULL!=o->_name)gc_mark7((T7*)(o->_name));
@@ -18805,9 +19533,9 @@ T68*o=(&(p->object));
((gc68*)o)->header.flag=FSOH_MARKED;
/*14p*/if(NULL!=o->_events_id)gc_mark258((T258*)(o->_events_id));
/*14p*/if(NULL!=o->_events_indexes)gc_mark259((T259*)(o->_events_indexes));
-/*14p*/if(NULL!=o->_actions)gc_mark262((T262*)(o->_actions));
-/*14p*/if(NULL!=o->_axes_capabilities)gc_mark264((T264*)(o->_axes_capabilities));
-/*14p*/if(NULL!=o->_button_capabilities)gc_mark265((T265*)(o->_button_capabilities));
+/*14p*/if(NULL!=o->_actions)gc_mark264((T264*)(o->_actions));
+/*14p*/if(NULL!=o->_axes_capabilities)gc_mark261((T261*)(o->_axes_capabilities));
+/*14p*/if(NULL!=o->_button_capabilities)gc_mark260((T260*)(o->_button_capabilities));
/*14p*/if(NULL!=o->_key_capabilities)gc_mark266((T266*)(o->_key_capabilities));
/*14p*/if(NULL!=o->_type)gc_mark7((T7*)(o->_type));
/*14p*/if(NULL!=o->_name)gc_mark7((T7*)(o->_name));
@@ -18984,9 +19712,9 @@ c->header.state_type=FSO_FREE_CHUNK;
void gc_mark70(T70*o){
if(((gc70*)o)->header.flag==FSOH_UNMARKED){
((gc70*)o)->header.flag=FSOH_MARKED;
+/*32p*/if(NULL!=o->_x_history)gc_mark255((T255*)(o->_x_history));
/*32p*/if(NULL!=o->_y_history)gc_mark255((T255*)(o->_y_history));
/*32p*/if(NULL!=o->_time_history)gc_mark255((T255*)(o->_time_history));
-/*32p*/if(NULL!=o->_x_history)gc_mark255((T255*)(o->_x_history));
/*32p*/if(NULL!=o->_pointer_message_header)gc_mark7((T7*)(o->_pointer_message_header));
/*32p*/if(NULL!=o->_button_message_header)gc_mark7((T7*)(o->_button_message_header));
/*32p*/if(NULL!=o->_xinput_ivy)gc_mark25((T25*)(o->_xinput_ivy));
@@ -19002,9 +19730,9 @@ if(((((char*)p)-((char*)b))%sizeof(*p))==0){
if(p->header.flag==FSOH_UNMARKED){
T70*o=(&(p->object));
((gc70*)o)->header.flag=FSOH_MARKED;
+/*32p*/if(NULL!=o->_x_history)gc_mark255((T255*)(o->_x_history));
/*32p*/if(NULL!=o->_y_history)gc_mark255((T255*)(o->_y_history));
/*32p*/if(NULL!=o->_time_history)gc_mark255((T255*)(o->_time_history));
-/*32p*/if(NULL!=o->_x_history)gc_mark255((T255*)(o->_x_history));
/*32p*/if(NULL!=o->_pointer_message_header)gc_mark7((T7*)(o->_pointer_message_header));
/*32p*/if(NULL!=o->_button_message_header)gc_mark7((T7*)(o->_button_message_header));
/*32p*/if(NULL!=o->_xinput_ivy)gc_mark25((T25*)(o->_xinput_ivy));
@@ -19051,6 +19779,118 @@ n->object=M70;
return((T70*)n);
}/*--*/
+void gc_sweep247(fsoc*c){
+gc247*o1,*o2;
+o1=((gc247*)(&(c->first_object)));
+if(c->header.state_type==FSO_STORE_CHUNK){
+for(;o1<store247;o1++){
+if((o1->header.flag)==FSOH_MARKED){
+o1->header.flag=FSOH_UNMARKED;
+}
+else{
+o1->header.next=gc_free247;
+gc_free247=o1;
+}
+}
+}
+else{
+int dead=1;
+gc247* old_gc_free = gc_free247;
+o2=o1+c->count_minus_one;
+for(;o1<=o2;o1++){
+if((o1->header.flag)==FSOH_MARKED){
+o1->header.flag=FSOH_UNMARKED;
+dead=0;}
+else{
+o1->header.next=gc_free247;
+gc_free247=o1;
+}
+}
+if (dead){
+gc_free247 = old_gc_free;
+c->next=fsocfl;
+fsocfl=c;
+c->header.state_type=FSO_FREE_CHUNK;
+}
+}
+}/*--*/
+
+void gc_mark247(T247*o){
+if(((gc247*)o)->header.flag==FSOH_UNMARKED){
+((gc247*)o)->header.flag=FSOH_MARKED;
+/*3p*/{
+T267 na=o->_storage;
+if(gc_find_chunk(na)!=NULL){/* non external NA */
+ rsoh*h=((rsoh*)na)-1;
+ if((h->header.magic_flag)==RSOH_UNMARKED){
+ h->header.magic_flag=RSOH_MARKED;
+r247mark_native_arrays(o);
+}
+}
+}}
+}/*--*/
+
+void gc_align_mark247(fsoc*c,gc247*p){
+gc247*b=((gc247*)(&(c->first_object)));
+if((c->header.state_type==FSO_STORE_CHUNK)&&(((char*)p)>=((char*)store247)))return;
+if(((char*)p)>((char*)(b+(c->count_minus_one))))return;
+if(((char*)p)<((char*)b))return;
+if(((((char*)p)-((char*)b))%sizeof(*p))==0){
+if(p->header.flag==FSOH_UNMARKED){
+T247*o=(&(p->object));
+((gc247*)o)->header.flag=FSOH_MARKED;
+/*3p*/{
+T267 na=o->_storage;
+if(gc_find_chunk(na)!=NULL){/* non external NA */
+ rsoh*h=((rsoh*)na)-1;
+ if((h->header.magic_flag)==RSOH_UNMARKED){
+ h->header.magic_flag=RSOH_MARKED;
+r247mark_native_arrays(o);
+}
+}
+}}
+}
+}/*--*/
+fsoc H247={{FSOC_SIZE,FSO_STORE_CHUNK,
+(void(*)(mch*,void*))gc_align_mark247,
+(void(*)(mch*))gc_sweep247},NULL,(((FSOC_SIZE-sizeof(fsoc)+sizeof(double))/sizeof(gc247))-1)};
+
+T247*new247(void){
+gc247*n;
+fsoc*c;
+if(store_left247>1){
+store_left247--;
+n=store247++;
+}
+else if(gc_free247!=NULL){
+n=gc_free247;
+gc_free247=n->header.next;
+}
+else if(store_left247==1){
+store_left247=0;
+store_chunk247->header.state_type=FSO_USED_CHUNK;
+n=store247++;
+}
+else{
+c=gc_fsoc_get1();
+if(gc_free247!=NULL){
+n=gc_free247;
+gc_free247=n->header.next;
+}
+else{
+if(c==NULL)c=gc_fsoc_get2();
+store_chunk247=c;
+*store_chunk247=H247;
+store247=((gc247*)(&(store_chunk247->first_object)));
+store_left247=H247.count_minus_one;
+n=store247++;
+}
+}
+n->header.flag=FSOH_UNMARKED;
+n->object=M247;
+return((T247*)n);
+}/*--*/
+
void gc_mark9(T9 o){
if(NULL==gc_find_chunk(o))
return; /* external NA */
@@ -19216,7 +20056,7 @@ if(((gc71*)o)->header.flag==FSOH_UNMARKED){
/*i11p*/if(NULL!=o->_ready_message_)gc_mark7((T7*)(o->_ready_message_));
/*i11p*/if(NULL!=o->_application_name_)gc_mark7((T7*)(o->_application_name_));
/*i11p*/if(NULL!=o->_ivy_clients)gc_mark249((T249*)(o->_ivy_clients));
-/*i11p*/if(NULL!=o->_events_set)gc_mark154((T154*)(o->_events_set));
+/*i11p*/if(NULL!=o->_events_set)gc_mark153((T153*)(o->_events_set));
/*i11p*/if(NULL!=o->_tmp_client_list)gc_mark249((T249*)(o->_tmp_client_list));
/*i11p*/if(NULL!=o->_callback_list)gc_mark250((T250*)(o->_callback_list));
/*i11p*/if(NULL!=o->_pattern_list)gc_mark253((T253*)(o->_pattern_list));
@@ -19235,7 +20075,7 @@ T71*o=(&(p->object));
/*i11p*/if(NULL!=o->_ready_message_)gc_mark7((T7*)(o->_ready_message_));
/*i11p*/if(NULL!=o->_application_name_)gc_mark7((T7*)(o->_application_name_));
/*i11p*/if(NULL!=o->_ivy_clients)gc_mark249((T249*)(o->_ivy_clients));
-/*i11p*/if(NULL!=o->_events_set)gc_mark154((T154*)(o->_events_set));
+/*i11p*/if(NULL!=o->_events_set)gc_mark153((T153*)(o->_events_set));
/*i11p*/if(NULL!=o->_tmp_client_list)gc_mark249((T249*)(o->_tmp_client_list));
/*i11p*/if(NULL!=o->_callback_list)gc_mark250((T250*)(o->_callback_list));
/*i11p*/if(NULL!=o->_pattern_list)gc_mark253((T253*)(o->_pattern_list));
@@ -19490,7 +20330,7 @@ return((T25*)n);
void Xgc_mark286(T0*o){
{int i=o->id;
-if (i <= 302) {
+if (i <= 304) {
if (i <= 293) {
if (i <= 289) {
if (i <= 287) {
@@ -19507,7 +20347,7 @@ if (i <= 297) {
gc_mark297((T297*)o);
}
else{
-gc_mark302((T302*)o);
+gc_mark304((T304*)o);
}}}
else{
if (i <= 317) {
@@ -19535,7 +20375,7 @@ if (i <= 134) {
gc_mark134((T134*)o);
}
else{
-gc_mark153((T153*)o);
+gc_mark154((T154*)o);
}}}/*--*/
void Xgc_mark72(T0*o){
@@ -19549,9 +20389,9 @@ gc_mark131((T131*)o);
T25*eiffel_root_object=(void*)0;
int se_argc;
char**se_argv;
-T7*g[338];
-T7*t[338];
-int se_strucT[338]={0,sizeof(T1),sizeof(T2),sizeof(T3),0,sizeof(T5),sizeof(T6),sizeof(T7),sizeof(T8),sizeof(T9),sizeof(T10),
+T7*g[342];
+T7*t[342];
+int se_strucT[342]={0,sizeof(T1),sizeof(T2),sizeof(T3),0,sizeof(T5),sizeof(T6),sizeof(T7),sizeof(T8),sizeof(T9),sizeof(T10),
sizeof(T11),
0,
0,
@@ -19792,7 +20632,7 @@ sizeof(T247),
sizeof(T248),
sizeof(T249),
sizeof(T250),
-0,
+sizeof(T251),
0,
sizeof(T253),
sizeof(T254),
@@ -19825,7 +20665,7 @@ sizeof(T280),
sizeof(T281),
sizeof(T282),
sizeof(T283),
-0,
+sizeof(T284),
0,
0,
sizeof(T287),
@@ -19833,7 +20673,7 @@ sizeof(T288),
sizeof(T289),
sizeof(T290),
sizeof(T291),
-0,
+sizeof(T292),
sizeof(T293),
sizeof(T294),
sizeof(T295),
@@ -19873,12 +20713,13 @@ sizeof(T328),
sizeof(T329),
sizeof(T330),
sizeof(T331),
-sizeof(T332),
+0,
sizeof(T333),
sizeof(T334),
sizeof(T335),
sizeof(T336),
-sizeof(T337)};
+sizeof(T337),
+sizeof(T338)};
void se_atexit(void){
r53se_atexit();
@@ -19897,7 +20738,7 @@ if (!stack_bottom) stack_bottom=((void**)(void*)(&argc));
#endif
g[25]=(T7*)se_string("XINPUT_IVY");
g[70]=(T7*)se_string("WACOM_POINTER");
-g[153]=(T7*)se_string("IVY_CLIENT");
+g[154]=(T7*)se_string("IVY_CLIENT");
g[71]=(T7*)se_string("IVY");
g[150]=(T7*)se_string("X11");
g[68]=(T7*)se_string("X_INPUT_DEVICE");
@@ -19999,7 +20840,7 @@ g[128]=(T7*)se_string("SIGNAL_0");
g[147]=(T7*)se_string("SIGNAL_1");
g[129]=(T7*)se_string("SIGNAL_2");
g[130]=(T7*)se_string("SIGNAL_4");
-g[154]=(T7*)se_string("EVENTS_SET");
+g[153]=(T7*)se_string("EVENTS_SET");
g[155]=(T7*)se_string("LOOP_ITEM");
g[112]=(T7*)se_string("EVENT_DESCRIPTOR");
g[72]=(T7*)se_string("JOB");
@@ -20137,12 +20978,12 @@ g[213]=(T7*)se_string("FILE_RESOURCE_LOCATOR");
g[200]=(T7*)se_string("NETWORK_RESOURCE_VALIDITY");
g[219]=(T7*)se_string("NETWORK_RESOURCE_LOCATOR");
g[139]=(T7*)se_string("SYSTEM");
+g[338]=g[98];
g[337]=g[98];
g[336]=g[98];
g[335]=g[98];
g[334]=g[98];
g[333]=g[98];
-g[332]=g[98];
g[331]=g[98];
g[330]=g[98];
g[329]=g[189];
@@ -20159,23 +21000,25 @@ g[308]=g[189];
g[307]=g[187];
g[306]=g[98];
g[305]=g[98];
-g[304]=g[98];
-g[303]=g[98];
-g[302]=g[189];
+g[304]=g[189];
+g[303]=g[187];
+g[302]=g[98];
g[301]=g[98];
-g[300]=g[187];
+g[300]=g[55];
g[299]=g[98];
-g[298]=g[55];
+g[298]=g[98];
g[297]=g[189];
g[296]=g[187];
g[295]=g[98];
g[294]=g[98];
g[293]=g[189];
+g[292]=g[187];
g[291]=g[98];
g[290]=g[187];
g[289]=g[189];
g[288]=g[143];
g[287]=g[189];
+g[284]=g[187];
g[283]=g[98];
g[282]=g[98];
g[281]=g[98];
@@ -20190,18 +21033,19 @@ g[269]=g[143];
g[268]=g[143];
g[267]=g[98];
g[266]=g[55];
-g[265]=g[55];
-g[264]=g[55];
-g[263]=g[98];
-g[262]=g[143];
+g[265]=g[98];
+g[264]=g[143];
+g[263]=g[55];
+g[262]=g[147];
g[261]=g[55];
-g[260]=g[147];
+g[260]=g[55];
g[259]=g[143];
g[258]=g[55];
g[256]=g[119];
g[255]=g[151];
g[254]=g[98];
g[253]=g[143];
+g[251]=g[126];
g[250]=g[143];
g[249]=g[55];
g[248]=g[55];
@@ -20209,12 +21053,12 @@ g[247]=g[55];
g[246]=g[55];
g[244]=g[126];
g[9]=g[98];
-t[337]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE]]");
-t[336]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE[INTEGER_32,INTEGER_32]]]");
-t[335]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32]]]");
-t[334]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]");
-t[333]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]");
-t[332]=(T7*)se_string("NATIVE_ARRAY[JOB]");
+t[338]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE]]");
+t[337]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE[INTEGER_32,INTEGER_32]]]");
+t[336]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE[INTEGER_32,INTEGER_32,INTEGER_32,INTEGER_32]]]");
+t[335]=(T7*)se_string("NATIVE_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]");
+t[334]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]");
+t[333]=(T7*)se_string("NATIVE_ARRAY[JOB]");
t[331]=(T7*)se_string("NATIVE_ARRAY[TOPLEVEL_WINDOW]");
t[330]=(T7*)se_string("NATIVE_ARRAY[EVENT_CATCHER]");
t[329]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[SENSITIVE,POINTER]]");
@@ -20231,23 +21075,25 @@ t[308]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[EXTENSION_DEVICE,IN
t[307]=(T7*)se_string("HASHED_DICTIONARY_NODE[EXTENSION_DEVICE,INTEGER_32]");
t[306]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[EXTENSION_DEVICE,INTEGER_32]]");
t[305]=(T7*)se_string("NATIVE_ARRAY[KEY_RANGE]");
-t[304]=(T7*)se_string("NATIVE_ARRAY[BUTTON_RANGE]");
-t[303]=(T7*)se_string("NATIVE_ARRAY[AXES_RANGE]");
-t[302]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]");
-t[301]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]");
-t[300]=(T7*)se_string("HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]");
-t[299]=(T7*)se_string("NATIVE_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]");
-t[298]=(T7*)se_string("FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]");
+t[304]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]");
+t[303]=(T7*)se_string("HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]");
+t[302]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]]");
+t[301]=(T7*)se_string("NATIVE_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]");
+t[300]=(T7*)se_string("FAST_ARRAY[PROCEDURE[TUPLE[X_INPUT_DEVICE]]]");
+t[299]=(T7*)se_string("NATIVE_ARRAY[AXES_RANGE]");
+t[298]=(T7*)se_string("NATIVE_ARRAY[BUTTON_RANGE]");
t[297]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[INTEGER_32,INTEGER_32]]");
t[296]=(T7*)se_string("HASHED_DICTIONARY_NODE[INTEGER_32,INTEGER_32]");
t[295]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[INTEGER_32,INTEGER_32]]");
t[294]=(T7*)se_string("NATIVE_ARRAY[INTEGER_32]");
t[293]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[POINTER,STRING]]");
+t[292]=(T7*)se_string("HASHED_DICTIONARY_NODE[POINTER,STRING]");
t[291]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[POINTER,STRING]]");
t[290]=(T7*)se_string("HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]");
t[289]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]]");
t[288]=(T7*)se_string("HASHED_DICTIONARY[WEAK_REFERENCE[ANY_HASHED_DICTIONARY_NODE],STRING]");
t[287]=(T7*)se_string("WEAK_REFERENCE[HASHED_DICTIONARY_NODE[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]]");
+t[284]=(T7*)se_string("HASHED_DICTIONARY_NODE[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]");
t[283]=(T7*)se_string("NATIVE_ARRAY[HASHED_DICTIONARY_NODE[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]]");
t[282]=(T7*)se_string("NATIVE_ARRAY[IVY_CLIENT]");
t[281]=(T7*)se_string("NATIVE_ARRAY[LOOP_ITEM]");
@@ -20262,18 +21108,19 @@ t[269]=(T7*)se_string("HASHED_DICTIONARY[SIGNAL_4[INTEGER_32,INTEGER_32,INTEGER_
t[268]=(T7*)se_string("HASHED_DICTIONARY[EXTENSION_DEVICE,INTEGER_32]");
t[267]=(T7*)se_string("NATIVE_ARRAY[STRING]");
t[266]=(T7*)se_string("FAST_ARRAY[KEY_RANGE]");
-t[265]=(T7*)se_string("FAST_ARRAY[BUTTON_RANGE]");
-t[264]=(T7*)se_string("FAST_ARRAY[AXES_RANGE]");
-t[263]=(T7*)se_string("NATIVE_ARRAY[X_INPUT_DEVICE]");
-t[262]=(T7*)se_string("HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]");
-t[261]=(T7*)se_string("FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]");
-t[260]=(T7*)se_string("SIGNAL_1[X_INPUT_DEVICE]");
+t[265]=(T7*)se_string("NATIVE_ARRAY[X_INPUT_DEVICE]");
+t[264]=(T7*)se_string("HASHED_DICTIONARY[FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]],SENSITIVE]");
+t[263]=(T7*)se_string("FAST_ARRAY[SIGNAL_1[X_INPUT_DEVICE]]");
+t[262]=(T7*)se_string("SIGNAL_1[X_INPUT_DEVICE]");
+t[261]=(T7*)se_string("FAST_ARRAY[AXES_RANGE]");
+t[260]=(T7*)se_string("FAST_ARRAY[BUTTON_RANGE]");
t[259]=(T7*)se_string("HASHED_DICTIONARY[INTEGER_32,INTEGER_32]");
t[258]=(T7*)se_string("FAST_ARRAY[INTEGER_32]");
t[256]=(T7*)se_string("ARRAY[STRING]");
t[255]=(T7*)se_string("RING_ARRAY[INTEGER_32]");
t[254]=(T7*)se_string("NATIVE_ARRAY[POINTER]");
t[253]=(T7*)se_string("HASHED_DICTIONARY[POINTER,STRING]");
+t[251]=(T7*)se_string("PROCEDURE[TUPLE[FAST_ARRAY[STRING]]]");
t[250]=(T7*)se_string("HASHED_DICTIONARY[PROCEDURE[TUPLE[FAST_ARRAY[STRING]]],STRING]");
t[249]=(T7*)se_string("FAST_ARRAY[IVY_CLIENT]");
t[248]=(T7*)se_string("FAST_ARRAY[LOOP_ITEM]");