qbs* FUNC_TYPE_GETCPPARITHMETICTYPE(int32*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID){
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 "data236.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{
if(!qbevent)break;evnt(24225,800,"type.bas");}while(r);
do{
*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS=FUNC_TYPE_GETSIZEINBITS(_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID);
if(!qbevent)break;evnt(24225,800,"type.bas");}while(r);
do{
if(!qbevent)break;evnt(24225,801,"type.bas");}while(r);
S_37510:;
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISOFFSETINBITS)||is_error_pending()){
if(qbevent){evnt(24225,803,"type.bas");if(r)goto S_37510;}
S_37511:;
if ((-(*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS<= 32 ))||is_error_pending()){
if(qbevent){evnt(24225,804,"type.bas");if(r)goto S_37511;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int32_t",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,804,"type.bas");}while(r);
}else{
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int64_t",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,804,"type.bas");}while(r);
}
S_37516:;
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISUNSIGNED)||is_error_pending()){
if(qbevent){evnt(24225,805,"type.bas");if(r)goto S_37516;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,805,"type.bas");}while(r);
}
S_37519:;
}else{
if (*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISFLOAT){
if(qbevent){evnt(24225,806,"type.bas");if(r)goto S_37519;}
S_37520:;
if(qbevent){evnt(24225,807,"type.bas");if(r)goto S_37520;}
S_37521:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 32 )))||is_error_pending()){
if(qbevent){evnt(24225,808,"type.bas");if(r)goto S_37521;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("float",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,808,"type.bas");}while(r);
sc_ec_213_end:;
goto sc_4337_end;
}
S_37523:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 64 )))||is_error_pending()){
if(qbevent){evnt(24225,809,"type.bas");if(r)goto S_37523;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("double",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,809,"type.bas");}while(r);
sc_ec_214_end:;
goto sc_4337_end;
}
S_37525:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 256 )))||is_error_pending()){
if(qbevent){evnt(24225,810,"type.bas");if(r)goto S_37525;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("long double",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,810,"type.bas");}while(r);
sc_ec_215_end:;
goto sc_4337_end;
}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid floating point type size",32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,811,"type.bas");}while(r);
sc_4337_end:;
S_37530:;
}else{
if (*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISOFFSET){
if(qbevent){evnt(24225,813,"type.bas");if(r)goto S_37530;}
S_37531:;
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISUNSIGNED)||is_error_pending()){
if(qbevent){evnt(24225,814,"type.bas");if(r)goto S_37531;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("uintptr_t",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,814,"type.bas");}while(r);
}else{
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("intptr_t",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,814,"type.bas");}while(r);
}
}else{
S_37537:;
if(qbevent){evnt(24225,816,"type.bas");if(r)goto S_37537;}
S_37538:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 8 )))||is_error_pending()){
if(qbevent){evnt(24225,817,"type.bas");if(r)goto S_37538;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int8_t",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,817,"type.bas");}while(r);
sc_ec_216_end:;
goto sc_4338_end;
}
S_37540:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 16 )))||is_error_pending()){
if(qbevent){evnt(24225,818,"type.bas");if(r)goto S_37540;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int16_t",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,818,"type.bas");}while(r);
sc_ec_217_end:;
goto sc_4338_end;
}
S_37542:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 32 )))||is_error_pending()){
if(qbevent){evnt(24225,819,"type.bas");if(r)goto S_37542;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int32_t",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,819,"type.bas");}while(r);
sc_ec_218_end:;
goto sc_4338_end;
}
S_37544:;
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 64 )))||is_error_pending()){
if(qbevent){evnt(24225,820,"type.bas");if(r)goto S_37544;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int64_t",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,820,"type.bas");}while(r);
sc_ec_219_end:;
goto sc_4338_end;
}
do{
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid integer type size",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,821,"type.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24225,821,"type.bas");}while(r);
sc_4338_end:;
S_37550:;
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISUNSIGNED)||is_error_pending()){
if(qbevent){evnt(24225,823,"type.bas");if(r)goto S_37550;}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,823,"type.bas");}while(r);
}
}
}
}
do{
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_TYPE_GETCPPARITHMETICTYPE,_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24225,826,"type.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free236.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;
qbs_maketmp(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_TYPE_GETCPPARITHMETICTYPE);return _FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_TYPE_GETCPPARITHMETICTYPE;
}
