#line 1364 "utilities/type.bas"
void SUB_APPENDDYNUDTDESCLIFEEX(qbs*_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DATA_EXPR,int32*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_UDT_INDEX,qbs*_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ROOT_EXPR,qbs*_SUB_APPENDDYNUDTDESCLIFEEX_STRING_BYTESPERELEMENT,qbs*_SUB_APPENDDYNUDTDESCLIFEEX_STRING_INDEX_EXPR,qbs*_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,int32*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE,int32*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LOOP_DEPTH,int32*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_OP_MODE){
#line 1364 "utilities/type.bas"
qbs *tqbs;
#line 1364 "utilities/type.bas"
ptrszint tmp_long;
#line 1364 "utilities/type.bas"
int32 tmp_fileno;
#line 1364 "utilities/type.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 1364 "utilities/type.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 1364 "utilities/type.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 1364 "utilities/type.bas"
#include "data321.txt"
#line 1364 "utilities/type.bas"
mem_lock *sf_mem_lock;
#line 1364 "utilities/type.bas"
new_mem_lock();
#line 1364 "utilities/type.bas"
sf_mem_lock=mem_lock_tmp;
#line 1364 "utilities/type.bas"
sf_mem_lock->type=3;
#line 1364 "utilities/type.bas"
libqb_check_stack();
#line 1364 "utilities/type.bas"
if (is_error_pending()) goto exit_subfunc;
#line 1365 "utilities/type.bas"
do{
#line 1365 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1365,"type.bas");}while(r);
#line 1366 "utilities/type.bas"
do{
#line 1366 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1366,"type.bas");}while(r);
#line 1367 "utilities/type.bas"
do{
#line 1367 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1367,"type.bas");}while(r);
#line 1368 "utilities/type.bas"
do{
#line 1368 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1368,"type.bas");}while(r);
#line 1369 "utilities/type.bas"
do{
#line 1369 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1369,"type.bas");}while(r);
#line 1370 "utilities/type.bas"
do{
#line 1370 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1370,"type.bas");}while(r);
#line 1371 "utilities/type.bas"
do{
#line 1371 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1371,"type.bas");}while(r);
#line 1372 "utilities/type.bas"
do{
#line 1372 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1372,"type.bas");}while(r);
#line 1373 "utilities/type.bas"
do{
#line 1373 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1373,"type.bas");}while(r);
#line 1374 "utilities/type.bas"
do{
#line 1374 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1374,"type.bas");}while(r);
#line 1375 "utilities/type.bas"
do{
#line 1375 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1375,"type.bas");}while(r);
#line 1376 "utilities/type.bas"
do{
#line 1376 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1376,"type.bas");}while(r);
#line 1377 "utilities/type.bas"
do{
#line 1377 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1377,"type.bas");}while(r);
#line 1378 "utilities/type.bas"
do{
#line 1378 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1378,"type.bas");}while(r);
#line 1379 "utilities/type.bas"
do{
#line 1379 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1379,"type.bas");}while(r);
#line 1380 "utilities/type.bas"
do{
#line 1380 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1380,"type.bas");}while(r);
#line 1381 "utilities/type.bas"
do{
#line 1381 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1381,"type.bas");}while(r);
#line 1382 "utilities/type.bas"
do{
#line 1382 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1382,"type.bas");}while(r);
#line 1383 "utilities/type.bas"
do{
#line 1383 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1383,"type.bas");}while(r);
#line 1384 "utilities/type.bas"
do{
#line 1384 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1384,"type.bas");}while(r);
#line 1385 "utilities/type.bas"
do{
#line 1385 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1385,"type.bas");}while(r);
#line 1386 "utilities/type.bas"
do{
#line 1386 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1386,"type.bas");}while(r);
#line 1387 "utilities/type.bas"
do{
#line 1387 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1387,"type.bas");}while(r);
#line 1388 "utilities/type.bas"
do{
#line 1388 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1388,"type.bas");}while(r);
#line 1389 "utilities/type.bas"
do{
#line 1389 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1389,"type.bas");}while(r);
#line 1391 "utilities/type.bas"
do{
#line 1391 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR,qbs_add(func_chr( 13 ),func_chr( 10 )));
#line 1391 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1391 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1391,"type.bas");}while(r);
#line 1392 "utilities/type.bas"
do{
#line 1392 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_UDT_INDEX)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
#line 1392 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1392,"type.bas");}while(r);
#line 1393 "utilities/type.bas"
S_43673:;
#line 1393 "utilities/type.bas"
while((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)||is_error_pending()){
#line 1393 "utilities/type.bas"
if(qbevent){evnt(28809,1393,"type.bas");if(r)goto S_43673;}
#line 1394 "utilities/type.bas"
do{
#line 1394 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_EXPR,qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ROOT_EXPR),qbs_new_txt_len("+",1)),qbs__tostr((int64)(qb_safe_idiv(FUNC_UDTDYNMEMBEROFFSET(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID), 8 )),NULL,0)),qbs_new_txt_len(")",1)));
#line 1394 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1394 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1394,"type.bas");}while(r);
#line 1396 "utilities/type.bas"
S_43675:;
#line 1396 "utilities/type.bas"
if ((FUNC_UDTMEMBERDYNDESC(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID))||is_error_pending()){
#line 1396 "utilities/type.bas"
if(qbevent){evnt(28809,1396,"type.bas");if(r)goto S_43675;}
#line 1397 "utilities/type.bas"
do{
#line 1397 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_ELEM_BYTES=FUNC_UDT_DYN_ARRAY_ELEM_BYTES(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID);
#line 1397 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1397,"type.bas");}while(r);
#line 1398 "utilities/type.bas"
do{
#line 1398 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT= 0 ;
#line 1398 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1398,"type.bas");}while(r);
#line 1399 "utilities/type.bas"
S_43678:;
#line 1399 "utilities/type.bas"
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 ))||is_error_pending()){
#line 1399 "utilities/type.bas"
if(qbevent){evnt(28809,1399,"type.bas");if(r)goto S_43678;}
#line 1399 "utilities/type.bas"
do{
#line 1399 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 1399 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1399,"type.bas");}while(r);
#line 1399 "utilities/type.bas"
}
#line 1401 "utilities/type.bas"
S_43681:;
#line 1401 "utilities/type.bas"
if ((-(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_OP_MODE== 1 ))||is_error_pending()){
#line 1401 "utilities/type.bas"
if(qbevent){evnt(28809,1401,"type.bas");if(r)goto S_43681;}
#line 1402 "utilities/type.bas"
do{
#line 1402 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIMS_COUNT=((int32*)(__ARRAY_LONG_UDTEARRAYDIMS[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYDIMS[4],__ARRAY_LONG_UDTEARRAYDIMS[5])];
#line 1402 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1402,"type.bas");}while(r);
#line 1403 "utilities/type.bas"
do{
#line 1403 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_SLOTS=( 4 **_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIMS_COUNT)+( 4 )+( 1 );
#line 1403 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1403,"type.bas");}while(r);
#line 1404 "utilities/type.bas"
do{
#line 1404 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_TOTAL= 1 ;
#line 1404 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1404,"type.bas");}while(r);
#line 1405 "utilities/type.bas"
do{
#line 1405 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_POS= 1 ;
#line 1405 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1405,"type.bas");}while(r);
#line 1406 "utilities/type.bas"
do{
#line 1406 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_STRIDE_VAL= 1 ;
#line 1406 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1406,"type.bas");}while(r);
#line 1407 "utilities/type.bas"
do{
#line 1407 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_DESC,(((qbs**)(__ARRAY_STRING_UDTEARRAYDESC[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_STRING_UDTEARRAYDESC[4],__ARRAY_STRING_UDTEARRAYDESC[5])]));
#line 1407 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1407 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1407,"type.bas");}while(r);
#line 1408 "utilities/type.bas"
do{
#line 1408 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_PTR,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((ptrszint**)((uint8*)(",23),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DATA_EXPR),qbs_new_txt_len(")+",2)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_BYTESPERELEMENT),qbs_new_txt_len("*(",2)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_INDEX_EXPR),qbs_new_txt_len(")+(",3)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_EXPR),qbs_new_txt_len(")))",3)));
#line 1408 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1408 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1408,"type.bas");}while(r);
#line 1409 "utilities/type.bas"
do{
#line 1409 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR,qbs_new_txt_len("dyn_udt_desc",12));
#line 1409 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1409 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1409,"type.bas");}while(r);
#line 1411 "utilities/type.bas"
do{
#line 1411 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("{",1)));
#line 1411 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1411 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1411,"type.bas");}while(r);
#line 1412 "utilities/type.bas"
do{
#line 1412 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("ptrszint **dyn_udt_slot=",24)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_PTR),qbs_new_txt_len(";",1)));
#line 1412 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1412 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1412,"type.bas");}while(r);
#line 1413 "utilities/type.bas"
do{
#line 1413 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("ptrszint *dyn_udt_desc=(ptrszint*)calloc((size_t)",49)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_SLOTS),NULL,0)),qbs_new_txt_len(",ptrsz);",8)));
#line 1413 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1413 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1413,"type.bas");}while(r);
#line 1414 "utilities/type.bas"
do{
#line 1414 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("if (!dyn_udt_desc) error(257);",30)));
#line 1414 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1414 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1414,"type.bas");}while(r);
#line 1415 "utilities/type.bas"
do{
#line 1415 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("*dyn_udt_slot=dyn_udt_desc;",27)));
#line 1415 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1415 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1415,"type.bas");}while(r);
#line 1416 "utilities/type.bas"
do{
#line 1416 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("new_mem_lock();",15)));
#line 1416 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1416 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1416,"type.bas");}while(r);
#line 1417 "utilities/type.bas"
do{
#line 1417 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("mem_lock_tmp->type=4;",21)));
#line 1417 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1417 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1417,"type.bas");}while(r);
#line 1418 "utilities/type.bas"
do{
#line 1418 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_SLOTS- 1 ),NULL,0)),qbs_new_txt_len("]=(ptrszint)mem_lock_tmp;",25)));
#line 1418 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1418 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1418,"type.bas");}while(r);
#line 1419 "utilities/type.bas"
do{
#line 1419 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[1]=0;",6)));
#line 1419 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1419 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1419,"type.bas");}while(r);
#line 1420 "utilities/type.bas"
do{
#line 1420 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[2]=1;",6)));
#line 1420 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1420 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1420,"type.bas");}while(r);
#line 1421 "utilities/type.bas"
do{
#line 1421 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[3]=",4)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIMS_COUNT),NULL,0)),qbs_new_txt_len(";",1)));
#line 1421 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1421 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1421,"type.bas");}while(r);
#line 1423 "utilities/type.bas"
S_43701:;
#line 1423 "utilities/type.bas"
fornext_value4392= 1 ;
#line 1423 "utilities/type.bas"
fornext_finalvalue4392=*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIMS_COUNT;
#line 1423 "utilities/type.bas"
fornext_step4392= 1 ;
#line 1423 "utilities/type.bas"
if (fornext_step4392<0) fornext_step_negative4392=1; else fornext_step_negative4392=0;
#line 1423 "utilities/type.bas"
if (is_error_pending()) goto fornext_error4392;
#line 1423 "utilities/type.bas"
goto fornext_entrylabel4392;
#line 1423 "utilities/type.bas"
while(1){
#line 1423 "utilities/type.bas"
fornext_value4392=fornext_step4392+(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIM_IDX);
#line 1423 "utilities/type.bas"
fornext_entrylabel4392:
#line 1423 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIM_IDX=fornext_value4392;
#line 1423 "utilities/type.bas"
if (fornext_step_negative4392){
#line 1423 "utilities/type.bas"
if (fornext_value4392<fornext_finalvalue4392) break;
#line 1423 "utilities/type.bas"
}else{
#line 1423 "utilities/type.bas"
if (fornext_value4392>fornext_finalvalue4392) break;
#line 1423 "utilities/type.bas"
}
#line 1423 "utilities/type.bas"
fornext_error4392:;
#line 1423 "utilities/type.bas"
if(qbevent){evnt(28809,1423,"type.bas");if(r)goto S_43701;}
#line 1424 "utilities/type.bas"
S_43702:;
#line 1424 "utilities/type.bas"
if ((qbs_cleanup(qbs_tmp_base,-(FUNC_PARSENEXTUDTARRAYDESCRIPTORDIM(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_DESC,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_POS,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LOWER_VAL,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_VAL)== 0 )))||is_error_pending()){
#line 1424 "utilities/type.bas"
if(qbevent){evnt(28809,1424,"type.bas");if(r)goto S_43702;}
#line 1425 "utilities/type.bas"
do{
#line 1425 "utilities/type.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot process the declared bounds of this TYPE member array",60));
#line 1425 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1425 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1425,"type.bas");}while(r);
#line 1426 "utilities/type.bas"
do{
#line 1426 "utilities/type.bas"
goto exit_subfunc;
#line 1426 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1426,"type.bas");}while(r);
#line 1427 "utilities/type.bas"
}
#line 1428 "utilities/type.bas"
do{
#line 1428 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_IDX=((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIMS_COUNT-*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DIM_IDX)* 4 )+( 4 );
#line 1428 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1428,"type.bas");}while(r);
#line 1429 "utilities/type.bas"
do{
#line 1429 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[",1)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_IDX),NULL,0)),qbs_new_txt_len("]=",2)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LOWER_VAL),NULL,0)),qbs_new_txt_len(";",1)));
#line 1429 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1429 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1429,"type.bas");}while(r);
#line 1430 "utilities/type.bas"
do{
#line 1430 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_IDX+ 1 ),NULL,0)),qbs_new_txt_len("]=",2)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_VAL),NULL,0)),qbs_new_txt_len(";",1)));
#line 1430 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1430 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1430,"type.bas");}while(r);
#line 1431 "utilities/type.bas"
do{
#line 1431 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_IDX+ 2 ),NULL,0)),qbs_new_txt_len("]=",2)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_STRIDE_VAL),NULL,0)),qbs_new_txt_len(";",1)));
#line 1431 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1431 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1431,"type.bas");}while(r);
#line 1432 "utilities/type.bas"
do{
#line 1432 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[",1)),qbs__tostr((int64)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_DESC_IDX+ 3 ),NULL,0)),qbs_new_txt_len("]=0;",4)));
#line 1432 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1432 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1432,"type.bas");}while(r);
#line 1433 "utilities/type.bas"
do{
#line 1433 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_STRIDE_VAL=*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_STRIDE_VAL**_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_VAL;
#line 1433 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1433,"type.bas");}while(r);
#line 1434 "utilities/type.bas"
do{
#line 1434 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_TOTAL=*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_TOTAL**_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_VAL;
#line 1434 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1434,"type.bas");}while(r);
#line 1435 "utilities/type.bas"
fornext_continue_4391:;
#line 1435 "utilities/type.bas"
}
#line 1435 "utilities/type.bas"
fornext_exit_4391:;
#line 1437 "utilities/type.bas"
S_43714:;
#line 1437 "utilities/type.bas"
if ((-(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_TOTAL!=((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]))||is_error_pending()){
#line 1437 "utilities/type.bas"
if(qbevent){evnt(28809,1437,"type.bas");if(r)goto S_43714;}
#line 1438 "utilities/type.bas"
do{
#line 1438 "utilities/type.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Cannot process the declared bounds of this TYPE member array",60));
#line 1438 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1438 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1438,"type.bas");}while(r);
#line 1439 "utilities/type.bas"
do{
#line 1439 "utilities/type.bas"
goto exit_subfunc;
#line 1439 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1439,"type.bas");}while(r);
#line 1440 "utilities/type.bas"
}
#line 1442 "utilities/type.bas"
do{
#line 1442 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[0]=(ptrszint)calloc((size_t)(",30)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_TOTAL),NULL,0)),qbs_new_txt_len("*",1)),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_ELEM_BYTES),NULL,0)),qbs_new_txt_len("),1);",5)));
#line 1442 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1442 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1442,"type.bas");}while(r);
#line 1443 "utilities/type.bas"
do{
#line 1443 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("if (!",5)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[0]) error(257);",16)));
#line 1443 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1443 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1443,"type.bas");}while(r);
#line 1444 "utilities/type.bas"
do{
#line 1444 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_TOTAL_EXPR,qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_COUNT_TOTAL),NULL,0));
#line 1444 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1444 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1444,"type.bas");}while(r);
#line 1446 "utilities/type.bas"
S_43721:;
#line 1446 "utilities/type.bas"
if ((FUNC_DYNMEMVARSTR(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID))||is_error_pending()){
#line 1446 "utilities/type.bas"
if(qbevent){evnt(28809,1446,"type.bas");if(r)goto S_43721;}
#line 1447 "utilities/type.bas"
do{
#line 1447 "utilities/type.bas"
SUB_APPENDDYNSTRINIT(qbs_add(qbs_add(qbs_new_txt_len("(void*)",7),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[0]",3)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_TOTAL_EXPR,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_ELEM_BYTES,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC);
#line 1447 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1447 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1447,"type.bas");}while(r);
#line 1448 "utilities/type.bas"
}
#line 1450 "utilities/type.bas"
S_43724:;
#line 1450 "utilities/type.bas"
if ((-(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT!= 0 ))||is_error_pending()){
#line 1450 "utilities/type.bas"
if(qbevent){evnt(28809,1450,"type.bas");if(r)goto S_43724;}
#line 1451 "utilities/type.bas"
S_43725:;
#line 1451 "utilities/type.bas"
if ((FUNC_DYNMEMUDTVARSTR(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)|FUNC_UDTDYNHASMEMBERARRAYS(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE))||is_error_pending()){
#line 1451 "utilities/type.bas"
if(qbevent){evnt(28809,1451,"type.bas");if(r)goto S_43725;}
#line 1452 "utilities/type.bas"
do{
#line 1452 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ELEM_IDX,qbs_add(qbs_new_txt_len("dyn_udt_own_m",13),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID),NULL,0)));
#line 1452 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1452 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1452,"type.bas");}while(r);
#line 1453 "utilities/type.bas"
do{
#line 1453 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("for(ptrszint ",13)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ELEM_IDX),qbs_new_txt_len("=0;",3)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ELEM_IDX),qbs_new_txt_len("<",1)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_TOTAL_EXPR),qbs_new_txt_len(";",1)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ELEM_IDX),qbs_new_txt_len("++){",4)));
#line 1453 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1453 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1453,"type.bas");}while(r);
#line 1454 "utilities/type.bas"
do{
#line 1454 "utilities/type.bas"
SUB_APPENDDYNUDTOWNINITAT(qbs_add(qbs_add(qbs_new_txt_len("(void*)",7),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DESC_VAR),qbs_new_txt_len("[0]",3)),_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT,&(pass4393= 0 ),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_ELEM_BYTES),NULL,0),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ELEM_IDX,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE);
#line 1454 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1454 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1454,"type.bas");}while(r);
#line 1455 "utilities/type.bas"
S_43729:;
#line 1455 "utilities/type.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 1455 "utilities/type.bas"
if(qbevent){evnt(28809,1455,"type.bas");if(r)goto S_43729;}
#line 1455 "utilities/type.bas"
do{
#line 1455 "utilities/type.bas"
goto exit_subfunc;
#line 1455 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1455,"type.bas");}while(r);
#line 1455 "utilities/type.bas"
}
#line 1456 "utilities/type.bas"
do{
#line 1456 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("}",1)));
#line 1456 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1456 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1456,"type.bas");}while(r);
#line 1457 "utilities/type.bas"
}
#line 1458 "utilities/type.bas"
}
#line 1460 "utilities/type.bas"
do{
#line 1460 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("}",1)));
#line 1460 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1460 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1460,"type.bas");}while(r);
#line 1461 "utilities/type.bas"
}else{
#line 1462 "utilities/type.bas"
do{
#line 1462 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_SLOT,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((uint8*)(",10),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DATA_EXPR),qbs_new_txt_len(")+",2)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_BYTESPERELEMENT),qbs_new_txt_len("*(",2)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_INDEX_EXPR),qbs_new_txt_len(")+(",3)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_EXPR),qbs_new_txt_len("))",2)));
#line 1462 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1462 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1462,"type.bas");}while(r);
#line 1463 "utilities/type.bas"
do{
#line 1463 "utilities/type.bas"
SUB_APPENDDYNMEMBERERASEEX(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_SLOT,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_ELEM_BYTES,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT,&(pass4394=FUNC_DYNMEMVARSTR(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE);
#line 1463 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1463 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1463,"type.bas");}while(r);
#line 1464 "utilities/type.bas"
S_43739:;
#line 1464 "utilities/type.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 1464 "utilities/type.bas"
if(qbevent){evnt(28809,1464,"type.bas");if(r)goto S_43739;}
#line 1464 "utilities/type.bas"
do{
#line 1464 "utilities/type.bas"
goto exit_subfunc;
#line 1464 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1464,"type.bas");}while(r);
#line 1464 "utilities/type.bas"
}
#line 1465 "utilities/type.bas"
}
#line 1466 "utilities/type.bas"
S_43743:;
#line 1466 "utilities/type.bas"
}else{
#line 1466 "utilities/type.bas"
if (((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]){
#line 1466 "utilities/type.bas"
if(qbevent){evnt(28809,1466,"type.bas");if(r)goto S_43743;}
#line 1467 "utilities/type.bas"
S_43744:;
#line 1467 "utilities/type.bas"
if ((-((((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT)!= 0 ))||is_error_pending()){
#line 1467 "utilities/type.bas"
if(qbevent){evnt(28809,1467,"type.bas");if(r)goto S_43744;}
#line 1468 "utilities/type.bas"
do{
#line 1468 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ;
#line 1468 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1468,"type.bas");}while(r);
#line 1469 "utilities/type.bas"
S_43746:;
#line 1469 "utilities/type.bas"
if ((FUNC_UDTDYNHASMEMBERARRAYS(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE))||is_error_pending()){
#line 1469 "utilities/type.bas"
if(qbevent){evnt(28809,1469,"type.bas");if(r)goto S_43746;}
#line 1470 "utilities/type.bas"
do{
#line 1470 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_INLINE_BYTES=FUNC_UDTDYNINLINEELEMBYTES(_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE);
#line 1470 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1470,"type.bas");}while(r);
#line 1471 "utilities/type.bas"
do{
#line 1471 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_COUNT_TEXT,qbs__tostr((int32)(((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]),NULL,0));
#line 1471 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1471 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1471,"type.bas");}while(r);
#line 1472 "utilities/type.bas"
do{
#line 1472 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_STRIDE_TEXT,qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_INLINE_BYTES),NULL,0));
#line 1472 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1472 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1472,"type.bas");}while(r);
#line 1473 "utilities/type.bas"
do{
#line 1473 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_LOOP_NAME,qbs_add(qbs_new_txt_len("dyn_desc_i",10),qbs__tostr((int32)(*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LOOP_DEPTH),NULL,0)));
#line 1473 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1473 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1473,"type.bas");}while(r);
#line 1474 "utilities/type.bas"
do{
#line 1474 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("for(ptrszint ",13)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_LOOP_NAME),qbs_new_txt_len("=0;",3)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_LOOP_NAME),qbs_new_txt_len("<",1)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_COUNT_TEXT),qbs_new_txt_len(";",1)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_LOOP_NAME),qbs_new_txt_len("++){",4)));
#line 1474 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1474 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1474,"type.bas");}while(r);
#line 1475 "utilities/type.bas"
do{
#line 1475 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ITEM_EXPR,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("(",1),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_EXPR),qbs_new_txt_len("+",1)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_STRIDE_TEXT),qbs_new_txt_len(")",1)));
#line 1475 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1475 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1475,"type.bas");}while(r);
#line 1476 "utilities/type.bas"
do{
#line 1476 "utilities/type.bas"
SUB_APPENDDYNUDTDESCLIFEEX(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DATA_EXPR,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_NESTED_UDT,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ITEM_EXPR,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_BYTESPERELEMENT,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_INDEX_EXPR,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE,&(pass4395=*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LOOP_DEPTH+ 1 ),_SUB_APPENDDYNUDTDESCLIFEEX_LONG_OP_MODE);
#line 1476 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1476 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1476,"type.bas");}while(r);
#line 1477 "utilities/type.bas"
S_43754:;
#line 1477 "utilities/type.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 1477 "utilities/type.bas"
if(qbevent){evnt(28809,1477,"type.bas");if(r)goto S_43754;}
#line 1477 "utilities/type.bas"
do{
#line 1477 "utilities/type.bas"
goto exit_subfunc;
#line 1477 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1477,"type.bas");}while(r);
#line 1477 "utilities/type.bas"
}
#line 1478 "utilities/type.bas"
do{
#line 1478 "utilities/type.bas"
qbs_set(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,qbs_add(qbs_add(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_CR),qbs_new_txt_len("}",1)));
#line 1478 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1478 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1478,"type.bas");}while(r);
#line 1479 "utilities/type.bas"
}
#line 1480 "utilities/type.bas"
}
#line 1481 "utilities/type.bas"
S_43760:;
#line 1481 "utilities/type.bas"
}else{
#line 1481 "utilities/type.bas"
if (((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]&*__LONG_ISUDT){
#line 1481 "utilities/type.bas"
if(qbevent){evnt(28809,1481,"type.bas");if(r)goto S_43760;}
#line 1482 "utilities/type.bas"
do{
#line 1482 "utilities/type.bas"
SUB_APPENDDYNUDTDESCLIFEEX(_SUB_APPENDDYNUDTDESCLIFEEX_STRING_DATA_EXPR,&(pass4396=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])]& 4095ll ),_SUB_APPENDDYNUDTDESCLIFEEX_STRING_MEMBER_EXPR,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_BYTESPERELEMENT,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_INDEX_EXPR,_SUB_APPENDDYNUDTDESCLIFEEX_STRING_ACC,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LAYOUT_MODE,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_LOOP_DEPTH,_SUB_APPENDDYNUDTDESCLIFEEX_LONG_OP_MODE);
#line 1482 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1482 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1482,"type.bas");}while(r);
#line 1483 "utilities/type.bas"
S_43762:;
#line 1483 "utilities/type.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 1483 "utilities/type.bas"
if(qbevent){evnt(28809,1483,"type.bas");if(r)goto S_43762;}
#line 1483 "utilities/type.bas"
do{
#line 1483 "utilities/type.bas"
goto exit_subfunc;
#line 1483 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1483,"type.bas");}while(r);
#line 1483 "utilities/type.bas"
}
#line 1484 "utilities/type.bas"
}
#line 1484 "utilities/type.bas"
}
#line 1484 "utilities/type.bas"
}
#line 1486 "utilities/type.bas"
do{
#line 1486 "utilities/type.bas"
*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_APPENDDYNUDTDESCLIFEEX_LONG_MEMBER_ID)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
#line 1486 "utilities/type.bas"
if(!qbevent)break;evnt(28809,1486,"type.bas");}while(r);
#line 1487 "utilities/type.bas"
dl_continue_4390:;
#line 1487 "utilities/type.bas"
}
#line 1487 "utilities/type.bas"
dl_exit_4390:;
#line 1488 "utilities/type.bas"
exit_subfunc:;
#line 1488 "utilities/type.bas"
free_mem_lock(sf_mem_lock);
#line 1488 "utilities/type.bas"
#include "free321.txt"
#line 1488 "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 1488 "utilities/type.bas"
cmem_sp=tmp_cmem_sp;
#line 1488 "utilities/type.bas"
}
