1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-30 05:10:37 +00:00
QB64-PE/internal/source/data36.txt

26 lines
1.1 KiB
Plaintext
Raw Normal View History

2022-09-09 12:19:17 +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;
}
2022-10-01 17:41:56 +00:00
qbs*oldstr3008=NULL;
2022-09-09 12:19:17 +00:00
if(_FUNC_OPERATORUSAGE_STRING_OPERATOR->tmp||_FUNC_OPERATORUSAGE_STRING_OPERATOR->fixed||_FUNC_OPERATORUSAGE_STRING_OPERATOR->readonly){
2022-10-01 17:41:56 +00:00
oldstr3008=_FUNC_OPERATORUSAGE_STRING_OPERATOR;
if (oldstr3008->cmem_descriptor){
_FUNC_OPERATORUSAGE_STRING_OPERATOR=qbs_new_cmem(oldstr3008->len,0);
2022-08-26 14:13:09 +00:00
}else{
2022-10-01 17:41:56 +00:00
_FUNC_OPERATORUSAGE_STRING_OPERATOR=qbs_new(oldstr3008->len,0);
2022-08-26 14:13:09 +00:00
}
2022-10-01 17:41:56 +00:00
memcpy(_FUNC_OPERATORUSAGE_STRING_OPERATOR->chr,oldstr3008->chr,oldstr3008->len);
2022-08-26 14:13:09 +00:00
}
2022-10-01 17:41:56 +00:00
qbs*oldstr3009=NULL;
2022-09-09 12:19:17 +00:00
if(_FUNC_OPERATORUSAGE_STRING_INFO->tmp||_FUNC_OPERATORUSAGE_STRING_INFO->fixed||_FUNC_OPERATORUSAGE_STRING_INFO->readonly){
2022-10-01 17:41:56 +00:00
oldstr3009=_FUNC_OPERATORUSAGE_STRING_INFO;
if (oldstr3009->cmem_descriptor){
_FUNC_OPERATORUSAGE_STRING_INFO=qbs_new_cmem(oldstr3009->len,0);
2022-09-09 12:19:17 +00:00
}else{
2022-10-01 17:41:56 +00:00
_FUNC_OPERATORUSAGE_STRING_INFO=qbs_new(oldstr3009->len,0);
2022-08-26 14:13:09 +00:00
}
2022-10-01 17:41:56 +00:00
memcpy(_FUNC_OPERATORUSAGE_STRING_INFO->chr,oldstr3009->chr,oldstr3009->len);
2022-08-26 14:13:09 +00:00
}