1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-08-22 10:15:09 +00:00
qb64/internal/source/data93.txt

11 lines
399 B
Text
Raw Normal View History

2021-07-19 21:21:56 +00:00
qbs*oldstr3608=NULL;
2021-02-07 10:32:23 +00:00
if(_SUB_GIVE_ERROR_STRING_A->tmp||_SUB_GIVE_ERROR_STRING_A->fixed||_SUB_GIVE_ERROR_STRING_A->readonly){
2021-07-19 21:21:56 +00:00
oldstr3608=_SUB_GIVE_ERROR_STRING_A;
if (oldstr3608->cmem_descriptor){
_SUB_GIVE_ERROR_STRING_A=qbs_new_cmem(oldstr3608->len,0);
2021-02-07 10:32:23 +00:00
}else{
2021-07-19 21:21:56 +00:00
_SUB_GIVE_ERROR_STRING_A=qbs_new(oldstr3608->len,0);
2021-02-07 10:32:23 +00:00
}
2021-07-19 21:21:56 +00:00
memcpy(_SUB_GIVE_ERROR_STRING_A->chr,oldstr3608->chr,oldstr3608->len);
2021-02-07 10:32:23 +00:00
}