int32 FUNC_PARSENUMHASHLOOKUP(qbs*_FUNC_PARSENUMHASHLOOKUP_STRING_ELE,void*_FUNC_PARSENUMHASHLOOKUP_UDT_STATE){
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 "data199.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{
*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHFOUND= 0 ;
if(!qbevent)break;evnt(25756,717,"const_eval.bas");}while(r);
do{
qbs_set(_FUNC_PARSENUMHASHLOOKUP_STRING_HASHNAME,_FUNC_PARSENUMHASHLOOKUP_STRING_ELE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,719,"const_eval.bas");}while(r);
do{
qbs_set(_FUNC_PARSENUMHASHLOOKUP_STRING_UNUSEDSYMBOL,FUNC_TRYREMOVESYMBOL(_FUNC_PARSENUMHASHLOOKUP_STRING_HASHNAME));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,720,"const_eval.bas");}while(r);
S_37027:;
if (( 0ll )||is_error_pending()){
if(qbevent){evnt(25756,722,"const_eval.bas");if(r)goto S_37027;}
do{
sub__echo(qbs_add(qbs_new_txt_len("hash lookup: ",13),_FUNC_PARSENUMHASHLOOKUP_STRING_HASHNAME));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,722,"const_eval.bas");}while(r);
}
S_37030:;
if (( 0ll )||is_error_pending()){
if(qbevent){evnt(25756,723,"const_eval.bas");if(r)goto S_37030;}
do{
sub__echo(qbs_add(qbs_new_txt_len("unused symbol: ",15),_FUNC_PARSENUMHASHLOOKUP_STRING_HASHNAME));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,723,"const_eval.bas");}while(r);
}
do{
*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHCHKFLAGS= 1024ll ;
if(!qbevent)break;evnt(25756,724,"const_eval.bas");}while(r);
do{
*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRES=FUNC_HASHFINDREV(_FUNC_PARSENUMHASHLOOKUP_STRING_HASHNAME,_FUNC_PARSENUMHASHLOOKUP_LONG_HASHCHKFLAGS,_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESFLAGS,_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,725,"const_eval.bas");}while(r);
S_37035:;
while((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRES)||is_error_pending()){
if(qbevent){evnt(25756,726,"const_eval.bas");if(r)goto S_37035;}
S_37036:;
if (((-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]==*__LONG_SUBFUNCN))|(-(((int32*)(__ARRAY_LONG_CONSTSUBFUNC[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTSUBFUNC[4],__ARRAY_LONG_CONSTSUBFUNC[5])]== 0 )))||is_error_pending()){
if(qbevent){evnt(25756,727,"const_eval.bas");if(r)goto S_37036;}
S_37037:;
if ((((int32*)(__ARRAY_LONG_CONSTDEFINED[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTDEFINED[4],__ARRAY_LONG_CONSTDEFINED[5])])||is_error_pending()){
if(qbevent){evnt(25756,728,"const_eval.bas");if(r)goto S_37037;}
do{
*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHFOUND= 1 ;
if(!qbevent)break;evnt(25756,729,"const_eval.bas");}while(r);
do{
goto dl_exit_4418;
if(!qbevent)break;evnt(25756,730,"const_eval.bas");}while(r);
}
}
S_37042:;
if ((-(*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRES!= 1 ))||is_error_pending()){
if(qbevent){evnt(25756,733,"const_eval.bas");if(r)goto S_37042;}
do{
*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRES=FUNC_HASHFINDCONT(_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESFLAGS,_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF);
if(!qbevent)break;evnt(25756,733,"const_eval.bas");}while(r);
}else{
do{
*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRES= 0 ;
if(!qbevent)break;evnt(25756,733,"const_eval.bas");}while(r);
}
dl_continue_4418:;
}
dl_exit_4418:;
S_37048:;
if (( 0ll )||is_error_pending()){
if(qbevent){evnt(25756,736,"const_eval.bas");if(r)goto S_37048;}
do{
sub__echo(qbs_add(qbs_new_txt_len("Hashfound:",10),qbs_str((int32)(*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHFOUND))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,736,"const_eval.bas");}while(r);
}
S_37051:;
if ((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHFOUND)||is_error_pending()){
if(qbevent){evnt(25756,737,"const_eval.bas");if(r)goto S_37051;}
S_37052:;
if (( 0ll )||is_error_pending()){
if(qbevent){evnt(25756,738,"const_eval.bas");if(r)goto S_37052;}
do{
sub__echo(qbs_add(qbs_new_txt_len("is string:",10),qbs_str((int64)(((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]&*__LONG_ISSTRING))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,738,"const_eval.bas");}while(r);
}
S_37055:;
if ((((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]&*__LONG_ISSTRING)||is_error_pending()){
if(qbevent){evnt(25756,740,"const_eval.bas");if(r)goto S_37055;}
do{
SUB_PARSENUMSETS((void*)( ((char*)(_FUNC_PARSENUMHASHLOOKUP_UDT_STATE)) + ((0+8)) ),((qbs*)(((uint64*)(__ARRAY_STRING_CONSTSTRING[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_STRING_CONSTSTRING[4],__ARRAY_STRING_CONSTSTRING[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,741,"const_eval.bas");}while(r);
S_37057:;
}else{
if (((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]&*__LONG_ISFLOAT){
if(qbevent){evnt(25756,742,"const_eval.bas");if(r)goto S_37057;}
do{
SUB_PARSENUMSETF((void*)( ((char*)(_FUNC_PARSENUMHASHLOOKUP_UDT_STATE)) + ((0+8)) ),(&(((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])])),(&(((long double*)(__ARRAY_FLOAT_CONSTFLOAT[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_FLOAT_CONSTFLOAT[4],__ARRAY_FLOAT_CONSTFLOAT[5])])));
if(!qbevent)break;evnt(25756,743,"const_eval.bas");}while(r);
}else{
S_37060:;
if ((((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])]&*__LONG_ISUNSIGNED)||is_error_pending()){
if(qbevent){evnt(25756,745,"const_eval.bas");if(r)goto S_37060;}
do{
SUB_PARSENUMSETUI((void*)( ((char*)(_FUNC_PARSENUMHASHLOOKUP_UDT_STATE)) + ((0+8)) ),(&(((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])])),(&(((uint64*)(__ARRAY_UINTEGER64_CONSTUINTEGER[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_UINTEGER64_CONSTUINTEGER[4],__ARRAY_UINTEGER64_CONSTUINTEGER[5])])));
if(!qbevent)break;evnt(25756,746,"const_eval.bas");}while(r);
}else{
do{
SUB_PARSENUMSETI((void*)( ((char*)(_FUNC_PARSENUMHASHLOOKUP_UDT_STATE)) + ((0+8)) ),(&(((int32*)(__ARRAY_LONG_CONSTTYPE[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_LONG_CONSTTYPE[4],__ARRAY_LONG_CONSTTYPE[5])])),(&(((int64*)(__ARRAY_INTEGER64_CONSTINTEGER[0]))[array_check((*_FUNC_PARSENUMHASHLOOKUP_LONG_HASHRESREF)-__ARRAY_INTEGER64_CONSTINTEGER[4],__ARRAY_INTEGER64_CONSTINTEGER[5])])));
if(!qbevent)break;evnt(25756,748,"const_eval.bas");}while(r);
}
}
}
S_37066:;
if (( 0ll )||is_error_pending()){
if(qbevent){evnt(25756,752,"const_eval.bas");if(r)goto S_37066;}
do{
sub__echo(qbs_add(qbs_add(qbs_new_txt_len("Found! value: ",14),qbs__tostr((long double)(*(long double*)(((char*)_FUNC_PARSENUMHASHLOOKUP_UDT_STATE)+((0+8)))),NULL,0)),*((qbs**)((char*)_FUNC_PARSENUMHASHLOOKUP_UDT_STATE+((0+56))))));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25756,752,"const_eval.bas");}while(r);
}
do{
*_FUNC_PARSENUMHASHLOOKUP_LONG_PARSENUMHASHLOOKUP= -1 ;
if(!qbevent)break;evnt(25756,754,"const_eval.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25756,755,"const_eval.bas");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free199.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_PARSENUMHASHLOOKUP_LONG_PARSENUMHASHLOOKUP;
}
