#line 801 "utilities/type.bas"
void SUB_BUILDUDTDYNLAYOUTM(int32*_SUB_BUILDUDTDYNLAYOUTM_LONG_UDT_INDEX,int32*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUT_MODE){
#line 801 "utilities/type.bas"
qbs *tqbs;
#line 801 "utilities/type.bas"
ptrszint tmp_long;
#line 801 "utilities/type.bas"
int32 tmp_fileno;
#line 801 "utilities/type.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 801 "utilities/type.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 801 "utilities/type.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 801 "utilities/type.bas"
#include "data300.txt"
#line 801 "utilities/type.bas"
mem_lock *sf_mem_lock;
#line 801 "utilities/type.bas"
new_mem_lock();
#line 801 "utilities/type.bas"
sf_mem_lock=mem_lock_tmp;
#line 801 "utilities/type.bas"
sf_mem_lock->type=3;
#line 801 "utilities/type.bas"
libqb_check_stack();
#line 801 "utilities/type.bas"
if (is_error_pending()) goto exit_subfunc;
#line 806 "utilities/type.bas"
do{
#line 806 "utilities/type.bas"
if(!qbevent)break;evnt(28809,806,"type.bas");}while(r);
#line 807 "utilities/type.bas"
do{
#line 807 "utilities/type.bas"
if(!qbevent)break;evnt(28809,807,"type.bas");}while(r);
#line 808 "utilities/type.bas"
do{
#line 808 "utilities/type.bas"
if(!qbevent)break;evnt(28809,808,"type.bas");}while(r);
#line 809 "utilities/type.bas"
do{
#line 809 "utilities/type.bas"
if(!qbevent)break;evnt(28809,809,"type.bas");}while(r);
#line 810 "utilities/type.bas"
do{
#line 810 "utilities/type.bas"
if(!qbevent)break;evnt(28809,810,"type.bas");}while(r);
#line 811 "utilities/type.bas"
do{
#line 811 "utilities/type.bas"
if(!qbevent)break;evnt(28809,811,"type.bas");}while(r);
#line 812 "utilities/type.bas"
do{
#line 812 "utilities/type.bas"
if(!qbevent)break;evnt(28809,812,"type.bas");}while(r);
#line 814 "utilities/type.bas"
do{
#line 814 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_UDT_INDEX)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
#line 814 "utilities/type.bas"
if(!qbevent)break;evnt(28809,814,"type.bas");}while(r);
#line 815 "utilities/type.bas"
do{
#line 815 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS= 0 ;
#line 815 "utilities/type.bas"
if(!qbevent)break;evnt(28809,815,"type.bas");}while(r);
#line 816 "utilities/type.bas"
do{
#line 816 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_PTRBITS=*__LONG_OFFSETTYPE& 4095ll ;
#line 816 "utilities/type.bas"
if(!qbevent)break;evnt(28809,816,"type.bas");}while(r);
#line 817 "utilities/type.bas"
do{
#line 817 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUTALIGN= 8 ;
#line 817 "utilities/type.bas"
if(!qbevent)break;evnt(28809,817,"type.bas");}while(r);
#line 819 "utilities/type.bas"
S_43237:;
#line 819 "utilities/type.bas"
while((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)||is_error_pending()){
#line 819 "utilities/type.bas"
if(qbevent){evnt(28809,819,"type.bas");if(r)goto S_43237;}
#line 820 "utilities/type.bas"
do{
#line 820 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN= 8 ;
#line 820 "utilities/type.bas"
if(!qbevent)break;evnt(28809,820,"type.bas");}while(r);
#line 821 "utilities/type.bas"
S_43239:;
#line 821 "utilities/type.bas"
if ((FUNC_UDTMEMBERDYNDESC(_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID))||is_error_pending()){
#line 821 "utilities/type.bas"
if(qbevent){evnt(28809,821,"type.bas");if(r)goto S_43239;}
#line 822 "utilities/type.bas"
do{
#line 822 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN=*_SUB_BUILDUDTDYNLAYOUTM_LONG_PTRBITS;
#line 822 "utilities/type.bas"
if(!qbevent)break;evnt(28809,822,"type.bas");}while(r);
#line 823 "utilities/type.bas"
S_43241:;
#line 823 "utilities/type.bas"
}else{
#line 823 "utilities/type.bas"
if (-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 )){
#line 823 "utilities/type.bas"
if(qbevent){evnt(28809,823,"type.bas");if(r)goto S_43241;}
#line 824 "utilities/type.bas"
do{
#line 824 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 824 "utilities/type.bas"
if(!qbevent)break;evnt(28809,824,"type.bas");}while(r);
#line 825 "utilities/type.bas"
S_43243:;
#line 825 "utilities/type.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT,_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUT_MODE))||is_error_pending()){
#line 825 "utilities/type.bas"
if(qbevent){evnt(28809,825,"type.bas");if(r)goto S_43243;}
#line 825 "utilities/type.bas"
do{
#line 825 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN=*_SUB_BUILDUDTDYNLAYOUTM_LONG_PTRBITS;
#line 825 "utilities/type.bas"
if(!qbevent)break;evnt(28809,825,"type.bas");}while(r);
#line 825 "utilities/type.bas"
}
#line 826 "utilities/type.bas"
}
#line 826 "utilities/type.bas"
}
#line 832 "utilities/type.bas"
S_43247:;
#line 832 "utilities/type.bas"
if ((-(*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN> 8 ))||is_error_pending()){
#line 832 "utilities/type.bas"
if(qbevent){evnt(28809,832,"type.bas");if(r)goto S_43247;}
#line 833 "utilities/type.bas"
S_43248:;
#line 833 "utilities/type.bas"
if ((qb_safe_mod(*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS,*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN))||is_error_pending()){
#line 833 "utilities/type.bas"
if(qbevent){evnt(28809,833,"type.bas");if(r)goto S_43248;}
#line 833 "utilities/type.bas"
do{
#line 833 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS=*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS+*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN-(qb_safe_mod(*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS,*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERALIGN));
#line 833 "utilities/type.bas"
if(!qbevent)break;evnt(28809,833,"type.bas");}while(r);
#line 833 "utilities/type.bas"
}
#line 834 "utilities/type.bas"
do{
#line 834 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUTALIGN=*_SUB_BUILDUDTDYNLAYOUTM_LONG_PTRBITS;
#line 834 "utilities/type.bas"
if(!qbevent)break;evnt(28809,834,"type.bas");}while(r);
#line 835 "utilities/type.bas"
}
#line 837 "utilities/type.bas"
do{
#line 837 "utilities/type.bas"
tmp_long=array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEFDYNOFFSET[4],__ARRAY_LONG_UDTEFDYNOFFSET[5]);
#line 837 "utilities/type.bas"
if (!is_error_pending()) ((int32*)(__ARRAY_LONG_UDTEFDYNOFFSET[0]))[tmp_long]=*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS;
#line 837 "utilities/type.bas"
if(!qbevent)break;evnt(28809,837,"type.bas");}while(r);
#line 839 "utilities/type.bas"
S_43254:;
#line 839 "utilities/type.bas"
if ((FUNC_UDTMEMBERDYNDESC(_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID))||is_error_pending()){
#line 839 "utilities/type.bas"
if(qbevent){evnt(28809,839,"type.bas");if(r)goto S_43254;}
#line 843 "utilities/type.bas"
do{
#line 843 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=*_SUB_BUILDUDTDYNLAYOUTM_LONG_PTRBITS;
#line 843 "utilities/type.bas"
if(!qbevent)break;evnt(28809,843,"type.bas");}while(r);
#line 844 "utilities/type.bas"
S_43256:;
#line 844 "utilities/type.bas"
}else{
#line 844 "utilities/type.bas"
if (((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]){
#line 844 "utilities/type.bas"
if(qbevent){evnt(28809,844,"type.bas");if(r)goto S_43256;}
#line 845 "utilities/type.bas"
S_43257:;
#line 845 "utilities/type.bas"
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 ))||is_error_pending()){
#line 845 "utilities/type.bas"
if(qbevent){evnt(28809,845,"type.bas");if(r)goto S_43257;}
#line 846 "utilities/type.bas"
do{
#line 846 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 846 "utilities/type.bas"
if(!qbevent)break;evnt(28809,846,"type.bas");}while(r);
#line 847 "utilities/type.bas"
S_43259:;
#line 847 "utilities/type.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT,_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUT_MODE))||is_error_pending()){
#line 847 "utilities/type.bas"
if(qbevent){evnt(28809,847,"type.bas");if(r)goto S_43259;}
#line 848 "utilities/type.bas"
do{
#line 848 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]*FUNC_UDTDYNLAYOUTSIZE(_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT);
#line 848 "utilities/type.bas"
if(!qbevent)break;evnt(28809,848,"type.bas");}while(r);
#line 849 "utilities/type.bas"
}else{
#line 850 "utilities/type.bas"
do{
#line 850 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])];
#line 850 "utilities/type.bas"
if(!qbevent)break;evnt(28809,850,"type.bas");}while(r);
#line 851 "utilities/type.bas"
}
#line 852 "utilities/type.bas"
}else{
#line 853 "utilities/type.bas"
do{
#line 853 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])];
#line 853 "utilities/type.bas"
if(!qbevent)break;evnt(28809,853,"type.bas");}while(r);
#line 854 "utilities/type.bas"
}
#line 855 "utilities/type.bas"
S_43267:;
#line 855 "utilities/type.bas"
}else{
#line 855 "utilities/type.bas"
if (((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT){
#line 855 "utilities/type.bas"
if(qbevent){evnt(28809,855,"type.bas");if(r)goto S_43267;}
#line 856 "utilities/type.bas"
do{
#line 856 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 856 "utilities/type.bas"
if(!qbevent)break;evnt(28809,856,"type.bas");}while(r);
#line 857 "utilities/type.bas"
S_43269:;
#line 857 "utilities/type.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT,_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUT_MODE))||is_error_pending()){
#line 857 "utilities/type.bas"
if(qbevent){evnt(28809,857,"type.bas");if(r)goto S_43269;}
#line 858 "utilities/type.bas"
do{
#line 858 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=FUNC_UDTDYNLAYOUTSIZE(_SUB_BUILDUDTDYNLAYOUTM_LONG_NESTED_UDT);
#line 858 "utilities/type.bas"
if(!qbevent)break;evnt(28809,858,"type.bas");}while(r);
#line 859 "utilities/type.bas"
}else{
#line 860 "utilities/type.bas"
do{
#line 860 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])];
#line 860 "utilities/type.bas"
if(!qbevent)break;evnt(28809,860,"type.bas");}while(r);
#line 861 "utilities/type.bas"
}
#line 862 "utilities/type.bas"
}else{
#line 863 "utilities/type.bas"
do{
#line 863 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE=((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])];
#line 863 "utilities/type.bas"
if(!qbevent)break;evnt(28809,863,"type.bas");}while(r);
#line 864 "utilities/type.bas"
}
#line 864 "utilities/type.bas"
}
#line 864 "utilities/type.bas"
}
#line 866 "utilities/type.bas"
do{
#line 866 "utilities/type.bas"
tmp_long=array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEFDYNSIZE[4],__ARRAY_LONG_UDTEFDYNSIZE[5]);
#line 866 "utilities/type.bas"
if (!is_error_pending()) ((int32*)(__ARRAY_LONG_UDTEFDYNSIZE[0]))[tmp_long]=*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE;
#line 866 "utilities/type.bas"
if(!qbevent)break;evnt(28809,866,"type.bas");}while(r);
#line 868 "utilities/type.bas"
do{
#line 868 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS=*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS+*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBERSIZE;
#line 868 "utilities/type.bas"
if(!qbevent)break;evnt(28809,868,"type.bas");}while(r);
#line 869 "utilities/type.bas"
do{
#line 869 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_MEMBER_ID)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
#line 869 "utilities/type.bas"
if(!qbevent)break;evnt(28809,869,"type.bas");}while(r);
#line 870 "utilities/type.bas"
dl_continue_4289:;
#line 870 "utilities/type.bas"
}
#line 870 "utilities/type.bas"
dl_exit_4289:;
#line 875 "utilities/type.bas"
S_43281:;
#line 875 "utilities/type.bas"
if ((-(*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUTALIGN> 8 ))||is_error_pending()){
#line 875 "utilities/type.bas"
if(qbevent){evnt(28809,875,"type.bas");if(r)goto S_43281;}
#line 876 "utilities/type.bas"
S_43282:;
#line 876 "utilities/type.bas"
if ((qb_safe_mod(*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS,*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUTALIGN))||is_error_pending()){
#line 876 "utilities/type.bas"
if(qbevent){evnt(28809,876,"type.bas");if(r)goto S_43282;}
#line 876 "utilities/type.bas"
do{
#line 876 "utilities/type.bas"
*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS=*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS+*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUTALIGN-(qb_safe_mod(*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS,*_SUB_BUILDUDTDYNLAYOUTM_LONG_LAYOUTALIGN));
#line 876 "utilities/type.bas"
if(!qbevent)break;evnt(28809,876,"type.bas");}while(r);
#line 876 "utilities/type.bas"
}
#line 877 "utilities/type.bas"
}
#line 879 "utilities/type.bas"
do{
#line 879 "utilities/type.bas"
tmp_long=array_check((*_SUB_BUILDUDTDYNLAYOUTM_LONG_UDT_INDEX)-__ARRAY_LONG_UDTXFDYNSIZE[4],__ARRAY_LONG_UDTXFDYNSIZE[5]);
#line 879 "utilities/type.bas"
if (!is_error_pending()) ((int32*)(__ARRAY_LONG_UDTXFDYNSIZE[0]))[tmp_long]=*_SUB_BUILDUDTDYNLAYOUTM_LONG_DYNBITS;
#line 879 "utilities/type.bas"
if(!qbevent)break;evnt(28809,879,"type.bas");}while(r);
#line 880 "utilities/type.bas"
exit_subfunc:;
#line 880 "utilities/type.bas"
free_mem_lock(sf_mem_lock);
#line 880 "utilities/type.bas"
#include "free300.txt"
#line 880 "utilities/type.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 880 "utilities/type.bas"
cmem_sp=tmp_cmem_sp;
#line 880 "utilities/type.bas"
}
