1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 07:54:46 +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-04-10 17:52:08 +00:00
qbs*oldstr3063=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-04-10 17:52:08 +00:00
oldstr3063=_FUNC_OPERATORUSAGE_STRING_OPERATOR;
if (oldstr3063->cmem_descriptor){
_FUNC_OPERATORUSAGE_STRING_OPERATOR=qbs_new_cmem(oldstr3063->len,0);
2024-01-20 16:04:21 +00:00
}else{
2024-04-10 17:52:08 +00:00
_FUNC_OPERATORUSAGE_STRING_OPERATOR=qbs_new(oldstr3063->len,0);
2024-01-20 16:04:21 +00:00
}
2024-04-10 17:52:08 +00:00
memcpy(_FUNC_OPERATORUSAGE_STRING_OPERATOR->chr,oldstr3063->chr,oldstr3063->len);
2024-01-20 16:04:21 +00:00
}
2024-04-10 17:52:08 +00:00
qbs*oldstr3064=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-04-10 17:52:08 +00:00
oldstr3064=_FUNC_OPERATORUSAGE_STRING_INFO;
if (oldstr3064->cmem_descriptor){
_FUNC_OPERATORUSAGE_STRING_INFO=qbs_new_cmem(oldstr3064->len,0);
2022-08-26 14:13:09 +00:00
}else{
2024-04-10 17:52:08 +00:00
_FUNC_OPERATORUSAGE_STRING_INFO=qbs_new(oldstr3064->len,0);
2022-08-26 14:13:09 +00:00
}
2024-04-10 17:52:08 +00:00
memcpy(_FUNC_OPERATORUSAGE_STRING_INFO->chr,oldstr3064->chr,oldstr3064->len);
2022-08-26 14:13:09 +00:00
}