#line 25639 "qb64pe.bas"
qbs* FUNC_REFER(qbs*_FUNC_REFER_STRING_A2,int32*_FUNC_REFER_LONG_TYP,int32*_FUNC_REFER_LONG_METHOD){
#line 25639 "qb64pe.bas"
qbs *tqbs;
#line 25639 "qb64pe.bas"
ptrszint tmp_long;
#line 25639 "qb64pe.bas"
int32 tmp_fileno;
#line 25639 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 25639 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 25639 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 25639 "qb64pe.bas"
#include "data79.txt"
#line 25639 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 25639 "qb64pe.bas"
new_mem_lock();
#line 25639 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 25639 "qb64pe.bas"
sf_mem_lock->type=3;
#line 25639 "qb64pe.bas"
libqb_check_stack();
#line 25639 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 25640 "qb64pe.bas"
do{
#line 25640 "qb64pe.bas"
*_FUNC_REFER_LONG_TYPBAK=*_FUNC_REFER_LONG_TYP;
#line 25640 "qb64pe.bas"
if(!qbevent)break;evnt(25640);}while(r);
#line 25644 "qb64pe.bas"
do{
#line 25644 "qb64pe.bas"
if(!qbevent)break;evnt(25644);}while(r);
#line 25645 "qb64pe.bas"
do{
#line 25645 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A2);
#line 25645 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25645 "qb64pe.bas"
if(!qbevent)break;evnt(25645);}while(r);
#line 25648 "qb64pe.bas"
do{
#line 25648 "qb64pe.bas"
*_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0);
#line 25648 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25648 "qb64pe.bas"
if(!qbevent)break;evnt(25648);}while(r);
#line 25649 "qb64pe.bas"
S_29600:;
#line 25649 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_I)||is_error_pending()){
#line 25649 "qb64pe.bas"
if(qbevent){evnt(25649);if(r)goto S_29600;}
#line 25650 "qb64pe.bas"
do{
#line 25650 "qb64pe.bas"
*_FUNC_REFER_LONG_IDNUMBER=qbr(qbs_val<long double>(qbs_left(_FUNC_REFER_STRING_A,*_FUNC_REFER_LONG_I- 1 )));
#line 25650 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25650 "qb64pe.bas"
if(!qbevent)break;evnt(25650);}while(r);
#line 25650 "qb64pe.bas"
do{
#line 25650 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_A,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I));
#line 25650 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25650 "qb64pe.bas"
if(!qbevent)break;evnt(25650);}while(r);
#line 25651 "qb64pe.bas"
}else{
#line 25652 "qb64pe.bas"
do{
#line 25652 "qb64pe.bas"
*_FUNC_REFER_LONG_IDNUMBER=qbr(qbs_val<long double>(_FUNC_REFER_STRING_A));
#line 25652 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25652 "qb64pe.bas"
if(!qbevent)break;evnt(25652);}while(r);
#line 25653 "qb64pe.bas"
}
#line 25654 "qb64pe.bas"
do{
#line 25654 "qb64pe.bas"
SUB_GETID(_FUNC_REFER_LONG_IDNUMBER);
#line 25654 "qb64pe.bas"
if(!qbevent)break;evnt(25654);}while(r);
#line 25655 "qb64pe.bas"
S_29607:;
#line 25655 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 25655 "qb64pe.bas"
if(qbevent){evnt(25655);if(r)goto S_29607;}
#line 25655 "qb64pe.bas"
do{
#line 25655 "qb64pe.bas"
goto exit_subfunc;
#line 25655 "qb64pe.bas"
if(!qbevent)break;evnt(25655);}while(r);
#line 25655 "qb64pe.bas"
}
#line 25658 "qb64pe.bas"
S_29610:;
#line 25658 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISUDT)||is_error_pending()){
#line 25658 "qb64pe.bas"
if(qbevent){evnt(25658);if(r)goto S_29610;}
#line 25659 "qb64pe.bas"
S_29611:;
#line 25659 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||is_error_pending()){
#line 25659 "qb64pe.bas"
if(qbevent){evnt(25659);if(r)goto S_29611;}
#line 25660 "qb64pe.bas"
do{
#line 25660 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1))));
#line 25660 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25660 "qb64pe.bas"
if(!qbevent)break;evnt(25660);}while(r);
#line 25661 "qb64pe.bas"
S_29613:;
#line 25661 "qb64pe.bas"
if ((-(*(int32*)(((char*)__UDT_ID)+((0+540)))== 0 ))||is_error_pending()){
#line 25661 "qb64pe.bas"
if(qbevent){evnt(25661);if(r)goto S_29613;}
#line 25661 "qb64pe.bas"
do{
#line 25661 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("ARRAY_",6),_FUNC_REFER_STRING_N));
#line 25661 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25661 "qb64pe.bas"
if(!qbevent)break;evnt(25661);}while(r);
#line 25661 "qb64pe.bas"
}
#line 25662 "qb64pe.bas"
do{
#line 25662 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_N,qbs_add(FUNC_SCOPE(),_FUNC_REFER_STRING_N));
#line 25662 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25662 "qb64pe.bas"
if(!qbevent)break;evnt(25662);}while(r);
#line 25663 "qb64pe.bas"
do{
#line 25663 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N);
#line 25663 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25663 "qb64pe.bas"
if(!qbevent)break;evnt(25663);}while(r);
#line 25664 "qb64pe.bas"
do{
#line 25664 "qb64pe.bas"
goto exit_subfunc;
#line 25664 "qb64pe.bas"
if(!qbevent)break;evnt(25664);}while(r);
#line 25665 "qb64pe.bas"
}
#line 25669 "qb64pe.bas"
do{
#line 25669 "qb64pe.bas"
*_FUNC_REFER_LONG_U=qbr(qbs_val<long double>(_FUNC_REFER_STRING_A));
#line 25669 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25669 "qb64pe.bas"
if(!qbevent)break;evnt(25669);}while(r);
#line 25670 "qb64pe.bas"
do{
#line 25670 "qb64pe.bas"
*_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0);
#line 25670 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25670 "qb64pe.bas"
if(!qbevent)break;evnt(25670);}while(r);
#line 25670 "qb64pe.bas"
do{
#line 25670 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_A,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I));
#line 25670 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25670 "qb64pe.bas"
if(!qbevent)break;evnt(25670);}while(r);
#line 25670 "qb64pe.bas"
do{
#line 25670 "qb64pe.bas"
*_FUNC_REFER_LONG_UDTELEM=qbr(qbs_val<long double>(_FUNC_REFER_STRING_A));
#line 25670 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25670 "qb64pe.bas"
if(!qbevent)break;evnt(25670);}while(r);
#line 25671 "qb64pe.bas"
do{
#line 25671 "qb64pe.bas"
*_FUNC_REFER_LONG_I=func_instr(NULL,_FUNC_REFER_STRING_A,__STRING1_SP3,0);
#line 25671 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25671 "qb64pe.bas"
if(!qbevent)break;evnt(25671);}while(r);
#line 25671 "qb64pe.bas"
do{
#line 25671 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_O,qbs_right(_FUNC_REFER_STRING_A,_FUNC_REFER_STRING_A->len-*_FUNC_REFER_LONG_I));
#line 25671 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25671 "qb64pe.bas"
if(!qbevent)break;evnt(25671);}while(r);
#line 25672 "qb64pe.bas"
do{
#line 25672 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_N,qbs_add(qbs_new_txt_len("UDT_",4),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1))));
#line 25672 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25672 "qb64pe.bas"
if(!qbevent)break;evnt(25672);}while(r);
#line 25673 "qb64pe.bas"
do{
#line 25673 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_DATA_REF,qbs_add(FUNC_SCOPE(),_FUNC_REFER_STRING_N));
#line 25673 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25673 "qb64pe.bas"
if(!qbevent)break;evnt(25673);}while(r);
#line 25674 "qb64pe.bas"
S_29628:;
#line 25674 "qb64pe.bas"
if ((-(*(int32*)(((char*)__UDT_ID)+((0+540)))== 0 ))||is_error_pending()){
#line 25674 "qb64pe.bas"
if(qbevent){evnt(25674);if(r)goto S_29628;}
#line 25675 "qb64pe.bas"
do{
#line 25675 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_ARR_DESC_EXPR,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("ARRAY_",6)),_FUNC_REFER_STRING_N));
#line 25675 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25675 "qb64pe.bas"
if(!qbevent)break;evnt(25675);}while(r);
#line 25676 "qb64pe.bas"
do{
#line 25676 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_DATA_REF,qbs_add(_FUNC_REFER_STRING_ARR_DESC_EXPR,qbs_new_txt_len("[0]",3)));
#line 25676 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25676 "qb64pe.bas"
if(!qbevent)break;evnt(25676);}while(r);
#line 25677 "qb64pe.bas"
}
#line 25678 "qb64pe.bas"
S_29632:;
#line 25678 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_UDTELEM== 0 ))||is_error_pending()){
#line 25678 "qb64pe.bas"
if(qbevent){evnt(25678);if(r)goto S_29632;}
#line 25678 "qb64pe.bas"
do{
#line 25678 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("User defined types in expressions are invalid",45));
#line 25678 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25678 "qb64pe.bas"
if(!qbevent)break;evnt(25678);}while(r);
#line 25678 "qb64pe.bas"
do{
#line 25678 "qb64pe.bas"
goto exit_subfunc;
#line 25678 "qb64pe.bas"
if(!qbevent)break;evnt(25678);}while(r);
#line 25678 "qb64pe.bas"
}
#line 25679 "qb64pe.bas"
S_29636:;
#line 25679 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS)||is_error_pending()){
#line 25679 "qb64pe.bas"
if(qbevent){evnt(25679);if(r)goto S_29636;}
#line 25679 "qb64pe.bas"
do{
#line 25679 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot resolve bit-length variables inside user defined types",61));
#line 25679 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25679 "qb64pe.bas"
if(!qbevent)break;evnt(25679);}while(r);
#line 25679 "qb64pe.bas"
do{
#line 25679 "qb64pe.bas"
goto exit_subfunc;
#line 25679 "qb64pe.bas"
if(!qbevent)break;evnt(25679);}while(r);
#line 25679 "qb64pe.bas"
}
#line 25681 "qb64pe.bas"
S_29640:;
#line 25681 "qb64pe.bas"
if (((-(*(int32*)(((char*)__UDT_ID)+((0+540)))== 0 ))&*__LONG_CHECKINGON)||is_error_pending()){
#line 25681 "qb64pe.bas"
if(qbevent){evnt(25681);if(r)goto S_29640;}
#line 25682 "qb64pe.bas"
S_29641:;
#line 25682 "qb64pe.bas"
if ((((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_FUNC_REFER_LONG_UDTELEM)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])])||is_error_pending()){
#line 25682 "qb64pe.bas"
if(qbevent){evnt(25682);if(r)goto S_29641;}
#line 25683 "qb64pe.bas"
do{
#line 25683 "qb64pe.bas"
*_FUNC_REFER_LONG_GUARD_UDT=*(int32*)(((char*)__UDT_ID)+((0+512)))& 4095ll ;
#line 25683 "qb64pe.bas"
if(!qbevent)break;evnt(25683);}while(r);
#line 25684 "qb64pe.bas"
do{
#line 25684 "qb64pe.bas"
*_FUNC_REFER_LONG_GUARD_MODE= 0 ;
#line 25684 "qb64pe.bas"
if(!qbevent)break;evnt(25684);}while(r);
#line 25685 "qb64pe.bas"
S_29644:;
#line 25685 "qb64pe.bas"
if ((*(int16*)(((char*)__UDT_ID)+((0+520))))||is_error_pending()){
#line 25685 "qb64pe.bas"
if(qbevent){evnt(25685);if(r)goto S_29644;}
#line 25685 "qb64pe.bas"
do{
#line 25685 "qb64pe.bas"
*_FUNC_REFER_LONG_GUARD_MODE=*(int16*)(((char*)__UDT_ID)+((0+522)));
#line 25685 "qb64pe.bas"
if(!qbevent)break;evnt(25685);}while(r);
#line 25685 "qb64pe.bas"
}
#line 25686 "qb64pe.bas"
do{
#line 25686 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_DATA_REF,FUNC_UDTROOTDATAGUARD(_FUNC_REFER_STRING_ARR_DESC_EXPR,_FUNC_REFER_LONG_GUARD_UDT,_FUNC_REFER_LONG_GUARD_MODE));
#line 25686 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25686 "qb64pe.bas"
if(!qbevent)break;evnt(25686);}while(r);
#line 25687 "qb64pe.bas"
S_29648:;
#line 25687 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 25687 "qb64pe.bas"
if(qbevent){evnt(25687);if(r)goto S_29648;}
#line 25687 "qb64pe.bas"
do{
#line 25687 "qb64pe.bas"
goto exit_subfunc;
#line 25687 "qb64pe.bas"
if(!qbevent)break;evnt(25687);}while(r);
#line 25687 "qb64pe.bas"
}
#line 25688 "qb64pe.bas"
}
#line 25689 "qb64pe.bas"
}
#line 25691 "qb64pe.bas"
S_29653:;
#line 25691 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING)||is_error_pending()){
#line 25691 "qb64pe.bas"
if(qbevent){evnt(25691);if(r)goto S_29653;}
#line 25692 "qb64pe.bas"
S_29654:;
#line 25692 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH)||is_error_pending()){
#line 25692 "qb64pe.bas"
if(qbevent){evnt(25692);if(r)goto S_29654;}
#line 25693 "qb64pe.bas"
do{
#line 25693 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((uint8*)",10),_FUNC_REFER_STRING_DATA_REF),qbs_new_txt_len(")+(",3)),_FUNC_REFER_STRING_O),qbs_new_txt_len("))",2)));
#line 25693 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25693 "qb64pe.bas"
if(!qbevent)break;evnt(25693);}while(r);
#line 25694 "qb64pe.bas"
do{
#line 25694 "qb64pe.bas"
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((*_FUNC_REFER_LONG_UDTELEM)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5])]),NULL,0)),qbs_new_txt_len(",1)",3)));
#line 25694 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25694 "qb64pe.bas"
if(!qbevent)break;evnt(25694);}while(r);
#line 25695 "qb64pe.bas"
do{
#line 25695 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE+*__LONG_ISFIXEDLENGTH;
#line 25695 "qb64pe.bas"
if(!qbevent)break;evnt(25695);}while(r);
#line 25696 "qb64pe.bas"
}else{
#line 25697 "qb64pe.bas"
do{
#line 25697 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("*((qbs**)((char*)",17),_FUNC_REFER_STRING_DATA_REF),qbs_new_txt_len("+(",2)),_FUNC_REFER_STRING_O),qbs_new_txt_len(")))",3)));
#line 25697 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25697 "qb64pe.bas"
if(!qbevent)break;evnt(25697);}while(r);
#line 25698 "qb64pe.bas"
do{
#line 25698 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*__LONG_STRINGTYPE;
#line 25698 "qb64pe.bas"
if(!qbevent)break;evnt(25698);}while(r);
#line 25699 "qb64pe.bas"
}
#line 25700 "qb64pe.bas"
}else{
#line 25701 "qb64pe.bas"
do{
#line 25701 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISUDT-*__LONG_ISREFERENCE-*__LONG_ISPOINTER;
#line 25701 "qb64pe.bas"
if(!qbevent)break;evnt(25701);}while(r);
#line 25702 "qb64pe.bas"
S_29664:;
#line 25702 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISARRAY)||is_error_pending()){
#line 25702 "qb64pe.bas"
if(qbevent){evnt(25702);if(r)goto S_29664;}
#line 25702 "qb64pe.bas"
do{
#line 25702 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISARRAY;
#line 25702 "qb64pe.bas"
if(!qbevent)break;evnt(25702);}while(r);
#line 25702 "qb64pe.bas"
}
#line 25703 "qb64pe.bas"
do{
#line 25703 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,FUNC_TYP2CTYP(_FUNC_REFER_LONG_TYP,qbs_new_txt_len("",0)));
#line 25703 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25703 "qb64pe.bas"
if(!qbevent)break;evnt(25703);}while(r);
#line 25704 "qb64pe.bas"
S_29668:;
#line 25704 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 25704 "qb64pe.bas"
if(qbevent){evnt(25704);if(r)goto S_29668;}
#line 25704 "qb64pe.bas"
do{
#line 25704 "qb64pe.bas"
goto exit_subfunc;
#line 25704 "qb64pe.bas"
if(!qbevent)break;evnt(25704);}while(r);
#line 25704 "qb64pe.bas"
}
#line 25705 "qb64pe.bas"
do{
#line 25705 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_O2,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),_FUNC_REFER_STRING_DATA_REF),qbs_new_txt_len(")+(",3)),_FUNC_REFER_STRING_O),qbs_new_txt_len("))",2)));
#line 25705 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25705 "qb64pe.bas"
if(!qbevent)break;evnt(25705);}while(r);
#line 25706 "qb64pe.bas"
do{
#line 25706 "qb64pe.bas"
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));
#line 25706 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25706 "qb64pe.bas"
if(!qbevent)break;evnt(25706);}while(r);
#line 25707 "qb64pe.bas"
}
#line 25710 "qb64pe.bas"
do{
#line 25710 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
#line 25710 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25710 "qb64pe.bas"
if(!qbevent)break;evnt(25710);}while(r);
#line 25711 "qb64pe.bas"
do{
#line 25711 "qb64pe.bas"
goto exit_subfunc;
#line 25711 "qb64pe.bas"
if(!qbevent)break;evnt(25711);}while(r);
#line 25712 "qb64pe.bas"
}
#line 25716 "qb64pe.bas"
S_29677:;
#line 25716 "qb64pe.bas"
if ((*(int32*)(((char*)__UDT_ID)+((0+512))))||is_error_pending()){
#line 25716 "qb64pe.bas"
if(qbevent){evnt(25716);if(r)goto S_29677;}
#line 25718 "qb64pe.bas"
do{
#line 25718 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_N,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1)));
#line 25718 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25718 "qb64pe.bas"
if(!qbevent)break;evnt(25718);}while(r);
#line 25719 "qb64pe.bas"
S_29679:;
#line 25719 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||is_error_pending()){
#line 25719 "qb64pe.bas"
if(qbevent){evnt(25719);if(r)goto S_29679;}
#line 25720 "qb64pe.bas"
do{
#line 25720 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_N);
#line 25720 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25720 "qb64pe.bas"
if(!qbevent)break;evnt(25720);}while(r);
#line 25721 "qb64pe.bas"
do{
#line 25721 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK;
#line 25721 "qb64pe.bas"
if(!qbevent)break;evnt(25721);}while(r);
#line 25722 "qb64pe.bas"
do{
#line 25722 "qb64pe.bas"
goto exit_subfunc;
#line 25722 "qb64pe.bas"
if(!qbevent)break;evnt(25722);}while(r);
#line 25723 "qb64pe.bas"
}
#line 25724 "qb64pe.bas"
do{
#line 25724 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYP-*__LONG_ISPOINTER-*__LONG_ISREFERENCE;
#line 25724 "qb64pe.bas"
if(!qbevent)break;evnt(25724);}while(r);
#line 25726 "qb64pe.bas"
S_29685:;
#line 25726 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISSTRING))||is_error_pending()){
#line 25726 "qb64pe.bas"
if(qbevent){evnt(25726);if(r)goto S_29685;}
#line 25727 "qb64pe.bas"
S_29686:;
#line 25727 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFIXEDLENGTH))||is_error_pending()){
#line 25727 "qb64pe.bas"
if(qbevent){evnt(25727);if(r)goto S_29686;}
#line 25728 "qb64pe.bas"
do{
#line 25728 "qb64pe.bas"
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)+((0+544)))),NULL,0)),qbs_new_txt_len("]",1)));
#line 25728 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25728 "qb64pe.bas"
if(!qbevent)break;evnt(25728);}while(r);
#line 25729 "qb64pe.bas"
do{
#line 25729 "qb64pe.bas"
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)+((0+544)))),NULL,0)),qbs_new_txt_len(",1)",3)));
#line 25729 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25729 "qb64pe.bas"
if(!qbevent)break;evnt(25729);}while(r);
#line 25730 "qb64pe.bas"
}else{
#line 25731 "qb64pe.bas"
do{
#line 25731 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((qbs**)(",10),_FUNC_REFER_STRING_N),qbs_new_txt_len("[0]))[",6)),_FUNC_REFER_STRING_A),qbs_new_txt_len("])",2)));
#line 25731 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25731 "qb64pe.bas"
if(!qbevent)break;evnt(25731);}while(r);
#line 25732 "qb64pe.bas"
}
#line 25733 "qb64pe.bas"
do{
#line 25733 "qb64pe.bas"
*__INTEGER_STRINGPROCESSINGHAPPENED= 1 ;
#line 25733 "qb64pe.bas"
if(!qbevent)break;evnt(25733);}while(r);
#line 25734 "qb64pe.bas"
do{
#line 25734 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
#line 25734 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25734 "qb64pe.bas"
if(!qbevent)break;evnt(25734);}while(r);
#line 25735 "qb64pe.bas"
do{
#line 25735 "qb64pe.bas"
goto exit_subfunc;
#line 25735 "qb64pe.bas"
if(!qbevent)break;evnt(25735);}while(r);
#line 25736 "qb64pe.bas"
}
#line 25738 "qb64pe.bas"
S_29696:;
#line 25738 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSETINBITS))||is_error_pending()){
#line 25738 "qb64pe.bas"
if(qbevent){evnt(25738);if(r)goto S_29696;}
#line 25741 "qb64pe.bas"
S_29697:;
#line 25741 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||is_error_pending()){
#line 25741 "qb64pe.bas"
if(qbevent){evnt(25741);if(r)goto S_29697;}
#line 25741 "qb64pe.bas"
do{
#line 25741 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getubits",8));
#line 25741 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25741 "qb64pe.bas"
if(!qbevent)break;evnt(25741);}while(r);
#line 25741 "qb64pe.bas"
}else{
#line 25741 "qb64pe.bas"
do{
#line 25741 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_new_txt_len("getbits",7));
#line 25741 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25741 "qb64pe.bas"
if(!qbevent)break;evnt(25741);}while(r);
#line 25741 "qb64pe.bas"
}
#line 25742 "qb64pe.bas"
do{
#line 25742 "qb64pe.bas"
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& 4095ll ),NULL,0)),qbs_new_txt_len(",",1)));
#line 25742 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25742 "qb64pe.bas"
if(!qbevent)break;evnt(25742);}while(r);
#line 25743 "qb64pe.bas"
do{
#line 25743 "qb64pe.bas"
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)));
#line 25743 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25743 "qb64pe.bas"
if(!qbevent)break;evnt(25743);}while(r);
#line 25744 "qb64pe.bas"
do{
#line 25744 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(_FUNC_REFER_STRING_R,_FUNC_REFER_STRING_A),qbs_new_txt_len(")",1)));
#line 25744 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25744 "qb64pe.bas"
if(!qbevent)break;evnt(25744);}while(r);
#line 25745 "qb64pe.bas"
do{
#line 25745 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
#line 25745 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25745 "qb64pe.bas"
if(!qbevent)break;evnt(25745);}while(r);
#line 25746 "qb64pe.bas"
do{
#line 25746 "qb64pe.bas"
goto exit_subfunc;
#line 25746 "qb64pe.bas"
if(!qbevent)break;evnt(25746);}while(r);
#line 25747 "qb64pe.bas"
}else{
#line 25748 "qb64pe.bas"
do{
#line 25748 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0));
#line 25748 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25748 "qb64pe.bas"
if(!qbevent)break;evnt(25748);}while(r);
#line 25749 "qb64pe.bas"
S_29709:;
#line 25749 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISFLOAT))||is_error_pending()){
#line 25749 "qb64pe.bas"
if(qbevent){evnt(25749);if(r)goto S_29709;}
#line 25750 "qb64pe.bas"
S_29710:;
#line 25750 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 32 ))||is_error_pending()){
#line 25750 "qb64pe.bas"
if(qbevent){evnt(25750);if(r)goto S_29710;}
#line 25750 "qb64pe.bas"
do{
#line 25750 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("float",5));
#line 25750 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25750 "qb64pe.bas"
if(!qbevent)break;evnt(25750);}while(r);
#line 25750 "qb64pe.bas"
}
#line 25751 "qb64pe.bas"
S_29713:;
#line 25751 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 64 ))||is_error_pending()){
#line 25751 "qb64pe.bas"
if(qbevent){evnt(25751);if(r)goto S_29713;}
#line 25751 "qb64pe.bas"
do{
#line 25751 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("double",6));
#line 25751 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25751 "qb64pe.bas"
if(!qbevent)break;evnt(25751);}while(r);
#line 25751 "qb64pe.bas"
}
#line 25752 "qb64pe.bas"
S_29716:;
#line 25752 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 256 ))||is_error_pending()){
#line 25752 "qb64pe.bas"
if(qbevent){evnt(25752);if(r)goto S_29716;}
#line 25752 "qb64pe.bas"
do{
#line 25752 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("long double",11));
#line 25752 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25752 "qb64pe.bas"
if(!qbevent)break;evnt(25752);}while(r);
#line 25752 "qb64pe.bas"
}
#line 25753 "qb64pe.bas"
}else{
#line 25754 "qb64pe.bas"
S_29720:;
#line 25754 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_TYP&*__LONG_ISUNSIGNED))||is_error_pending()){
#line 25754 "qb64pe.bas"
if(qbevent){evnt(25754);if(r)goto S_29720;}
#line 25755 "qb64pe.bas"
S_29721:;
#line 25755 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 8 ))||is_error_pending()){
#line 25755 "qb64pe.bas"
if(qbevent){evnt(25755);if(r)goto S_29721;}
#line 25755 "qb64pe.bas"
do{
#line 25755 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint8",5));
#line 25755 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25755 "qb64pe.bas"
if(!qbevent)break;evnt(25755);}while(r);
#line 25755 "qb64pe.bas"
}
#line 25756 "qb64pe.bas"
S_29724:;
#line 25756 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 16 ))||is_error_pending()){
#line 25756 "qb64pe.bas"
if(qbevent){evnt(25756);if(r)goto S_29724;}
#line 25756 "qb64pe.bas"
do{
#line 25756 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint16",6));
#line 25756 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25756 "qb64pe.bas"
if(!qbevent)break;evnt(25756);}while(r);
#line 25756 "qb64pe.bas"
}
#line 25757 "qb64pe.bas"
S_29727:;
#line 25757 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 32 ))||is_error_pending()){
#line 25757 "qb64pe.bas"
if(qbevent){evnt(25757);if(r)goto S_29727;}
#line 25757 "qb64pe.bas"
do{
#line 25757 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint32",6));
#line 25757 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25757 "qb64pe.bas"
if(!qbevent)break;evnt(25757);}while(r);
#line 25757 "qb64pe.bas"
}
#line 25758 "qb64pe.bas"
S_29730:;
#line 25758 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 64 ))||is_error_pending()){
#line 25758 "qb64pe.bas"
if(qbevent){evnt(25758);if(r)goto S_29730;}
#line 25758 "qb64pe.bas"
do{
#line 25758 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uint64",6));
#line 25758 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25758 "qb64pe.bas"
if(!qbevent)break;evnt(25758);}while(r);
#line 25758 "qb64pe.bas"
}
#line 25759 "qb64pe.bas"
S_29733:;
#line 25759 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||is_error_pending()){
#line 25759 "qb64pe.bas"
if(qbevent){evnt(25759);if(r)goto S_29733;}
#line 25759 "qb64pe.bas"
do{
#line 25759 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("uptrszint",9));
#line 25759 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25759 "qb64pe.bas"
if(!qbevent)break;evnt(25759);}while(r);
#line 25759 "qb64pe.bas"
}
#line 25760 "qb64pe.bas"
}else{
#line 25761 "qb64pe.bas"
S_29737:;
#line 25761 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 8 ))||is_error_pending()){
#line 25761 "qb64pe.bas"
if(qbevent){evnt(25761);if(r)goto S_29737;}
#line 25761 "qb64pe.bas"
do{
#line 25761 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int8",4));
#line 25761 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25761 "qb64pe.bas"
if(!qbevent)break;evnt(25761);}while(r);
#line 25761 "qb64pe.bas"
}
#line 25762 "qb64pe.bas"
S_29740:;
#line 25762 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 16 ))||is_error_pending()){
#line 25762 "qb64pe.bas"
if(qbevent){evnt(25762);if(r)goto S_29740;}
#line 25762 "qb64pe.bas"
do{
#line 25762 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int16",5));
#line 25762 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25762 "qb64pe.bas"
if(!qbevent)break;evnt(25762);}while(r);
#line 25762 "qb64pe.bas"
}
#line 25763 "qb64pe.bas"
S_29743:;
#line 25763 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 32 ))||is_error_pending()){
#line 25763 "qb64pe.bas"
if(qbevent){evnt(25763);if(r)goto S_29743;}
#line 25763 "qb64pe.bas"
do{
#line 25763 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int32",5));
#line 25763 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25763 "qb64pe.bas"
if(!qbevent)break;evnt(25763);}while(r);
#line 25763 "qb64pe.bas"
}
#line 25764 "qb64pe.bas"
S_29746:;
#line 25764 "qb64pe.bas"
if ((-((*_FUNC_REFER_LONG_TYP& 4095ll )== 64 ))||is_error_pending()){
#line 25764 "qb64pe.bas"
if(qbevent){evnt(25764);if(r)goto S_29746;}
#line 25764 "qb64pe.bas"
do{
#line 25764 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("int64",5));
#line 25764 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25764 "qb64pe.bas"
if(!qbevent)break;evnt(25764);}while(r);
#line 25764 "qb64pe.bas"
}
#line 25765 "qb64pe.bas"
S_29749:;
#line 25765 "qb64pe.bas"
if ((*_FUNC_REFER_LONG_TYP&*__LONG_ISOFFSET)||is_error_pending()){
#line 25765 "qb64pe.bas"
if(qbevent){evnt(25765);if(r)goto S_29749;}
#line 25765 "qb64pe.bas"
do{
#line 25765 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_T,qbs_new_txt_len("ptrszint",8));
#line 25765 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25765 "qb64pe.bas"
if(!qbevent)break;evnt(25765);}while(r);
#line 25765 "qb64pe.bas"
}
#line 25766 "qb64pe.bas"
}
#line 25767 "qb64pe.bas"
}
#line 25768 "qb64pe.bas"
}
#line 25769 "qb64pe.bas"
S_29755:;
#line 25769 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_REFER_STRING_T,qbs_new_txt_len("",0))))||is_error_pending()){
#line 25769 "qb64pe.bas"
if(qbevent){evnt(25769);if(r)goto S_29755;}
#line 25769 "qb64pe.bas"
do{
#line 25769 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot find C type to return array data",39));
#line 25769 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25769 "qb64pe.bas"
if(!qbevent)break;evnt(25769);}while(r);
#line 25769 "qb64pe.bas"
do{
#line 25769 "qb64pe.bas"
goto exit_subfunc;
#line 25769 "qb64pe.bas"
if(!qbevent)break;evnt(25769);}while(r);
#line 25769 "qb64pe.bas"
}
#line 25770 "qb64pe.bas"
do{
#line 25770 "qb64pe.bas"
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)));
#line 25770 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25770 "qb64pe.bas"
if(!qbevent)break;evnt(25770);}while(r);
#line 25771 "qb64pe.bas"
do{
#line 25771 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
#line 25771 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25771 "qb64pe.bas"
if(!qbevent)break;evnt(25771);}while(r);
#line 25772 "qb64pe.bas"
do{
#line 25772 "qb64pe.bas"
goto exit_subfunc;
#line 25772 "qb64pe.bas"
if(!qbevent)break;evnt(25772);}while(r);
#line 25773 "qb64pe.bas"
}
#line 25776 "qb64pe.bas"
S_29763:;
#line 25776 "qb64pe.bas"
if ((*(int32*)(((char*)__UDT_ID)+((0+540))))||is_error_pending()){
#line 25776 "qb64pe.bas"
if(qbevent){evnt(25776);if(r)goto S_29763;}
#line 25777 "qb64pe.bas"
do{
#line 25777 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1)));
#line 25777 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25777 "qb64pe.bas"
if(!qbevent)break;evnt(25777);}while(r);
#line 25778 "qb64pe.bas"
do{
#line 25778 "qb64pe.bas"
*_FUNC_REFER_LONG_T=*(int32*)(((char*)__UDT_ID)+((0+540)));
#line 25778 "qb64pe.bas"
if(!qbevent)break;evnt(25778);}while(r);
#line 25780 "qb64pe.bas"
S_29766:;
#line 25780 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISINCONVENTIONALMEMORY))||is_error_pending()){
#line 25780 "qb64pe.bas"
if(qbevent){evnt(25780);if(r)goto S_29766;}
#line 25780 "qb64pe.bas"
do{
#line 25780 "qb64pe.bas"
*_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISINCONVENTIONALMEMORY;
#line 25780 "qb64pe.bas"
if(!qbevent)break;evnt(25780);}while(r);
#line 25780 "qb64pe.bas"
}
#line 25782 "qb64pe.bas"
S_29769:;
#line 25782 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||is_error_pending()){
#line 25782 "qb64pe.bas"
if(qbevent){evnt(25782);if(r)goto S_29769;}
#line 25783 "qb64pe.bas"
S_29770:;
#line 25783 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISFIXEDLENGTH))||is_error_pending()){
#line 25783 "qb64pe.bas"
if(qbevent){evnt(25783);if(r)goto S_29770;}
#line 25784 "qb64pe.bas"
do{
#line 25784 "qb64pe.bas"
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)+((0+544)))),NULL,0)),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R));
#line 25784 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25784 "qb64pe.bas"
if(!qbevent)break;evnt(25784);}while(r);
#line 25784 "qb64pe.bas"
do{
#line 25784 "qb64pe.bas"
goto LABEL_REF;
#line 25784 "qb64pe.bas"
if(!qbevent)break;evnt(25784);}while(r);
#line 25785 "qb64pe.bas"
}
#line 25786 "qb64pe.bas"
do{
#line 25786 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("STRING_",7)),_FUNC_REFER_STRING_R));
#line 25786 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25786 "qb64pe.bas"
if(!qbevent)break;evnt(25786);}while(r);
#line 25786 "qb64pe.bas"
do{
#line 25786 "qb64pe.bas"
goto LABEL_REF;
#line 25786 "qb64pe.bas"
if(!qbevent)break;evnt(25786);}while(r);
#line 25787 "qb64pe.bas"
}
#line 25789 "qb64pe.bas"
S_29777:;
#line 25789 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISOFFSETINBITS))||is_error_pending()){
#line 25789 "qb64pe.bas"
if(qbevent){evnt(25789);if(r)goto S_29777;}
#line 25790 "qb64pe.bas"
S_29778:;
#line 25790 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISUNSIGNED))||is_error_pending()){
#line 25790 "qb64pe.bas"
if(qbevent){evnt(25790);if(r)goto S_29778;}
#line 25791 "qb64pe.bas"
do{
#line 25791 "qb64pe.bas"
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& 4095ll ),NULL,0)),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R));
#line 25791 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25791 "qb64pe.bas"
if(!qbevent)break;evnt(25791);}while(r);
#line 25792 "qb64pe.bas"
}else{
#line 25793 "qb64pe.bas"
do{
#line 25793 "qb64pe.bas"
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& 4095ll ),NULL,0)),qbs_new_txt_len("_",1)),_FUNC_REFER_STRING_R));
#line 25793 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25793 "qb64pe.bas"
if(!qbevent)break;evnt(25793);}while(r);
#line 25794 "qb64pe.bas"
}
#line 25795 "qb64pe.bas"
do{
#line 25795 "qb64pe.bas"
goto LABEL_REF;
#line 25795 "qb64pe.bas"
if(!qbevent)break;evnt(25795);}while(r);
#line 25796 "qb64pe.bas"
}
#line 25797 "qb64pe.bas"
S_29785:;
#line 25797 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_BYTETYPE))||is_error_pending()){
#line 25797 "qb64pe.bas"
if(qbevent){evnt(25797);if(r)goto S_29785;}
#line 25797 "qb64pe.bas"
do{
#line 25797 "qb64pe.bas"
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));
#line 25797 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25797 "qb64pe.bas"
if(!qbevent)break;evnt(25797);}while(r);
#line 25797 "qb64pe.bas"
do{
#line 25797 "qb64pe.bas"
goto LABEL_REF;
#line 25797 "qb64pe.bas"
if(!qbevent)break;evnt(25797);}while(r);
#line 25797 "qb64pe.bas"
}
#line 25798 "qb64pe.bas"
S_29789:;
#line 25798 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UBYTETYPE))||is_error_pending()){
#line 25798 "qb64pe.bas"
if(qbevent){evnt(25798);if(r)goto S_29789;}
#line 25798 "qb64pe.bas"
do{
#line 25798 "qb64pe.bas"
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));
#line 25798 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25798 "qb64pe.bas"
if(!qbevent)break;evnt(25798);}while(r);
#line 25798 "qb64pe.bas"
do{
#line 25798 "qb64pe.bas"
goto LABEL_REF;
#line 25798 "qb64pe.bas"
if(!qbevent)break;evnt(25798);}while(r);
#line 25798 "qb64pe.bas"
}
#line 25799 "qb64pe.bas"
S_29793:;
#line 25799 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGERTYPE))||is_error_pending()){
#line 25799 "qb64pe.bas"
if(qbevent){evnt(25799);if(r)goto S_29793;}
#line 25799 "qb64pe.bas"
do{
#line 25799 "qb64pe.bas"
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));
#line 25799 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25799 "qb64pe.bas"
if(!qbevent)break;evnt(25799);}while(r);
#line 25799 "qb64pe.bas"
do{
#line 25799 "qb64pe.bas"
goto LABEL_REF;
#line 25799 "qb64pe.bas"
if(!qbevent)break;evnt(25799);}while(r);
#line 25799 "qb64pe.bas"
}
#line 25800 "qb64pe.bas"
S_29797:;
#line 25800 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGERTYPE))||is_error_pending()){
#line 25800 "qb64pe.bas"
if(qbevent){evnt(25800);if(r)goto S_29797;}
#line 25800 "qb64pe.bas"
do{
#line 25800 "qb64pe.bas"
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));
#line 25800 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25800 "qb64pe.bas"
if(!qbevent)break;evnt(25800);}while(r);
#line 25800 "qb64pe.bas"
do{
#line 25800 "qb64pe.bas"
goto LABEL_REF;
#line 25800 "qb64pe.bas"
if(!qbevent)break;evnt(25800);}while(r);
#line 25800 "qb64pe.bas"
}
#line 25801 "qb64pe.bas"
S_29801:;
#line 25801 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_LONGTYPE))||is_error_pending()){
#line 25801 "qb64pe.bas"
if(qbevent){evnt(25801);if(r)goto S_29801;}
#line 25801 "qb64pe.bas"
do{
#line 25801 "qb64pe.bas"
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));
#line 25801 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25801 "qb64pe.bas"
if(!qbevent)break;evnt(25801);}while(r);
#line 25801 "qb64pe.bas"
do{
#line 25801 "qb64pe.bas"
goto LABEL_REF;
#line 25801 "qb64pe.bas"
if(!qbevent)break;evnt(25801);}while(r);
#line 25801 "qb64pe.bas"
}
#line 25802 "qb64pe.bas"
S_29805:;
#line 25802 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_ULONGTYPE))||is_error_pending()){
#line 25802 "qb64pe.bas"
if(qbevent){evnt(25802);if(r)goto S_29805;}
#line 25802 "qb64pe.bas"
do{
#line 25802 "qb64pe.bas"
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));
#line 25802 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25802 "qb64pe.bas"
if(!qbevent)break;evnt(25802);}while(r);
#line 25802 "qb64pe.bas"
do{
#line 25802 "qb64pe.bas"
goto LABEL_REF;
#line 25802 "qb64pe.bas"
if(!qbevent)break;evnt(25802);}while(r);
#line 25802 "qb64pe.bas"
}
#line 25803 "qb64pe.bas"
S_29809:;
#line 25803 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_INTEGER64TYPE))||is_error_pending()){
#line 25803 "qb64pe.bas"
if(qbevent){evnt(25803);if(r)goto S_29809;}
#line 25803 "qb64pe.bas"
do{
#line 25803 "qb64pe.bas"
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));
#line 25803 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25803 "qb64pe.bas"
if(!qbevent)break;evnt(25803);}while(r);
#line 25803 "qb64pe.bas"
do{
#line 25803 "qb64pe.bas"
goto LABEL_REF;
#line 25803 "qb64pe.bas"
if(!qbevent)break;evnt(25803);}while(r);
#line 25803 "qb64pe.bas"
}
#line 25804 "qb64pe.bas"
S_29813:;
#line 25804 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UINTEGER64TYPE))||is_error_pending()){
#line 25804 "qb64pe.bas"
if(qbevent){evnt(25804);if(r)goto S_29813;}
#line 25804 "qb64pe.bas"
do{
#line 25804 "qb64pe.bas"
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));
#line 25804 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25804 "qb64pe.bas"
if(!qbevent)break;evnt(25804);}while(r);
#line 25804 "qb64pe.bas"
do{
#line 25804 "qb64pe.bas"
goto LABEL_REF;
#line 25804 "qb64pe.bas"
if(!qbevent)break;evnt(25804);}while(r);
#line 25804 "qb64pe.bas"
}
#line 25805 "qb64pe.bas"
S_29817:;
#line 25805 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_SINGLETYPE))||is_error_pending()){
#line 25805 "qb64pe.bas"
if(qbevent){evnt(25805);if(r)goto S_29817;}
#line 25805 "qb64pe.bas"
do{
#line 25805 "qb64pe.bas"
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));
#line 25805 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25805 "qb64pe.bas"
if(!qbevent)break;evnt(25805);}while(r);
#line 25805 "qb64pe.bas"
do{
#line 25805 "qb64pe.bas"
goto LABEL_REF;
#line 25805 "qb64pe.bas"
if(!qbevent)break;evnt(25805);}while(r);
#line 25805 "qb64pe.bas"
}
#line 25806 "qb64pe.bas"
S_29821:;
#line 25806 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_DOUBLETYPE))||is_error_pending()){
#line 25806 "qb64pe.bas"
if(qbevent){evnt(25806);if(r)goto S_29821;}
#line 25806 "qb64pe.bas"
do{
#line 25806 "qb64pe.bas"
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));
#line 25806 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25806 "qb64pe.bas"
if(!qbevent)break;evnt(25806);}while(r);
#line 25806 "qb64pe.bas"
do{
#line 25806 "qb64pe.bas"
goto LABEL_REF;
#line 25806 "qb64pe.bas"
if(!qbevent)break;evnt(25806);}while(r);
#line 25806 "qb64pe.bas"
}
#line 25807 "qb64pe.bas"
S_29825:;
#line 25807 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_FLOATTYPE))||is_error_pending()){
#line 25807 "qb64pe.bas"
if(qbevent){evnt(25807);if(r)goto S_29825;}
#line 25807 "qb64pe.bas"
do{
#line 25807 "qb64pe.bas"
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));
#line 25807 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25807 "qb64pe.bas"
if(!qbevent)break;evnt(25807);}while(r);
#line 25807 "qb64pe.bas"
do{
#line 25807 "qb64pe.bas"
goto LABEL_REF;
#line 25807 "qb64pe.bas"
if(!qbevent)break;evnt(25807);}while(r);
#line 25807 "qb64pe.bas"
}
#line 25808 "qb64pe.bas"
S_29829:;
#line 25808 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_OFFSETTYPE))||is_error_pending()){
#line 25808 "qb64pe.bas"
if(qbevent){evnt(25808);if(r)goto S_29829;}
#line 25808 "qb64pe.bas"
do{
#line 25808 "qb64pe.bas"
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));
#line 25808 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25808 "qb64pe.bas"
if(!qbevent)break;evnt(25808);}while(r);
#line 25808 "qb64pe.bas"
do{
#line 25808 "qb64pe.bas"
goto LABEL_REF;
#line 25808 "qb64pe.bas"
if(!qbevent)break;evnt(25808);}while(r);
#line 25808 "qb64pe.bas"
}
#line 25809 "qb64pe.bas"
S_29833:;
#line 25809 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_T==*__LONG_UOFFSETTYPE))||is_error_pending()){
#line 25809 "qb64pe.bas"
if(qbevent){evnt(25809);if(r)goto S_29833;}
#line 25809 "qb64pe.bas"
do{
#line 25809 "qb64pe.bas"
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));
#line 25809 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25809 "qb64pe.bas"
if(!qbevent)break;evnt(25809);}while(r);
#line 25809 "qb64pe.bas"
do{
#line 25809 "qb64pe.bas"
goto LABEL_REF;
#line 25809 "qb64pe.bas"
if(!qbevent)break;evnt(25809);}while(r);
#line 25809 "qb64pe.bas"
}
#line 25810 "qb64pe.bas"
LABEL_REF:;
#line 25810 "qb64pe.bas"
if(qbevent){evnt(25810);r=0;}
#line 25811 "qb64pe.bas"
S_29837:;
#line 25811 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISSTRING))||is_error_pending()){
#line 25811 "qb64pe.bas"
if(qbevent){evnt(25811);if(r)goto S_29837;}
#line 25811 "qb64pe.bas"
do{
#line 25811 "qb64pe.bas"
*__INTEGER_STRINGPROCESSINGHAPPENED= 1 ;
#line 25811 "qb64pe.bas"
if(!qbevent)break;evnt(25811);}while(r);
#line 25811 "qb64pe.bas"
}
#line 25812 "qb64pe.bas"
S_29840:;
#line 25812 "qb64pe.bas"
if (((*_FUNC_REFER_LONG_T&*__LONG_ISPOINTER))||is_error_pending()){
#line 25812 "qb64pe.bas"
if(qbevent){evnt(25812);if(r)goto S_29840;}
#line 25812 "qb64pe.bas"
do{
#line 25812 "qb64pe.bas"
*_FUNC_REFER_LONG_T=*_FUNC_REFER_LONG_T-*__LONG_ISPOINTER;
#line 25812 "qb64pe.bas"
if(!qbevent)break;evnt(25812);}while(r);
#line 25812 "qb64pe.bas"
}
#line 25813 "qb64pe.bas"
do{
#line 25813 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_T;
#line 25813 "qb64pe.bas"
if(!qbevent)break;evnt(25813);}while(r);
#line 25814 "qb64pe.bas"
S_29844:;
#line 25814 "qb64pe.bas"
if ((-(*_FUNC_REFER_LONG_METHOD== 1 ))||is_error_pending()){
#line 25814 "qb64pe.bas"
if(qbevent){evnt(25814);if(r)goto S_29844;}
#line 25815 "qb64pe.bas"
S_29845:;
#line 25815 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(_FUNC_REFER_STRING_R, 1 ),qbs_new_txt_len("*",1))))||is_error_pending()){
#line 25815 "qb64pe.bas"
if(qbevent){evnt(25815);if(r)goto S_29845;}
#line 25815 "qb64pe.bas"
do{
#line 25815 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_R,qbs_right(_FUNC_REFER_STRING_R,_FUNC_REFER_STRING_R->len- 1 ));
#line 25815 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25815 "qb64pe.bas"
if(!qbevent)break;evnt(25815);}while(r);
#line 25815 "qb64pe.bas"
}
#line 25816 "qb64pe.bas"
do{
#line 25816 "qb64pe.bas"
*_FUNC_REFER_LONG_TYP=*_FUNC_REFER_LONG_TYPBAK;
#line 25816 "qb64pe.bas"
if(!qbevent)break;evnt(25816);}while(r);
#line 25817 "qb64pe.bas"
}
#line 25818 "qb64pe.bas"
do{
#line 25818 "qb64pe.bas"
qbs_set(_FUNC_REFER_STRING_REFER,_FUNC_REFER_STRING_R);
#line 25818 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 25818 "qb64pe.bas"
if(!qbevent)break;evnt(25818);}while(r);
#line 25819 "qb64pe.bas"
do{
#line 25819 "qb64pe.bas"
goto exit_subfunc;
#line 25819 "qb64pe.bas"
if(!qbevent)break;evnt(25819);}while(r);
#line 25820 "qb64pe.bas"
}
#line 25824 "qb64pe.bas"
exit_subfunc:;
#line 25824 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 25824 "qb64pe.bas"
#include "free79.txt"
#line 25824 "qb64pe.bas"
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;
#line 25824 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 25824 "qb64pe.bas"
qbs_maketmp(_FUNC_REFER_STRING_REFER);return _FUNC_REFER_STRING_REFER;
#line 25824 "qb64pe.bas"
}
