1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 05:34:47 +00:00
QB64-PE/internal/source/data211.txt

11 lines
389 B
Text
Raw Normal View History

2024-06-27 22:09:56 +00:00
qbs*oldstr4184=NULL;
if(_SUB_GIVE_ERROR_STRING_A->tmp||_SUB_GIVE_ERROR_STRING_A->fixed||_SUB_GIVE_ERROR_STRING_A->readonly){
oldstr4184=_SUB_GIVE_ERROR_STRING_A;
if (oldstr4184->cmem_descriptor){
_SUB_GIVE_ERROR_STRING_A=qbs_new_cmem(oldstr4184->len,0);
2024-06-26 12:49:17 +00:00
}else{
2024-06-27 22:09:56 +00:00
_SUB_GIVE_ERROR_STRING_A=qbs_new(oldstr4184->len,0);
2024-06-26 12:49:17 +00:00
}
2024-06-27 22:09:56 +00:00
memcpy(_SUB_GIVE_ERROR_STRING_A->chr,oldstr4184->chr,oldstr4184->len);
2024-06-26 12:49:17 +00:00
}