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/data31.txt

26 lines
1.1 KiB
Text
Raw Normal View History

2024-01-20 16:04:21 +00:00
int32 *_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE=NULL;
if(_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE==NULL){
_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE=(int32*)mem_static_malloc(4);
*_FUNC_OPERATORUSAGE_LONG_OPERATORUSAGE=0;
}
2024-02-17 01:00:18 +00:00
qbs*oldstr3069=NULL;
2024-01-20 16:04:21 +00:00
if(_FUNC_OPERATORUSAGE_STRING_OPERATOR->tmp||_FUNC_OPERATORUSAGE_STRING_OPERATOR->fixed||_FUNC_OPERATORUSAGE_STRING_OPERATOR->readonly){
2024-02-17 01:00:18 +00:00
oldstr3069=_FUNC_OPERATORUSAGE_STRING_OPERATOR;
if (oldstr3069->cmem_descriptor){
_FUNC_OPERATORUSAGE_STRING_OPERATOR=qbs_new_cmem(oldstr3069->len,0);
2024-01-20 16:04:21 +00:00
}else{
2024-02-17 01:00:18 +00:00
_FUNC_OPERATORUSAGE_STRING_OPERATOR=qbs_new(oldstr3069->len,0);
2024-01-20 16:04:21 +00:00
}
2024-02-17 01:00:18 +00:00
memcpy(_FUNC_OPERATORUSAGE_STRING_OPERATOR->chr,oldstr3069->chr,oldstr3069->len);
2024-01-20 16:04:21 +00:00
}
2024-02-17 01:00:18 +00:00
qbs*oldstr3070=NULL;
2024-01-20 16:04:21 +00:00
if(_FUNC_OPERATORUSAGE_STRING_INFO->tmp||_FUNC_OPERATORUSAGE_STRING_INFO->fixed||_FUNC_OPERATORUSAGE_STRING_INFO->readonly){
2024-02-17 01:00:18 +00:00
oldstr3070=_FUNC_OPERATORUSAGE_STRING_INFO;
if (oldstr3070->cmem_descriptor){
_FUNC_OPERATORUSAGE_STRING_INFO=qbs_new_cmem(oldstr3070->len,0);
2022-08-26 14:13:09 +00:00
}else{
2024-02-17 01:00:18 +00:00
_FUNC_OPERATORUSAGE_STRING_INFO=qbs_new(oldstr3070->len,0);
2022-08-26 14:13:09 +00:00
}
2024-02-17 01:00:18 +00:00
memcpy(_FUNC_OPERATORUSAGE_STRING_INFO->chr,oldstr3070->chr,oldstr3070->len);
2022-08-26 14:13:09 +00:00
}