1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-12 16:55:14 +00:00
QB64-PE/internal/source/data97.txt
2024-01-20 16:04:21 +00:00

21 lines
792 B
Plaintext

qbs*oldstr3650=NULL;
if(_SUB_PUSHELEMENT_STRING_A->tmp||_SUB_PUSHELEMENT_STRING_A->fixed||_SUB_PUSHELEMENT_STRING_A->readonly){
oldstr3650=_SUB_PUSHELEMENT_STRING_A;
if (oldstr3650->cmem_descriptor){
_SUB_PUSHELEMENT_STRING_A=qbs_new_cmem(oldstr3650->len,0);
}else{
_SUB_PUSHELEMENT_STRING_A=qbs_new(oldstr3650->len,0);
}
memcpy(_SUB_PUSHELEMENT_STRING_A->chr,oldstr3650->chr,oldstr3650->len);
}
qbs*oldstr3651=NULL;
if(_SUB_PUSHELEMENT_STRING_B->tmp||_SUB_PUSHELEMENT_STRING_B->fixed||_SUB_PUSHELEMENT_STRING_B->readonly){
oldstr3651=_SUB_PUSHELEMENT_STRING_B;
if (oldstr3651->cmem_descriptor){
_SUB_PUSHELEMENT_STRING_B=qbs_new_cmem(oldstr3651->len,0);
}else{
_SUB_PUSHELEMENT_STRING_B=qbs_new(oldstr3651->len,0);
}
memcpy(_SUB_PUSHELEMENT_STRING_B->chr,oldstr3651->chr,oldstr3651->len);
}