qbs* FUNC_EVALUATETOTYP(qbs*_FUNC_EVALUATETOTYP_STRING_A2,int32*_FUNC_EVALUATETOTYP_LONG_TARGETTYP){
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 "data23.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{
qbs_set(_FUNC_EVALUATETOTYP_STRING_A,_FUNC_EVALUATETOTYP_STRING_A2);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18383);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_EVALUATE(_FUNC_EVALUATETOTYP_STRING_A,_FUNC_EVALUATETOTYP_LONG_SOURCETYP));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18384);}while(r);
S_21563:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18385);if(r)goto S_21563;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18385);}while(r);
}
S_21566:;
if (((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -4 ))|(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))|(-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 )))||is_error_pending()){
if(qbevent){evnt(18389);if(r)goto S_21566;}
S_21567:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||is_error_pending()){
if(qbevent){evnt(18390);if(r)goto S_21567;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18390);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18390);}while(r);
}
S_21571:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||is_error_pending()){
if(qbevent){evnt(18391);if(r)goto S_21571;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be _BIT aligned",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18391);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18391);}while(r);
}
S_21575:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||is_error_pending()){
if(qbevent){evnt(18395);if(r)goto S_21575;}
S_21576:;
if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])||is_error_pending()){
if(qbevent){evnt(18396);if(r)goto S_21576;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("UDT must have fixed size",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18396);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18396);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18397);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18398);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18398);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_U=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18399);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18400);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18400);}while(r);
do{
*__LONG_E=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18401);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18402);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18402);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18403);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18404);}while(r);
S_21591:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18405);if(r)goto S_21591;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18405);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_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(18406);}while(r);
S_21595:;
if ((*(int32*)(((char*)__UDT_ID)+(512)))||is_error_pending()){
if(qbevent){evnt(18407);if(r)goto S_21595;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18408);}while(r);
S_21597:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATETOTYP_STRING_O, 3 ),qbs_new_txt_len("(0)",3))))||is_error_pending()){
if(qbevent){evnt(18410);if(r)goto S_21597;}
do{
goto LABEL_METHOD2USEALLUDT;
if(!qbevent)break;evnt(18412);}while(r);
}
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18416);}while(r);
S_21602:;
if ((-(*__LONG_E== 0 ))||is_error_pending()){
if(qbevent){evnt(18419);if(r)goto S_21602;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int64)(((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/  8 ),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18420);}while(r);
}else{
S_21605:;
if (((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)> 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))&((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))))||is_error_pending()){
if(qbevent){evnt(18422);if(r)goto S_21605;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)",9),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(")->len",6)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18423);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18424);}while(r);
S_21608:;
}else{
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)> 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))&((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -4 )))){
if(qbevent){evnt(18425);if(r)goto S_21608;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(*((qbs**)((char*)",18),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("+(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))))->chr",9)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18426);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(*((qbs**)((char*)",18),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("+(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))))->len",9)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18427);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18428);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18429);}while(r);
}
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int64)(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/  8 ),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18431);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18433);}while(r);
S_21617:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18434);if(r)goto S_21617;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18434);}while(r);
}
S_21620:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18435);if(r)goto S_21620;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_DST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18435);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18436);}while(r);
}
S_21625:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||is_error_pending()){
if(qbevent){evnt(18439);if(r)goto S_21625;}
S_21626:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(_FUNC_EVALUATETOTYP_STRING_E, 2 )),(qbs_add(__STRING1_SP3,qbs_new_txt_len("0",1))))))||is_error_pending()){
if(qbevent){evnt(18441);if(r)goto S_21626;}
S_21627:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18443);if(r)goto S_21627;}
S_21628:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||is_error_pending()){
if(qbevent){evnt(18444);if(r)goto S_21628;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot pass array of variable-length strings",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18445);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18445);}while(r);
}
}
do{
goto LABEL_METHOD2USEALL;
if(!qbevent)break;evnt(18448);}while(r);
}
S_21635:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18451);if(r)goto S_21635;}
S_21636:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
if(qbevent){evnt(18452);if(r)goto S_21636;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18453);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18454);}while(r);
S_21639:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18455);if(r)goto S_21639;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18455);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18456);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2862= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18457);}while(r);
S_21644:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18458);if(r)goto S_21644;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18458);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18459);}while(r);
S_21648:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18460);if(r)goto S_21648;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18460);}while(r);
}
S_21651:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18461);if(r)goto S_21651;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18461);}while(r);
}
}else{
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2863= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18463);}while(r);
S_21656:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18464);if(r)goto S_21656;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18464);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->len,",6)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18466);}while(r);
S_21660:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18467);if(r)goto S_21660;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18467);}while(r);
}
S_21663:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18468);if(r)goto S_21663;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18468);}while(r);
}
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18470);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2864= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18472);}while(r);
S_21670:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18473);if(r)goto S_21670;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18473);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18474);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int64)((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18475);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18476);}while(r);
S_21676:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18477);if(r)goto S_21676;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18477);}while(r);
}
S_21679:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18478);if(r)goto S_21679;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18478);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18479);}while(r);
}
S_21684:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18482);if(r)goto S_21684;}
S_21685:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
if(qbevent){evnt(18483);if(r)goto S_21685;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18484);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18485);}while(r);
S_21688:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18486);if(r)goto S_21688;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18486);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18487);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2865= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18488);}while(r);
S_21693:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18489);if(r)goto S_21693;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18489);}while(r);
}
}else{
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2866= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18491);}while(r);
S_21698:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18492);if(r)goto S_21698;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18492);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18493);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18495);}while(r);
S_21704:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18496);if(r)goto S_21704;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18496);}while(r);
}
S_21707:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18497);if(r)goto S_21707;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18497);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18498);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2867= 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18502);}while(r);
S_21713:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18503);if(r)goto S_21713;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18503);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ;
if(!qbevent)break;evnt(18504);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18505);}while(r);
S_21718:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18506);if(r)goto S_21718;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18506);}while(r);
}
S_21721:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18507);if(r)goto S_21721;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18507);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18508);}while(r);
}
S_21726:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -8 ))||is_error_pending()){
if(qbevent){evnt(18515);if(r)goto S_21726;}
S_21727:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||is_error_pending()){
if(qbevent){evnt(18516);if(r)goto S_21727;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18516);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18516);}while(r);
}
S_21731:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||is_error_pending()){
if(qbevent){evnt(18517);if(r)goto S_21731;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be _BIT aligned",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18517);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18517);}while(r);
}
S_21735:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||is_error_pending()){
if(qbevent){evnt(18520);if(r)goto S_21735;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18521);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18522);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18522);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_U=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18523);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18524);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18524);}while(r);
do{
*__LONG_E=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18525);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18526);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18526);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18527);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18528);}while(r);
S_21747:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18529);if(r)goto S_21747;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18529);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_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(18530);}while(r);
S_21751:;
if ((*(int32*)(((char*)__UDT_ID)+(512)))||is_error_pending()){
if(qbevent){evnt(18531);if(r)goto S_21751;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18532);}while(r);
S_21753:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_EVALUATETOTYP_STRING_O, 3 ),qbs_new_txt_len("(0)",3))))||is_error_pending()){
if(qbevent){evnt(18534);if(r)goto S_21753;}
do{
goto LABEL_METHOD2USEALLUDT__7;
if(!qbevent)break;evnt(18536);}while(r);
}
}
S_21757:;
if ((-(*__LONG_E== 0 ))||is_error_pending()){
if(qbevent){evnt(18540);if(r)goto S_21757;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int64)(((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/  8 ),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18541);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T1=*__LONG_ISUDT+((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])];
if(!qbevent)break;evnt(18542);}while(r);
}else{
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int64)(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])]/  8 ),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18544);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T1=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*__LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])];
if(!qbevent)break;evnt(18545);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18547);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_T1);
if(!qbevent)break;evnt(18552);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",sf_mem_lock",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18553);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18555);}while(r);
}
S_21769:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||is_error_pending()){
if(qbevent){evnt(18558);if(r)goto S_21769;}
S_21770:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal((qbs_right(_FUNC_EVALUATETOTYP_STRING_E, 2 )),(qbs_add(__STRING1_SP3,qbs_new_txt_len("0",1))))))||is_error_pending()){
if(qbevent){evnt(18560);if(r)goto S_21770;}
S_21771:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18562);if(r)goto S_21771;}
S_21772:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||is_error_pending()){
if(qbevent){evnt(18563);if(r)goto S_21772;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot pass array of variable-length strings",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18564);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18564);}while(r);
}
}
do{
goto LABEL_METHOD2USEALL__7;
if(!qbevent)break;evnt(18567);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18570);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18571);}while(r);
S_21781:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18572);if(r)goto S_21781;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18572);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18573);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_LK,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(mem_lock*)((ptrszint*)",23),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")[",2)),qbs__tostr((int64)(( 4 **(int16*)(((char*)__UDT_ID)+(516)))+( 4 )+( 1 )-( 1 )),NULL,0)),qbs_new_txt_len("]",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18574);}while(r);
S_21786:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18578);if(r)goto S_21786;}
S_21787:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
if(qbevent){evnt(18579);if(r)goto S_21787;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18580);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2871= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18581);}while(r);
S_21790:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18582);if(r)goto S_21790;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18582);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18587);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_LK));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18588);}while(r);
}else{
do{
SUB_GIVE_ERROR(qbs_new_txt_len("_MEMELEMENT cannot reference variable-length strings",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18592);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18592);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18595);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2872= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18598);}while(r);
S_21802:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18599);if(r)goto S_21802;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18599);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18600);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int64)((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18601);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18606);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_LK));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18607);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18609);}while(r);
}
S_21811:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18612);if(r)goto S_21811;}
S_21812:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
if(qbevent){evnt(18613);if(r)goto S_21812;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18614);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18615);}while(r);
S_21815:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18616);if(r)goto S_21815;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18616);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18617);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2873= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18618);}while(r);
S_21820:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18619);if(r)goto S_21820;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18619);}while(r);
}
}else{
do{
SUB_GIVE_ERROR(qbs_new_txt_len("_MEMELEMENT cannot reference variable-length strings",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18621);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18621);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18628);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",sf_mem_lock",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18629);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18631);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2874= 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18635);}while(r);
S_21832:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18636);if(r)goto S_21832;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18636);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ;
if(!qbevent)break;evnt(18637);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18642);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",sf_mem_lock",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18643);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18645);}while(r);
}
S_21840:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -7 ))||is_error_pending()){
if(qbevent){evnt(18658);if(r)goto S_21840;}
LABEL_METHOD2USEALL__7:;
if(qbevent){evnt(18659);r=0;}
S_21841:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||is_error_pending()){
if(qbevent){evnt(18660);if(r)goto S_21841;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18660);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18660);}while(r);
}
S_21845:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||is_error_pending()){
if(qbevent){evnt(18661);if(r)goto S_21845;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be _BIT aligned",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18661);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18661);}while(r);
}
S_21849:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||is_error_pending()){
if(qbevent){evnt(18664);if(r)goto S_21849;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18666);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18667);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18667);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_U=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18668);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18669);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18669);}while(r);
do{
*__LONG_E=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18670);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18671);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18671);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18673);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18674);}while(r);
S_21861:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18675);if(r)goto S_21861;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18675);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_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(18676);}while(r);
S_21865:;
if ((*(int32*)(((char*)__UDT_ID)+(512)))||is_error_pending()){
if(qbevent){evnt(18676);if(r)goto S_21865;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18676);}while(r);
}
LABEL_METHOD2USEALLUDT__7:;
if(qbevent){evnt(18677);r=0;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(FUNC_VARIABLESIZE(&(pass2878= -1 )),qbs_new_txt_len("-(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18678);}while(r);
S_21869:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18679);if(r)goto S_21869;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18679);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18680);}while(r);
S_21873:;
if ((-(*__LONG_E!= 0 ))||is_error_pending()){
if(qbevent){evnt(18686);if(r)goto S_21873;}
do{
*_FUNC_EVALUATETOTYP_LONG_SIZE= 1 ;
if(!qbevent)break;evnt(18686);}while(r);
}else{
do{
*_FUNC_EVALUATETOTYP_LONG_SIZE=((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[array_check((*_FUNC_EVALUATETOTYP_LONG_U)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5])]/  8 ;
if(!qbevent)break;evnt(18686);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18688);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",sf_mem_lock",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18689);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18691);}while(r);
}
S_21882:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||is_error_pending()){
if(qbevent){evnt(18695);if(r)goto S_21882;}
S_21883:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18696);if(r)goto S_21883;}
S_21884:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||is_error_pending()){
if(qbevent){evnt(18697);if(r)goto S_21884;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("_MEM cannot reference variable-length strings",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18698);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18698);}while(r);
}
}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18702);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18703);}while(r);
S_21891:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18704);if(r)goto S_21891;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18704);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+(550)),256,1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18706);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_LK,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(mem_lock*)((ptrszint*)",23),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")[",2)),qbs__tostr((int64)(( 4 **(int16*)(((char*)__UDT_ID)+(516)))+( 4 )+( 1 )-( 1 )),NULL,0)),qbs_new_txt_len("]",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18707);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540));
if(!qbevent)break;evnt(18709);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_INDEX,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18711);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_VARIABLESIZE(&(pass2880= -1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18712);}while(r);
S_21899:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18713);if(r)goto S_21899;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18713);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2881= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18714);}while(r);
S_21903:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18715);if(r)goto S_21903;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18715);}while(r);
}
S_21906:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18717);if(r)goto S_21906;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("((",2),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")->chr)",7)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18718);}while(r);
}else{
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18720);}while(r);
}
S_21911:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18725);if(r)goto S_21911;}
do{
*_FUNC_EVALUATETOTYP_LONG_BYTES=*_FUNC_EVALUATETOTYP_LONG_TSIZE;
if(!qbevent)break;evnt(18726);}while(r);
}else{
do{
*_FUNC_EVALUATETOTYP_LONG_BYTES=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ;
if(!qbevent)break;evnt(18728);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_new_txt_len("-(",2)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_BYTES),NULL,0)),qbs_new_txt_len("*(",2)),_FUNC_EVALUATETOTYP_STRING_INDEX),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18730);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18732);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_BYTES),NULL,0)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_LK));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18733);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18735);}while(r);
}
S_21921:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18739);if(r)goto S_21921;}
S_21922:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||is_error_pending()){
if(qbevent){evnt(18740);if(r)goto S_21922;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("_MEM cannot reference variable-length strings",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18740);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18740);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18742);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18743);}while(r);
S_21928:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18743);if(r)goto S_21928;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18743);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18744);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2882= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18745);}while(r);
S_21933:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18745);if(r)goto S_21933;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18745);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18747);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",sf_mem_lock",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18748);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18750);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2883= 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18754);}while(r);
S_21941:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18755);if(r)goto S_21941;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18755);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ;
if(!qbevent)break;evnt(18756);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_T=FUNC_TYPE2MEMTYPEVALUE(_FUNC_EVALUATETOTYP_LONG_SOURCETYP);
if(!qbevent)break;evnt(18758);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(ptrszint)",10),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_T),NULL,0)),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",sf_mem_lock",12)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18759);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18761);}while(r);
}
S_21949:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -2 ))||is_error_pending()){
if(qbevent){evnt(18766);if(r)goto S_21949;}
LABEL_METHOD2USEALL:;
if(qbevent){evnt(18767);r=0;}
S_21950:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE)== 0 ))||is_error_pending()){
if(qbevent){evnt(18770);if(r)goto S_21950;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Expected variable name/array element",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18770);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18770);}while(r);
}
S_21954:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISOFFSETINBITS))||is_error_pending()){
if(qbevent){evnt(18771);if(r)goto S_21954;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Variable/element cannot be _BIT aligned",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18771);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18771);}while(r);
}
S_21958:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISUDT))||is_error_pending()){
if(qbevent){evnt(18774);if(r)goto S_21958;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18776);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18777);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18777);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_U=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18778);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18779);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18779);}while(r);
do{
*__LONG_E=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18780);}while(r);
do{
*_FUNC_EVALUATETOTYP_LONG_I=func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18781);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-*_FUNC_EVALUATETOTYP_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18781);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_O,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18782);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18783);}while(r);
S_21970:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18784);if(r)goto S_21970;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18784);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_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(18785);}while(r);
S_21974:;
if ((*(int32*)(((char*)__UDT_ID)+(512)))||is_error_pending()){
if(qbevent){evnt(18785);if(r)goto S_21974;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_N,qbs_add(qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len("[0]",3)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18785);}while(r);
}
LABEL_METHOD2USEALLUDT:;
if(qbevent){evnt(18786);r=0;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(FUNC_VARIABLESIZE(&(pass2887= -1 )),qbs_new_txt_len("-(",2)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18787);}while(r);
S_21978:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18788);if(r)goto S_21978;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18788);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_DST,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),FUNC_SCOPE()),_FUNC_EVALUATETOTYP_STRING_N),qbs_new_txt_len(")+(",3)),_FUNC_EVALUATETOTYP_STRING_O),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18789);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_DST),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18790);}while(r);
S_21983:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18791);if(r)goto S_21983;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18791);}while(r);
}
S_21986:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18792);if(r)goto S_21986;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_DST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18792);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18793);}while(r);
}
S_21991:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISARRAY))||is_error_pending()){
if(qbevent){evnt(18797);if(r)goto S_21991;}
S_21992:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18799);if(r)goto S_21992;}
S_21993:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)== 0 ))||is_error_pending()){
if(qbevent){evnt(18800);if(r)goto S_21993;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2888= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18801);}while(r);
S_21995:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18802);if(r)goto S_21995;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18802);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->len,",6)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18803);}while(r);
S_21999:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18804);if(r)goto S_21999;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18804);}while(r);
}
S_22002:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18805);if(r)goto S_22002;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18805);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18806);}while(r);
}
}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18809);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18810);}while(r);
S_22010:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18811);if(r)goto S_22010;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18811);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_TSIZE=*(int32*)(((char*)__UDT_ID)+(540));
if(!qbevent)break;evnt(18812);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_INDEX,qbs_right(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_STRING_E->len-func_instr(NULL,_FUNC_EVALUATETOTYP_STRING_E,__STRING1_SP3,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18814);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,FUNC_VARIABLESIZE(&(pass2890= -1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18815);}while(r);
S_22016:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18816);if(r)goto S_22016;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18816);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2891= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18817);}while(r);
S_22020:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18818);if(r)goto S_22020;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18818);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("(&(",3),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18819);}while(r);
S_22024:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18822);if(r)goto S_22024;}
do{
*_FUNC_EVALUATETOTYP_LONG_BYTES=*_FUNC_EVALUATETOTYP_LONG_TSIZE;
if(!qbevent)break;evnt(18823);}while(r);
}else{
do{
*_FUNC_EVALUATETOTYP_LONG_BYTES=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ;
if(!qbevent)break;evnt(18825);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_new_txt_len("-(",2)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_BYTES),NULL,0)),qbs_new_txt_len("*(",2)),_FUNC_EVALUATETOTYP_STRING_INDEX),qbs_new_txt_len("))",2)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18827);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18828);}while(r);
S_22031:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18829);if(r)goto S_22031;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18829);}while(r);
}
S_22034:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18830);if(r)goto S_22034;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18830);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18832);}while(r);
}
S_22039:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(18836);if(r)goto S_22039;}
S_22040:;
if ((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
if(qbevent){evnt(18837);if(r)goto S_22040;}
do{
*_FUNC_EVALUATETOTYP_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_EVALUATETOTYP_STRING_E));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18838);}while(r);
do{
SUB_GETID(_FUNC_EVALUATETOTYP_LONG_IDNUMBER);
if(!qbevent)break;evnt(18839);}while(r);
S_22043:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18840);if(r)goto S_22043;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18840);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs__tostr((int32)(*(int32*)(((char*)__UDT_ID)+(540))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18841);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2892= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18842);}while(r);
S_22048:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18843);if(r)goto S_22048;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18843);}while(r);
}
}else{
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2893= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18845);}while(r);
S_22053:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18846);if(r)goto S_22053;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18846);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_BYTES,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->len",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18847);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len("->chr,",6)),_FUNC_EVALUATETOTYP_STRING_BYTES),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18849);}while(r);
S_22059:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18850);if(r)goto S_22059;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_BYTES);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18850);}while(r);
}
S_22062:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18851);if(r)goto S_22062;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(_FUNC_EVALUATETOTYP_STRING_E,qbs_new_txt_len("->chr",5)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18851);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18852);}while(r);
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2894= 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18856);}while(r);
S_22068:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18857);if(r)goto S_22068;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18857);}while(r);
}
do{
*_FUNC_EVALUATETOTYP_LONG_SIZE=(*_FUNC_EVALUATETOTYP_LONG_SOURCETYP& 511 )/  8 ;
if(!qbevent)break;evnt(18858);}while(r);
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("byte_element((uint64)",21),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(",",1)),qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0)),qbs_new_txt_len(",",1)),FUNC_NEWBYTEELEMENT()),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18859);}while(r);
S_22073:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -5 ))||is_error_pending()){
if(qbevent){evnt(18860);if(r)goto S_22073;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,qbs__tostr((int32)(*_FUNC_EVALUATETOTYP_LONG_SIZE),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18860);}while(r);
}
S_22076:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP== -6 ))||is_error_pending()){
if(qbevent){evnt(18861);if(r)goto S_22076;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18861);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18862);}while(r);
}
S_22081:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING)!=(*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISSTRING)))||is_error_pending()){
if(qbevent){evnt(18869);if(r)goto S_22081;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Illegal string-number conversion",32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18870);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18870);}while(r);
}
S_22085:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISSTRING))||is_error_pending()){
if(qbevent){evnt(18873);if(r)goto S_22085;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18874);}while(r);
S_22087:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(18875);if(r)goto S_22087;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2895= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18876);}while(r);
S_22089:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18877);if(r)goto S_22089;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18877);}while(r);
}
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18879);}while(r);
}
S_22095:;
if (((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISPOINTER))||is_error_pending()){
if(qbevent){evnt(18883);if(r)goto S_22095;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("evaluatetotyp received a request for a pointer (unsupported)",60));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18884);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18884);}while(r);
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid pointer",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18886);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18886);}while(r);
}
S_22101:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISREFERENCE))||is_error_pending()){
if(qbevent){evnt(18890);if(r)goto S_22101;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,FUNC_REFER(_FUNC_EVALUATETOTYP_STRING_E,_FUNC_EVALUATETOTYP_LONG_SOURCETYP,&(pass2896= 0 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18891);}while(r);
S_22103:;
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
if(qbevent){evnt(18892);if(r)goto S_22103;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18892);}while(r);
}
}
S_22107:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISPOINTER))||is_error_pending()){
if(qbevent){evnt(18895);if(r)goto S_22107;}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("evaluatetotyp couldn't convert pointer type!",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18896);}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18896);}while(r);
}
S_22111:;
if (((*_FUNC_EVALUATETOTYP_LONG_SOURCETYP&*__LONG_ISFLOAT))||is_error_pending()){
if(qbevent){evnt(18900);if(r)goto S_22111;}
S_22112:;
if ((-((*_FUNC_EVALUATETOTYP_LONG_TARGETTYP&*__LONG_ISFLOAT)== 0 ))||is_error_pending()){
if(qbevent){evnt(18901);if(r)goto S_22112;}
do{
*_FUNC_EVALUATETOTYP_LONG_BITS=*_FUNC_EVALUATETOTYP_LONG_TARGETTYP& 511 ;
if(!qbevent)break;evnt(18902);}while(r);
S_22114:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_BITS<= 16 ))||is_error_pending()){
if(qbevent){evnt(18904);if(r)goto S_22114;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_float_to_long(",18),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18904);}while(r);
}
S_22117:;
if (((-(*_FUNC_EVALUATETOTYP_LONG_BITS> 16 ))&(-(*_FUNC_EVALUATETOTYP_LONG_BITS< 32 )))||is_error_pending()){
if(qbevent){evnt(18905);if(r)goto S_22117;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr_double_to_long(",19),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18905);}while(r);
}
S_22120:;
if ((-(*_FUNC_EVALUATETOTYP_LONG_BITS>= 32 ))||is_error_pending()){
if(qbevent){evnt(18906);if(r)goto S_22120;}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_E,qbs_add(qbs_add(qbs_new_txt_len("qbr(",4),_FUNC_EVALUATETOTYP_STRING_E),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18906);}while(r);
}
}
}
do{
qbs_set(_FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP,_FUNC_EVALUATETOTYP_STRING_E);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18910);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free23.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_EVALUATETOTYP_STRING_EVALUATETOTYP);return _FUNC_EVALUATETOTYP_STRING_EVALUATETOTYP;
}
