#line 15742 "qb64pe.bas"
int16 FUNC_UDTFORCEDDYNMEMBERS(int32*_FUNC_UDTFORCEDDYNMEMBERS_LONG_UDT_INDEX){
#line 15742 "qb64pe.bas"
qbs *tqbs;
#line 15742 "qb64pe.bas"
ptrszint tmp_long;
#line 15742 "qb64pe.bas"
int32 tmp_fileno;
#line 15742 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 15742 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 15742 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 15742 "qb64pe.bas"
#include "data22.txt"
#line 15742 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 15742 "qb64pe.bas"
new_mem_lock();
#line 15742 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 15742 "qb64pe.bas"
sf_mem_lock->type=3;
#line 15742 "qb64pe.bas"
libqb_check_stack();
#line 15742 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 15743 "qb64pe.bas"
do{
#line 15743 "qb64pe.bas"
if(!qbevent)break;evnt(15743);}while(r);
#line 15744 "qb64pe.bas"
do{
#line 15744 "qb64pe.bas"
if(!qbevent)break;evnt(15744);}while(r);
#line 15746 "qb64pe.bas"
do{
#line 15746 "qb64pe.bas"
*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_UDT_INDEX)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
#line 15746 "qb64pe.bas"
if(!qbevent)break;evnt(15746);}while(r);
#line 15747 "qb64pe.bas"
S_18188:;
#line 15747 "qb64pe.bas"
while((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID)||is_error_pending()){
#line 15747 "qb64pe.bas"
if(qbevent){evnt(15747);if(r)goto S_18188;}
#line 15748 "qb64pe.bas"
S_18189:;
#line 15748 "qb64pe.bas"
if ((((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])])||is_error_pending()){
#line 15748 "qb64pe.bas"
if(qbevent){evnt(15748);if(r)goto S_18189;}
#line 15749 "qb64pe.bas"
S_18190:;
#line 15749 "qb64pe.bas"
if ((-(((int32*)(__ARRAY_LONG_UDTEARRAYFIELDMODE[0]))[array_check((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYFIELDMODE[4],__ARRAY_LONG_UDTEARRAYFIELDMODE[5])]== 2 ))||is_error_pending()){
#line 15749 "qb64pe.bas"
if(qbevent){evnt(15749);if(r)goto S_18190;}
#line 15749 "qb64pe.bas"
do{
#line 15749 "qb64pe.bas"
*_FUNC_UDTFORCEDDYNMEMBERS_INTEGER_UDTFORCEDDYNMEMBERS= -1 ;
#line 15749 "qb64pe.bas"
if(!qbevent)break;evnt(15749);}while(r);
#line 15749 "qb64pe.bas"
do{
#line 15749 "qb64pe.bas"
goto exit_subfunc;
#line 15749 "qb64pe.bas"
if(!qbevent)break;evnt(15749);}while(r);
#line 15749 "qb64pe.bas"
}
#line 15750 "qb64pe.bas"
}
#line 15751 "qb64pe.bas"
S_18195:;
#line 15751 "qb64pe.bas"
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 ))||is_error_pending()){
#line 15751 "qb64pe.bas"
if(qbevent){evnt(15751);if(r)goto S_18195;}
#line 15752 "qb64pe.bas"
do{
#line 15752 "qb64pe.bas"
*_FUNC_UDTFORCEDDYNMEMBERS_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 15752 "qb64pe.bas"
if(!qbevent)break;evnt(15752);}while(r);
#line 15753 "qb64pe.bas"
S_18197:;
#line 15753 "qb64pe.bas"
if ((FUNC_UDTFORCEDDYNMEMBERS(_FUNC_UDTFORCEDDYNMEMBERS_LONG_NESTED_UDT))||is_error_pending()){
#line 15753 "qb64pe.bas"
if(qbevent){evnt(15753);if(r)goto S_18197;}
#line 15753 "qb64pe.bas"
do{
#line 15753 "qb64pe.bas"
*_FUNC_UDTFORCEDDYNMEMBERS_INTEGER_UDTFORCEDDYNMEMBERS= -1 ;
#line 15753 "qb64pe.bas"
if(!qbevent)break;evnt(15753);}while(r);
#line 15753 "qb64pe.bas"
do{
#line 15753 "qb64pe.bas"
goto exit_subfunc;
#line 15753 "qb64pe.bas"
if(!qbevent)break;evnt(15753);}while(r);
#line 15753 "qb64pe.bas"
}
#line 15754 "qb64pe.bas"
}
#line 15755 "qb64pe.bas"
do{
#line 15755 "qb64pe.bas"
*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_FUNC_UDTFORCEDDYNMEMBERS_LONG_MEMBER_ID)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
#line 15755 "qb64pe.bas"
if(!qbevent)break;evnt(15755);}while(r);
#line 15756 "qb64pe.bas"
dl_continue_2123:;
#line 15756 "qb64pe.bas"
}
#line 15756 "qb64pe.bas"
dl_exit_2123:;
#line 15757 "qb64pe.bas"
exit_subfunc:;
#line 15757 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 15757 "qb64pe.bas"
#include "free22.txt"
#line 15757 "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 15757 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 15757 "qb64pe.bas"
return *_FUNC_UDTFORCEDDYNMEMBERS_INTEGER_UDTFORCEDDYNMEMBERS;
#line 15757 "qb64pe.bas"
}
