qbs* FUNC_REFER(qbs*_FUNC_REFER_STRING_A2,int32*_FUNC_REFER_LONG_TYP,int32*_FUNC_REFER_LONG_METHOD){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data35.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (is_error_pending()) goto exit_subfunc;
do{
*_FUNC_REFER_LONG_TYPBAK=*_FUNC_REFER_LONG_TYP;
if(!qbevent)break;evnt(21268);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21272);}while(r);
do{
*_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21275);}while(r);
S_24985:;
if ((*_FUNC_REFER_LONG_I)||is_error_pending()){
if(qbevent){evnt(21276);if(r)goto S_24985;}
do{
*_FUNC_REFER_LONG_IDNUMBER=qbr(qbs_val<long double>(qbs_left(_FUNC_REFER_STRING_A,*_FUNC_REFER_LONG_I- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21277);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_A,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21277);}while(r);
}else{
do{
*_FUNC_REFER_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_REFER_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21279);}while(r);
}
do{
SUB_GETID(_FUNC_REFER_LONG_IDNUMBER);
if(!qbevent)break;evnt(21281);}while(r);
S_24992:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(21282);if(r)goto S_24992;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21282);}while(r);
}
S_24995:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISUDT)||is_error_pending()){
if(qbevent){evnt(21285);if(r)goto S_24995;}
S_24996:;
if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||is_error_pending()){
if(qbevent){evnt(21286);if(r)goto S_24996;}
do{
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21287);}while(r);
S_24998:;
if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||is_error_pending()){
if(qbevent){evnt(21288);if(r)goto S_24998;}
do{
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_REFER_STRING_N));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21288);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_N,qbs_add(FUNC_SCOPE(),_FUNC_REFER_STRING_N));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21289);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21290);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21291);}while(r);
}
do{
*_FUNC_REFER_LONG_U=qbr(qbs_val<long double>(_FUNC_REFER_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21296);}while(r);
do{
*_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21297);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_A,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21297);}while(r);
do{
*__LONG_E=qbr(qbs_val<long double>(_FUNC_REFER_STRING_A));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21297);}while(r);
do{
*_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21298);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_O,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21298);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21299);}while(r);
S_25012:;
if ((-(*(int32*)(((char*)__UDT_ID)+(536))== 0 ))||is_error_pending()){
if(qbevent){evnt(21299);if(r)goto S_25012;}
do{
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21299);}while(r);
}
S_25015:;
if ((-(*__LONG_E== 0 ))||is_error_pending()){
if(qbevent){evnt(21300);if(r)goto S_25015;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("User defined types in expressions are invalid",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21300);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21300);}while(r);
}
S_25019:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS)||is_error_pending()){
if(qbevent){evnt(21301);if(r)goto S_25019;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot resolve bit-length variables inside user defined types",61));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21301);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21301);}while(r);
}
S_25023:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(21303);if(r)goto S_25023;}
S_25024:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
if(qbevent){evnt(21304);if(r)goto S_25024;}
do{
qbs_set(_FUNC_REFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((uint8*)",10),FUNC_SCOPE()),_FUNC_REFER_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_REFER_STRING_O),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21305);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_fixed(",14),_FUNC_REFER_STRING_O2),qbs_new_txt_len(",",1)),qbs__tostr((int32)(((int32*)(__ARRAY_LONG_UDTETYPESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])]),NULL,0)),qbs_new_txt_len(",1)",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21306);}while(r);
do{
*_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH;
if(!qbevent)break;evnt(21307);}while(r);
}else{
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*((qbs**)((char*)",17),FUNC_SCOPE()),_FUNC_REFER_STRING_N),qbs_new_txt_len("+(",2)),_FUNC_REFER_STRING_O),qbs_new_txt_len(")))",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21309);}while(r);
do{
*_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE;
if(!qbevent)break;evnt(21310);}while(r);
}
}else{
do{
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISUDT-*__LONG_ISREFERENCE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(21313);}while(r);
S_25034:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISARRAY)||is_error_pending()){
if(qbevent){evnt(21314);if(r)goto S_25034;}
do{
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISARRAY;
if(!qbevent)break;evnt(21314);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_T,FUNC_TYP2CTYP(_FUNC_REFER_LONG_TYP,qbs_new_txt_len("",0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21315);}while(r);
S_25038:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(21316);if(r)goto S_25038;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21316);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_REFER_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_REFER_STRING_O),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21317);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),qbs_new_txt_len("(",1)),_FUNC_REFER_STRING_T),qbs_new_txt_len("*)",2)),_FUNC_REFER_STRING_O2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21318);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21322);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21323);}while(r);
}
S_25047:;
if ((*(int32*)(((char*)__UDT_ID)+(512)))||is_error_pending()){
if(qbevent){evnt(21328);if(r)goto S_25047;}
do{
qbs_set(_FUNC_REFER_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21330);}while(r);
S_25049:;
if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||is_error_pending()){
if(qbevent){evnt(21331);if(r)goto S_25049;}
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21332);}while(r);
do{
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK;
if(!qbevent)break;evnt(21333);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21334);}while(r);
}
do{
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISPOINTER-*__LONG_ISREFERENCE;
if(!qbevent)break;evnt(21336);}while(r);
S_25055:;
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING))||is_error_pending()){
if(qbevent){evnt(21338);if(r)goto S_25055;}
S_25056:;
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH))||is_error_pending()){
if(qbevent){evnt(21339);if(r)goto S_25056;}
do{
qbs_set(_FUNC_REFER_STRING_OFFSET,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("&((uint8*)(",11),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[(",7)),_FUNC_REFER_STRING_A),qbs_new_txt_len(")*",2)),qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0)),qbs_new_txt_len("]",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21340);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("qbs_new_fixed(",14),_FUNC_REFER_STRING_OFFSET),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0)),qbs_new_txt_len(",1)",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21341);}while(r);
}else{
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((qbs*)(((uint64*)(",19),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[",6)),_FUNC_REFER_STRING_A),qbs_new_txt_len("]))",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21343);}while(r);
}
do{
*__INTEGER_STRINGPROCESSINGHAPPENED= 1 ;
if(!qbevent)break;evnt(21345);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21346);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21347);}while(r);
}
S_25066:;
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS))||is_error_pending()){
if(qbevent){evnt(21350);if(r)goto S_25066;}
S_25067:;
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||is_error_pending()){
if(qbevent){evnt(21353);if(r)goto S_25067;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getubits",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21353);}while(r);
}else{
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getbits",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21353);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(_FUNC_REFER_STRING_R,qbs_new_txt_len("(",1)),qbs__tostr((int64)(*_FUNC_REFER_LONG_TYP& 511 ),NULL,0)),qbs_new_txt_len(",",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21354);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_REFER_STRING_R,qbs_new_txt_len("(uint8*)(",9)),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0])",4)),qbs_new_txt_len(",",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21355);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(_FUNC_REFER_STRING_R,_FUNC_REFER_STRING_A),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21356);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21357);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21358);}while(r);
}else{
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21360);}while(r);
S_25079:;
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFLOAT))||is_error_pending()){
if(qbevent){evnt(21361);if(r)goto S_25079;}
S_25080:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||is_error_pending()){
if(qbevent){evnt(21362);if(r)goto S_25080;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("float",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21362);}while(r);
}
S_25083:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||is_error_pending()){
if(qbevent){evnt(21363);if(r)goto S_25083;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("double",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21363);}while(r);
}
S_25086:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 256 ))||is_error_pending()){
if(qbevent){evnt(21364);if(r)goto S_25086;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("long double",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21364);}while(r);
}
}else{
S_25090:;
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||is_error_pending()){
if(qbevent){evnt(21366);if(r)goto S_25090;}
S_25091:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 8 ))||is_error_pending()){
if(qbevent){evnt(21367);if(r)goto S_25091;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint8",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21367);}while(r);
}
S_25094:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 16 ))||is_error_pending()){
if(qbevent){evnt(21368);if(r)goto S_25094;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint16",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21368);}while(r);
}
S_25097:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||is_error_pending()){
if(qbevent){evnt(21369);if(r)goto S_25097;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint32",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21369);}while(r);
}
S_25100:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||is_error_pending()){
if(qbevent){evnt(21370);if(r)goto S_25100;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint64",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21370);}while(r);
}
S_25103:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||is_error_pending()){
if(qbevent){evnt(21371);if(r)goto S_25103;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uptrszint",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21371);}while(r);
}
}else{
S_25107:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 8 ))||is_error_pending()){
if(qbevent){evnt(21373);if(r)goto S_25107;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int8",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21373);}while(r);
}
S_25110:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 16 ))||is_error_pending()){
if(qbevent){evnt(21374);if(r)goto S_25110;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int16",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21374);}while(r);
}
S_25113:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 32 ))||is_error_pending()){
if(qbevent){evnt(21375);if(r)goto S_25113;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int32",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21375);}while(r);
}
S_25116:;
if ((-((*_FUNC_REFER_LONG_TYP& 511 )== 64 ))||is_error_pending()){
if(qbevent){evnt(21376);if(r)goto S_25116;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int64",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21376);}while(r);
}
S_25119:;
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||is_error_pending()){
if(qbevent){evnt(21377);if(r)goto S_25119;}
do{
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("ptrszint",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21377);}while(r);
}
}
}
}
S_25125:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(21381);if(r)goto S_25125;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot find C type to return array data",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21381);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21381);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_FUNC_REFER_STRING_T),qbs_new_txt_len("*)(",3)),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[",6)),_FUNC_REFER_STRING_A),qbs_new_txt_len("]",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21382);}while(r);
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21383);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21384);}while(r);
}
S_25133:;
if ((*(int32*)(((char*)__UDT_ID)+(536)))||is_error_pending()){
if(qbevent){evnt(21388);if(r)goto S_25133;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(0)),256,1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21389);}while(r);
do{
*_FUNC_REFER_LONG_T=*(int32*)(((char*)__UDT_ID)+(536));
if(!qbevent)break;evnt(21390);}while(r);
S_25136:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||is_error_pending()){
if(qbevent){evnt(21392);if(r)goto S_25136;}
do{
*_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISINCONVENTIONALMEMORY;
if(!qbevent)break;evnt(21392);}while(r);
}
S_25139:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||is_error_pending()){
if(qbevent){evnt(21394);if(r)goto S_25139;}
S_25140:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISFIXEDLENGTH))||is_error_pending()){
if(qbevent){evnt(21395);if(r)goto S_25140;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING",6)),qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0)),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21396);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21396);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING_",7)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21398);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21398);}while(r);
}
S_25147:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISOFFSETINBITS))||is_error_pending()){
if(qbevent){evnt(21401);if(r)goto S_25147;}
S_25148:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISUNSIGNED))||is_error_pending()){
if(qbevent){evnt(21402);if(r)goto S_25148;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UBIT",4)),qbs__tostr((int64)(*_FUNC_REFER_LONG_T& 511 ),NULL,0)),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21403);}while(r);
}else{
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("BIT",3)),qbs__tostr((int64)(*_FUNC_REFER_LONG_T& 511 ),NULL,0)),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21405);}while(r);
}
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21407);}while(r);
}
S_25155:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_BYTETYPE))||is_error_pending()){
if(qbevent){evnt(21409);if(r)goto S_25155;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("BYTE_",5)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21409);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21409);}while(r);
}
S_25159:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UBYTETYPE))||is_error_pending()){
if(qbevent){evnt(21410);if(r)goto S_25159;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UBYTE_",6)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21410);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21410);}while(r);
}
S_25163:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGERTYPE))||is_error_pending()){
if(qbevent){evnt(21411);if(r)goto S_25163;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("INTEGER_",8)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21411);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21411);}while(r);
}
S_25167:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGERTYPE))||is_error_pending()){
if(qbevent){evnt(21412);if(r)goto S_25167;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UINTEGER_",9)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21412);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21412);}while(r);
}
S_25171:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_LONGTYPE))||is_error_pending()){
if(qbevent){evnt(21413);if(r)goto S_25171;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("LONG_",5)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21413);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21413);}while(r);
}
S_25175:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_ULONGTYPE))||is_error_pending()){
if(qbevent){evnt(21414);if(r)goto S_25175;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("ULONG_",6)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21414);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21414);}while(r);
}
S_25179:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGER64TYPE))||is_error_pending()){
if(qbevent){evnt(21415);if(r)goto S_25179;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("INTEGER64_",10)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21415);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21415);}while(r);
}
S_25183:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGER64TYPE))||is_error_pending()){
if(qbevent){evnt(21416);if(r)goto S_25183;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UINTEGER64_",11)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21416);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21416);}while(r);
}
S_25187:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_SINGLETYPE))||is_error_pending()){
if(qbevent){evnt(21417);if(r)goto S_25187;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("SINGLE_",7)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21417);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21417);}while(r);
}
S_25191:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_DOUBLETYPE))||is_error_pending()){
if(qbevent){evnt(21418);if(r)goto S_25191;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("DOUBLE_",7)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21418);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21418);}while(r);
}
S_25195:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_FLOATTYPE))||is_error_pending()){
if(qbevent){evnt(21419);if(r)goto S_25195;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("FLOAT_",6)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21419);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21419);}while(r);
}
S_25199:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_OFFSETTYPE))||is_error_pending()){
if(qbevent){evnt(21420);if(r)goto S_25199;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("OFFSET_",7)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21420);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21420);}while(r);
}
S_25203:;
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UOFFSETTYPE))||is_error_pending()){
if(qbevent){evnt(21421);if(r)goto S_25203;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*",1),FUNC_SCOPE()),qbs_new_txt_len("UOFFSET_",8)),_FUNC_REFER_STRING_R));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21421);}while(r);
do{
goto LABEL_REF;
if(!qbevent)break;evnt(21421);}while(r);
}
LABEL_REF:;
if(qbevent){evnt(21422);r=0;}
S_25207:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||is_error_pending()){
if(qbevent){evnt(21423);if(r)goto S_25207;}
do{
*__INTEGER_STRINGPROCESSINGHAPPENED= 1 ;
if(!qbevent)break;evnt(21423);}while(r);
}
S_25210:;
if (((*_FUNC_REFER_LONG_T&*__LONG_ISPOINTER))||is_error_pending()){
if(qbevent){evnt(21424);if(r)goto S_25210;}
do{
*_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(21424);}while(r);
}
do{
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_T;
if(!qbevent)break;evnt(21425);}while(r);
S_25214:;
if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||is_error_pending()){
if(qbevent){evnt(21426);if(r)goto S_25214;}
S_25215:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_REFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(21427);if(r)goto S_25215;}
do{
qbs_set(_FUNC_REFER_STRING_R,qbs_right(_FUNC_REFER_STRING_R,_FUNC_REFER_STRING_R->len- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21427);}while(r);
}
do{
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK;
if(!qbevent)break;evnt(21428);}while(r);
}
do{
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21430);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21431);}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free35.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
qbs_maketmp(_FUNC_REFER_STRING_REFER);return _FUNC_REFER_STRING_REFER;
}
