#line 16951 "qb64pe.bas"
void SUB_BUILDUDTMEMBERARG(qbs*_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,qbs*_SUB_BUILDUDTMEMBERARG_STRING_ARG_TEXT,qbs*_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,int32*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT){
#line 16951 "qb64pe.bas"
qbs *tqbs;
#line 16951 "qb64pe.bas"
ptrszint tmp_long;
#line 16951 "qb64pe.bas"
int32 tmp_fileno;
#line 16951 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 16951 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 16951 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 16951 "qb64pe.bas"
#include "data45.txt"
#line 16951 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 16951 "qb64pe.bas"
new_mem_lock();
#line 16951 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 16951 "qb64pe.bas"
sf_mem_lock->type=3;
#line 16951 "qb64pe.bas"
libqb_check_stack();
#line 16951 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 16952 "qb64pe.bas"
do{
#line 16952 "qb64pe.bas"
if(!qbevent)break;evnt(16952);}while(r);
#line 16953 "qb64pe.bas"
do{
#line 16953 "qb64pe.bas"
if(!qbevent)break;evnt(16953);}while(r);
#line 16954 "qb64pe.bas"
do{
#line 16954 "qb64pe.bas"
if(!qbevent)break;evnt(16954);}while(r);
#line 16955 "qb64pe.bas"
do{
#line 16955 "qb64pe.bas"
if(!qbevent)break;evnt(16955);}while(r);
#line 16956 "qb64pe.bas"
do{
#line 16956 "qb64pe.bas"
if(!qbevent)break;evnt(16956);}while(r);
#line 16957 "qb64pe.bas"
do{
#line 16957 "qb64pe.bas"
if(!qbevent)break;evnt(16957);}while(r);
#line 16959 "qb64pe.bas"
do{
#line 16959 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ARG_TEXT,qbs_new_txt_len("",0));
#line 16959 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16959 "qb64pe.bas"
if(!qbevent)break;evnt(16959);}while(r);
#line 16960 "qb64pe.bas"
do{
#line 16960 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_new_txt_len("",0));
#line 16960 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16960 "qb64pe.bas"
if(!qbevent)break;evnt(16960);}while(r);
#line 16961 "qb64pe.bas"
do{
#line 16961 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT= 0 ;
#line 16961 "qb64pe.bas"
if(!qbevent)break;evnt(16961);}while(r);
#line 16963 "qb64pe.bas"
do{
#line 16963 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_SEP1=func_instr(NULL,_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,__STRING1_SP3,0);
#line 16963 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16963 "qb64pe.bas"
if(!qbevent)break;evnt(16963);}while(r);
#line 16964 "qb64pe.bas"
S_19449:;
#line 16964 "qb64pe.bas"
if ((-(*_SUB_BUILDUDTMEMBERARG_LONG_SEP1== 0 ))||is_error_pending()){
#line 16964 "qb64pe.bas"
if(qbevent){evnt(16964);if(r)goto S_19449;}
#line 16964 "qb64pe.bas"
do{
#line 16964 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20));
#line 16964 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16964 "qb64pe.bas"
if(!qbevent)break;evnt(16964);}while(r);
#line 16964 "qb64pe.bas"
do{
#line 16964 "qb64pe.bas"
goto exit_subfunc;
#line 16964 "qb64pe.bas"
if(!qbevent)break;evnt(16964);}while(r);
#line 16964 "qb64pe.bas"
}
#line 16965 "qb64pe.bas"
do{
#line 16965 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_SEP2=func_instr(*_SUB_BUILDUDTMEMBERARG_LONG_SEP1+1,_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,__STRING1_SP3,0|1);
#line 16965 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16965 "qb64pe.bas"
if(!qbevent)break;evnt(16965);}while(r);
#line 16966 "qb64pe.bas"
S_19454:;
#line 16966 "qb64pe.bas"
if ((-(*_SUB_BUILDUDTMEMBERARG_LONG_SEP2== 0 ))||is_error_pending()){
#line 16966 "qb64pe.bas"
if(qbevent){evnt(16966);if(r)goto S_19454;}
#line 16966 "qb64pe.bas"
do{
#line 16966 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20));
#line 16966 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16966 "qb64pe.bas"
if(!qbevent)break;evnt(16966);}while(r);
#line 16966 "qb64pe.bas"
do{
#line 16966 "qb64pe.bas"
goto exit_subfunc;
#line 16966 "qb64pe.bas"
if(!qbevent)break;evnt(16966);}while(r);
#line 16966 "qb64pe.bas"
}
#line 16967 "qb64pe.bas"
do{
#line 16967 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_SEP3=func_instr(*_SUB_BUILDUDTMEMBERARG_LONG_SEP2+1,_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,__STRING1_SP3,0|1);
#line 16967 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16967 "qb64pe.bas"
if(!qbevent)break;evnt(16967);}while(r);
#line 16968 "qb64pe.bas"
S_19459:;
#line 16968 "qb64pe.bas"
if ((-(*_SUB_BUILDUDTMEMBERARG_LONG_SEP3== 0 ))||is_error_pending()){
#line 16968 "qb64pe.bas"
if(qbevent){evnt(16968);if(r)goto S_19459;}
#line 16968 "qb64pe.bas"
do{
#line 16968 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20));
#line 16968 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16968 "qb64pe.bas"
if(!qbevent)break;evnt(16968);}while(r);
#line 16968 "qb64pe.bas"
do{
#line 16968 "qb64pe.bas"
goto exit_subfunc;
#line 16968 "qb64pe.bas"
if(!qbevent)break;evnt(16968);}while(r);
#line 16968 "qb64pe.bas"
}
#line 16970 "qb64pe.bas"
do{
#line 16970 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_ID_NUMBER=qbr(qbs_val<long double>(qbs_left(_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,*_SUB_BUILDUDTMEMBERARG_LONG_SEP1- 1 )));
#line 16970 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16970 "qb64pe.bas"
if(!qbevent)break;evnt(16970);}while(r);
#line 16971 "qb64pe.bas"
do{
#line 16971 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID=qbr(qbs_val<long double>(func_mid(_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,*_SUB_BUILDUDTMEMBERARG_LONG_SEP2+1,*_SUB_BUILDUDTMEMBERARG_LONG_SEP3-*_SUB_BUILDUDTMEMBERARG_LONG_SEP2-1,0|1)));
#line 16971 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16971 "qb64pe.bas"
if(!qbevent)break;evnt(16971);}while(r);
#line 16972 "qb64pe.bas"
S_19465:;
#line 16972 "qb64pe.bas"
if ((-(*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID<= 0 ))||is_error_pending()){
#line 16972 "qb64pe.bas"
if(qbevent){evnt(16972);if(r)goto S_19465;}
#line 16972 "qb64pe.bas"
do{
#line 16972 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20));
#line 16972 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16972 "qb64pe.bas"
if(!qbevent)break;evnt(16972);}while(r);
#line 16972 "qb64pe.bas"
do{
#line 16972 "qb64pe.bas"
goto exit_subfunc;
#line 16972 "qb64pe.bas"
if(!qbevent)break;evnt(16972);}while(r);
#line 16972 "qb64pe.bas"
}
#line 16973 "qb64pe.bas"
S_19469:;
#line 16973 "qb64pe.bas"
if ((-(((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]<= 0 ))||is_error_pending()){
#line 16973 "qb64pe.bas"
if(qbevent){evnt(16973);if(r)goto S_19469;}
#line 16973 "qb64pe.bas"
do{
#line 16973 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20));
#line 16973 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16973 "qb64pe.bas"
if(!qbevent)break;evnt(16973);}while(r);
#line 16973 "qb64pe.bas"
do{
#line 16973 "qb64pe.bas"
goto exit_subfunc;
#line 16973 "qb64pe.bas"
if(!qbevent)break;evnt(16973);}while(r);
#line 16973 "qb64pe.bas"
}
#line 16975 "qb64pe.bas"
do{
#line 16975 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT=((int32*)(__ARRAY_LONG_UDTEARRAYDIMS[0]))[array_check((*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYDIMS[4],__ARRAY_LONG_UDTEARRAYDIMS[5])];
#line 16975 "qb64pe.bas"
if(!qbevent)break;evnt(16975);}while(r);
#line 16976 "qb64pe.bas"
S_19474:;
#line 16976 "qb64pe.bas"
if ((-(*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT<= 0 ))||is_error_pending()){
#line 16976 "qb64pe.bas"
if(qbevent){evnt(16976);if(r)goto S_19474;}
#line 16976 "qb64pe.bas"
do{
#line 16976 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Expected arrayname()",20));
#line 16976 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16976 "qb64pe.bas"
if(!qbevent)break;evnt(16976);}while(r);
#line 16976 "qb64pe.bas"
do{
#line 16976 "qb64pe.bas"
goto exit_subfunc;
#line 16976 "qb64pe.bas"
if(!qbevent)break;evnt(16976);}while(r);
#line 16976 "qb64pe.bas"
}
#line 16977 "qb64pe.bas"
do{
#line 16977 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_OFFSET_TEXT,func_mid(_SUB_BUILDUDTMEMBERARG_STRING_REF_TEXT,*_SUB_BUILDUDTMEMBERARG_LONG_SEP3+1,NULL,0));
#line 16977 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16977 "qb64pe.bas"
if(!qbevent)break;evnt(16977);}while(r);
#line 16979 "qb64pe.bas"
do{
#line 16979 "qb64pe.bas"
SUB_GETID(_SUB_BUILDUDTMEMBERARG_LONG_ID_NUMBER);
#line 16979 "qb64pe.bas"
if(!qbevent)break;evnt(16979);}while(r);
#line 16980 "qb64pe.bas"
S_19480:;
#line 16980 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16980 "qb64pe.bas"
if(qbevent){evnt(16980);if(r)goto S_19480;}
#line 16980 "qb64pe.bas"
do{
#line 16980 "qb64pe.bas"
goto exit_subfunc;
#line 16980 "qb64pe.bas"
if(!qbevent)break;evnt(16980);}while(r);
#line 16980 "qb64pe.bas"
}
#line 16982 "qb64pe.bas"
do{
#line 16982 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_PARENT_MODE= 0 ;
#line 16982 "qb64pe.bas"
if(!qbevent)break;evnt(16982);}while(r);
#line 16983 "qb64pe.bas"
S_19484:;
#line 16983 "qb64pe.bas"
if ((*(int16*)(((char*)__UDT_ID)+((0+520))))||is_error_pending()){
#line 16983 "qb64pe.bas"
if(qbevent){evnt(16983);if(r)goto S_19484;}
#line 16983 "qb64pe.bas"
do{
#line 16983 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_PARENT_MODE=*(int16*)(((char*)__UDT_ID)+((0+522)));
#line 16983 "qb64pe.bas"
if(!qbevent)break;evnt(16983);}while(r);
#line 16983 "qb64pe.bas"
}
#line 16985 "qb64pe.bas"
do{
#line 16985 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ROOT_TEXT,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("UDT_",4)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1))));
#line 16985 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16985 "qb64pe.bas"
if(!qbevent)break;evnt(16985);}while(r);
#line 16986 "qb64pe.bas"
S_19488:;
#line 16986 "qb64pe.bas"
if ((*(int32*)(((char*)__UDT_ID)+((0+512))))||is_error_pending()){
#line 16986 "qb64pe.bas"
if(qbevent){evnt(16986);if(r)goto S_19488;}
#line 16987 "qb64pe.bas"
do{
#line 16987 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ARRAY_DESC_TEXT,qbs_add(qbs_add(FUNC_SCOPE(),qbs_new_txt_len("ARRAY_UDT_",10)),qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1))));
#line 16987 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16987 "qb64pe.bas"
if(!qbevent)break;evnt(16987);}while(r);
#line 16988 "qb64pe.bas"
do{
#line 16988 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ROOT_TEXT,qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_ARRAY_DESC_TEXT,qbs_new_txt_len("[0]",3)));
#line 16988 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16988 "qb64pe.bas"
if(!qbevent)break;evnt(16988);}while(r);
#line 16989 "qb64pe.bas"
do{
#line 16989 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_PARENT_UDT=*(int32*)(((char*)__UDT_ID)+((0+512)))& 4095ll ;
#line 16989 "qb64pe.bas"
if(!qbevent)break;evnt(16989);}while(r);
#line 16990 "qb64pe.bas"
S_19492:;
#line 16990 "qb64pe.bas"
if ((*__LONG_CHECKINGON)||is_error_pending()){
#line 16990 "qb64pe.bas"
if(qbevent){evnt(16990);if(r)goto S_19492;}
#line 16991 "qb64pe.bas"
do{
#line 16991 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ROOT_TEXT,FUNC_UDTROOTDATAGUARD(_SUB_BUILDUDTMEMBERARG_STRING_ARRAY_DESC_TEXT,_SUB_BUILDUDTMEMBERARG_LONG_PARENT_UDT,_SUB_BUILDUDTMEMBERARG_LONG_PARENT_MODE));
#line 16991 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16991 "qb64pe.bas"
if(!qbevent)break;evnt(16991);}while(r);
#line 16992 "qb64pe.bas"
S_19494:;
#line 16992 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16992 "qb64pe.bas"
if(qbevent){evnt(16992);if(r)goto S_19494;}
#line 16992 "qb64pe.bas"
do{
#line 16992 "qb64pe.bas"
goto exit_subfunc;
#line 16992 "qb64pe.bas"
if(!qbevent)break;evnt(16992);}while(r);
#line 16992 "qb64pe.bas"
}
#line 16993 "qb64pe.bas"
}
#line 16994 "qb64pe.bas"
}else{
#line 16995 "qb64pe.bas"
do{
#line 16995 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_PARENT_UDT=*(int32*)(((char*)__UDT_ID)+((0+540)))& 4095ll ;
#line 16995 "qb64pe.bas"
if(!qbevent)break;evnt(16995);}while(r);
#line 16996 "qb64pe.bas"
}
#line 16998 "qb64pe.bas"
S_19501:;
#line 16998 "qb64pe.bas"
if ((*(int16*)(((char*)__UDT_ID)+((0+520)))&FUNC_UDTMEMBERDYNDESC(_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID))||is_error_pending()){
#line 16998 "qb64pe.bas"
if(qbevent){evnt(16998);if(r)goto S_19501;}
#line 16999 "qb64pe.bas"
do{
#line 16999 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_DESC_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(*((ptrszint**)(((char*)",24),_SUB_BUILDUDTMEMBERARG_STRING_ROOT_TEXT),qbs_new_txt_len(")+(",3)),_SUB_BUILDUDTMEMBERARG_STRING_OFFSET_TEXT),qbs_new_txt_len("))))",4)));
#line 16999 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16999 "qb64pe.bas"
if(!qbevent)break;evnt(16999);}while(r);
#line 17000 "qb64pe.bas"
do{
#line 17000 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_DESC_TEXT,FUNC_UDTDYNARRAYDESCGUARD(_SUB_BUILDUDTMEMBERARG_STRING_DESC_TEXT,_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT));
#line 17000 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17000 "qb64pe.bas"
if(!qbevent)break;evnt(17000);}while(r);
#line 17001 "qb64pe.bas"
S_19504:;
#line 17001 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 17001 "qb64pe.bas"
if(qbevent){evnt(17001);if(r)goto S_19504;}
#line 17001 "qb64pe.bas"
do{
#line 17001 "qb64pe.bas"
goto exit_subfunc;
#line 17001 "qb64pe.bas"
if(!qbevent)break;evnt(17001);}while(r);
#line 17001 "qb64pe.bas"
}
#line 17002 "qb64pe.bas"
do{
#line 17002 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ARG_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_DESC_TEXT);
#line 17002 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17002 "qb64pe.bas"
if(!qbevent)break;evnt(17002);}while(r);
#line 17003 "qb64pe.bas"
do{
#line 17003 "qb64pe.bas"
goto exit_subfunc;
#line 17003 "qb64pe.bas"
if(!qbevent)break;evnt(17003);}while(r);
#line 17004 "qb64pe.bas"
}
#line 17006 "qb64pe.bas"
do{
#line 17006 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME,qbs_add(qbs_new_txt_len("udt_member_arg_",15),qbs__tostr((int32)(FUNC_UNIQUENUMBER()),NULL,0)));
#line 17006 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17006 "qb64pe.bas"
if(!qbevent)break;evnt(17006);}while(r);
#line 17007 "qb64pe.bas"
do{
#line 17007 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_COUNT=( 4 **_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT)+( 5 );
#line 17007 "qb64pe.bas"
if(!qbevent)break;evnt(17007);}while(r);
#line 17008 "qb64pe.bas"
do{
#line 17008 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_LOCK_INDEX=( 4 **_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT)+( 4 );
#line 17008 "qb64pe.bas"
if(!qbevent)break;evnt(17008);}while(r);
#line 17009 "qb64pe.bas"
do{
#line 17009 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_FLAG_VALUE= 1 + 2 ;
#line 17009 "qb64pe.bas"
if(!qbevent)break;evnt(17009);}while(r);
#line 17010 "qb64pe.bas"
S_19514:;
#line 17010 "qb64pe.bas"
if (((*(int32*)(((char*)__UDT_ID)+((0+540)))&*__LONG_ISINCONVENTIONALMEMORY)|(*(int32*)(((char*)__UDT_ID)+((0+512)))&*__LONG_ISINCONVENTIONALMEMORY))||is_error_pending()){
#line 17010 "qb64pe.bas"
if(qbevent){evnt(17010);if(r)goto S_19514;}
#line 17010 "qb64pe.bas"
do{
#line 17010 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_FLAG_VALUE=*_SUB_BUILDUDTMEMBERARG_LONG_FLAG_VALUE+ 4 ;
#line 17010 "qb64pe.bas"
if(!qbevent)break;evnt(17010);}while(r);
#line 17010 "qb64pe.bas"
}
#line 17012 "qb64pe.bas"
S_19517:;
#line 17012 "qb64pe.bas"
if ((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)||is_error_pending()){
#line 17012 "qb64pe.bas"
if(qbevent){evnt(17012);if(r)goto S_19517;}
#line 17013 "qb64pe.bas"
do{
#line 17013 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 17013 "qb64pe.bas"
if(!qbevent)break;evnt(17013);}while(r);
#line 17014 "qb64pe.bas"
S_19519:;
#line 17014 "qb64pe.bas"
if ((-(*_SUB_BUILDUDTMEMBERARG_LONG_PARENT_MODE> 0 ))||is_error_pending()){
#line 17014 "qb64pe.bas"
if(qbevent){evnt(17014);if(r)goto S_19519;}
#line 17015 "qb64pe.bas"
S_19520:;
#line 17015 "qb64pe.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_BUILDUDTMEMBERARG_LONG_NESTED_UDT,_SUB_BUILDUDTMEMBERARG_LONG_PARENT_MODE))||is_error_pending()){
#line 17015 "qb64pe.bas"
if(qbevent){evnt(17015);if(r)goto S_19520;}
#line 17015 "qb64pe.bas"
do{
#line 17015 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_FLAG_VALUE=*_SUB_BUILDUDTMEMBERARG_LONG_FLAG_VALUE+ 8 ;
#line 17015 "qb64pe.bas"
if(!qbevent)break;evnt(17015);}while(r);
#line 17015 "qb64pe.bas"
}
#line 17016 "qb64pe.bas"
}
#line 17017 "qb64pe.bas"
}
#line 17019 "qb64pe.bas"
do{
#line 17019 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT,qbs_add(func_chr( 13 ),func_chr( 10 )));
#line 17019 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17019 "qb64pe.bas"
if(!qbevent)break;evnt(17019);}while(r);
#line 17020 "qb64pe.bas"
do{
#line 17020 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_DATA_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(((char*)",9),_SUB_BUILDUDTMEMBERARG_STRING_ROOT_TEXT),qbs_new_txt_len(")+(",3)),_SUB_BUILDUDTMEMBERARG_STRING_OFFSET_TEXT),qbs_new_txt_len("))",2)));
#line 17020 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17020 "qb64pe.bas"
if(!qbevent)break;evnt(17020);}while(r);
#line 17022 "qb64pe.bas"
do{
#line 17022 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("ptrszint ",9),_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_COUNT),NULL,0)),qbs_new_txt_len("];",2)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17022 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17022 "qb64pe.bas"
if(!qbevent)break;evnt(17022);}while(r);
#line 17023 "qb64pe.bas"
do{
#line 17023 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[0]=(ptrszint)",14)),_SUB_BUILDUDTMEMBERARG_STRING_DATA_TEXT),qbs_new_txt_len(";",1)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17023 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17023 "qb64pe.bas"
if(!qbevent)break;evnt(17023);}while(r);
#line 17024 "qb64pe.bas"
do{
#line 17024 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[1]=0;",6)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17024 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17024 "qb64pe.bas"
if(!qbevent)break;evnt(17024);}while(r);
#line 17025 "qb64pe.bas"
do{
#line 17025 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[2]=",4)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_FLAG_VALUE),NULL,0)),qbs_new_txt_len(";",1)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17025 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17025 "qb64pe.bas"
if(!qbevent)break;evnt(17025);}while(r);
#line 17026 "qb64pe.bas"
do{
#line 17026 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[3]=",4)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT),NULL,0)),qbs_new_txt_len(";",1)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17026 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17026 "qb64pe.bas"
if(!qbevent)break;evnt(17026);}while(r);
#line 17028 "qb64pe.bas"
do{
#line 17028 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_DESC_POS= 1 ;
#line 17028 "qb64pe.bas"
if(!qbevent)break;evnt(17028);}while(r);
#line 17029 "qb64pe.bas"
do{
#line 17029 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_STRIDE_VALUE= 1 ;
#line 17029 "qb64pe.bas"
if(!qbevent)break;evnt(17029);}while(r);
#line 17030 "qb64pe.bas"
S_19534:;
#line 17030 "qb64pe.bas"
fornext_value2309= 1 ;
#line 17030 "qb64pe.bas"
fornext_finalvalue2309=*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT;
#line 17030 "qb64pe.bas"
fornext_step2309= 1 ;
#line 17030 "qb64pe.bas"
if (fornext_step2309<0) fornext_step_negative2309=1; else fornext_step_negative2309=0;
#line 17030 "qb64pe.bas"
if (is_error_pending()) goto fornext_error2309;
#line 17030 "qb64pe.bas"
goto fornext_entrylabel2309;
#line 17030 "qb64pe.bas"
while(1){
#line 17030 "qb64pe.bas"
fornext_value2309=fornext_step2309+(*_SUB_BUILDUDTMEMBERARG_LONG_DIM_INDEX);
#line 17030 "qb64pe.bas"
fornext_entrylabel2309:
#line 17030 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_DIM_INDEX=fornext_value2309;
#line 17030 "qb64pe.bas"
if (fornext_step_negative2309){
#line 17030 "qb64pe.bas"
if (fornext_value2309<fornext_finalvalue2309) break;
#line 17030 "qb64pe.bas"
}else{
#line 17030 "qb64pe.bas"
if (fornext_value2309>fornext_finalvalue2309) break;
#line 17030 "qb64pe.bas"
}
#line 17030 "qb64pe.bas"
fornext_error2309:;
#line 17030 "qb64pe.bas"
if(qbevent){evnt(17030);if(r)goto S_19534;}
#line 17031 "qb64pe.bas"
S_19535:;
#line 17031 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,-(FUNC_PARSENEXTUDTARRAYDESCRIPTORDIM((((qbs**)(__ARRAY_STRING_UDTEARRAYDESC[0]))[array_check((*_SUB_BUILDUDTMEMBERARG_LONG_MEMBER_ID)-__ARRAY_STRING_UDTEARRAYDESC[4],__ARRAY_STRING_UDTEARRAYDESC[5])]),_SUB_BUILDUDTMEMBERARG_LONG_DESC_POS,_SUB_BUILDUDTMEMBERARG_LONG_DIM_LOWER,_SUB_BUILDUDTMEMBERARG_LONG_DIM_ELEMENTS)== 0 )))||is_error_pending()){
#line 17031 "qb64pe.bas"
if(qbevent){evnt(17031);if(r)goto S_19535;}
#line 17032 "qb64pe.bas"
do{
#line 17032 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot process the declared bounds of this TYPE member array",60));
#line 17032 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17032 "qb64pe.bas"
if(!qbevent)break;evnt(17032);}while(r);
#line 17032 "qb64pe.bas"
do{
#line 17032 "qb64pe.bas"
goto exit_subfunc;
#line 17032 "qb64pe.bas"
if(!qbevent)break;evnt(17032);}while(r);
#line 17033 "qb64pe.bas"
}
#line 17035 "qb64pe.bas"
do{
#line 17035 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_INDEX=((*_SUB_BUILDUDTMEMBERARG_LONG_DIM_COUNT-*_SUB_BUILDUDTMEMBERARG_LONG_DIM_INDEX)* 4 )+( 4 );
#line 17035 "qb64pe.bas"
if(!qbevent)break;evnt(17035);}while(r);
#line 17036 "qb64pe.bas"
do{
#line 17036 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_INDEX),NULL,0)),qbs_new_txt_len("]=",2)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_DIM_LOWER),NULL,0)),qbs_new_txt_len(";",1)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17036 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17036 "qb64pe.bas"
if(!qbevent)break;evnt(17036);}while(r);
#line 17037 "qb64pe.bas"
do{
#line 17037 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_INDEX+ 1 ),NULL,0)),qbs_new_txt_len("]=",2)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_DIM_ELEMENTS),NULL,0)),qbs_new_txt_len(";",1)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17037 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17037 "qb64pe.bas"
if(!qbevent)break;evnt(17037);}while(r);
#line 17038 "qb64pe.bas"
do{
#line 17038 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_INDEX+ 2 ),NULL,0)),qbs_new_txt_len("]=",2)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_STRIDE_VALUE),NULL,0)),qbs_new_txt_len(";",1)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17038 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17038 "qb64pe.bas"
if(!qbevent)break;evnt(17038);}while(r);
#line 17039 "qb64pe.bas"
do{
#line 17039 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_BUILDUDTMEMBERARG_LONG_SLOT_INDEX+ 3 ),NULL,0)),qbs_new_txt_len("]=0;",4)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17039 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17039 "qb64pe.bas"
if(!qbevent)break;evnt(17039);}while(r);
#line 17040 "qb64pe.bas"
do{
#line 17040 "qb64pe.bas"
*_SUB_BUILDUDTMEMBERARG_LONG_STRIDE_VALUE=*_SUB_BUILDUDTMEMBERARG_LONG_STRIDE_VALUE**_SUB_BUILDUDTMEMBERARG_LONG_DIM_ELEMENTS;
#line 17040 "qb64pe.bas"
if(!qbevent)break;evnt(17040);}while(r);
#line 17041 "qb64pe.bas"
fornext_continue_2308:;
#line 17041 "qb64pe.bas"
}
#line 17041 "qb64pe.bas"
fornext_exit_2308:;
#line 17043 "qb64pe.bas"
do{
#line 17043 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDUDTMEMBERARG_STRING_PREP_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_SUB_BUILDUDTMEMBERARG_LONG_LOCK_INDEX),NULL,0)),qbs_new_txt_len("]=(ptrszint)sf_mem_lock;",24)),_SUB_BUILDUDTMEMBERARG_STRING_CRLF_TEXT));
#line 17043 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17043 "qb64pe.bas"
if(!qbevent)break;evnt(17043);}while(r);
#line 17044 "qb64pe.bas"
do{
#line 17044 "qb64pe.bas"
qbs_set(_SUB_BUILDUDTMEMBERARG_STRING_ARG_TEXT,_SUB_BUILDUDTMEMBERARG_STRING_TEMP_NAME);
#line 17044 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17044 "qb64pe.bas"
if(!qbevent)break;evnt(17044);}while(r);
#line 17045 "qb64pe.bas"
exit_subfunc:;
#line 17045 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 17045 "qb64pe.bas"
#include "free45.txt"
#line 17045 "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 17045 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 17045 "qb64pe.bas"
}
