mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 13:50:36 +00:00
30 lines
1.2 KiB
Plaintext
30 lines
1.2 KiB
Plaintext
qbs*oldstr3620=NULL;
|
|
if(_SUB_ARYADDSTR_STRING_VALUE->tmp||_SUB_ARYADDSTR_STRING_VALUE->fixed||_SUB_ARYADDSTR_STRING_VALUE->readonly){
|
|
oldstr3620=_SUB_ARYADDSTR_STRING_VALUE;
|
|
if (oldstr3620->cmem_descriptor){
|
|
_SUB_ARYADDSTR_STRING_VALUE=qbs_new_cmem(oldstr3620->len,0);
|
|
}else{
|
|
_SUB_ARYADDSTR_STRING_VALUE=qbs_new(oldstr3620->len,0);
|
|
}
|
|
memcpy(_SUB_ARYADDSTR_STRING_VALUE->chr,oldstr3620->chr,oldstr3620->len);
|
|
}
|
|
byte_element_struct *byte_element_3621=NULL;
|
|
if (!byte_element_3621){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3621=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3621=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_SUB_ARYADDSTR_LONG_INDEX=NULL;
|
|
if(_SUB_ARYADDSTR_LONG_INDEX==NULL){
|
|
_SUB_ARYADDSTR_LONG_INDEX=(int32*)mem_static_malloc(4);
|
|
*_SUB_ARYADDSTR_LONG_INDEX=0;
|
|
}
|
|
int32 *_SUB_ARYADDSTR_LONG_LASTINDEX=NULL;
|
|
if(_SUB_ARYADDSTR_LONG_LASTINDEX==NULL){
|
|
_SUB_ARYADDSTR_LONG_LASTINDEX=(int32*)mem_static_malloc(4);
|
|
*_SUB_ARYADDSTR_LONG_LASTINDEX=0;
|
|
}
|
|
int32 *_SUB_ARYADDSTR_LONG_ARYNEWSTR=NULL;
|
|
if(_SUB_ARYADDSTR_LONG_ARYNEWSTR==NULL){
|
|
_SUB_ARYADDSTR_LONG_ARYNEWSTR=(int32*)mem_static_malloc(4);
|
|
*_SUB_ARYADDSTR_LONG_ARYNEWSTR=0;
|
|
}
|