#line 2237 "utilities/type.bas"
qbs* FUNC_TYPE_GETCPPARITHMETICTYPE(int32*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID){
#line 2237 "utilities/type.bas"
qbs *tqbs;
#line 2237 "utilities/type.bas"
ptrszint tmp_long;
#line 2237 "utilities/type.bas"
int32 tmp_fileno;
#line 2237 "utilities/type.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 2237 "utilities/type.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 2237 "utilities/type.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 2237 "utilities/type.bas"
#include "data350.txt"
#line 2237 "utilities/type.bas"
mem_lock *sf_mem_lock;
#line 2237 "utilities/type.bas"
new_mem_lock();
#line 2237 "utilities/type.bas"
sf_mem_lock=mem_lock_tmp;
#line 2237 "utilities/type.bas"
sf_mem_lock->type=3;
#line 2237 "utilities/type.bas"
libqb_check_stack();
#line 2237 "utilities/type.bas"
if (is_error_pending()) goto exit_subfunc;
#line 2238 "utilities/type.bas"
do{
#line 2238 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2238,"type.bas");}while(r);
#line 2238 "utilities/type.bas"
do{
#line 2238 "utilities/type.bas"
*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS=FUNC_TYPE_GETSIZEINBITS(_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID);
#line 2238 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2238,"type.bas");}while(r);
#line 2239 "utilities/type.bas"
do{
#line 2239 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2239,"type.bas");}while(r);
#line 2241 "utilities/type.bas"
S_44390:;
#line 2241 "utilities/type.bas"
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISOFFSETINBITS)||is_error_pending()){
#line 2241 "utilities/type.bas"
if(qbevent){evnt(28809,2241,"type.bas");if(r)goto S_44390;}
#line 2242 "utilities/type.bas"
S_44391:;
#line 2242 "utilities/type.bas"
if ((-(*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS<= 32 ))||is_error_pending()){
#line 2242 "utilities/type.bas"
if(qbevent){evnt(28809,2242,"type.bas");if(r)goto S_44391;}
#line 2242 "utilities/type.bas"
do{
#line 2242 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int32_t",7));
#line 2242 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2242 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2242,"type.bas");}while(r);
#line 2242 "utilities/type.bas"
}else{
#line 2242 "utilities/type.bas"
do{
#line 2242 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int64_t",7));
#line 2242 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2242 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2242,"type.bas");}while(r);
#line 2242 "utilities/type.bas"
}
#line 2243 "utilities/type.bas"
S_44396:;
#line 2243 "utilities/type.bas"
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISUNSIGNED)||is_error_pending()){
#line 2243 "utilities/type.bas"
if(qbevent){evnt(28809,2243,"type.bas");if(r)goto S_44396;}
#line 2243 "utilities/type.bas"
do{
#line 2243 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE));
#line 2243 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2243 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2243,"type.bas");}while(r);
#line 2243 "utilities/type.bas"
}
#line 2244 "utilities/type.bas"
S_44399:;
#line 2244 "utilities/type.bas"
}else{
#line 2244 "utilities/type.bas"
if (*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISFLOAT){
#line 2244 "utilities/type.bas"
if(qbevent){evnt(28809,2244,"type.bas");if(r)goto S_44399;}
#line 2245 "utilities/type.bas"
S_44400:;
#line 2245 "utilities/type.bas"
if(qbevent){evnt(28809,2245,"type.bas");if(r)goto S_44400;}
#line 2246 "utilities/type.bas"
S_44401:;
#line 2246 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 32 )))||is_error_pending()){
#line 2246 "utilities/type.bas"
if(qbevent){evnt(28809,2246,"type.bas");if(r)goto S_44401;}
#line 2246 "utilities/type.bas"
do{
#line 2246 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("float",5));
#line 2246 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2246 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2246,"type.bas");}while(r);
#line 2247 "utilities/type.bas"
sc_ec_220_end:;
#line 2247 "utilities/type.bas"
goto sc_4523_end;
#line 2247 "utilities/type.bas"
}
#line 2247 "utilities/type.bas"
S_44403:;
#line 2247 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 64 )))||is_error_pending()){
#line 2247 "utilities/type.bas"
if(qbevent){evnt(28809,2247,"type.bas");if(r)goto S_44403;}
#line 2247 "utilities/type.bas"
do{
#line 2247 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("double",6));
#line 2247 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2247 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2247,"type.bas");}while(r);
#line 2248 "utilities/type.bas"
sc_ec_221_end:;
#line 2248 "utilities/type.bas"
goto sc_4523_end;
#line 2248 "utilities/type.bas"
}
#line 2248 "utilities/type.bas"
S_44405:;
#line 2248 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 256 )))||is_error_pending()){
#line 2248 "utilities/type.bas"
if(qbevent){evnt(28809,2248,"type.bas");if(r)goto S_44405;}
#line 2248 "utilities/type.bas"
do{
#line 2248 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("long double",11));
#line 2248 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2248 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2248,"type.bas");}while(r);
#line 2249 "utilities/type.bas"
sc_ec_222_end:;
#line 2249 "utilities/type.bas"
goto sc_4523_end;
#line 2249 "utilities/type.bas"
}
#line 2249 "utilities/type.bas"
do{
#line 2249 "utilities/type.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid floating point type size",32));
#line 2249 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2249 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2249,"type.bas");}while(r);
#line 2250 "utilities/type.bas"
sc_4523_end:;
#line 2251 "utilities/type.bas"
S_44410:;
#line 2251 "utilities/type.bas"
}else{
#line 2251 "utilities/type.bas"
if (*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISOFFSET){
#line 2251 "utilities/type.bas"
if(qbevent){evnt(28809,2251,"type.bas");if(r)goto S_44410;}
#line 2252 "utilities/type.bas"
S_44411:;
#line 2252 "utilities/type.bas"
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISUNSIGNED)||is_error_pending()){
#line 2252 "utilities/type.bas"
if(qbevent){evnt(28809,2252,"type.bas");if(r)goto S_44411;}
#line 2252 "utilities/type.bas"
do{
#line 2252 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("uintptr_t",9));
#line 2252 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2252 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2252,"type.bas");}while(r);
#line 2252 "utilities/type.bas"
}else{
#line 2252 "utilities/type.bas"
do{
#line 2252 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("intptr_t",8));
#line 2252 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2252 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2252,"type.bas");}while(r);
#line 2252 "utilities/type.bas"
}
#line 2253 "utilities/type.bas"
}else{
#line 2254 "utilities/type.bas"
S_44417:;
#line 2254 "utilities/type.bas"
if(qbevent){evnt(28809,2254,"type.bas");if(r)goto S_44417;}
#line 2255 "utilities/type.bas"
S_44418:;
#line 2255 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 8 )))||is_error_pending()){
#line 2255 "utilities/type.bas"
if(qbevent){evnt(28809,2255,"type.bas");if(r)goto S_44418;}
#line 2255 "utilities/type.bas"
do{
#line 2255 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int8_t",6));
#line 2255 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2255 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2255,"type.bas");}while(r);
#line 2256 "utilities/type.bas"
sc_ec_223_end:;
#line 2256 "utilities/type.bas"
goto sc_4524_end;
#line 2256 "utilities/type.bas"
}
#line 2256 "utilities/type.bas"
S_44420:;
#line 2256 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 16 )))||is_error_pending()){
#line 2256 "utilities/type.bas"
if(qbevent){evnt(28809,2256,"type.bas");if(r)goto S_44420;}
#line 2256 "utilities/type.bas"
do{
#line 2256 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int16_t",7));
#line 2256 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2256 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2256,"type.bas");}while(r);
#line 2257 "utilities/type.bas"
sc_ec_224_end:;
#line 2257 "utilities/type.bas"
goto sc_4524_end;
#line 2257 "utilities/type.bas"
}
#line 2257 "utilities/type.bas"
S_44422:;
#line 2257 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 32 )))||is_error_pending()){
#line 2257 "utilities/type.bas"
if(qbevent){evnt(28809,2257,"type.bas");if(r)goto S_44422;}
#line 2257 "utilities/type.bas"
do{
#line 2257 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int32_t",7));
#line 2257 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2257 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2257,"type.bas");}while(r);
#line 2258 "utilities/type.bas"
sc_ec_225_end:;
#line 2258 "utilities/type.bas"
goto sc_4524_end;
#line 2258 "utilities/type.bas"
}
#line 2258 "utilities/type.bas"
S_44424:;
#line 2258 "utilities/type.bas"
if (((*_FUNC_TYPE_GETCPPARITHMETICTYPE_ULONG_SIZEINBITS==( 64 )))||is_error_pending()){
#line 2258 "utilities/type.bas"
if(qbevent){evnt(28809,2258,"type.bas");if(r)goto S_44424;}
#line 2258 "utilities/type.bas"
do{
#line 2258 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_new_txt_len("int64_t",7));
#line 2258 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2258 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2258,"type.bas");}while(r);
#line 2259 "utilities/type.bas"
sc_ec_226_end:;
#line 2259 "utilities/type.bas"
goto sc_4524_end;
#line 2259 "utilities/type.bas"
}
#line 2259 "utilities/type.bas"
do{
#line 2259 "utilities/type.bas"
SUB_GIVE_ERROR(qbs_new_txt_len("Invalid integer type size",25));
#line 2259 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2259 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2259,"type.bas");}while(r);
#line 2259 "utilities/type.bas"
do{
#line 2259 "utilities/type.bas"
goto exit_subfunc;
#line 2259 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2259,"type.bas");}while(r);
#line 2260 "utilities/type.bas"
sc_4524_end:;
#line 2261 "utilities/type.bas"
S_44430:;
#line 2261 "utilities/type.bas"
if ((*_FUNC_TYPE_GETCPPARITHMETICTYPE_LONG_TYPEID&*__LONG_ISUNSIGNED)||is_error_pending()){
#line 2261 "utilities/type.bas"
if(qbevent){evnt(28809,2261,"type.bas");if(r)goto S_44430;}
#line 2261 "utilities/type.bas"
do{
#line 2261 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE,qbs_add(qbs_new_txt_len("u",1),_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE));
#line 2261 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2261 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2261,"type.bas");}while(r);
#line 2261 "utilities/type.bas"
}
#line 2262 "utilities/type.bas"
}
#line 2262 "utilities/type.bas"
}
#line 2262 "utilities/type.bas"
}
#line 2264 "utilities/type.bas"
do{
#line 2264 "utilities/type.bas"
qbs_set(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_TYPE_GETCPPARITHMETICTYPE,_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_CTYPE);
#line 2264 "utilities/type.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2264 "utilities/type.bas"
if(!qbevent)break;evnt(28809,2264,"type.bas");}while(r);
#line 2265 "utilities/type.bas"
exit_subfunc:;
#line 2265 "utilities/type.bas"
free_mem_lock(sf_mem_lock);
#line 2265 "utilities/type.bas"
#include "free350.txt"
#line 2265 "utilities/type.bas"
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;
#line 2265 "utilities/type.bas"
cmem_sp=tmp_cmem_sp;
#line 2265 "utilities/type.bas"
qbs_maketmp(_FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_TYPE_GETCPPARITHMETICTYPE);return _FUNC_TYPE_GETCPPARITHMETICTYPE_STRING_TYPE_GETCPPARITHMETICTYPE;
#line 2265 "utilities/type.bas"
}
