int16 FUNC_HASINDEXEDFINALMEMBERARRAY(qbs*_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data51.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N=FUNC_NUMELEMENTS(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18522);}while(r);
S_21524:;
if ((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N== 0 ))||is_error_pending()){
if(qbevent){evnt(18523);if(r)goto S_21524;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18523);}while(r);
}
S_21527:;
while((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N>= 2 ))||is_error_pending()){
if(qbevent){evnt(18525);if(r)goto S_21527;}
S_21528:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_notequal(FUNC_GETELEMENT(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,&(pass3199= 1 )),qbs_new_txt_len("(",1)))|(qbs_notequal(FUNC_GETELEMENT(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N),qbs_new_txt_len(")",1)))))||is_error_pending()){
if(qbevent){evnt(18526);if(r)goto S_21528;}
do{
goto dl_exit_3198;
if(!qbevent)break;evnt(18526);}while(r);
}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B= 0 ;
if(!qbevent)break;evnt(18528);}while(r);
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_WRAPPED= -1 ;
if(!qbevent)break;evnt(18529);}while(r);
S_21533:;
fornext_value3201= 1 ;
fornext_finalvalue3201=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N;
fornext_step3201= 1 ;
if (fornext_step3201<0) fornext_step_negative3201=1; else fornext_step_negative3201=0;
if (is_error_pending()) goto fornext_error3201;
goto fornext_entrylabel3201;
while(1){
fornext_value3201=fornext_step3201+(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I);
fornext_entrylabel3201:
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I=fornext_value3201;
if (fornext_step_negative3201){
if (fornext_value3201<fornext_finalvalue3201) break;
}else{
if (fornext_value3201>fornext_finalvalue3201) break;
}
fornext_error3201:;
if(qbevent){evnt(18530);if(r)goto S_21533;}
do{
qbs_set(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_T,FUNC_GETELEMENT(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18531);}while(r);
S_21535:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_T,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(18532);if(r)goto S_21535;}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B+ 1 ;
if(!qbevent)break;evnt(18532);}while(r);
}
S_21538:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_T,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(18533);if(r)goto S_21538;}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B- 1 ;
if(!qbevent)break;evnt(18534);}while(r);
S_21540:;
if (((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B== 0 ))&(-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I!=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N)))||is_error_pending()){
if(qbevent){evnt(18535);if(r)goto S_21540;}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_WRAPPED= 0 ;
if(!qbevent)break;evnt(18535);}while(r);
do{
goto fornext_exit_3200;
if(!qbevent)break;evnt(18535);}while(r);
}
}
fornext_continue_3200:;
}
fornext_exit_3200:;
S_21546:;
if (((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_WRAPPED== 0 ))|(-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B!= 0 )))||is_error_pending()){
if(qbevent){evnt(18538);if(r)goto S_21546;}
do{
goto dl_exit_3198;
if(!qbevent)break;evnt(18538);}while(r);
}
do{
qbs_set(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,FUNC_GETELEMENTS(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,&(pass3202= 2 ),&(pass3203=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N- 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18540);}while(r);
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N=FUNC_NUMELEMENTS(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18541);}while(r);
S_21551:;
if ((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N== 0 ))||is_error_pending()){
if(qbevent){evnt(18542);if(r)goto S_21551;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18542);}while(r);
}
dl_continue_3198:;
}
dl_exit_3198:;
S_21555:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(FUNC_GETELEMENT(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N),qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(18545);if(r)goto S_21555;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18545);}while(r);
}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B= 1 ;
if(!qbevent)break;evnt(18547);}while(r);
S_21559:;
fornext_value3205=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N- 1 ;
fornext_finalvalue3205= 1 ;
fornext_step3205= -1 ;
if (fornext_step3205<0) fornext_step_negative3205=1; else fornext_step_negative3205=0;
if (is_error_pending()) goto fornext_error3205;
goto fornext_entrylabel3205;
while(1){
fornext_value3205=fornext_step3205+(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I);
fornext_entrylabel3205:
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I=fornext_value3205;
if (fornext_step_negative3205){
if (fornext_value3205<fornext_finalvalue3205) break;
}else{
if (fornext_value3205>fornext_finalvalue3205) break;
}
fornext_error3205:;
if(qbevent){evnt(18548);if(r)goto S_21559;}
do{
qbs_set(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_T,FUNC_GETELEMENT(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(18549);}while(r);
S_21561:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_T,qbs_new_txt_len(")",1))))||is_error_pending()){
if(qbevent){evnt(18550);if(r)goto S_21561;}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B+ 1 ;
if(!qbevent)break;evnt(18550);}while(r);
}
S_21564:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_T,qbs_new_txt_len("(",1))))||is_error_pending()){
if(qbevent){evnt(18551);if(r)goto S_21564;}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B- 1 ;
if(!qbevent)break;evnt(18552);}while(r);
S_21566:;
if ((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_B== 0 ))||is_error_pending()){
if(qbevent){evnt(18553);if(r)goto S_21566;}
S_21567:;
if ((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I>= 3 ))||is_error_pending()){
if(qbevent){evnt(18554);if(r)goto S_21567;}
S_21568:;
if ((-(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I<(*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_N- 1 )))||is_error_pending()){
if(qbevent){evnt(18557);if(r)goto S_21568;}
S_21569:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(FUNC_GETELEMENT(_FUNC_HASINDEXEDFINALMEMBERARRAY_STRING_EXPR,&(pass3206=*_FUNC_HASINDEXEDFINALMEMBERARRAY_LONG_I- 2 )),qbs_new_txt_len(".",1))))||is_error_pending()){
if(qbevent){evnt(18558);if(r)goto S_21569;}
do{
*_FUNC_HASINDEXEDFINALMEMBERARRAY_INTEGER_HASINDEXEDFINALMEMBERARRAY= -1 ;
if(!qbevent)break;evnt(18558);}while(r);
}
}
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(18562);}while(r);
}
}
fornext_continue_3204:;
}
fornext_exit_3204:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free51.txt"
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;
cmem_sp=tmp_cmem_sp;
return *_FUNC_HASINDEXEDFINALMEMBERARRAY_INTEGER_HASINDEXEDFINALMEMBERARRAY;
}
