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 "data30.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(20143);}while(r);
do{
*_FUNC_ISOPERATOR_LONG_L= 0 ;
if(!qbevent)break;evnt(20144);}while(r);
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20145);}while(r);
S_23458:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("_ORELSE",7))))||is_error_pending()){
if(qbevent){evnt(20145);if(r)goto S_23458;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20145);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20146);}while(r);
S_23462:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("_ANDALSO",8))))||is_error_pending()){
if(qbevent){evnt(20146);if(r)goto S_23462;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20146);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20147);}while(r);
S_23466:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("IMP",3))))||is_error_pending()){
if(qbevent){evnt(20147);if(r)goto S_23466;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20147);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20148);}while(r);
S_23470:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("EQV",3))))||is_error_pending()){
if(qbevent){evnt(20148);if(r)goto S_23470;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20148);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20149);}while(r);
S_23474:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("XOR",3))))||is_error_pending()){
if(qbevent){evnt(20149);if(r)goto S_23474;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20149);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20150);}while(r);
S_23478:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("OR",2))))||is_error_pending()){
if(qbevent){evnt(20150);if(r)goto S_23478;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20150);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20151);}while(r);
S_23482:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("AND",3))))||is_error_pending()){
if(qbevent){evnt(20151);if(r)goto S_23482;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20151);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20152);}while(r);
S_23486:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("_NEGATE",7))))||is_error_pending()){
if(qbevent){evnt(20152);if(r)goto S_23486;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20152);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20153);}while(r);
S_23490:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("NOT",3))))||is_error_pending()){
if(qbevent){evnt(20153);if(r)goto S_23490;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20153);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20154);}while(r);
S_23494:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("=",1))))||is_error_pending()){
if(qbevent){evnt(20155);if(r)goto S_23494;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20155);}while(r);
}
S_23497:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">",1))))||is_error_pending()){
if(qbevent){evnt(20156);if(r)goto S_23497;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20156);}while(r);
}
S_23500:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<",1))))||is_error_pending()){
if(qbevent){evnt(20157);if(r)goto S_23500;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20157);}while(r);
}
S_23503:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<>",2))))||is_error_pending()){
if(qbevent){evnt(20158);if(r)goto S_23503;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20158);}while(r);
}
S_23506:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("<=",2))))||is_error_pending()){
if(qbevent){evnt(20159);if(r)goto S_23506;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20159);}while(r);
}
S_23509:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len(">=",2))))||is_error_pending()){
if(qbevent){evnt(20160);if(r)goto S_23509;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20160);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20161);}while(r);
S_23513:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("+",1))))||is_error_pending()){
if(qbevent){evnt(20162);if(r)goto S_23513;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20162);}while(r);
}
S_23516:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("-",1))))||is_error_pending()){
if(qbevent){evnt(20163);if(r)goto S_23516;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20163);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20164);}while(r);
S_23520:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("MOD",3))))||is_error_pending()){
if(qbevent){evnt(20164);if(r)goto S_23520;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20164);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20165);}while(r);
S_23524:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("\\",1))))||is_error_pending()){
if(qbevent){evnt(20165);if(r)goto S_23524;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20165);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20166);}while(r);
S_23528:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("*",1))))||is_error_pending()){
if(qbevent){evnt(20167);if(r)goto S_23528;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20167);}while(r);
}
S_23531:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("/",1))))||is_error_pending()){
if(qbevent){evnt(20168);if(r)goto S_23531;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20168);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20170);}while(r);
S_23535:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,func_chr( 241 ))))||is_error_pending()){
if(qbevent){evnt(20170);if(r)goto S_23535;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20170);}while(r);
}
do{
*_FUNC_ISOPERATOR_LONG_L=*_FUNC_ISOPERATOR_LONG_L+ 1 ;
if(!qbevent)break;evnt(20171);}while(r);
S_23539:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_ISOPERATOR_STRING_A,qbs_new_txt_len("^",1))))||is_error_pending()){
if(qbevent){evnt(20171);if(r)goto S_23539;}
do{
goto LABEL_OPFOUND;
if(!qbevent)break;evnt(20171);}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(20172);}while(r);
LABEL_OPFOUND:;
if(qbevent){evnt(20173);r=0;}
do{
*_FUNC_ISOPERATOR_LONG_ISOPERATOR=*_FUNC_ISOPERATOR_LONG_L;
if(!qbevent)break;evnt(20174);}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free30.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;
}
