1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 06:44:44 +00:00
QB64-PE/internal/source/data98.txt
2024-06-26 12:49:17 +00:00

20 lines
792 B
Text

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