#line 1913 "utilities/type.bas"
void SUB_APPENDLEGACYINLINEUDTVAROP(qbs*_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR,int32*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_UDT,qbs*_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ROOT_EXPR,qbs*_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,int32*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_LOOP_DEPTH,int32*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE,qbs*_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_PREFIX,int32*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE){
#line 1913 "utilities/type.bas"
qbs *tqbs;
#line 1913 "utilities/type.bas"
ptrszint tmp_long;
#line 1913 "utilities/type.bas"
int32 tmp_fileno;
#line 1913 "utilities/type.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 1913 "utilities/type.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 1913 "utilities/type.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 1913 "utilities/type.bas"
#include "data341.txt"
#line 1913 "utilities/type.bas"
mem_lock *sf_mem_lock;
#line 1913 "utilities/type.bas"
new_mem_lock();
#line 1913 "utilities/type.bas"
sf_mem_lock=mem_lock_tmp;
#line 1913 "utilities/type.bas"
sf_mem_lock->type=3;
#line 1913 "utilities/type.bas"
libqb_check_stack();
#line 1913 "utilities/type.bas"
if (is_error_pending()) goto exit_subfunc;
#line 1914 "utilities/type.bas"
do{
#line 1914 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1914,"type.bas");}while(r);
#line 1915 "utilities/type.bas"
do{
#line 1915 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1915,"type.bas");}while(r);
#line 1917 "utilities/type.bas"
S_44093:;
#line 1917 "utilities/type.bas"
if (((-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE!= 3 ))&(~(((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])])))||is_error_pending()){
#line 1917 "utilities/type.bas"
if(qbevent){evnt(28809,1917,"type.bas");if(r)goto S_44093;}
#line 1917 "utilities/type.bas"
do{
#line 1917 "utilities/type.bas"
goto exit_subfunc;
#line 1917 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1917,"type.bas");}while(r);
#line 1917 "utilities/type.bas"
}
#line 1919 "utilities/type.bas"
do{
#line 1919 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR,qbs_add(func_chr( 13 ),func_chr( 10 )));
#line 1919 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1919 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1919,"type.bas");}while(r);
#line 1920 "utilities/type.bas"
do{
#line 1920 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_OFFSET= 0 ;
#line 1920 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1920,"type.bas");}while(r);
#line 1921 "utilities/type.bas"
do{
#line 1921 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_UDT)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
#line 1921 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1921,"type.bas");}while(r);
#line 1922 "utilities/type.bas"
S_44099:;
#line 1922 "utilities/type.bas"
while((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)||is_error_pending()){
#line 1922 "utilities/type.bas"
if(qbevent){evnt(28809,1922,"type.bas");if(r)goto S_44099;}
#line 1923 "utilities/type.bas"
do{
#line 1923 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ROOT_EXPR),qbs_new_txt_len("+",1)),qbs__tostr((int32)(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_OFFSET),NULL,0)),qbs_new_txt_len(")",1)));
#line 1923 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1923 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1923,"type.bas");}while(r);
#line 1924 "utilities/type.bas"
do{
#line 1924 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_BYTES=qb_safe_idiv(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])], 8 );
#line 1924 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1924,"type.bas");}while(r);
#line 1925 "utilities/type.bas"
do{
#line 1925 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BYTES_TEXT,qbs__tostr((int32)(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_BYTES),NULL,0));
#line 1925 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1925 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1925,"type.bas");}while(r);
#line 1927 "utilities/type.bas"
S_44103:;
#line 1927 "utilities/type.bas"
if ((((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])])||is_error_pending()){
#line 1927 "utilities/type.bas"
if(qbevent){evnt(28809,1927,"type.bas");if(r)goto S_44103;}
#line 1928 "utilities/type.bas"
do{
#line 1928 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEM_BYTES=FUNC_UDT_ARRAY_MEMBER_BYTES(_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT);
#line 1928 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1928,"type.bas");}while(r);
#line 1929 "utilities/type.bas"
do{
#line 1929 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_COUNT_TEXT,qbs__tostr((int32)(((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]),NULL,0));
#line 1929 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1929 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1929,"type.bas");}while(r);
#line 1930 "utilities/type.bas"
do{
#line 1930 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_STRIDE_TEXT,qbs__tostr((int32)(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEM_BYTES),NULL,0));
#line 1930 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1930 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1930,"type.bas");}while(r);
#line 1932 "utilities/type.bas"
S_44107:;
#line 1932 "utilities/type.bas"
if (((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)!= 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 )))||is_error_pending()){
#line 1932 "utilities/type.bas"
if(qbevent){evnt(28809,1932,"type.bas");if(r)goto S_44107;}
#line 1933 "utilities/type.bas"
do{
#line 1933 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME,qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_PREFIX,qbs__tostr((int32)(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_LOOP_DEPTH),NULL,0)));
#line 1933 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1933 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1933,"type.bas");}while(r);
#line 1934 "utilities/type.bas"
do{
#line 1934 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("for(ptrszint ",13)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("=0;",3)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("<",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_COUNT_TEXT),qbs_new_txt_len(";",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("++){",4)));
#line 1934 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1934 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1934,"type.bas");}while(r);
#line 1935 "utilities/type.bas"
do{
#line 1935 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ITEM_EXPR,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len("+",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_STRIDE_TEXT),qbs_new_txt_len(")",1)));
#line 1935 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1935 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1935,"type.bas");}while(r);
#line 1936 "utilities/type.bas"
S_44111:;
#line 1936 "utilities/type.bas"
if(qbevent){evnt(28809,1936,"type.bas");if(r)goto S_44111;}
#line 1937 "utilities/type.bas"
S_44112:;
#line 1937 "utilities/type.bas"
if (((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE==( 1 )))||is_error_pending()){
#line 1937 "utilities/type.bas"
if(qbevent){evnt(28809,1937,"type.bas");if(r)goto S_44112;}
#line 1938 "utilities/type.bas"
do{
#line 1938 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("*(qbs**)(",9)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ITEM_EXPR),qbs_new_txt_len("))=qbs_new(0,0);",16)));
#line 1938 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1938 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1938,"type.bas");}while(r);
#line 1939 "utilities/type.bas"
sc_ec_208_end:;
#line 1939 "utilities/type.bas"
goto sc_4486_end;
#line 1939 "utilities/type.bas"
}
#line 1939 "utilities/type.bas"
S_44114:;
#line 1939 "utilities/type.bas"
if (((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE==( 2 )))||is_error_pending()){
#line 1939 "utilities/type.bas"
if(qbevent){evnt(28809,1939,"type.bas");if(r)goto S_44114;}
#line 1940 "utilities/type.bas"
do{
#line 1940 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("qbs_free(*(qbs**)(",18)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ITEM_EXPR),qbs_new_txt_len(")));",4)));
#line 1940 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1940 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1940,"type.bas");}while(r);
#line 1941 "utilities/type.bas"
sc_ec_209_end:;
#line 1941 "utilities/type.bas"
goto sc_4486_end;
#line 1941 "utilities/type.bas"
}
#line 1941 "utilities/type.bas"
S_44116:;
#line 1941 "utilities/type.bas"
if (((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE==( 3 )))||is_error_pending()){
#line 1941 "utilities/type.bas"
if(qbevent){evnt(28809,1941,"type.bas");if(r)goto S_44116;}
#line 1942 "utilities/type.bas"
do{
#line 1942 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("(*(qbs**)(",10)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ITEM_EXPR),qbs_new_txt_len(")))->len=0;",11)));
#line 1942 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1942 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1942,"type.bas");}while(r);
#line 1943 "utilities/type.bas"
sc_ec_210_end:;
#line 1943 "utilities/type.bas"
goto sc_4486_end;
#line 1943 "utilities/type.bas"
}
#line 1943 "utilities/type.bas"
sc_4486_end:;
#line 1944 "utilities/type.bas"
do{
#line 1944 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("}",1)));
#line 1944 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1944 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1944,"type.bas");}while(r);
#line 1945 "utilities/type.bas"
S_44120:;
#line 1945 "utilities/type.bas"
}else{
#line 1945 "utilities/type.bas"
if (-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 )){
#line 1945 "utilities/type.bas"
if(qbevent){evnt(28809,1945,"type.bas");if(r)goto S_44120;}
#line 1946 "utilities/type.bas"
do{
#line 1946 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 1946 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1946,"type.bas");}while(r);
#line 1947 "utilities/type.bas"
S_44122:;
#line 1947 "utilities/type.bas"
if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_NESTED_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]|((-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE== 3 ))&*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE))||is_error_pending()){
#line 1947 "utilities/type.bas"
if(qbevent){evnt(28809,1947,"type.bas");if(r)goto S_44122;}
#line 1948 "utilities/type.bas"
do{
#line 1948 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME,qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_PREFIX,qbs__tostr((int32)(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_LOOP_DEPTH),NULL,0)));
#line 1948 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1948 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1948,"type.bas");}while(r);
#line 1949 "utilities/type.bas"
do{
#line 1949 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("for(ptrszint ",13)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("=0;",3)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("<",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_COUNT_TEXT),qbs_new_txt_len(";",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("++){",4)));
#line 1949 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1949 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1949,"type.bas");}while(r);
#line 1950 "utilities/type.bas"
do{
#line 1950 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ITEM_EXPR,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len("+",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_STRIDE_TEXT),qbs_new_txt_len(")",1)));
#line 1950 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1950 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1950,"type.bas");}while(r);
#line 1951 "utilities/type.bas"
do{
#line 1951 "utilities/type.bas"
SUB_APPENDLEGACYINLINEUDTVAROP(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR,_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_NESTED_UDT,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ITEM_EXPR,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,&(pass4487=*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_LOOP_DEPTH+ 1 ),_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_PREFIX,_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE);
#line 1951 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1951 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1951,"type.bas");}while(r);
#line 1952 "utilities/type.bas"
S_44127:;
#line 1952 "utilities/type.bas"
if ((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE&*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 1952 "utilities/type.bas"
if(qbevent){evnt(28809,1952,"type.bas");if(r)goto S_44127;}
#line 1952 "utilities/type.bas"
do{
#line 1952 "utilities/type.bas"
goto exit_subfunc;
#line 1952 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1952,"type.bas");}while(r);
#line 1952 "utilities/type.bas"
}
#line 1953 "utilities/type.bas"
do{
#line 1953 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("}",1)));
#line 1953 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1953 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1953,"type.bas");}while(r);
#line 1954 "utilities/type.bas"
S_44131:;
#line 1954 "utilities/type.bas"
}else{
#line 1954 "utilities/type.bas"
if (-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE== 3 )){
#line 1954 "utilities/type.bas"
if(qbevent){evnt(28809,1954,"type.bas");if(r)goto S_44131;}
#line 1955 "utilities/type.bas"
do{
#line 1955 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("memset((void*)(",15)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len(")),0,",5)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BYTES_TEXT),qbs_new_txt_len(");",2)));
#line 1955 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1955 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1955,"type.bas");}while(r);
#line 1956 "utilities/type.bas"
}
#line 1956 "utilities/type.bas"
}
#line 1957 "utilities/type.bas"
S_44134:;
#line 1957 "utilities/type.bas"
}else{
#line 1957 "utilities/type.bas"
if (-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE== 3 )){
#line 1957 "utilities/type.bas"
if(qbevent){evnt(28809,1957,"type.bas");if(r)goto S_44134;}
#line 1958 "utilities/type.bas"
do{
#line 1958 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("memset((void*)(",15)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len(")),0,",5)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BYTES_TEXT),qbs_new_txt_len(");",2)));
#line 1958 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1958 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1958,"type.bas");}while(r);
#line 1959 "utilities/type.bas"
}
#line 1959 "utilities/type.bas"
}
#line 1959 "utilities/type.bas"
}
#line 1960 "utilities/type.bas"
S_44137:;
#line 1960 "utilities/type.bas"
}else{
#line 1960 "utilities/type.bas"
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISSTRING)!= 0 ))&(-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISFIXEDLENGTH)== 0 ))){
#line 1960 "utilities/type.bas"
if(qbevent){evnt(28809,1960,"type.bas");if(r)goto S_44137;}
#line 1961 "utilities/type.bas"
S_44138:;
#line 1961 "utilities/type.bas"
if(qbevent){evnt(28809,1961,"type.bas");if(r)goto S_44138;}
#line 1962 "utilities/type.bas"
S_44139:;
#line 1962 "utilities/type.bas"
if (((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE==( 1 )))||is_error_pending()){
#line 1962 "utilities/type.bas"
if(qbevent){evnt(28809,1962,"type.bas");if(r)goto S_44139;}
#line 1963 "utilities/type.bas"
do{
#line 1963 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("*(qbs**)(",9)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len("))=qbs_new(0,0);",16)));
#line 1963 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1963 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1963,"type.bas");}while(r);
#line 1964 "utilities/type.bas"
sc_ec_211_end:;
#line 1964 "utilities/type.bas"
goto sc_4488_end;
#line 1964 "utilities/type.bas"
}
#line 1964 "utilities/type.bas"
S_44141:;
#line 1964 "utilities/type.bas"
if (((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE==( 2 )))||is_error_pending()){
#line 1964 "utilities/type.bas"
if(qbevent){evnt(28809,1964,"type.bas");if(r)goto S_44141;}
#line 1965 "utilities/type.bas"
do{
#line 1965 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("qbs_free(*(qbs**)(",18)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len(")));",4)));
#line 1965 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1965 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1965,"type.bas");}while(r);
#line 1966 "utilities/type.bas"
sc_ec_212_end:;
#line 1966 "utilities/type.bas"
goto sc_4488_end;
#line 1966 "utilities/type.bas"
}
#line 1966 "utilities/type.bas"
S_44143:;
#line 1966 "utilities/type.bas"
if (((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE==( 3 )))||is_error_pending()){
#line 1966 "utilities/type.bas"
if(qbevent){evnt(28809,1966,"type.bas");if(r)goto S_44143;}
#line 1967 "utilities/type.bas"
do{
#line 1967 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("(*(qbs**)(",10)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len(")))->len=0;",11)));
#line 1967 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1967 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1967,"type.bas");}while(r);
#line 1968 "utilities/type.bas"
sc_ec_213_end:;
#line 1968 "utilities/type.bas"
goto sc_4488_end;
#line 1968 "utilities/type.bas"
}
#line 1968 "utilities/type.bas"
sc_4488_end:;
#line 1969 "utilities/type.bas"
S_44146:;
#line 1969 "utilities/type.bas"
}else{
#line 1969 "utilities/type.bas"
if (-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 )){
#line 1969 "utilities/type.bas"
if(qbevent){evnt(28809,1969,"type.bas");if(r)goto S_44146;}
#line 1970 "utilities/type.bas"
do{
#line 1970 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 1970 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1970,"type.bas");}while(r);
#line 1971 "utilities/type.bas"
S_44148:;
#line 1971 "utilities/type.bas"
if ((((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_NESTED_UDT)-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]|((-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE== 3 ))&*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE))||is_error_pending()){
#line 1971 "utilities/type.bas"
if(qbevent){evnt(28809,1971,"type.bas");if(r)goto S_44148;}
#line 1972 "utilities/type.bas"
do{
#line 1972 "utilities/type.bas"
SUB_APPENDLEGACYINLINEUDTVAROP(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR,_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_NESTED_UDT,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_LOOP_DEPTH,_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_LOOP_PREFIX,_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE);
#line 1972 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1972 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1972,"type.bas");}while(r);
#line 1973 "utilities/type.bas"
S_44150:;
#line 1973 "utilities/type.bas"
if ((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_PARENT_ARRAY_MODE&*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 1973 "utilities/type.bas"
if(qbevent){evnt(28809,1973,"type.bas");if(r)goto S_44150;}
#line 1973 "utilities/type.bas"
do{
#line 1973 "utilities/type.bas"
goto exit_subfunc;
#line 1973 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1973,"type.bas");}while(r);
#line 1973 "utilities/type.bas"
}
#line 1974 "utilities/type.bas"
S_44153:;
#line 1974 "utilities/type.bas"
}else{
#line 1974 "utilities/type.bas"
if (-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE== 3 )){
#line 1974 "utilities/type.bas"
if(qbevent){evnt(28809,1974,"type.bas");if(r)goto S_44153;}
#line 1975 "utilities/type.bas"
do{
#line 1975 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("memset((void*)(",15)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len(")),0,",5)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BYTES_TEXT),qbs_new_txt_len(");",2)));
#line 1975 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1975 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1975,"type.bas");}while(r);
#line 1976 "utilities/type.bas"
}
#line 1976 "utilities/type.bas"
}
#line 1977 "utilities/type.bas"
S_44156:;
#line 1977 "utilities/type.bas"
}else{
#line 1977 "utilities/type.bas"
if (-(*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_OP_MODE== 3 )){
#line 1977 "utilities/type.bas"
if(qbevent){evnt(28809,1977,"type.bas");if(r)goto S_44156;}
#line 1978 "utilities/type.bas"
do{
#line 1978 "utilities/type.bas"
qbs_set(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_ACC,_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_CR),qbs_new_txt_len("memset((void*)(",15)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BASE_ADDR),qbs_new_txt_len("+(",2)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_MEMBER_EXPR),qbs_new_txt_len(")),0,",5)),_SUB_APPENDLEGACYINLINEUDTVAROP_STRING_BYTES_TEXT),qbs_new_txt_len(");",2)));
#line 1978 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1978 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1978,"type.bas");}while(r);
#line 1979 "utilities/type.bas"
}
#line 1979 "utilities/type.bas"
}
#line 1979 "utilities/type.bas"
}
#line 1979 "utilities/type.bas"
}
#line 1981 "utilities/type.bas"
do{
#line 1981 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_OFFSET=*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_OFFSET+*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_MEMBER_BYTES;
#line 1981 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1981,"type.bas");}while(r);
#line 1982 "utilities/type.bas"
do{
#line 1982 "utilities/type.bas"
*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_APPENDLEGACYINLINEUDTVAROP_LONG_ELEMENT)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
#line 1982 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1982,"type.bas");}while(r);
#line 1983 "utilities/type.bas"
dl_continue_4485:;
#line 1983 "utilities/type.bas"
}
#line 1983 "utilities/type.bas"
dl_exit_4485:;
#line 1984 "utilities/type.bas"
exit_subfunc:;
#line 1984 "utilities/type.bas"
free_mem_lock(sf_mem_lock);
#line 1984 "utilities/type.bas"
#include "free341.txt"
#line 1984 "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 1984 "utilities/type.bas"
cmem_sp=tmp_cmem_sp;
#line 1984 "utilities/type.bas"
}
