1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-20 09:15:14 +00:00
qb64/internal/source/data46.txt

44 lines
2 KiB
Plaintext
Raw Normal View History

2021-07-21 21:30:49 +00:00
qbs *_FUNC_TYP2CTYP_STRING_TYP2CTYP=NULL;
if (!_FUNC_TYP2CTYP_STRING_TYP2CTYP)_FUNC_TYP2CTYP_STRING_TYP2CTYP=qbs_new(0,0);
2021-09-19 23:10:34 +00:00
qbs*oldstr3196=NULL;
2021-07-21 21:30:49 +00:00
if(_FUNC_TYP2CTYP_STRING_TSTR->tmp||_FUNC_TYP2CTYP_STRING_TSTR->fixed||_FUNC_TYP2CTYP_STRING_TSTR->readonly){
2021-09-19 23:10:34 +00:00
oldstr3196=_FUNC_TYP2CTYP_STRING_TSTR;
if (oldstr3196->cmem_descriptor){
_FUNC_TYP2CTYP_STRING_TSTR=qbs_new_cmem(oldstr3196->len,0);
2021-07-21 21:30:49 +00:00
}else{
2021-09-19 23:10:34 +00:00
_FUNC_TYP2CTYP_STRING_TSTR=qbs_new(oldstr3196->len,0);
2021-02-07 10:32:23 +00:00
}
2021-09-19 23:10:34 +00:00
memcpy(_FUNC_TYP2CTYP_STRING_TSTR->chr,oldstr3196->chr,oldstr3196->len);
}
2021-07-21 21:30:49 +00:00
qbs *_FUNC_TYP2CTYP_STRING_CTYP=NULL;
if (!_FUNC_TYP2CTYP_STRING_CTYP)_FUNC_TYP2CTYP_STRING_CTYP=qbs_new(0,0);
int32 *_FUNC_TYP2CTYP_LONG_B=NULL;
if(_FUNC_TYP2CTYP_LONG_B==NULL){
_FUNC_TYP2CTYP_LONG_B=(int32*)mem_static_malloc(4);
*_FUNC_TYP2CTYP_LONG_B=0;
}
qbs *_FUNC_TYP2CTYP_STRING_TS=NULL;
if (!_FUNC_TYP2CTYP_STRING_TS)_FUNC_TYP2CTYP_STRING_TS=qbs_new(0,0);
int32 *_FUNC_TYP2CTYP_LONG_UNSGN=NULL;
if(_FUNC_TYP2CTYP_LONG_UNSGN==NULL){
_FUNC_TYP2CTYP_LONG_UNSGN=(int32*)mem_static_malloc(4);
*_FUNC_TYP2CTYP_LONG_UNSGN=0;
}
2021-09-19 23:10:34 +00:00
byte_element_struct *byte_element_3197=NULL;
if (!byte_element_3197){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3197=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3197=(byte_element_struct*)mem_static_malloc(12);
2021-07-21 21:30:49 +00:00
}
2021-07-30 17:42:07 +00:00
qbs *_FUNC_TYP2CTYP_STRING_N=NULL;
if (!_FUNC_TYP2CTYP_STRING_N)_FUNC_TYP2CTYP_STRING_N=qbs_new(0,0);
2021-09-19 23:10:34 +00:00
byte_element_struct *byte_element_3198=NULL;
if (!byte_element_3198){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3198=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3198=(byte_element_struct*)mem_static_malloc(12);
2021-07-21 21:30:49 +00:00
}
2021-07-30 17:42:07 +00:00
qbs *_FUNC_TYP2CTYP_STRING_S=NULL;
if (!_FUNC_TYP2CTYP_STRING_S)_FUNC_TYP2CTYP_STRING_S=qbs_new(0,0);
2021-09-19 23:10:34 +00:00
byte_element_struct *byte_element_3199=NULL;
if (!byte_element_3199){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3199=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3199=(byte_element_struct*)mem_static_malloc(12);
2021-07-30 17:42:07 +00:00
}
2021-09-19 23:10:34 +00:00
int32 pass3200;