/* {XM_FORWARD_CALLBACKS}.on_start */ void F2262_30530 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "on_start"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_REFERENCE tr1 = NULL; RTCDT; RTSN; RTDA; RTLD; RTLI(2); RTLR(0,Current); RTLR(1,tr1); RTLIU(2); RTLU (SK_VOID, NULL); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 0, 35291); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2261, Current, 35291); RTIV(Current, RTAL); RTHOOK(1); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); if ((EIF_BOOLEAN)(tr1 == NULL)) { RTHOOK(2); RTDBGAA(Current, dtype, 24183, 0xF80008D2, 0); /* callbacks */ tr1 = RTLN(eif_new_type(2259, 0x00).id); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTWC(24143, Dtype(tr1)))(tr1); RTNHOOK(2,1); RTAR(Current, tr1); *(EIF_REFERENCE *)(Current + RTWA(24183, dtype)) = (EIF_REFERENCE) RTCCL(tr1); }
/* {INTEGER_16}.bit_shift_right */ EIF_TYPED_VALUE F125_2965 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "bit_shift_right"; RTEX; #define arg1 arg1x.it_i4 EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32}; #define ui4_1 ui4_1x.it_i4 EIF_REFERENCE tr1 = NULL; EIF_INTEGER_16 Result = ((EIF_INTEGER_16) 0); RTSN; RTDA; RTLD; if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r; RTLI(2); RTLR(0,Current); RTLR(1,tr1); RTLU (SK_INT16, &Result); RTLU(SK_INT32,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 124, Current, 0, 1, 7738); RTSA(Dtype(Current)); RTSC; RTME(Dtype(Current), 0); RTGC; RTDBGEAA(124, Current, 7738); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0x14000000, 1,0); /* Result */ ui4_1 = arg1; tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(2327, 123))(Current, ui4_1x)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); Result = *(EIF_INTEGER_16 *)(tr1); RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; { EIF_TYPED_VALUE r; r.type = SK_INT16; r.it_i2 = Result; return r; } #undef up1 #undef ui4_1 #undef arg1 }
/* {TYPE}.attempt */ EIF_TYPED_VALUE F392_2589 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "attempt"; RTEX; struct eif_ex_133 sloc1; EIF_REFERENCE loc1 = (EIF_REFERENCE) sloc1.data; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_REFERENCE tr1 = NULL; EIF_BOOLEAN tb1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; memset (&sloc1.overhead, 0, OVERHEAD + 8); sloc1.overhead.ov_flags = EO_EXP | EO_STACK; RT_DFS(&sloc1.overhead, RTWCT(2060, dtype, Dftype(Current))); RTLI(5); RTLR(0,Result); RTLR(1,loc1); RTLR(2,Current); RTLR(3,tr1); RTLR(4,arg1); RTLU (SK_REF, &Result); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTLU(SK_REF, &loc1); RTEAA(l_feature_name, 391, Current, 1, 1, 6578); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(391, Current, 6578); RTIV(Current, RTAL); wstdinit(loc1,loc1); RTLXI(loc1); Result= RTLN(RTWCT(2060, dtype, Dftype(Current))); wstdinit(Result,Result); RTLXI(Result); RTHOOK(1); tr1 = RTCCL(arg1); RTOE(RTWCT(2060, dtype, Dftype(Current)), tr1, loc1, tb1); if (tb1) { RTHOOK(2); RTDBGAL(Current, 0, 0x80000085, 0,0); /* Result */ tr1 = RTRCL(loc1); RTXA(tr1, Result); } if (RTAL & CK_ENSURE) { RTHOOK(3); RTCT("assigned_or_void", EX_POST); tb1 = '\01'; if (!RTEQ(Result, arg1)) { tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2049, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); tb1 = RTEQ(Result, tr1); } if (tb1) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(4); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef arg1 }
/* {RT_DBG_LOCAL_RECORD}.local_value_at */ EIF_TYPED_VALUE F726_5455 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x) { GTCX char *l_feature_name = "local_value_at"; RTEX; EIF_INTEGER_32 loc1 = (EIF_INTEGER_32) 0; #define arg1 arg1x.it_i4 #define arg2 arg2x.it_i4 #define arg3 arg3x.it_n4 EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32}; #define ui4_1 ui4_1x.it_i4 EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32}; #define ui4_2 ui4_2x.it_i4 EIF_TYPED_VALUE ui4_3x = {{0}, SK_INT32}; #define ui4_3 ui4_3x.it_i4 EIF_TYPED_VALUE uu4_1x = {{0}, SK_UINT32}; #define uu4_1 uu4_1x.it_n4 EIF_INTEGER_32 ti4_1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_n4 = * (EIF_NATURAL_32 *) arg3x.it_r; if ((arg2x.type & SK_HEAD) == SK_REF) arg2x.it_i4 = * (EIF_INTEGER_32 *) arg2x.it_r; if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i4 = * (EIF_INTEGER_32 *) arg1x.it_r; RTLI(2); RTLR(0,Current); RTLR(1,Result); RTLU (SK_REF, &Result); RTLU(SK_INT32,&arg1); RTLU(SK_INT32,&arg2); RTLU(SK_UINT32,&arg3); RTLU (SK_REF, &Current); RTLU(SK_INT32, &loc1); RTEAA(l_feature_name, 725, Current, 1, 3, 10649); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(725, Current, 10649); RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("index_large_enough", EX_PRE); RTTE((EIF_BOOLEAN) (arg2 >= ((EIF_INTEGER_32) 0L)), label_1); RTCK; RTJB; label_1: RTCF; } body:; RTHOOK(2); if ((EIF_BOOLEAN)(arg2 == ((EIF_INTEGER_32) 0L))) { RTHOOK(3); RTDBGAL(Current, 1, 0x10000000, 1, 0); /* loc1 */ loc1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3982, 222))(Current)).it_i4); loc1 = (EIF_INTEGER_32) loc1; } else { RTHOOK(4); RTDBGAL(Current, 1, 0x10000000, 1, 0); /* loc1 */ loc1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3981, 222))(Current)).it_i4); loc1 = (EIF_INTEGER_32) loc1; } RTHOOK(5); ti4_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3982, 222))(Current)).it_i4); if ((EIF_BOOLEAN)(loc1 != ti4_1)) { RTHOOK(6); RTDBGAL(Current, 0, 0xF8000000, 0,0); /* Result */ ui4_1 = arg1; ui4_2 = loc1; ui4_3 = arg2; uu4_1 = arg3; Result = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(3968, dtype))(Current, ui4_1x, ui4_2x, ui4_3x, uu4_1x)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); } RTVI(Current, RTAL); RTRS; RTHOOK(7); RTDBGLE; RTMD(0); RTLE; RTLO(6); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef ui4_1 #undef ui4_2 #undef ui4_3 #undef uu4_1 #undef arg3 #undef arg2 #undef arg1 }
/* {EV_GTK_C_STRING}.string */ EIF_TYPED_VALUE F1195_10687 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "string"; RTEX; EIF_REFERENCE loc1 = (EIF_REFERENCE) 0; EIF_NATURAL_8 loc2 = (EIF_NATURAL_8) 0; EIF_NATURAL_32 loc3 = (EIF_NATURAL_32) 0; EIF_INTEGER_32 loc4 = (EIF_INTEGER_32) 0; EIF_INTEGER_32 loc5 = (EIF_INTEGER_32) 0; EIF_INTEGER_32 loc6 = (EIF_INTEGER_32) 0; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32}; #define ui4_1 ui4_1x.it_i4 EIF_TYPED_VALUE uu4_1x = {{0}, SK_UINT32}; #define uu4_1 uu4_1x.it_n4 EIF_TYPED_VALUE uw1x = {{0}, SK_CHAR32}; #define uw1 uw1x.it_c4 EIF_TYPED_VALUE uu1_1x = {{0}, SK_UINT8}; #define uu1_1 uu1_1x.it_n1 EIF_POINTER tp1; EIF_REFERENCE tr1 = NULL; EIF_NATURAL_32 tu4_1; EIF_NATURAL_32 tu4_2; EIF_CHARACTER_32 tw1; EIF_NATURAL_8 tu1_1; EIF_NATURAL_8 tu1_2; EIF_CHARACTER_8 tc1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(4); RTLR(0,Current); RTLR(1,loc1); RTLR(2,tr1); RTLR(3,Result); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTLU(SK_REF, &loc1); RTLU(SK_UINT8, &loc2); RTLU(SK_UINT32, &loc3); RTLU(SK_INT32, &loc4); RTLU(SK_INT32, &loc5); RTLU(SK_INT32, &loc6); RTEAA(l_feature_name, 1194, Current, 6, 0, 16526); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(1194, Current, 16526); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 4, 0x10000000, 1, 0); /* loc4 */ loc4 = (EIF_INTEGER_32) ((EIF_INTEGER_32) 0L); RTHOOK(2); RTDBGAL(Current, 6, 0x10000000, 1, 0); /* loc6 */ loc6 = (EIF_INTEGER_32) ((EIF_INTEGER_32) 0L); RTHOOK(3); RTDBGAL(Current, 5, 0x10000000, 1, 0); /* loc5 */ loc5 = *(EIF_INTEGER_32 *)(Current + RTWA(8238, dtype)); RTHOOK(4); RTDBGAL(Current, 1, 0xF8000096, 0, 0); /* loc1 */ loc1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(8242, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTHOOK(5); tp1 = *(EIF_POINTER *)(Current + RTWA(8236, dtype)); up1 = tp1; ui4_1 = loc5; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(2668, "set_from_pointer", loc1))(loc1, up1x, ui4_1x); RTHOOK(6); RTDBGAL(Current, 0, 0xF80000E1, 0,0); /* Result */ tr1 = RTLN(225); ui4_1 = loc5; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(4329, Dtype(tr1)))(tr1, ui4_1x); RTNHOOK(6,1); Result = (EIF_REFERENCE) RTCCL(tr1); RTHOOK(7); ui4_1 = loc5; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(4456, "set_count", Result))(Result, ui4_1x); for (;;) { RTHOOK(8); if ((EIF_BOOLEAN)(loc4 == loc5)) break; RTHOOK(9); RTDBGAL(Current, 2, 0x30000000, 1, 0); /* loc2 */ ui4_1 = loc4; tu1_1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(2672, "read_natural_8", loc1))(loc1, ui4_1x)).it_n1); loc2 = (EIF_NATURAL_8) tu1_1; RTHOOK(10); RTDBGAL(Current, 6, 0x10000000, 1, 0); /* loc6 */ loc6++; RTHOOK(11); tu1_1 = (EIF_NATURAL_8) ((EIF_INTEGER_32) 127L); if ((EIF_BOOLEAN) (loc2 <= tu1_1)) { RTHOOK(12); tc1 = (EIF_CHARACTER_8) loc2; tw1 = (EIF_CHARACTER_32) tc1; uw1 = tw1; ui4_1 = loc6; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(1738, "put", Result))(Result, uw1x, ui4_1x); } else {
/* {TYPE}.is_case_insensitive_equal */ EIF_TYPED_VALUE F392_2596 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "is_case_insensitive_equal"; RTEX; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_BOOLEAN tb1; EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(4); RTLR(0,arg1); RTLR(1,Current); RTLR(2,tr1); RTLR(3,ur1); RTLU (SK_BOOL, &Result); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 391, Current, 0, 1, 6585); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(391, Current, 6585); RTCC(arg1, 391, l_feature_name, 1, eif_attached_type(170)); RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("other_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body:; RTHOOK(2); RTDBGAL(Current, 0, 0x04000000, 1,0); /* Result */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2040, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(2,1); ur1 = RTCCL(arg1); tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(3053, "is_case_insensitive_equal", tr1))(tr1, ur1x)).it_b); Result = (EIF_BOOLEAN) tb1; if (RTAL & CK_ENSURE) { RTHOOK(3); RTCT("definition", EX_POST); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2040, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(3,1); ur1 = RTCCL(arg1); tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(3053, "is_case_insensitive_equal", tr1))(tr1, ur1x)).it_b); if ((EIF_BOOLEAN)(Result == tb1)) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; { EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; } #undef up1 #undef ur1 #undef arg1 }
/* {XM_FORWARD_CALLBACKS}.on_content */ void F2262_30540 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "on_content"; RTEX; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_INTEGER_32 ti4_1; RTCDT; RTSN; RTDA; RTLD; RTLI(4); RTLR(0,arg1); RTLR(1,Current); RTLR(2,tr1); RTLR(3,ur1); RTLIU(4); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 1, 35288); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2261, Current, 35288); if (arg1) { RTCC(arg1, 2261, l_feature_name, 1, eif_new_type(915, 0x00), 0x00); } RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTHOOK(2); RTCT("not_empty", EX_PRE); ti4_1 = *(EIF_INTEGER_32 *)(arg1 + RTVA(15188, "count", arg1)); RTTE((EIF_BOOLEAN) (ti4_1 >= ((EIF_INTEGER_32) 0L)), label_1); RTCK; RTJB; label_1: RTCF; } body: ; RTHOOK(3); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(3,1); ur1 = RTCCL(arg1); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(24138, "on_content", tr1))(tr1, ur1x); RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; #undef up1 #undef ur1 #undef arg1 }
/* {TYPE}.as_upper */ EIF_TYPED_VALUE F446_5287 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "as_upper"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE up2x = {{0}, SK_POINTER}; #define up2 up2x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_REFERENCE tr2 = NULL; EIF_BOOLEAN tb1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(5); RTLR(0,tr1); RTLR(1,Current); RTLR(2,tr2); RTLR(3,ur1); RTLR(4,Result); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 445, Current, 0, 0, 9123); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(445, Current, 9123); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0xF8000101, 0,0); /* Result */ tr1 = RTLN(257); tr2 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3947, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); ur1 = tr2; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(4841, Dtype(tr1)))(tr1, ur1x); RTNHOOK(1,1); Result = (EIF_REFERENCE) RTCCL(tr1); RTHOOK(2); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(4938, "to_upper", Result))(Result); if (RTAL & CK_ENSURE) { RTHOOK(3); RTCT("as_upper_not_void", EX_POST); if ((EIF_BOOLEAN)(Result != NULL)) { RTCK; } else { RTCF; } RTHOOK(4); RTCT("definition", EX_POST); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(3947, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(4,1); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(4807, "as_upper", tr1))(tr1)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); ur1 = tr2; tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(4856, "same_string", Result))(Result, ur1x)).it_b); if (tb1) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(5); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef up2 #undef ur1 }
/* {XM_FORWARD_CALLBACKS}.on_start_tag_finish */ void F2262_30538 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "on_start_tag_finish"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_REFERENCE tr1 = NULL; RTSN; RTDA; RTLD; RTLI(2); RTLR(0,Current); RTLR(1,tr1); RTLIU(2); RTLU (SK_VOID, NULL); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 0, 35286); RTSA(Dtype(Current)); RTSC; RTME(Dtype(Current), 0); RTGC; RTDBGEAA(2261, Current, 35286); RTIV(Current, RTAL); RTHOOK(1); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, Dtype(Current)))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(1,1); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(24136, "on_start_tag_finish", tr1))(tr1); RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; #undef up1 }
/* {XM_FORWARD_CALLBACKS}.on_end_tag */ void F2262_30539 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x) { GTCX char *l_feature_name = "on_end_tag"; RTEX; #define arg1 arg1x.it_r #define arg2 arg2x.it_r #define arg3 arg3x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_TYPED_VALUE ur2x = {{0}, SK_REF}; #define ur2 ur2x.it_r EIF_TYPED_VALUE ur3x = {{0}, SK_REF}; #define ur3 ur3x.it_r EIF_REFERENCE tr1 = NULL; EIF_BOOLEAN tb1; EIF_BOOLEAN tb2; RTCDT; RTSN; RTDA; RTLD; RTLI(8); RTLR(0,arg1); RTLR(1,arg2); RTLR(2,arg3); RTLR(3,Current); RTLR(4,ur1); RTLR(5,tr1); RTLR(6,ur2); RTLR(7,ur3); RTLIU(8); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU(SK_REF,&arg2); RTLU(SK_REF,&arg3); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 3, 35287); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2261, Current, 35287); if (arg1) { RTCC(arg1, 2261, l_feature_name, 1, eif_new_type(915, 0x00), 0x00); } if (arg2) { RTCC(arg2, 2261, l_feature_name, 2, eif_new_type(915, 0x00), 0x00); } if (arg3) { RTCC(arg3, 2261, l_feature_name, 3, eif_new_type(915, 0x00), 0x00); } RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("unresolved_namespace_is_void", EX_PRE); tb1 = '\01'; tb2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24142, dtype))(Current)).it_b); if (tb2) { tb1 = (EIF_BOOLEAN)(arg1 != NULL); } RTTE(tb1, label_1); RTCK; RTHOOK(2); RTCT("local_part", EX_PRE); ur1 = RTCCL(arg3); tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(24141, dtype))(Current, ur1x)).it_b); RTTE(tb1, label_1); RTCK; RTJB; label_1: RTCF; } body: ; RTHOOK(3); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(3,1); ur1 = RTCCL(arg1); ur2 = RTCCL(arg2); ur3 = RTCCL(arg3); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(24137, "on_end_tag", tr1))(tr1, ur1x, ur2x, ur3x); RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(5); RTEE; #undef up1 #undef ur1 #undef ur2 #undef ur3 #undef arg3 #undef arg2 #undef arg1 }
/* {XM_FORWARD_CALLBACKS}.set_callbacks */ void F2262_30529 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "set_callbacks"; RTEX; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_REFERENCE tr1 = NULL; RTCDT; RTSN; RTDA; RTLD; RTLI(3); RTLR(0,arg1); RTLR(1,Current); RTLR(2,tr1); RTLIU(3); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 1, 35290); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2261, Current, 35290); RTCC(arg1, 2261, l_feature_name, 1, RTWCT(24183, dtype, Dftype(Current)), 0x00); RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("a_callback_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body: ; RTHOOK(2); RTDBGAA(Current, dtype, 24183, 0xF80008D2, 0); /* callbacks */ RTAR(Current, arg1); *(EIF_REFERENCE *)(Current + RTWA(24183, dtype)) = (EIF_REFERENCE) RTCCL(arg1); if (RTAL & CK_ENSURE) { RTHOOK(3); RTCT("callbackes_set", EX_POST); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); if (RTCEQ(tr1, arg1)) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; #undef up1 #undef arg1 }
/* {XM_FORWARD_CALLBACKS}.on_processing_instruction */ void F2262_30534 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x) { GTCX char *l_feature_name = "on_processing_instruction"; RTEX; #define arg1 arg1x.it_r #define arg2 arg2x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_TYPED_VALUE ur2x = {{0}, SK_REF}; #define ur2 ur2x.it_r EIF_REFERENCE tr1 = NULL; RTCDT; RTSN; RTDA; RTLD; RTLI(6); RTLR(0,arg1); RTLR(1,arg2); RTLR(2,Current); RTLR(3,tr1); RTLR(4,ur1); RTLR(5,ur2); RTLIU(6); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU(SK_REF,&arg2); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 2, 35295); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2261, Current, 35295); if (arg1) { RTCC(arg1, 2261, l_feature_name, 1, eif_new_type(915, 0x00), 0x00); } if (arg2) { RTCC(arg2, 2261, l_feature_name, 2, eif_new_type(915, 0x00), 0x00); } RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("name_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTHOOK(2); RTCT("content_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg2 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body: ; RTHOOK(3); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(3,1); ur1 = RTCCL(arg1); ur2 = RTCCL(arg2); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(24132, "on_processing_instruction", tr1))(tr1, ur1x, ur2x); RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(4); RTEE; #undef up1 #undef ur1 #undef ur2 #undef arg2 #undef arg1 }
/* {XM_FORWARD_CALLBACKS}.on_xml_declaration */ void F2262_30532 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x, EIF_TYPED_VALUE arg2x, EIF_TYPED_VALUE arg3x) { GTCX char *l_feature_name = "on_xml_declaration"; RTEX; #define arg1 arg1x.it_r #define arg2 arg2x.it_r #define arg3 arg3x.it_b EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_TYPED_VALUE ur2x = {{0}, SK_REF}; #define ur2 ur2x.it_r EIF_TYPED_VALUE ub1x = {{0}, SK_BOOL}; #define ub1 ub1x.it_b EIF_REFERENCE tr1 = NULL; EIF_INTEGER_32 ti4_1; RTCDT; RTSN; RTDA; RTLD; if ((arg3x.type & SK_HEAD) == SK_REF) arg3x.it_b = * (EIF_BOOLEAN *) arg3x.it_r; RTLI(6); RTLR(0,arg1); RTLR(1,arg2); RTLR(2,Current); RTLR(3,tr1); RTLR(4,ur1); RTLR(5,ur2); RTLIU(6); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU(SK_REF,&arg2); RTLU(SK_BOOL,&arg3); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2261, Current, 0, 3, 35293); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2261, Current, 35293); if (arg1) { RTCC(arg1, 2261, l_feature_name, 1, eif_new_type(915, 0x00), 0x00); } if (arg2) { RTCC(arg2, 2261, l_feature_name, 2, eif_new_type(915, 0x00), 0x00); } RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("a_version_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTHOOK(2); RTCT("a_version_not_empty", EX_PRE); ti4_1 = *(EIF_INTEGER_32 *)(arg1 + RTVA(15188, "count", arg1)); RTTE((EIF_BOOLEAN) (ti4_1 > ((EIF_INTEGER_32) 0L)), label_1); RTCK; RTJB; label_1: RTCF; } body: ; RTHOOK(3); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(3,1); ur1 = RTCCL(arg1); ur2 = RTCCL(arg2); ub1 = arg3; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(24130, "on_xml_declaration", tr1))(tr1, ur1x, ur2x, ub1x); RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(5); RTEE; #undef up1 #undef ur1 #undef ur2 #undef ub1 #undef arg3 #undef arg2 #undef arg1 }
/* {INTEGER_16}.opposite */ EIF_TYPED_VALUE F125_2944 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "opposite"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_REFERENCE tr1 = NULL; EIF_INTEGER_16 Result = ((EIF_INTEGER_16) 0); RTSN; RTDA; RTLD; RTLI(2); RTLR(0,Current); RTLR(1,tr1); RTLU (SK_INT16, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 124, Current, 0, 0, 7717); RTSA(Dtype(Current)); RTSC; RTME(Dtype(Current), 0); RTGC; RTDBGEAA(124, Current, 7717); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0x14000000, 1,0); /* Result */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(1635, 123))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); Result = *(EIF_INTEGER_16 *)(tr1); RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_INT16; r.it_i2 = Result; return r; } #undef up1 }
/* {TRAVERSABLE}.for_all */ EIF_TYPED_VALUE F846_10172 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "for_all"; RTEX; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_BOOLEAN tb1; EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(4); RTLR(0,arg1); RTLR(1,Current); RTLR(2,tr1); RTLR(3,ur1); RTLU (SK_BOOL, &Result); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 845, Current, 0, 1, 3496); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(845, Current, 3496); if (arg1) { { EIF_TYPE_INDEX typarr0[] = {500,0,0xFFF9,1,368,0,376,0xFFFF}; EIF_TYPE_INDEX typres0; typarr0[5] = RTWCT(9630, dtype, Dftype(Current)); typres0 = eif_compound_id(Dftype(Current), typarr0); RTCC(arg1, 845, l_feature_name, 1, typres0); } } RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("test_exists", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body:; RTHOOK(2); RTDBGAL(Current, 0, 0x04000000, 1,0); /* Result */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(9629, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(2,1); ur1 = RTCCL(arg1); tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(9708, "for_all", tr1))(tr1, ur1x)).it_b); Result = (EIF_BOOLEAN) tb1; RTVI(Current, RTAL); RTRS; RTHOOK(3); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; { EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; } #undef up1 #undef ur1 #undef arg1 }
/* {INTEGER_16}.integer_remainder */ EIF_TYPED_VALUE F125_2946 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "integer_remainder"; RTEX; #define arg1 arg1x.it_i2 EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_INTEGER_16 Result = ((EIF_INTEGER_16) 0); RTSN; RTDA; RTLD; if ((arg1x.type & SK_HEAD) == SK_REF) arg1x.it_i2 = * (EIF_INTEGER_16 *) arg1x.it_r; RTLI(3); RTLR(0,ur1); RTLR(1,Current); RTLR(2,tr1); RTLU (SK_INT16, &Result); RTLU(SK_INT16,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 124, Current, 0, 1, 7719); RTSA(Dtype(Current)); RTSC; RTME(Dtype(Current), 0); RTGC; RTDBGEAA(124, Current, 7719); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0x14000000, 1,0); /* Result */ ur1 = RTLN(124); *(EIF_INTEGER_16 *)ur1 = arg1; tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(2291, 123))(Current, ur1x)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); Result = *(EIF_INTEGER_16 *)(tr1); RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; { EIF_TYPED_VALUE r; r.type = SK_INT16; r.it_i2 = Result; return r; } #undef up1 #undef ur1 #undef arg1 }
/* {TRAVERSABLE}.do_all */ void F846_10169 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "do_all"; RTEX; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; RTCDT; RTSN; RTDA; RTLD; RTLI(4); RTLR(0,arg1); RTLR(1,Current); RTLR(2,tr1); RTLR(3,ur1); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 845, Current, 0, 1, 3493); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(845, Current, 3493); if (arg1) { { EIF_TYPE_INDEX typarr0[] = {502,0,0xFFF9,1,368,0,0xFFFF}; EIF_TYPE_INDEX typres0; typarr0[5] = RTWCT(9630, dtype, Dftype(Current)); typres0 = eif_compound_id(Dftype(Current), typarr0); RTCC(arg1, 845, l_feature_name, 1, typres0); } } RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("action_exists", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body:; RTHOOK(2); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(9629, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(2,1); ur1 = RTCCL(arg1); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(9705, "do_all", tr1))(tr1, ur1x); RTVI(Current, RTAL); RTRS; RTHOOK(3); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; #undef up1 #undef ur1 #undef arg1 }
/* {EV_GTK_C_STRING}.make_from_path */ void F1195_10684 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "make_from_path"; RTEX; EIF_REFERENCE loc1 = (EIF_REFERENCE) 0; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32}; #define ui4_1 ui4_1x.it_i4 EIF_POINTER tp1; EIF_POINTER tp2; EIF_REFERENCE tr1 = NULL; EIF_INTEGER_32 ti4_1; RTCDT; RTSN; RTDA; RTLD; RTLI(4); RTLR(0,arg1); RTLR(1,loc1); RTLR(2,tr1); RTLR(3,Current); RTLU (SK_VOID, NULL); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTLU(SK_REF, &loc1); RTEAA(l_feature_name, 1194, Current, 1, 1, 16523); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(1194, Current, 16523); RTCC(arg1, 1194, l_feature_name, 1, eif_attached_type(172)); RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("a_path_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body:; RTHOOK(2); RTDBGAL(Current, 1, 0xF8000096, 0, 0); /* loc1 */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(3512, "to_pointer", arg1))(arg1)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); loc1 = (EIF_REFERENCE) RTCCL(tr1); RTHOOK(3); RTDBGAA(Current, dtype, 8238, 0x10000000, 1); /* string_length */ ti4_1 = *(EIF_INTEGER_32 *)(loc1 + RTVA(2670, "count", loc1)); *(EIF_INTEGER_32 *)(Current + RTWA(8238, dtype)) = (EIF_INTEGER_32) (EIF_INTEGER_32) (ti4_1 - ((EIF_INTEGER_32) 1L)); RTHOOK(4); RTDBGAA(Current, dtype, 8236, 0x40000000, 1); /* item */ ti4_1 = *(EIF_INTEGER_32 *)(loc1 + RTVA(2670, "count", loc1)); ui4_1 = ti4_1; tp1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWF(5140, 868))(Current, ui4_1x)).it_p); *(EIF_POINTER *)(Current + RTWA(8236, dtype)) = (EIF_POINTER) tp1; RTHOOK(5); tp1 = *(EIF_POINTER *)(Current + RTWA(8236, dtype)); tp2 = *(EIF_POINTER *)(loc1 + RTVA(2669, "item", loc1)); up1 = tp2; ti4_1 = *(EIF_INTEGER_32 *)(loc1 + RTVA(2670, "count", loc1)); ui4_1 = ti4_1; memcpy((void *)tp1, (const void *) up1, (size_t) ui4_1); RTHOOK(6); RTDBGAA(Current, dtype, 8235, 0x04000000, 1); /* is_shared */ *(EIF_BOOLEAN *)(Current + RTWA(8235, dtype)) = (EIF_BOOLEAN) (EIF_BOOLEAN) 0; RTVI(Current, RTAL); RTRS; RTHOOK(7); RTDBGLE; RTMD(0); RTLE; RTLO(4); RTEE; #undef up1 #undef ui4_1 #undef arg1 }
/* {XM_EIFFEL_PARSER_NAME}.is_namespace_name */ EIF_TYPED_VALUE F2312_31602 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "is_namespace_name"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_REFERENCE tr1 = NULL; EIF_INTEGER_32 ti4_1; EIF_BOOLEAN tb1; EIF_BOOLEAN tb2; EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(2); RTLR(0,Current); RTLR(1,tr1); RTLIU(2); RTLU (SK_BOOL, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2311, Current, 0, 0, 36686); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2311, Current, 36686); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0x04000000, 1,0); /* Result */ tb1 = '\0'; ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(24868, dtype)); if ((EIF_BOOLEAN)(ti4_1 == ((EIF_INTEGER_32) 2L))) { tb2 = '\0'; tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24866, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(1,1); ti4_1 = *(EIF_INTEGER_32 *)(tr1 + RTVA(15188, "count", tr1)); if ((EIF_BOOLEAN) (ti4_1 > ((EIF_INTEGER_32) 0L))) { tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24872, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(1,2); ti4_1 = *(EIF_INTEGER_32 *)(tr1 + RTVA(15188, "count", tr1)); tb2 = (EIF_BOOLEAN) (ti4_1 > ((EIF_INTEGER_32) 0L)); } tb1 = tb2; } Result = (EIF_BOOLEAN) tb1; RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; } #undef up1 }
/* {TYPE}.plus */ EIF_TYPED_VALUE F392_2594 (EIF_REFERENCE Current, EIF_TYPED_VALUE arg1x) { GTCX char *l_feature_name = "plus"; RTEX; #define arg1 arg1x.it_r EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE up2x = {{0}, SK_POINTER}; #define up2 up2x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32}; #define ui4_1 ui4_1x.it_i4 EIF_REFERENCE tr1 = NULL; EIF_REFERENCE tr2 = NULL; EIF_INTEGER_32 ti4_1; EIF_INTEGER_32 ti4_2; EIF_BOOLEAN tb1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(6); RTLR(0,arg1); RTLR(1,tr1); RTLR(2,Current); RTLR(3,tr2); RTLR(4,Result); RTLR(5,ur1); RTLU (SK_REF, &Result); RTLU(SK_REF,&arg1); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 391, Current, 0, 1, 6583); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(391, Current, 6583); RTCC(arg1, 391, l_feature_name, 1, eif_attached_type(170)); RTIV(Current, RTAL); if ((RTAL & CK_REQUIRE) || RTAC) { RTHOOK(1); RTCT("argument_not_void", EX_PRE); RTTE((EIF_BOOLEAN)(arg1 != NULL), label_1); RTCK; RTJB; label_1: RTCF; } body:; RTHOOK(2); RTDBGAL(Current, 0, 0xF80000AA, 0,0); /* Result */ tr1 = RTLN(170); tr2 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2040, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(2,1); ti4_1 = *(EIF_INTEGER_32 *)(tr2 + RTVA(3069, "count", tr2)); ti4_2 = *(EIF_INTEGER_32 *)(arg1 + RTVA(3069, "count", arg1)); ui4_1 = (EIF_INTEGER_32) (ti4_1 + ti4_2); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(2838, Dtype(tr1)))(tr1, ui4_1x); RTNHOOK(2,2); Result = (EIF_REFERENCE) RTCCL(tr1); RTHOOK(3); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2040, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); ur1 = tr1; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(3097, "append", Result))(Result, ur1x); RTHOOK(4); ur1 = RTCCL(arg1); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(3097, "append", Result))(Result, ur1x); if (RTAL & CK_ENSURE) { RTHOOK(5); RTCT("result_exists", EX_POST); if ((EIF_BOOLEAN)(Result != NULL)) { RTCK; } else { RTCF; } RTHOOK(6); RTCT("definition", EX_POST); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2040, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); ur1 = RTCCL(arg1); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(2917, "plus", tr1))(tr1, ur1x)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); ur1 = tr2; tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(3055, "same_string", Result))(Result, ur1x)).it_b); if (tb1) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(7); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef up2 #undef ur1 #undef ui4_1 #undef arg1 }
/* {XM_EIFFEL_PARSER_NAME}.is_namespace_declaration */ EIF_TYPED_VALUE F2312_31603 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "is_namespace_declaration"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE up2x = {{0}, SK_POINTER}; #define up2 up2x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_TYPED_VALUE ur2x = {{0}, SK_REF}; #define ur2 ur2x.it_r EIF_REFERENCE tr1 = NULL; EIF_REFERENCE tr2 = NULL; EIF_INTEGER_32 ti4_1; EIF_INTEGER_32 ti4_2; EIF_BOOLEAN tb1; EIF_BOOLEAN tb2; EIF_BOOLEAN Result = ((EIF_BOOLEAN) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(5); RTLR(0,Current); RTLR(1,tr1); RTLR(2,ur1); RTLR(3,tr2); RTLR(4,ur2); RTLIU(5); RTLU (SK_BOOL, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2311, Current, 0, 0, 36687); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2311, Current, 36687); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0x04000000, 1,0); /* Result */ tb1 = '\0'; ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(24868, dtype)); ti4_2 = *(EIF_INTEGER_32 *)(Current + RTWA(24868, dtype)); if ((EIF_BOOLEAN) ((EIF_BOOLEAN)(ti4_1 == ((EIF_INTEGER_32) 1L)) || (EIF_BOOLEAN)(ti4_2 == ((EIF_INTEGER_32) 2L)))) { tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(23866, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); ur1 = RTCCL(tr1); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24866, dtype))(Current)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); ur2 = RTCCL(tr2); tb2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(24042, dtype))(Current, ur1x, ur2x)).it_b); tb1 = tb2; } Result = (EIF_BOOLEAN) tb1; RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_BOOL; r.it_b = Result; return r; } #undef up1 #undef up2 #undef ur1 #undef ur2 }
/* {TYPE}.name */ EIF_TYPED_VALUE F392_2577 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "name"; RTEX; EIF_REFERENCE loc1 = (EIF_REFERENCE) 0; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_REFERENCE tr2 = NULL; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(6); RTLR(0,loc1); RTLR(1,Current); RTLR(2,tr1); RTLR(3,Result); RTLR(4,tr2); RTLR(5,ur1); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTLU(SK_REF, &loc1); RTEAA(l_feature_name, 391, Current, 1, 0, 6566); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(391, Current, 6566); RTIV(Current, RTAL); RTHOOK(1); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2058, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); loc1 = tr1; if (EIF_TEST(loc1)) { RTHOOK(2); RTDBGAL(Current, 0, 0xF80000A9, 0,0); /* Result */ Result = (EIF_REFERENCE) loc1; } else { RTHOOK(3); RTDBGAL(Current, 0, 0xF80000A9, 0,0); /* Result */ tr1 = RTLN(169); tr2 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2059, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); ur1 = RTCCL(tr2); (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(3040, Dtype(tr1)))(tr1, ur1x); RTNHOOK(3,1); Result = (EIF_REFERENCE) tr1; RTHOOK(4); RTDBGAA(Current, dtype, 2058, 0xF80000A9, 0); /* internal_name */ RTAR(Current, Result); *(EIF_REFERENCE *)(Current + RTWA(2058, dtype)) = (EIF_REFERENCE) Result; } if (RTAL & CK_ENSURE) { RTHOOK(5); RTCT("name_not_void", EX_POST); if ((EIF_BOOLEAN)(Result != NULL)) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(6); RTDBGLE; RTMD(0); RTLE; RTLO(3); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef ur1 }
/* {XM_EIFFEL_PARSER_NAME}.ns_prefix */ EIF_TYPED_VALUE F2312_31606 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "ns_prefix"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_BOOLEAN tb1; EIF_BOOLEAN tb2; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(2); RTLR(0,Current); RTLR(1,Result); RTLIU(2); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 2311, Current, 0, 0, 36690); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2311, Current, 36690); RTIV(Current, RTAL); RTHOOK(1); tb1 = '\0'; tb2 = *(EIF_BOOLEAN *)(Current + RTWA(24856, dtype)); if (tb2) { tb2 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24859, dtype))(Current)).it_b); tb1 = tb2; } if (tb1) { RTHOOK(2); RTDBGAL(Current, 0, 0xF8000393, 0,0); /* Result */ Result = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24866, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); } if (RTAL & CK_ENSURE) { RTHOOK(3); RTCT("no_namespaces_void", EX_POST); tb1 = *(EIF_BOOLEAN *)(Current + RTWA(24856, dtype)); if ((!((EIF_BOOLEAN) !tb1) || ((EIF_BOOLEAN)(Result == NULL)))) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 }
/* {TYPE}.out */ EIF_TYPED_VALUE F392_2592 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "out"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_REFERENCE tr1 = NULL; EIF_REFERENCE tr2 = NULL; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(5); RTLR(0,tr1); RTLR(1,Current); RTLR(2,tr2); RTLR(3,ur1); RTLR(4,Result); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 391, Current, 0, 0, 6581); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(391, Current, 6581); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0xF80000AA, 0,0); /* Result */ tr1 = RTLN(170); tr2 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(2040, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); ur1 = tr2; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTWC(3040, Dtype(tr1)))(tr1, ur1x); RTNHOOK(1,1); Result = (EIF_REFERENCE) RTCCL(tr1); if (RTAL & CK_ENSURE) { RTHOOK(2); RTCT("out_not_void", EX_POST); if ((EIF_BOOLEAN)(Result != NULL)) { RTCK; } else { RTCF; } } RTVI(Current, RTAL); RTRS; RTHOOK(3); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef ur1 }
/* {XM_EIFFEL_PARSER_NAME}.local_part */ EIF_TYPED_VALUE F2312_31607 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "local_part"; RTEX; EIF_REFERENCE loc1 = (EIF_REFERENCE) 0; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE up2x = {{0}, SK_POINTER}; #define up2 up2x.it_p EIF_TYPED_VALUE ur1x = {{0}, SK_REF}; #define ur1 ur1x.it_r EIF_TYPED_VALUE ur2x = {{0}, SK_REF}; #define ur2 ur2x.it_r EIF_TYPED_VALUE uc1x = {{0}, SK_CHAR8}; #define uc1 uc1x.it_c1 EIF_REFERENCE tr1 = NULL; EIF_REFERENCE tr2 = NULL; EIF_INTEGER_32 ti4_1; EIF_BOOLEAN tb1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(7); RTLR(0,Current); RTLR(1,Result); RTLR(2,tr1); RTLR(3,tr2); RTLR(4,ur1); RTLR(5,ur2); RTLR(6,loc1); RTLIU(7); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTLU(SK_REF, &loc1); RTEAA(l_feature_name, 2311, Current, 1, 0, 36691); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(2311, Current, 36691); RTIV(Current, RTAL); RTHOOK(1); tb1 = *(EIF_BOOLEAN *)(Current + RTWA(24856, dtype)); if (tb1) { if (RTAL & CK_CHECK) { RTHOOK(2); RTCT("count_for_namespaces", EX_CHECK); ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(24868, dtype)); if ((EIF_BOOLEAN) (ti4_1 <= ((EIF_INTEGER_32) 2L))) { RTCK; } else { RTCF; } } RTHOOK(3); RTDBGAL(Current, 0, 0xF8000393, 0,0); /* Result */ Result = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24867, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); } else { RTHOOK(4); RTDBGAL(Current, 0, 0xF8000393, 0,0); /* Result */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24595, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(4,1); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24866, dtype))(Current)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); ur1 = RTCCL(tr2); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(24756, "cloned_string", tr1))(tr1, ur1x)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); Result = (EIF_REFERENCE) RTCCL(tr2); RTHOOK(5); ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(24868, dtype)); if ((EIF_BOOLEAN) (ti4_1 > ((EIF_INTEGER_32) 1L))) { RTHOOK(6); uc1 = (EIF_CHARACTER_8) ':'; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(15239, "append_character", Result))(Result, uc1x); RTHOOK(7); RTDBGAL(Current, 0, 0xF8000393, 0,0); /* Result */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24595, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(7,1); ur1 = RTCCL(Result); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24872, dtype))(Current)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); ur2 = RTCCL(tr2); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(24757, "appended_string", tr1))(tr1, ur1x, ur2x)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); Result = (EIF_REFERENCE) RTCCL(tr2); RTHOOK(8); ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(24868, dtype)); if ((EIF_BOOLEAN) (ti4_1 > ((EIF_INTEGER_32) 2L))) { RTHOOK(9); RTDBGAL(Current, 1, 0xF80009B0, 0, 0); /* loc1 */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24873, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(9,1); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(25458, "new_cursor", tr1))(tr1)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); loc1 = (EIF_REFERENCE) RTCCL(tr2); RTHOOK(10); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(25350, "start", loc1))(loc1); for (;;) { RTHOOK(11); tb1 = (((FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(25349, "after", loc1))(loc1)).it_b); if (tb1) break; RTHOOK(12); uc1 = (EIF_CHARACTER_8) ':'; (FUNCTION_CAST(void, (EIF_REFERENCE, EIF_TYPED_VALUE)) RTVF(15239, "append_character", Result))(Result, uc1x); RTHOOK(13); RTDBGAL(Current, 0, 0xF8000393, 0,0); /* Result */ tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24595, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(13,1); ur1 = RTCCL(Result); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTVF(25334, "item", loc1))(loc1)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); ur2 = RTCCL(tr2); tr2 = ((up2x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTVF(24757, "appended_string", tr1))(tr1, ur1x, ur2x)), (((up2x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up2x.it_r = RTBU(up2x))), (up2x.type = SK_POINTER), up2x.it_r); Result = (EIF_REFERENCE) RTCCL(tr2); RTHOOK(14); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(25351, "forth", loc1))(loc1); } } }
/* {RT_DBG_LOCAL_RECORD}.current_value_record */ EIF_TYPED_VALUE F726_5460 (EIF_REFERENCE Current) { GTCX char *l_feature_name = "current_value_record"; RTEX; EIF_TYPED_VALUE up1x = {{0}, SK_POINTER}; #define up1 up1x.it_p EIF_TYPED_VALUE ui4_1x = {{0}, SK_INT32}; #define ui4_1 ui4_1x.it_i4 EIF_TYPED_VALUE ui4_2x = {{0}, SK_INT32}; #define ui4_2 ui4_2x.it_i4 EIF_TYPED_VALUE uu4_1x = {{0}, SK_UINT32}; #define uu4_1 uu4_1x.it_n4 EIF_INTEGER_32 ti4_1; EIF_INTEGER_32 ti4_2; EIF_NATURAL_32 tu4_1; EIF_REFERENCE Result = ((EIF_REFERENCE) 0); RTCDT; RTSN; RTDA; RTLD; RTLI(2); RTLR(0,Current); RTLR(1,Result); RTLU (SK_REF, &Result); RTLU (SK_REF, &Current); RTEAA(l_feature_name, 725, Current, 0, 0, 10636); RTSA(dtype); RTSC; RTME(dtype, 0); RTGC; RTDBGEAA(725, Current, 10636); RTIV(Current, RTAL); RTHOOK(1); RTDBGAL(Current, 0, 0xF80000E1, 0,0); /* Result */ ti4_1 = *(EIF_INTEGER_32 *)(Current + RTWA(4124, dtype)); ui4_1 = ti4_1; ti4_2 = *(EIF_INTEGER_32 *)(Current + RTWA(4108, dtype)); ui4_2 = ti4_2; tu4_1 = *(EIF_NATURAL_32 *)(Current + RTWA(4125, dtype)); uu4_1 = tu4_1; Result = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE, EIF_TYPED_VALUE, EIF_TYPED_VALUE, EIF_TYPED_VALUE)) RTWF(3973, dtype))(Current, ui4_1x, ui4_2x, uu4_1x)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTVI(Current, RTAL); RTRS; RTHOOK(2); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; { EIF_TYPED_VALUE r; r.type = SK_REF; r.it_r = Result; return r; } #undef up1 #undef ui4_1 #undef ui4_2 #undef uu4_1 }
RTGC; RTDBGEAA(2261, Current, 35291); RTIV(Current, RTAL); RTHOOK(1); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); if ((EIF_BOOLEAN)(tr1 == NULL)) { RTHOOK(2); RTDBGAA(Current, dtype, 24183, 0xF80008D2, 0); /* callbacks */ tr1 = RTLN(eif_new_type(2259, 0x00).id); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTWC(24143, Dtype(tr1)))(tr1); RTNHOOK(2,1); RTAR(Current, tr1); *(EIF_REFERENCE *)(Current + RTWA(24183, dtype)) = (EIF_REFERENCE) RTCCL(tr1); } RTHOOK(3); tr1 = ((up1x = (FUNCTION_CAST(EIF_TYPED_VALUE, (EIF_REFERENCE)) RTWF(24183, dtype))(Current)), (((up1x.type & SK_HEAD) == SK_REF)? (EIF_REFERENCE) 0: (up1x.it_r = RTBU(up1x))), (up1x.type = SK_POINTER), up1x.it_r); RTNHOOK(3,1); (FUNCTION_CAST(void, (EIF_REFERENCE)) RTVF(24128, "on_start", tr1))(tr1); RTVI(Current, RTAL); RTRS; RTHOOK(4); RTDBGLE; RTMD(0); RTLE; RTLO(2); RTEE; #undef up1 } /* {XM_FORWARD_CALLBACKS}.on_finish */ void F2262_30531 (EIF_REFERENCE Current)