1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 09:04:43 +00:00
QB64-PE/internal/source/data112.txt

16 lines
677 B
Text
Raw Normal View History

2024-02-03 22:11:15 +00:00
int32 *_FUNC_ELEMENTISSTRING_LONG_ELEMENTISSTRING=NULL;
if(_FUNC_ELEMENTISSTRING_LONG_ELEMENTISSTRING==NULL){
_FUNC_ELEMENTISSTRING_LONG_ELEMENTISSTRING=(int32*)mem_static_malloc(4);
*_FUNC_ELEMENTISSTRING_LONG_ELEMENTISSTRING=0;
}
2024-04-10 17:52:08 +00:00
qbs*oldstr3718=NULL;
2024-02-03 22:11:15 +00:00
if(_FUNC_ELEMENTISSTRING_STRING_ELE->tmp||_FUNC_ELEMENTISSTRING_STRING_ELE->fixed||_FUNC_ELEMENTISSTRING_STRING_ELE->readonly){
2024-04-10 17:52:08 +00:00
oldstr3718=_FUNC_ELEMENTISSTRING_STRING_ELE;
if (oldstr3718->cmem_descriptor){
_FUNC_ELEMENTISSTRING_STRING_ELE=qbs_new_cmem(oldstr3718->len,0);
2022-11-22 23:53:31 +00:00
}else{
2024-04-10 17:52:08 +00:00
_FUNC_ELEMENTISSTRING_STRING_ELE=qbs_new(oldstr3718->len,0);
2022-08-26 14:13:09 +00:00
}
2024-04-10 17:52:08 +00:00
memcpy(_FUNC_ELEMENTISSTRING_STRING_ELE->chr,oldstr3718->chr,oldstr3718->len);
2022-11-22 23:53:31 +00:00
}