#line 15917 "qb64pe.bas"
void SUB_BUILDDYNMEMBERBOUNDSPREP(qbs*_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_BOUNDS,qbs*_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX,int32*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS,qbs*_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC){
#line 15917 "qb64pe.bas"
qbs *tqbs;
#line 15917 "qb64pe.bas"
ptrszint tmp_long;
#line 15917 "qb64pe.bas"
int32 tmp_fileno;
#line 15917 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 15917 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 15917 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 15917 "qb64pe.bas"
#include "data26.txt"
#line 15917 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 15917 "qb64pe.bas"
new_mem_lock();
#line 15917 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 15917 "qb64pe.bas"
sf_mem_lock->type=3;
#line 15917 "qb64pe.bas"
libqb_check_stack();
#line 15917 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 15923 "qb64pe.bas"
do{
#line 15923 "qb64pe.bas"
if(!qbevent)break;evnt(15923);}while(r);
#line 15924 "qb64pe.bas"
do{
#line 15924 "qb64pe.bas"
if(!qbevent)break;evnt(15924);}while(r);
#line 15925 "qb64pe.bas"
do{
#line 15925 "qb64pe.bas"
if(!qbevent)break;evnt(15925);}while(r);
#line 15926 "qb64pe.bas"
do{
#line 15926 "qb64pe.bas"
if(!qbevent)break;evnt(15926);}while(r);
#line 15927 "qb64pe.bas"
do{
#line 15927 "qb64pe.bas"
if(!qbevent)break;evnt(15927);}while(r);
#line 15928 "qb64pe.bas"
do{
#line 15928 "qb64pe.bas"
if(!qbevent)break;evnt(15928);}while(r);
#line 15929 "qb64pe.bas"
do{
#line 15929 "qb64pe.bas"
if(!qbevent)break;evnt(15929);}while(r);
#line 15930 "qb64pe.bas"
do{
#line 15930 "qb64pe.bas"
if(!qbevent)break;evnt(15930);}while(r);
#line 15931 "qb64pe.bas"
do{
#line 15931 "qb64pe.bas"
if(!qbevent)break;evnt(15931);}while(r);
#line 15932 "qb64pe.bas"
do{
#line 15932 "qb64pe.bas"
if(!qbevent)break;evnt(15932);}while(r);
#line 15933 "qb64pe.bas"
do{
#line 15933 "qb64pe.bas"
if(!qbevent)break;evnt(15933);}while(r);
#line 15934 "qb64pe.bas"
do{
#line 15934 "qb64pe.bas"
if(!qbevent)break;evnt(15934);}while(r);
#line 15935 "qb64pe.bas"
do{
#line 15935 "qb64pe.bas"
if(!qbevent)break;evnt(15935);}while(r);
#line 15936 "qb64pe.bas"
do{
#line 15936 "qb64pe.bas"
if(!qbevent)break;evnt(15936);}while(r);
#line 15937 "qb64pe.bas"
do{
#line 15937 "qb64pe.bas"
if(!qbevent)break;evnt(15937);}while(r);
#line 15938 "qb64pe.bas"
do{
#line 15938 "qb64pe.bas"
if(!qbevent)break;evnt(15938);}while(r);
#line 15939 "qb64pe.bas"
do{
#line 15939 "qb64pe.bas"
if(!qbevent)break;evnt(15939);}while(r);
#line 15940 "qb64pe.bas"
do{
#line 15940 "qb64pe.bas"
if(!qbevent)break;evnt(15940);}while(r);
#line 15941 "qb64pe.bas"
do{
#line 15941 "qb64pe.bas"
if(!qbevent)break;evnt(15941);}while(r);
#line 15942 "qb64pe.bas"
do{
#line 15942 "qb64pe.bas"
if(!qbevent)break;evnt(15942);}while(r);
#line 15943 "qb64pe.bas"
do{
#line 15943 "qb64pe.bas"
if(!qbevent)break;evnt(15943);}while(r);
#line 15944 "qb64pe.bas"
do{
#line 15944 "qb64pe.bas"
if(!qbevent)break;evnt(15944);}while(r);
#line 15945 "qb64pe.bas"
do{
#line 15945 "qb64pe.bas"
if(!qbevent)break;evnt(15945);}while(r);
#line 15946 "qb64pe.bas"
do{
#line 15946 "qb64pe.bas"
if(!qbevent)break;evnt(15946);}while(r);
#line 15947 "qb64pe.bas"
do{
#line 15947 "qb64pe.bas"
if(!qbevent)break;evnt(15947);}while(r);
#line 15948 "qb64pe.bas"
do{
#line 15948 "qb64pe.bas"
if(!qbevent)break;evnt(15948);}while(r);
#line 15949 "qb64pe.bas"
do{
#line 15949 "qb64pe.bas"
if(!qbevent)break;evnt(15949);}while(r);
#line 15951 "qb64pe.bas"
do{
#line 15951 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR,qbs_add(func_chr( 13 ),func_chr( 10 )));
#line 15951 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15951 "qb64pe.bas"
if(!qbevent)break;evnt(15951);}while(r);
#line 15952 "qb64pe.bas"
do{
#line 15952 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_BOUNDS_TOKENS=FUNC_NUMELEMENTS(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_BOUNDS);
#line 15952 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15952 "qb64pe.bas"
if(!qbevent)break;evnt(15952);}while(r);
#line 15953 "qb64pe.bas"
S_18386:;
#line 15953 "qb64pe.bas"
if ((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_BOUNDS_TOKENS== 0 ))||is_error_pending()){
#line 15953 "qb64pe.bas"
if(qbevent){evnt(15953);if(r)goto S_18386;}
#line 15953 "qb64pe.bas"
do{
#line 15953 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Array bounds missing",20));
#line 15953 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15953 "qb64pe.bas"
if(!qbevent)break;evnt(15953);}while(r);
#line 15953 "qb64pe.bas"
do{
#line 15953 "qb64pe.bas"
goto exit_subfunc;
#line 15953 "qb64pe.bas"
if(!qbevent)break;evnt(15953);}while(r);
#line 15953 "qb64pe.bas"
}
#line 15955 "qb64pe.bas"
do{
#line 15955 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH= 0 ;
#line 15955 "qb64pe.bas"
if(!qbevent)break;evnt(15955);}while(r);
#line 15956 "qb64pe.bas"
do{
#line 15956 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS= 1 ;
#line 15956 "qb64pe.bas"
if(!qbevent)break;evnt(15956);}while(r);
#line 15957 "qb64pe.bas"
S_18392:;
#line 15957 "qb64pe.bas"
fornext_value2144= 1 ;
#line 15957 "qb64pe.bas"
fornext_finalvalue2144=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_BOUNDS_TOKENS;
#line 15957 "qb64pe.bas"
fornext_step2144= 1 ;
#line 15957 "qb64pe.bas"
if (fornext_step2144<0) fornext_step_negative2144=1; else fornext_step_negative2144=0;
#line 15957 "qb64pe.bas"
if (is_error_pending()) goto fornext_error2144;
#line 15957 "qb64pe.bas"
goto fornext_entrylabel2144;
#line 15957 "qb64pe.bas"
while(1){
#line 15957 "qb64pe.bas"
fornext_value2144=fornext_step2144+(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX);
#line 15957 "qb64pe.bas"
fornext_entrylabel2144:
#line 15957 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX=fornext_value2144;
#line 15957 "qb64pe.bas"
if (fornext_step_negative2144){
#line 15957 "qb64pe.bas"
if (fornext_value2144<fornext_finalvalue2144) break;
#line 15957 "qb64pe.bas"
}else{
#line 15957 "qb64pe.bas"
if (fornext_value2144>fornext_finalvalue2144) break;
#line 15957 "qb64pe.bas"
}
#line 15957 "qb64pe.bas"
fornext_error2144:;
#line 15957 "qb64pe.bas"
if(qbevent){evnt(15957);if(r)goto S_18392;}
#line 15958 "qb64pe.bas"
do{
#line 15958 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,FUNC_GETELEMENT(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_BOUNDS,_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX));
#line 15958 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15958 "qb64pe.bas"
if(!qbevent)break;evnt(15958);}while(r);
#line 15959 "qb64pe.bas"
S_18394:;
#line 15959 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len("(",1))))||is_error_pending()){
#line 15959 "qb64pe.bas"
if(qbevent){evnt(15959);if(r)goto S_18394;}
#line 15959 "qb64pe.bas"
do{
#line 15959 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH+ 1 ;
#line 15959 "qb64pe.bas"
if(!qbevent)break;evnt(15959);}while(r);
#line 15959 "qb64pe.bas"
}
#line 15960 "qb64pe.bas"
S_18397:;
#line 15960 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len(")",1))))||is_error_pending()){
#line 15960 "qb64pe.bas"
if(qbevent){evnt(15960);if(r)goto S_18397;}
#line 15960 "qb64pe.bas"
do{
#line 15960 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH- 1 ;
#line 15960 "qb64pe.bas"
if(!qbevent)break;evnt(15960);}while(r);
#line 15960 "qb64pe.bas"
}
#line 15961 "qb64pe.bas"
S_18400:;
#line 15961 "qb64pe.bas"
if ((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH< 0 ))||is_error_pending()){
#line 15961 "qb64pe.bas"
if(qbevent){evnt(15961);if(r)goto S_18400;}
#line 15961 "qb64pe.bas"
do{
#line 15961 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 15961 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15961 "qb64pe.bas"
if(!qbevent)break;evnt(15961);}while(r);
#line 15961 "qb64pe.bas"
do{
#line 15961 "qb64pe.bas"
goto exit_subfunc;
#line 15961 "qb64pe.bas"
if(!qbevent)break;evnt(15961);}while(r);
#line 15961 "qb64pe.bas"
}
#line 15962 "qb64pe.bas"
S_18404:;
#line 15962 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH== 0 ))&(qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len(",",1)))))||is_error_pending()){
#line 15962 "qb64pe.bas"
if(qbevent){evnt(15962);if(r)goto S_18404;}
#line 15962 "qb64pe.bas"
do{
#line 15962 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS+ 1 ;
#line 15962 "qb64pe.bas"
if(!qbevent)break;evnt(15962);}while(r);
#line 15962 "qb64pe.bas"
}
#line 15963 "qb64pe.bas"
fornext_continue_2143:;
#line 15963 "qb64pe.bas"
}
#line 15963 "qb64pe.bas"
fornext_exit_2143:;
#line 15964 "qb64pe.bas"
S_18408:;
#line 15964 "qb64pe.bas"
if ((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH!= 0 ))||is_error_pending()){
#line 15964 "qb64pe.bas"
if(qbevent){evnt(15964);if(r)goto S_18408;}
#line 15964 "qb64pe.bas"
do{
#line 15964 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 15964 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15964 "qb64pe.bas"
if(!qbevent)break;evnt(15964);}while(r);
#line 15964 "qb64pe.bas"
do{
#line 15964 "qb64pe.bas"
goto exit_subfunc;
#line 15964 "qb64pe.bas"
if(!qbevent)break;evnt(15964);}while(r);
#line 15964 "qb64pe.bas"
}
#line 15966 "qb64pe.bas"
do{
#line 15966 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_SLOTS=( 4 **_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS)+( 4 )+( 1 );
#line 15966 "qb64pe.bas"
if(!qbevent)break;evnt(15966);}while(r);
#line 15967 "qb64pe.bas"
do{
#line 15967 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME,qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX,qbs_new_txt_len("_desc",5)));
#line 15967 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15967 "qb64pe.bas"
if(!qbevent)break;evnt(15967);}while(r);
#line 15969 "qb64pe.bas"
do{
#line 15969 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("static ptrszint ",16)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int32)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_SLOTS)))),qbs_new_txt_len("];",2)));
#line 15969 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15969 "qb64pe.bas"
if(!qbevent)break;evnt(15969);}while(r);
#line 15970 "qb64pe.bas"
do{
#line 15970 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[1]=0;",6)));
#line 15970 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15970 "qb64pe.bas"
if(!qbevent)break;evnt(15970);}while(r);
#line 15971 "qb64pe.bas"
do{
#line 15971 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[2]=1;",6)));
#line 15971 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15971 "qb64pe.bas"
if(!qbevent)break;evnt(15971);}while(r);
#line 15972 "qb64pe.bas"
do{
#line 15972 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[3]=",4)),qbs_ltrim(qbs_str((int32)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS)))),qbs_new_txt_len(";",1)));
#line 15972 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15972 "qb64pe.bas"
if(!qbevent)break;evnt(15972);}while(r);
#line 15978 "qb64pe.bas"
do{
#line 15978 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("ptrszint ",9)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_stride;",8)));
#line 15978 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15978 "qb64pe.bas"
if(!qbevent)break;evnt(15978);}while(r);
#line 15979 "qb64pe.bas"
do{
#line 15979 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("ptrszint ",9)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_lower;",7)));
#line 15979 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15979 "qb64pe.bas"
if(!qbevent)break;evnt(15979);}while(r);
#line 15980 "qb64pe.bas"
do{
#line 15980 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("ptrszint ",9)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_upper;",7)));
#line 15980 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15980 "qb64pe.bas"
if(!qbevent)break;evnt(15980);}while(r);
#line 15981 "qb64pe.bas"
do{
#line 15981 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_stride=1;",10)));
#line 15981 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15981 "qb64pe.bas"
if(!qbevent)break;evnt(15981);}while(r);
#line 15982 "qb64pe.bas"
do{
#line 15982 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_lower=0;",9)));
#line 15982 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15982 "qb64pe.bas"
if(!qbevent)break;evnt(15982);}while(r);
#line 15983 "qb64pe.bas"
do{
#line 15983 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_upper=0;",9)));
#line 15983 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15983 "qb64pe.bas"
if(!qbevent)break;evnt(15983);}while(r);
#line 15985 "qb64pe.bas"
do{
#line 15985 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH= 0 ;
#line 15985 "qb64pe.bas"
if(!qbevent)break;evnt(15985);}while(r);
#line 15986 "qb64pe.bas"
do{
#line 15986 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_FIRST_INDEX= 1 ;
#line 15986 "qb64pe.bas"
if(!qbevent)break;evnt(15986);}while(r);
#line 15987 "qb64pe.bas"
do{
#line 15987 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_CURRENT_DIM= 0 ;
#line 15987 "qb64pe.bas"
if(!qbevent)break;evnt(15987);}while(r);
#line 15988 "qb64pe.bas"
S_18427:;
#line 15988 "qb64pe.bas"
fornext_value2146= 1 ;
#line 15988 "qb64pe.bas"
fornext_finalvalue2146=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_BOUNDS_TOKENS;
#line 15988 "qb64pe.bas"
fornext_step2146= 1 ;
#line 15988 "qb64pe.bas"
if (fornext_step2146<0) fornext_step_negative2146=1; else fornext_step_negative2146=0;
#line 15988 "qb64pe.bas"
if (is_error_pending()) goto fornext_error2146;
#line 15988 "qb64pe.bas"
goto fornext_entrylabel2146;
#line 15988 "qb64pe.bas"
while(1){
#line 15988 "qb64pe.bas"
fornext_value2146=fornext_step2146+(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX);
#line 15988 "qb64pe.bas"
fornext_entrylabel2146:
#line 15988 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX=fornext_value2146;
#line 15988 "qb64pe.bas"
if (fornext_step_negative2146){
#line 15988 "qb64pe.bas"
if (fornext_value2146<fornext_finalvalue2146) break;
#line 15988 "qb64pe.bas"
}else{
#line 15988 "qb64pe.bas"
if (fornext_value2146>fornext_finalvalue2146) break;
#line 15988 "qb64pe.bas"
}
#line 15988 "qb64pe.bas"
fornext_error2146:;
#line 15988 "qb64pe.bas"
if(qbevent){evnt(15988);if(r)goto S_18427;}
#line 15989 "qb64pe.bas"
do{
#line 15989 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,FUNC_GETELEMENT(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_BOUNDS,_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX));
#line 15989 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15989 "qb64pe.bas"
if(!qbevent)break;evnt(15989);}while(r);
#line 15990 "qb64pe.bas"
S_18429:;
#line 15990 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len("(",1))))||is_error_pending()){
#line 15990 "qb64pe.bas"
if(qbevent){evnt(15990);if(r)goto S_18429;}
#line 15990 "qb64pe.bas"
do{
#line 15990 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH+ 1 ;
#line 15990 "qb64pe.bas"
if(!qbevent)break;evnt(15990);}while(r);
#line 15990 "qb64pe.bas"
}
#line 15991 "qb64pe.bas"
S_18432:;
#line 15991 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len(")",1))))||is_error_pending()){
#line 15991 "qb64pe.bas"
if(qbevent){evnt(15991);if(r)goto S_18432;}
#line 15991 "qb64pe.bas"
do{
#line 15991 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH- 1 ;
#line 15991 "qb64pe.bas"
if(!qbevent)break;evnt(15991);}while(r);
#line 15991 "qb64pe.bas"
}
#line 15992 "qb64pe.bas"
S_18435:;
#line 15992 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,(((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_OUTER_DEPTH== 0 ))&(qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len(",",1)))))|(-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX==*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_BOUNDS_TOKENS))))||is_error_pending()){
#line 15992 "qb64pe.bas"
if(qbevent){evnt(15992);if(r)goto S_18435;}
#line 15993 "qb64pe.bas"
S_18436:;
#line 15993 "qb64pe.bas"
if ((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX==*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_BOUNDS_TOKENS))||is_error_pending()){
#line 15993 "qb64pe.bas"
if(qbevent){evnt(15993);if(r)goto S_18436;}
#line 15994 "qb64pe.bas"
do{
#line 15994 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR,FUNC_GETELEMENTS(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_BOUNDS,_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_FIRST_INDEX,_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX));
#line 15994 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15994 "qb64pe.bas"
if(!qbevent)break;evnt(15994);}while(r);
#line 15995 "qb64pe.bas"
}else{
#line 15996 "qb64pe.bas"
do{
#line 15996 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR,FUNC_GETELEMENTS(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_BOUNDS,_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_FIRST_INDEX,&(pass2147=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX- 1 )));
#line 15996 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15996 "qb64pe.bas"
if(!qbevent)break;evnt(15996);}while(r);
#line 15997 "qb64pe.bas"
}
#line 15998 "qb64pe.bas"
S_18441:;
#line 15998 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR,qbs_new_txt_len("",0))))||is_error_pending()){
#line 15998 "qb64pe.bas"
if(qbevent){evnt(15998);if(r)goto S_18441;}
#line 15998 "qb64pe.bas"
do{
#line 15998 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 15998 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 15998 "qb64pe.bas"
if(!qbevent)break;evnt(15998);}while(r);
#line 15998 "qb64pe.bas"
do{
#line 15998 "qb64pe.bas"
goto exit_subfunc;
#line 15998 "qb64pe.bas"
if(!qbevent)break;evnt(15998);}while(r);
#line 15998 "qb64pe.bas"
}
#line 16000 "qb64pe.bas"
do{
#line 16000 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKENS=FUNC_NUMELEMENTS(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR);
#line 16000 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16000 "qb64pe.bas"
if(!qbevent)break;evnt(16000);}while(r);
#line 16001 "qb64pe.bas"
do{
#line 16001 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION= 0 ;
#line 16001 "qb64pe.bas"
if(!qbevent)break;evnt(16001);}while(r);
#line 16002 "qb64pe.bas"
do{
#line 16002 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH= 0 ;
#line 16002 "qb64pe.bas"
if(!qbevent)break;evnt(16002);}while(r);
#line 16003 "qb64pe.bas"
S_18448:;
#line 16003 "qb64pe.bas"
fornext_value2149= 1 ;
#line 16003 "qb64pe.bas"
fornext_finalvalue2149=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKENS;
#line 16003 "qb64pe.bas"
fornext_step2149= 1 ;
#line 16003 "qb64pe.bas"
if (fornext_step2149<0) fornext_step_negative2149=1; else fornext_step_negative2149=0;
#line 16003 "qb64pe.bas"
if (is_error_pending()) goto fornext_error2149;
#line 16003 "qb64pe.bas"
goto fornext_entrylabel2149;
#line 16003 "qb64pe.bas"
while(1){
#line 16003 "qb64pe.bas"
fornext_value2149=fornext_step2149+(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKEN_INDEX);
#line 16003 "qb64pe.bas"
fornext_entrylabel2149:
#line 16003 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKEN_INDEX=fornext_value2149;
#line 16003 "qb64pe.bas"
if (fornext_step_negative2149){
#line 16003 "qb64pe.bas"
if (fornext_value2149<fornext_finalvalue2149) break;
#line 16003 "qb64pe.bas"
}else{
#line 16003 "qb64pe.bas"
if (fornext_value2149>fornext_finalvalue2149) break;
#line 16003 "qb64pe.bas"
}
#line 16003 "qb64pe.bas"
fornext_error2149:;
#line 16003 "qb64pe.bas"
if(qbevent){evnt(16003);if(r)goto S_18448;}
#line 16004 "qb64pe.bas"
do{
#line 16004 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,FUNC_GETELEMENT(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR,_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKEN_INDEX));
#line 16004 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16004 "qb64pe.bas"
if(!qbevent)break;evnt(16004);}while(r);
#line 16005 "qb64pe.bas"
S_18450:;
#line 16005 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len("(",1))))||is_error_pending()){
#line 16005 "qb64pe.bas"
if(qbevent){evnt(16005);if(r)goto S_18450;}
#line 16005 "qb64pe.bas"
do{
#line 16005 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH+ 1 ;
#line 16005 "qb64pe.bas"
if(!qbevent)break;evnt(16005);}while(r);
#line 16005 "qb64pe.bas"
}
#line 16006 "qb64pe.bas"
S_18453:;
#line 16006 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN,qbs_new_txt_len(")",1))))||is_error_pending()){
#line 16006 "qb64pe.bas"
if(qbevent){evnt(16006);if(r)goto S_18453;}
#line 16006 "qb64pe.bas"
do{
#line 16006 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH- 1 ;
#line 16006 "qb64pe.bas"
if(!qbevent)break;evnt(16006);}while(r);
#line 16006 "qb64pe.bas"
}
#line 16007 "qb64pe.bas"
S_18456:;
#line 16007 "qb64pe.bas"
if ((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH< 0 ))||is_error_pending()){
#line 16007 "qb64pe.bas"
if(qbevent){evnt(16007);if(r)goto S_18456;}
#line 16007 "qb64pe.bas"
do{
#line 16007 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 16007 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16007 "qb64pe.bas"
if(!qbevent)break;evnt(16007);}while(r);
#line 16007 "qb64pe.bas"
do{
#line 16007 "qb64pe.bas"
goto exit_subfunc;
#line 16007 "qb64pe.bas"
if(!qbevent)break;evnt(16007);}while(r);
#line 16007 "qb64pe.bas"
}
#line 16008 "qb64pe.bas"
S_18460:;
#line 16008 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,(-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH== 0 ))&(qbs_equal(qbs_ucase(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_TOKEN),qbs_new_txt_len("TO",2)))))||is_error_pending()){
#line 16008 "qb64pe.bas"
if(qbevent){evnt(16008);if(r)goto S_18460;}
#line 16009 "qb64pe.bas"
S_18461:;
#line 16009 "qb64pe.bas"
if ((*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION)||is_error_pending()){
#line 16009 "qb64pe.bas"
if(qbevent){evnt(16009);if(r)goto S_18461;}
#line 16009 "qb64pe.bas"
do{
#line 16009 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 16009 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16009 "qb64pe.bas"
if(!qbevent)break;evnt(16009);}while(r);
#line 16009 "qb64pe.bas"
do{
#line 16009 "qb64pe.bas"
goto exit_subfunc;
#line 16009 "qb64pe.bas"
if(!qbevent)break;evnt(16009);}while(r);
#line 16009 "qb64pe.bas"
}
#line 16010 "qb64pe.bas"
do{
#line 16010 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKEN_INDEX;
#line 16010 "qb64pe.bas"
if(!qbevent)break;evnt(16010);}while(r);
#line 16011 "qb64pe.bas"
}
#line 16012 "qb64pe.bas"
fornext_continue_2148:;
#line 16012 "qb64pe.bas"
}
#line 16012 "qb64pe.bas"
fornext_exit_2148:;
#line 16013 "qb64pe.bas"
S_18468:;
#line 16013 "qb64pe.bas"
if ((-(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_INNER_DEPTH!= 0 ))||is_error_pending()){
#line 16013 "qb64pe.bas"
if(qbevent){evnt(16013);if(r)goto S_18468;}
#line 16013 "qb64pe.bas"
do{
#line 16013 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 16013 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16013 "qb64pe.bas"
if(!qbevent)break;evnt(16013);}while(r);
#line 16013 "qb64pe.bas"
do{
#line 16013 "qb64pe.bas"
goto exit_subfunc;
#line 16013 "qb64pe.bas"
if(!qbevent)break;evnt(16013);}while(r);
#line 16013 "qb64pe.bas"
}
#line 16015 "qb64pe.bas"
S_18472:;
#line 16015 "qb64pe.bas"
if ((*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION)||is_error_pending()){
#line 16015 "qb64pe.bas"
if(qbevent){evnt(16015);if(r)goto S_18472;}
#line 16016 "qb64pe.bas"
do{
#line 16016 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_EXPR,FUNC_GETELEMENTS(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR,&(pass2150= 1 ),&(pass2151=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION- 1 )));
#line 16016 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16016 "qb64pe.bas"
if(!qbevent)break;evnt(16016);}while(r);
#line 16017 "qb64pe.bas"
do{
#line 16017 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_EXPR,FUNC_GETELEMENTS(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR,&(pass2152=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION+ 1 ),_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DIM_TOKENS));
#line 16017 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16017 "qb64pe.bas"
if(!qbevent)break;evnt(16017);}while(r);
#line 16018 "qb64pe.bas"
S_18475:;
#line 16018 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_EXPR,qbs_new_txt_len("",0)))|(qbs_equal(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_EXPR,qbs_new_txt_len("",0)))))||is_error_pending()){
#line 16018 "qb64pe.bas"
if(qbevent){evnt(16018);if(r)goto S_18475;}
#line 16018 "qb64pe.bas"
do{
#line 16018 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 16018 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16018 "qb64pe.bas"
if(!qbevent)break;evnt(16018);}while(r);
#line 16018 "qb64pe.bas"
do{
#line 16018 "qb64pe.bas"
goto exit_subfunc;
#line 16018 "qb64pe.bas"
if(!qbevent)break;evnt(16018);}while(r);
#line 16018 "qb64pe.bas"
}
#line 16019 "qb64pe.bas"
}else{
#line 16020 "qb64pe.bas"
S_18480:;
#line 16020 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ltrim(qbs_rtrim(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR)),qbs_new_txt_len("0",1))))||is_error_pending()){
#line 16020 "qb64pe.bas"
if(qbevent){evnt(16020);if(r)goto S_18480;}
#line 16021 "qb64pe.bas"
do{
#line 16021 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_EXPR,qbs_new_txt_len("0",1));
#line 16021 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16021 "qb64pe.bas"
if(!qbevent)break;evnt(16021);}while(r);
#line 16022 "qb64pe.bas"
}else{
#line 16023 "qb64pe.bas"
do{
#line 16023 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_EXPR,qbs__tostr((int64)(*__INTEGER_OPTIONBASE+ 0 ),NULL,0));
#line 16023 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16023 "qb64pe.bas"
if(!qbevent)break;evnt(16023);}while(r);
#line 16024 "qb64pe.bas"
}
#line 16025 "qb64pe.bas"
do{
#line 16025 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_EXPR,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DIM_EXPR);
#line 16025 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16025 "qb64pe.bas"
if(!qbevent)break;evnt(16025);}while(r);
#line 16026 "qb64pe.bas"
}
#line 16028 "qb64pe.bas"
do{
#line 16028 "qb64pe.bas"
*__INTEGER_CONSTEQUATION= 1 ;
#line 16028 "qb64pe.bas"
if(!qbevent)break;evnt(16028);}while(r);
#line 16029 "qb64pe.bas"
do{
#line 16029 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_ORDERED,FUNC_FIXOPERATIONORDER(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_EXPR));
#line 16029 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16029 "qb64pe.bas"
if(!qbevent)break;evnt(16029);}while(r);
#line 16030 "qb64pe.bas"
S_18489:;
#line 16030 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16030 "qb64pe.bas"
if(qbevent){evnt(16030);if(r)goto S_18489;}
#line 16030 "qb64pe.bas"
do{
#line 16030 "qb64pe.bas"
goto exit_subfunc;
#line 16030 "qb64pe.bas"
if(!qbevent)break;evnt(16030);}while(r);
#line 16030 "qb64pe.bas"
}
#line 16031 "qb64pe.bas"
do{
#line 16031 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_TEXT,FUNC_EVALUATETOTYP(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_ORDERED,&(pass2153= 64 )));
#line 16031 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16031 "qb64pe.bas"
if(!qbevent)break;evnt(16031);}while(r);
#line 16032 "qb64pe.bas"
S_18493:;
#line 16032 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16032 "qb64pe.bas"
if(qbevent){evnt(16032);if(r)goto S_18493;}
#line 16032 "qb64pe.bas"
do{
#line 16032 "qb64pe.bas"
goto exit_subfunc;
#line 16032 "qb64pe.bas"
if(!qbevent)break;evnt(16032);}while(r);
#line 16032 "qb64pe.bas"
}
#line 16033 "qb64pe.bas"
do{
#line 16033 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_LOWER_IS_CONST=*__INTEGER_CONSTEQUATION;
#line 16033 "qb64pe.bas"
if(!qbevent)break;evnt(16033);}while(r);
#line 16035 "qb64pe.bas"
do{
#line 16035 "qb64pe.bas"
*__INTEGER_CONSTEQUATION= 1 ;
#line 16035 "qb64pe.bas"
if(!qbevent)break;evnt(16035);}while(r);
#line 16036 "qb64pe.bas"
do{
#line 16036 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_ORDERED,FUNC_FIXOPERATIONORDER(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_EXPR));
#line 16036 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16036 "qb64pe.bas"
if(!qbevent)break;evnt(16036);}while(r);
#line 16037 "qb64pe.bas"
S_18499:;
#line 16037 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16037 "qb64pe.bas"
if(qbevent){evnt(16037);if(r)goto S_18499;}
#line 16037 "qb64pe.bas"
do{
#line 16037 "qb64pe.bas"
goto exit_subfunc;
#line 16037 "qb64pe.bas"
if(!qbevent)break;evnt(16037);}while(r);
#line 16037 "qb64pe.bas"
}
#line 16038 "qb64pe.bas"
do{
#line 16038 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_TEXT,FUNC_EVALUATETOTYP(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_ORDERED,&(pass2154= 64 )));
#line 16038 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16038 "qb64pe.bas"
if(!qbevent)break;evnt(16038);}while(r);
#line 16039 "qb64pe.bas"
S_18503:;
#line 16039 "qb64pe.bas"
if ((*__LONG_ERROR_HAPPENED)||is_error_pending()){
#line 16039 "qb64pe.bas"
if(qbevent){evnt(16039);if(r)goto S_18503;}
#line 16039 "qb64pe.bas"
do{
#line 16039 "qb64pe.bas"
goto exit_subfunc;
#line 16039 "qb64pe.bas"
if(!qbevent)break;evnt(16039);}while(r);
#line 16039 "qb64pe.bas"
}
#line 16040 "qb64pe.bas"
do{
#line 16040 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_UPPER_IS_CONST=*__INTEGER_CONSTEQUATION;
#line 16040 "qb64pe.bas"
if(!qbevent)break;evnt(16040);}while(r);
#line 16044 "qb64pe.bas"
S_18507:;
#line 16044 "qb64pe.bas"
if ((*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_UPPER_IS_CONST)||is_error_pending()){
#line 16044 "qb64pe.bas"
if(qbevent){evnt(16044);if(r)goto S_18507;}
#line 16045 "qb64pe.bas"
S_18508:;
#line 16045 "qb64pe.bas"
if ((*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TO_POSITION)||is_error_pending()){
#line 16045 "qb64pe.bas"
if(qbevent){evnt(16045);if(r)goto S_18508;}
#line 16046 "qb64pe.bas"
S_18509:;
#line 16046 "qb64pe.bas"
if ((*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_LOWER_IS_CONST)||is_error_pending()){
#line 16046 "qb64pe.bas"
if(qbevent){evnt(16046);if(r)goto S_18509;}
#line 16047 "qb64pe.bas"
S_18510:;
#line 16047 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_val<long double>(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_TEXT)<qbs_val<long double>(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_TEXT))))||is_error_pending()){
#line 16047 "qb64pe.bas"
if(qbevent){evnt(16047);if(r)goto S_18510;}
#line 16047 "qb64pe.bas"
do{
#line 16047 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 16047 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16047 "qb64pe.bas"
if(!qbevent)break;evnt(16047);}while(r);
#line 16047 "qb64pe.bas"
do{
#line 16047 "qb64pe.bas"
goto exit_subfunc;
#line 16047 "qb64pe.bas"
if(!qbevent)break;evnt(16047);}while(r);
#line 16047 "qb64pe.bas"
}
#line 16048 "qb64pe.bas"
}
#line 16049 "qb64pe.bas"
}else{
#line 16050 "qb64pe.bas"
S_18516:;
#line 16050 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_val<long double>(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_TEXT)< 0 )))||is_error_pending()){
#line 16050 "qb64pe.bas"
if(qbevent){evnt(16050);if(r)goto S_18516;}
#line 16050 "qb64pe.bas"
do{
#line 16050 "qb64pe.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid array bounds",20));
#line 16050 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16050 "qb64pe.bas"
if(!qbevent)break;evnt(16050);}while(r);
#line 16050 "qb64pe.bas"
do{
#line 16050 "qb64pe.bas"
goto exit_subfunc;
#line 16050 "qb64pe.bas"
if(!qbevent)break;evnt(16050);}while(r);
#line 16050 "qb64pe.bas"
}
#line 16051 "qb64pe.bas"
}
#line 16052 "qb64pe.bas"
}
#line 16054 "qb64pe.bas"
do{
#line 16054 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_CURRENT_DIM=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_CURRENT_DIM+ 1 ;
#line 16054 "qb64pe.bas"
if(!qbevent)break;evnt(16054);}while(r);
#line 16055 "qb64pe.bas"
do{
#line 16055 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX=((*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOTAL_DIMS-*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_CURRENT_DIM)* 4 )+( 4 );
#line 16055 "qb64pe.bas"
if(!qbevent)break;evnt(16055);}while(r);
#line 16056 "qb64pe.bas"
do{
#line 16056 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_NAME,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX,qbs_new_txt_len("_d",2)),qbs_ltrim(qbs_str((int32)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_CURRENT_DIM)))),qbs_new_txt_len("_lo",3)));
#line 16056 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16056 "qb64pe.bas"
if(!qbevent)break;evnt(16056);}while(r);
#line 16057 "qb64pe.bas"
do{
#line 16057 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_NAME,qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX,qbs_new_txt_len("_d",2)),qbs_ltrim(qbs_str((int32)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_CURRENT_DIM)))),qbs_new_txt_len("_hi",3)));
#line 16057 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16057 "qb64pe.bas"
if(!qbevent)break;evnt(16057);}while(r);
#line 16058 "qb64pe.bas"
do{
#line 16058 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER64_NAME,qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_NAME,qbs_new_txt_len("64",2)));
#line 16058 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16058 "qb64pe.bas"
if(!qbevent)break;evnt(16058);}while(r);
#line 16059 "qb64pe.bas"
do{
#line 16059 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER64_NAME,qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_NAME,qbs_new_txt_len("64",2)));
#line 16059 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16059 "qb64pe.bas"
if(!qbevent)break;evnt(16059);}while(r);
#line 16061 "qb64pe.bas"
do{
#line 16061 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("static int64 ",13)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER64_NAME),qbs_new_txt_len(";",1)));
#line 16061 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16061 "qb64pe.bas"
if(!qbevent)break;evnt(16061);}while(r);
#line 16062 "qb64pe.bas"
do{
#line 16062 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("static int64 ",13)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER64_NAME),qbs_new_txt_len(";",1)));
#line 16062 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16062 "qb64pe.bas"
if(!qbevent)break;evnt(16062);}while(r);
#line 16063 "qb64pe.bas"
do{
#line 16063 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("static ptrszint ",16)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_NAME),qbs_new_txt_len(";",1)));
#line 16063 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16063 "qb64pe.bas"
if(!qbevent)break;evnt(16063);}while(r);
#line 16064 "qb64pe.bas"
do{
#line 16064 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("static ptrszint ",16)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_NAME),qbs_new_txt_len(";",1)));
#line 16064 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16064 "qb64pe.bas"
if(!qbevent)break;evnt(16064);}while(r);
#line 16065 "qb64pe.bas"
do{
#line 16065 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER64_NAME),qbs_new_txt_len("=(int64)(",9)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_TEXT),qbs_new_txt_len(");",2)));
#line 16065 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16065 "qb64pe.bas"
if(!qbevent)break;evnt(16065);}while(r);
#line 16066 "qb64pe.bas"
do{
#line 16066 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER64_NAME),qbs_new_txt_len("=(int64)(",9)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_TEXT),qbs_new_txt_len(");",2)));
#line 16066 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16066 "qb64pe.bas"
if(!qbevent)break;evnt(16066);}while(r);
#line 16067 "qb64pe.bas"
do{
#line 16067 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("if (((int64)((ptrszint)",23)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER64_NAME),qbs_new_txt_len("))!=",4)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER64_NAME),qbs_new_txt_len(") error(257);",13)));
#line 16067 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16067 "qb64pe.bas"
if(!qbevent)break;evnt(16067);}while(r);
#line 16068 "qb64pe.bas"
do{
#line 16068 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("if (((int64)((ptrszint)",23)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER64_NAME),qbs_new_txt_len("))!=",4)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER64_NAME),qbs_new_txt_len(") error(257);",13)));
#line 16068 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16068 "qb64pe.bas"
if(!qbevent)break;evnt(16068);}while(r);
#line 16069 "qb64pe.bas"
do{
#line 16069 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_NAME),qbs_new_txt_len("=(ptrszint)",11)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER64_NAME),qbs_new_txt_len(";",1)));
#line 16069 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16069 "qb64pe.bas"
if(!qbevent)break;evnt(16069);}while(r);
#line 16070 "qb64pe.bas"
do{
#line 16070 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_NAME),qbs_new_txt_len("=(ptrszint)",11)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER64_NAME),qbs_new_txt_len(";",1)));
#line 16070 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16070 "qb64pe.bas"
if(!qbevent)break;evnt(16070);}while(r);
#line 16071 "qb64pe.bas"
do{
#line 16071 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_lower=",7)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_LOWER_NAME),qbs_new_txt_len(";",1)));
#line 16071 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16071 "qb64pe.bas"
if(!qbevent)break;evnt(16071);}while(r);
#line 16072 "qb64pe.bas"
do{
#line 16072 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_upper=",7)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_UPPER_NAME),qbs_new_txt_len(";",1)));
#line 16072 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16072 "qb64pe.bas"
if(!qbevent)break;evnt(16072);}while(r);
#line 16073 "qb64pe.bas"
do{
#line 16073 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("if (",4)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_upper<",7)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_lower) error(5);",17)));
#line 16073 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16073 "qb64pe.bas"
if(!qbevent)break;evnt(16073);}while(r);
#line 16074 "qb64pe.bas"
do{
#line 16074 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int32)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX)))),qbs_new_txt_len("]=",2)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_lower;",7)));
#line 16074 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16074 "qb64pe.bas"
if(!qbevent)break;evnt(16074);}while(r);
#line 16075 "qb64pe.bas"
do{
#line 16075 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int64)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX+ 1 )))),qbs_new_txt_len("]=",2)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_upper-",7)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_lower+1;",9)));
#line 16075 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16075 "qb64pe.bas"
if(!qbevent)break;evnt(16075);}while(r);
#line 16076 "qb64pe.bas"
do{
#line 16076 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),qbs_new_txt_len("if (",4)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int64)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX+ 1 )))),qbs_new_txt_len("]<=0) error(5);",15)));
#line 16076 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16076 "qb64pe.bas"
if(!qbevent)break;evnt(16076);}while(r);
#line 16077 "qb64pe.bas"
do{
#line 16077 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int64)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX+ 2 )))),qbs_new_txt_len("]=",2)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_stride;",8)));
#line 16077 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16077 "qb64pe.bas"
if(!qbevent)break;evnt(16077);}while(r);
#line 16078 "qb64pe.bas"
do{
#line 16078 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int64)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX+ 3 )))),qbs_new_txt_len("]=0;",4)));
#line 16078 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16078 "qb64pe.bas"
if(!qbevent)break;evnt(16078);}while(r);
#line 16079 "qb64pe.bas"
do{
#line 16079 "qb64pe.bas"
qbs_set(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_ACC,_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_CR),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_PREP_PREFIX),qbs_new_txt_len("_stride*=",9)),_SUB_BUILDDYNMEMBERBOUNDSPREP_STRING_DESC_NAME),qbs_new_txt_len("[",1)),qbs_ltrim(qbs_str((int64)(*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_DESC_INDEX+ 1 )))),qbs_new_txt_len("];",2)));
#line 16079 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16079 "qb64pe.bas"
if(!qbevent)break;evnt(16079);}while(r);
#line 16081 "qb64pe.bas"
do{
#line 16081 "qb64pe.bas"
*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_FIRST_INDEX=*_SUB_BUILDDYNMEMBERBOUNDSPREP_LONG_TOKEN_INDEX+ 1 ;
#line 16081 "qb64pe.bas"
if(!qbevent)break;evnt(16081);}while(r);
#line 16082 "qb64pe.bas"
}
#line 16083 "qb64pe.bas"
fornext_continue_2145:;
#line 16083 "qb64pe.bas"
}
#line 16083 "qb64pe.bas"
fornext_exit_2145:;
#line 16084 "qb64pe.bas"
exit_subfunc:;
#line 16084 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 16084 "qb64pe.bas"
#include "free26.txt"
#line 16084 "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 16084 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 16084 "qb64pe.bas"
}
