mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-18 23:14:50 +00:00
70 lines
2.9 KiB
Text
70 lines
2.9 KiB
Text
qbs *_FUNC_REFER_STRING_REFER=NULL;
|
|
if (!_FUNC_REFER_STRING_REFER)_FUNC_REFER_STRING_REFER=qbs_new(0,0);
|
|
qbs*oldstr3016=NULL;
|
|
if(_FUNC_REFER_STRING_A2->tmp||_FUNC_REFER_STRING_A2->fixed||_FUNC_REFER_STRING_A2->readonly){
|
|
oldstr3016=_FUNC_REFER_STRING_A2;
|
|
if (oldstr3016->cmem_descriptor){
|
|
_FUNC_REFER_STRING_A2=qbs_new_cmem(oldstr3016->len,0);
|
|
}else{
|
|
_FUNC_REFER_STRING_A2=qbs_new(oldstr3016->len,0);
|
|
}
|
|
memcpy(_FUNC_REFER_STRING_A2->chr,oldstr3016->chr,oldstr3016->len);
|
|
}
|
|
int32 *_FUNC_REFER_LONG_TYPBAK=NULL;
|
|
if(_FUNC_REFER_LONG_TYPBAK==NULL){
|
|
_FUNC_REFER_LONG_TYPBAK=(int32*)mem_static_malloc(4);
|
|
*_FUNC_REFER_LONG_TYPBAK=0;
|
|
}
|
|
qbs *_FUNC_REFER_STRING_A=NULL;
|
|
if (!_FUNC_REFER_STRING_A)_FUNC_REFER_STRING_A=qbs_new(0,0);
|
|
int32 *_FUNC_REFER_LONG_I=NULL;
|
|
if(_FUNC_REFER_LONG_I==NULL){
|
|
_FUNC_REFER_LONG_I=(int32*)mem_static_malloc(4);
|
|
*_FUNC_REFER_LONG_I=0;
|
|
}
|
|
int32 *_FUNC_REFER_LONG_IDNUMBER=NULL;
|
|
if(_FUNC_REFER_LONG_IDNUMBER==NULL){
|
|
_FUNC_REFER_LONG_IDNUMBER=(int32*)mem_static_malloc(4);
|
|
*_FUNC_REFER_LONG_IDNUMBER=0;
|
|
}
|
|
byte_element_struct *byte_element_3017=NULL;
|
|
if (!byte_element_3017){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3017=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3017=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_REFER_STRING_N=NULL;
|
|
if (!_FUNC_REFER_STRING_N)_FUNC_REFER_STRING_N=qbs_new(0,0);
|
|
int32 *_FUNC_REFER_LONG_U=NULL;
|
|
if(_FUNC_REFER_LONG_U==NULL){
|
|
_FUNC_REFER_LONG_U=(int32*)mem_static_malloc(4);
|
|
*_FUNC_REFER_LONG_U=0;
|
|
}
|
|
byte_element_struct *byte_element_3018=NULL;
|
|
if (!byte_element_3018){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3018=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3018=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_REFER_STRING_O=NULL;
|
|
if (!_FUNC_REFER_STRING_O)_FUNC_REFER_STRING_O=qbs_new(0,0);
|
|
byte_element_struct *byte_element_3019=NULL;
|
|
if (!byte_element_3019){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3019=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3019=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_REFER_STRING_O2=NULL;
|
|
if (!_FUNC_REFER_STRING_O2)_FUNC_REFER_STRING_O2=qbs_new(0,0);
|
|
qbs *_FUNC_REFER_STRING_R=NULL;
|
|
if (!_FUNC_REFER_STRING_R)_FUNC_REFER_STRING_R=qbs_new(0,0);
|
|
qbs *_FUNC_REFER_STRING_T=NULL;
|
|
if (!_FUNC_REFER_STRING_T)_FUNC_REFER_STRING_T=qbs_new(0,0);
|
|
qbs *_FUNC_REFER_STRING_OFFSET=NULL;
|
|
if (!_FUNC_REFER_STRING_OFFSET)_FUNC_REFER_STRING_OFFSET=qbs_new(0,0);
|
|
int32 pass3020;
|
|
int32 *_FUNC_REFER_LONG_T=NULL;
|
|
if(_FUNC_REFER_LONG_T==NULL){
|
|
_FUNC_REFER_LONG_T=(int32*)mem_static_malloc(4);
|
|
*_FUNC_REFER_LONG_T=0;
|
|
}
|
|
int32 pass3021;
|
|
int32 pass3022;
|
|
byte_element_struct *byte_element_3023=NULL;
|
|
if (!byte_element_3023){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3023=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3023=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|