int32 FUNC_ISOPERATOR(qbs*_FUNC_ISOPERATOR_STRING_A2){
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 "data37.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (is_error_pending()) goto exit_subfunc;
do{
qbs_set(_FUNC_ISOPERATOR_STRING_A,qbs_ucase(_FUNC_ISOPERATOR_STRING_A2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(21611);}while(r);
do{
*_FUNC_ISOPERATOR_LONG_L= 0 ;
if(!qbevent)break;evnt(21612);}while(r);
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21613);}while(r);
S_24890:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("_ORELSE",7))))||is_error_pending()){
if(qbevent){evnt(21613);if(r)goto S_24890;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21613);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21614);}while(r);
S_24894:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("_ANDALSO",8))))||is_error_pending()){
if(qbevent){evnt(21614);if(r)goto S_24894;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21614);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21615);}while(r);
S_24898:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("IMP",3))))||is_error_pending()){
if(qbevent){evnt(21615);if(r)goto S_24898;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21615);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21616);}while(r);
S_24902:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("EQV",3))))||is_error_pending()){
if(qbevent){evnt(21616);if(r)goto S_24902;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21616);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21617);}while(r);
S_24906:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("XOR",3))))||is_error_pending()){
if(qbevent){evnt(21617);if(r)goto S_24906;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21617);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21618);}while(r);
S_24910:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("OR",2))))||is_error_pending()){
if(qbevent){evnt(21618);if(r)goto S_24910;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21618);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21619);}while(r);
S_24914:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("AND",3))))||is_error_pending()){
if(qbevent){evnt(21619);if(r)goto S_24914;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21619);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21620);}while(r);
S_24918:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("_NEGATE",7))))||is_error_pending()){
if(qbevent){evnt(21620);if(r)goto S_24918;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21620);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21621);}while(r);
S_24922:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("NOT",3))))||is_error_pending()){
if(qbevent){evnt(21621);if(r)goto S_24922;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21621);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21622);}while(r);
S_24926:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("=",1))))||is_error_pending()){
if(qbevent){evnt(21623);if(r)goto S_24926;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21623);}while(r);
}
S_24929:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">",1))))||is_error_pending()){
if(qbevent){evnt(21624);if(r)goto S_24929;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21624);}while(r);
}
S_24932:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<",1))))||is_error_pending()){
if(qbevent){evnt(21625);if(r)goto S_24932;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21625);}while(r);
}
S_24935:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<>",2))))||is_error_pending()){
if(qbevent){evnt(21626);if(r)goto S_24935;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21626);}while(r);
}
S_24938:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<=",2))))||is_error_pending()){
if(qbevent){evnt(21627);if(r)goto S_24938;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21627);}while(r);
}
S_24941:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">=",2))))||is_error_pending()){
if(qbevent){evnt(21628);if(r)goto S_24941;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21628);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21629);}while(r);
S_24945:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("+",1))))||is_error_pending()){
if(qbevent){evnt(21630);if(r)goto S_24945;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21630);}while(r);
}
S_24948:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("-",1))))||is_error_pending()){
if(qbevent){evnt(21631);if(r)goto S_24948;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21631);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21632);}while(r);
S_24952:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("MOD",3))))||is_error_pending()){
if(qbevent){evnt(21632);if(r)goto S_24952;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21632);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21633);}while(r);
S_24956:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("\\",1))))||is_error_pending()){
if(qbevent){evnt(21633);if(r)goto S_24956;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21633);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21634);}while(r);
S_24960:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(21635);if(r)goto S_24960;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21635);}while(r);
}
S_24963:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("/",1))))||is_error_pending()){
if(qbevent){evnt(21636);if(r)goto S_24963;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21636);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21638);}while(r);
S_24967:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,func_chr( 241 ))))||is_error_pending()){
if(qbevent){evnt(21638);if(r)goto S_24967;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21638);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(21639);}while(r);
S_24971:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("^",1))))||is_error_pending()){
if(qbevent){evnt(21639);if(r)goto S_24971;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(21639);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(21640);}while(r);
LABEL_OPFOUND:;
if(qbevent){evnt(21641);r=0;}
do{
*_FUNC_ISOPERATOR_LONG_ISOPERATOR=*_FUNC_ISOPERATOR_LONG_L;
if(!qbevent)break;evnt(21642);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free37.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_ISOPERATOR_LONG_ISOPERATOR;
}
