#line 18988 "qb64pe.bas"
int16 FUNC_HASFINALEMPTYARRAYBRACKETS(qbs*_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_EXPR){
#line 18988 "qb64pe.bas"
qbs *tqbs;
#line 18988 "qb64pe.bas"
ptrszint tmp_long;
#line 18988 "qb64pe.bas"
int32 tmp_fileno;
#line 18988 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 18988 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 18988 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 18988 "qb64pe.bas"
#include "data60.txt"
#line 18988 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 18988 "qb64pe.bas"
new_mem_lock();
#line 18988 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 18988 "qb64pe.bas"
sf_mem_lock->type=3;
#line 18988 "qb64pe.bas"
libqb_check_stack();
#line 18988 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 18989 "qb64pe.bas"
do{
#line 18989 "qb64pe.bas"
if(!qbevent)break;evnt(18989);}while(r);
#line 18991 "qb64pe.bas"
do{
#line 18991 "qb64pe.bas"
qbs_set(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_EXPR);
#line 18991 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 18991 "qb64pe.bas"
if(!qbevent)break;evnt(18991);}while(r);
#line 18992 "qb64pe.bas"
do{
#line 18992 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT=FUNC_NUMELEMENTS(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK);
#line 18992 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 18992 "qb64pe.bas"
if(!qbevent)break;evnt(18992);}while(r);
#line 18993 "qb64pe.bas"
S_21974:;
#line 18993 "qb64pe.bas"
if ((-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT== 0 ))||is_error_pending()){
#line 18993 "qb64pe.bas"
if(qbevent){evnt(18993);if(r)goto S_21974;}
#line 18993 "qb64pe.bas"
do{
#line 18993 "qb64pe.bas"
goto exit_subfunc;
#line 18993 "qb64pe.bas"
if(!qbevent)break;evnt(18993);}while(r);
#line 18993 "qb64pe.bas"
}
#line 18996 "qb64pe.bas"
S_21977:;
#line 18996 "qb64pe.bas"
while((-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT>= 2 ))||is_error_pending()){
#line 18996 "qb64pe.bas"
if(qbevent){evnt(18996);if(r)goto S_21977;}
#line 18997 "qb64pe.bas"
S_21978:;
#line 18997 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(FUNC_GETELEMENT(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,&(pass2547= 1 )),qbs_new_txt_len("(",1)))|(qbs_notequal(FUNC_GETELEMENT(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT),qbs_new_txt_len(")",1)))))||is_error_pending()){
#line 18997 "qb64pe.bas"
if(qbevent){evnt(18997);if(r)goto S_21978;}
#line 18997 "qb64pe.bas"
do{
#line 18997 "qb64pe.bas"
goto dl_exit_2546;
#line 18997 "qb64pe.bas"
if(!qbevent)break;evnt(18997);}while(r);
#line 18997 "qb64pe.bas"
}
#line 18999 "qb64pe.bas"
do{
#line 18999 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING= 0 ;
#line 18999 "qb64pe.bas"
if(!qbevent)break;evnt(18999);}while(r);
#line 19000 "qb64pe.bas"
do{
#line 19000 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_WHOLE_WRAP= -1 ;
#line 19000 "qb64pe.bas"
if(!qbevent)break;evnt(19000);}while(r);
#line 19001 "qb64pe.bas"
S_21983:;
#line 19001 "qb64pe.bas"
fornext_value2549= 1 ;
#line 19001 "qb64pe.bas"
fornext_finalvalue2549=*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT;
#line 19001 "qb64pe.bas"
fornext_step2549= 1 ;
#line 19001 "qb64pe.bas"
if (fornext_step2549<0) fornext_step_negative2549=1; else fornext_step_negative2549=0;
#line 19001 "qb64pe.bas"
if (is_error_pending()) goto fornext_error2549;
#line 19001 "qb64pe.bas"
goto fornext_entrylabel2549;
#line 19001 "qb64pe.bas"
while(1){
#line 19001 "qb64pe.bas"
fornext_value2549=fornext_step2549+(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_INDEX);
#line 19001 "qb64pe.bas"
fornext_entrylabel2549:
#line 19001 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_INDEX=fornext_value2549;
#line 19001 "qb64pe.bas"
if (fornext_step_negative2549){
#line 19001 "qb64pe.bas"
if (fornext_value2549<fornext_finalvalue2549) break;
#line 19001 "qb64pe.bas"
}else{
#line 19001 "qb64pe.bas"
if (fornext_value2549>fornext_finalvalue2549) break;
#line 19001 "qb64pe.bas"
}
#line 19001 "qb64pe.bas"
fornext_error2549:;
#line 19001 "qb64pe.bas"
if(qbevent){evnt(19001);if(r)goto S_21983;}
#line 19002 "qb64pe.bas"
do{
#line 19002 "qb64pe.bas"
qbs_set(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_TOKEN_TEXT,FUNC_GETELEMENT(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_INDEX));
#line 19002 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 19002 "qb64pe.bas"
if(!qbevent)break;evnt(19002);}while(r);
#line 19003 "qb64pe.bas"
S_21985:;
#line 19003 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_TOKEN_TEXT,qbs_new_txt_len("(",1))))||is_error_pending()){
#line 19003 "qb64pe.bas"
if(qbevent){evnt(19003);if(r)goto S_21985;}
#line 19003 "qb64pe.bas"
do{
#line 19003 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING=*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING+ 1 ;
#line 19003 "qb64pe.bas"
if(!qbevent)break;evnt(19003);}while(r);
#line 19003 "qb64pe.bas"
}
#line 19004 "qb64pe.bas"
S_21988:;
#line 19004 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_TOKEN_TEXT,qbs_new_txt_len(")",1))))||is_error_pending()){
#line 19004 "qb64pe.bas"
if(qbevent){evnt(19004);if(r)goto S_21988;}
#line 19005 "qb64pe.bas"
do{
#line 19005 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING=*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING- 1 ;
#line 19005 "qb64pe.bas"
if(!qbevent)break;evnt(19005);}while(r);
#line 19006 "qb64pe.bas"
S_21990:;
#line 19006 "qb64pe.bas"
if (((-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING== 0 ))&(-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_INDEX!=*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT)))||is_error_pending()){
#line 19006 "qb64pe.bas"
if(qbevent){evnt(19006);if(r)goto S_21990;}
#line 19006 "qb64pe.bas"
do{
#line 19006 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_WHOLE_WRAP= 0 ;
#line 19006 "qb64pe.bas"
if(!qbevent)break;evnt(19006);}while(r);
#line 19006 "qb64pe.bas"
do{
#line 19006 "qb64pe.bas"
goto fornext_exit_2548;
#line 19006 "qb64pe.bas"
if(!qbevent)break;evnt(19006);}while(r);
#line 19006 "qb64pe.bas"
}
#line 19007 "qb64pe.bas"
}
#line 19008 "qb64pe.bas"
fornext_continue_2548:;
#line 19008 "qb64pe.bas"
}
#line 19008 "qb64pe.bas"
fornext_exit_2548:;
#line 19010 "qb64pe.bas"
S_21996:;
#line 19010 "qb64pe.bas"
if (((-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_WHOLE_WRAP== 0 ))|(-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_NESTING!= 0 )))||is_error_pending()){
#line 19010 "qb64pe.bas"
if(qbevent){evnt(19010);if(r)goto S_21996;}
#line 19010 "qb64pe.bas"
do{
#line 19010 "qb64pe.bas"
goto dl_exit_2546;
#line 19010 "qb64pe.bas"
if(!qbevent)break;evnt(19010);}while(r);
#line 19010 "qb64pe.bas"
}
#line 19011 "qb64pe.bas"
do{
#line 19011 "qb64pe.bas"
qbs_set(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,FUNC_GETELEMENTS(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,&(pass2550= 2 ),&(pass2551=*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT- 1 )));
#line 19011 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 19011 "qb64pe.bas"
if(!qbevent)break;evnt(19011);}while(r);
#line 19012 "qb64pe.bas"
do{
#line 19012 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT=FUNC_NUMELEMENTS(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK);
#line 19012 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 19012 "qb64pe.bas"
if(!qbevent)break;evnt(19012);}while(r);
#line 19013 "qb64pe.bas"
S_22001:;
#line 19013 "qb64pe.bas"
if ((-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT== 0 ))||is_error_pending()){
#line 19013 "qb64pe.bas"
if(qbevent){evnt(19013);if(r)goto S_22001;}
#line 19013 "qb64pe.bas"
do{
#line 19013 "qb64pe.bas"
goto exit_subfunc;
#line 19013 "qb64pe.bas"
if(!qbevent)break;evnt(19013);}while(r);
#line 19013 "qb64pe.bas"
}
#line 19014 "qb64pe.bas"
dl_continue_2546:;
#line 19014 "qb64pe.bas"
}
#line 19014 "qb64pe.bas"
dl_exit_2546:;
#line 19016 "qb64pe.bas"
S_22005:;
#line 19016 "qb64pe.bas"
if ((-(*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT< 2 ))||is_error_pending()){
#line 19016 "qb64pe.bas"
if(qbevent){evnt(19016);if(r)goto S_22005;}
#line 19016 "qb64pe.bas"
do{
#line 19016 "qb64pe.bas"
goto exit_subfunc;
#line 19016 "qb64pe.bas"
if(!qbevent)break;evnt(19016);}while(r);
#line 19016 "qb64pe.bas"
}
#line 19017 "qb64pe.bas"
S_22008:;
#line 19017 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(FUNC_GETELEMENT(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,&(pass2552=*_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT- 1 )),qbs_new_txt_len("(",1)))&(qbs_equal(FUNC_GETELEMENT(_FUNC_HASFINALEMPTYARRAYBRACKETS_STRING_WORK,_FUNC_HASFINALEMPTYARRAYBRACKETS_LONG_TOKEN_COUNT),qbs_new_txt_len(")",1)))))||is_error_pending()){
#line 19017 "qb64pe.bas"
if(qbevent){evnt(19017);if(r)goto S_22008;}
#line 19018 "qb64pe.bas"
do{
#line 19018 "qb64pe.bas"
*_FUNC_HASFINALEMPTYARRAYBRACKETS_INTEGER_HASFINALEMPTYARRAYBRACKETS= -1 ;
#line 19018 "qb64pe.bas"
if(!qbevent)break;evnt(19018);}while(r);
#line 19019 "qb64pe.bas"
}
#line 19020 "qb64pe.bas"
exit_subfunc:;
#line 19020 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 19020 "qb64pe.bas"
#include "free60.txt"
#line 19020 "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 19020 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 19020 "qb64pe.bas"
return *_FUNC_HASFINALEMPTYARRAYBRACKETS_INTEGER_HASFINALEMPTYARRAYBRACKETS;
#line 19020 "qb64pe.bas"
}
