mirror of
https://github.com/QB64Official/qb64.git
synced 2024-08-22 11:25:08 +00:00
235 lines
10 KiB
Text
235 lines
10 KiB
Text
qbs*oldstr3597=NULL;
|
|
if(_SUB_PREPARSE_STRING_E->tmp||_SUB_PREPARSE_STRING_E->fixed||_SUB_PREPARSE_STRING_E->readonly){
|
|
oldstr3597=_SUB_PREPARSE_STRING_E;
|
|
if (oldstr3597->cmem_descriptor){
|
|
_SUB_PREPARSE_STRING_E=qbs_new_cmem(oldstr3597->len,0);
|
|
}else{
|
|
_SUB_PREPARSE_STRING_E=qbs_new(oldstr3597->len,0);
|
|
}
|
|
memcpy(_SUB_PREPARSE_STRING_E->chr,oldstr3597->chr,oldstr3597->len);
|
|
}
|
|
long double *_SUB_PREPARSE_FLOAT_F=NULL;
|
|
if(_SUB_PREPARSE_FLOAT_F==NULL){
|
|
_SUB_PREPARSE_FLOAT_F=(long double*)mem_static_malloc(32);
|
|
*_SUB_PREPARSE_FLOAT_F=0;
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_I=NULL;
|
|
if(_SUB_PREPARSE_LONG_I==NULL){
|
|
_SUB_PREPARSE_LONG_I=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_I=0;
|
|
}
|
|
qbs *_SUB_PREPARSE_STRING_T=NULL;
|
|
if (!_SUB_PREPARSE_STRING_T)_SUB_PREPARSE_STRING_T=qbs_new(0,0);
|
|
int64 fornext_value3599;
|
|
int64 fornext_finalvalue3599;
|
|
int64 fornext_step3599;
|
|
uint8 fornext_step_negative3599;
|
|
byte_element_struct *byte_element_3600=NULL;
|
|
if (!byte_element_3600){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3600=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3600=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_L=NULL;
|
|
if(_SUB_PREPARSE_LONG_L==NULL){
|
|
_SUB_PREPARSE_LONG_L=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_L=0;
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_C=NULL;
|
|
if(_SUB_PREPARSE_LONG_C==NULL){
|
|
_SUB_PREPARSE_LONG_C=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_C=0;
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_C1=NULL;
|
|
if(_SUB_PREPARSE_LONG_C1==NULL){
|
|
_SUB_PREPARSE_LONG_C1=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_C1=0;
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_L1=NULL;
|
|
if(_SUB_PREPARSE_LONG_L1==NULL){
|
|
_SUB_PREPARSE_LONG_L1=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_L1=0;
|
|
}
|
|
byte_element_struct *byte_element_3604=NULL;
|
|
if (!byte_element_3604){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3604=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3604=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_SUB_PREPARSE_STRING_SEP=NULL;
|
|
if (!_SUB_PREPARSE_STRING_SEP)_SUB_PREPARSE_STRING_SEP=qbs_new(0,0);
|
|
int32 *_SUB_PREPARSE_LONG_I2=NULL;
|
|
if(_SUB_PREPARSE_LONG_I2==NULL){
|
|
_SUB_PREPARSE_LONG_I2=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_I2=0;
|
|
}
|
|
int64 fornext_value3606;
|
|
int64 fornext_finalvalue3606;
|
|
int64 fornext_step3606;
|
|
uint8 fornext_step_negative3606;
|
|
qbs *_SUB_PREPARSE_STRING_THISCONSTNAME=NULL;
|
|
if (!_SUB_PREPARSE_STRING_THISCONSTNAME)_SUB_PREPARSE_STRING_THISCONSTNAME=qbs_new(0,0);
|
|
int32 *_SUB_PREPARSE_LONG_REPLACECONSTPASS=NULL;
|
|
if(_SUB_PREPARSE_LONG_REPLACECONSTPASS==NULL){
|
|
_SUB_PREPARSE_LONG_REPLACECONSTPASS=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_REPLACECONSTPASS=0;
|
|
}
|
|
int64 fornext_value3608;
|
|
int64 fornext_finalvalue3608;
|
|
int64 fornext_step3608;
|
|
uint8 fornext_step_negative3608;
|
|
int32 *_SUB_PREPARSE_LONG_FOUND=NULL;
|
|
if(_SUB_PREPARSE_LONG_FOUND==NULL){
|
|
_SUB_PREPARSE_LONG_FOUND=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_FOUND=0;
|
|
}
|
|
byte_element_struct *byte_element_3610=NULL;
|
|
if (!byte_element_3610){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3610=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3610=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3611=NULL;
|
|
if (!byte_element_3611){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3611=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3611=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3612=NULL;
|
|
if (!byte_element_3612){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3612=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3612=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_T=NULL;
|
|
if(_SUB_PREPARSE_LONG_T==NULL){
|
|
_SUB_PREPARSE_LONG_T=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_T=0;
|
|
}
|
|
qbs *_SUB_PREPARSE_STRING_R=NULL;
|
|
if (!_SUB_PREPARSE_STRING_R)_SUB_PREPARSE_STRING_R=qbs_new(0,0);
|
|
int32 *_SUB_PREPARSE_LONG_I4=NULL;
|
|
if(_SUB_PREPARSE_LONG_I4==NULL){
|
|
_SUB_PREPARSE_LONG_I4=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_I4=0;
|
|
}
|
|
byte_element_struct *byte_element_3613=NULL;
|
|
if (!byte_element_3613){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3613=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3613=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD=NULL;
|
|
if(_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD==NULL){
|
|
_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_UBOUNDPP_TYPEMOD=0;
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_J=NULL;
|
|
if(_SUB_PREPARSE_LONG_J==NULL){
|
|
_SUB_PREPARSE_LONG_J=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_J=0;
|
|
}
|
|
int64 fornext_value3615;
|
|
int64 fornext_finalvalue3615;
|
|
int64 fornext_step3615;
|
|
uint8 fornext_step_negative3615;
|
|
int32 *_SUB_PREPARSE_LONG_L2=NULL;
|
|
if(_SUB_PREPARSE_LONG_L2==NULL){
|
|
_SUB_PREPARSE_LONG_L2=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_L2=0;
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_LO=NULL;
|
|
if(_SUB_PREPARSE_LONG_LO==NULL){
|
|
_SUB_PREPARSE_LONG_LO=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_LO=0;
|
|
}
|
|
byte_element_struct *byte_element_3617=NULL;
|
|
if (!byte_element_3617){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3617=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3617=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_SUB_PREPARSE_STRING_L=NULL;
|
|
if (!_SUB_PREPARSE_STRING_L)_SUB_PREPARSE_STRING_L=qbs_new(0,0);
|
|
qbs *_SUB_PREPARSE_STRING_M=NULL;
|
|
if (!_SUB_PREPARSE_STRING_M)_SUB_PREPARSE_STRING_M=qbs_new(0,0);
|
|
byte_element_struct *byte_element_3619=NULL;
|
|
if (!byte_element_3619){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3619=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3619=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_GOOD=NULL;
|
|
if(_SUB_PREPARSE_LONG_GOOD==NULL){
|
|
_SUB_PREPARSE_LONG_GOOD=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_GOOD=0;
|
|
}
|
|
int64 fornext_value3622;
|
|
int64 fornext_finalvalue3622;
|
|
int64 fornext_step3622;
|
|
uint8 fornext_step_negative3622;
|
|
byte_element_struct *byte_element_3623=NULL;
|
|
if (!byte_element_3623){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3623=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3623=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3624=NULL;
|
|
if (!byte_element_3624){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3624=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3624=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3625=NULL;
|
|
if (!byte_element_3625){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3625=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3625=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3626=NULL;
|
|
if (!byte_element_3626){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3626=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3626=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3628=NULL;
|
|
if (!byte_element_3628){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3628=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3628=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3630;
|
|
int64 fornext_finalvalue3630;
|
|
int64 fornext_step3630;
|
|
uint8 fornext_step_negative3630;
|
|
byte_element_struct *byte_element_3631=NULL;
|
|
if (!byte_element_3631){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3631=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3631=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3632=NULL;
|
|
if (!byte_element_3632){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3632=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3632=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3633=NULL;
|
|
if (!byte_element_3633){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3633=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3633=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_SUB_PREPARSE_LONG_FINISHED=NULL;
|
|
if(_SUB_PREPARSE_LONG_FINISHED==NULL){
|
|
_SUB_PREPARSE_LONG_FINISHED=(int32*)mem_static_malloc(4);
|
|
*_SUB_PREPARSE_LONG_FINISHED=0;
|
|
}
|
|
qbs *_SUB_PREPARSE_STRING_COMP=NULL;
|
|
if (!_SUB_PREPARSE_STRING_COMP)_SUB_PREPARSE_STRING_COMP=qbs_new(0,0);
|
|
int64 fornext_value3638;
|
|
int64 fornext_finalvalue3638;
|
|
int64 fornext_step3638;
|
|
uint8 fornext_step_negative3638;
|
|
byte_element_struct *byte_element_3639=NULL;
|
|
if (!byte_element_3639){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3639=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3639=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3640=NULL;
|
|
if (!byte_element_3640){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3640=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3640=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3645;
|
|
int64 fornext_finalvalue3645;
|
|
int64 fornext_step3645;
|
|
uint8 fornext_step_negative3645;
|
|
byte_element_struct *byte_element_3646=NULL;
|
|
if (!byte_element_3646){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3646=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3646=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3647=NULL;
|
|
if (!byte_element_3647){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3647=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3647=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_SUB_PREPARSE_STRING_BIN=NULL;
|
|
if (!_SUB_PREPARSE_STRING_BIN)_SUB_PREPARSE_STRING_BIN=qbs_new(0,0);
|
|
int64 fornext_value3649;
|
|
int64 fornext_finalvalue3649;
|
|
int64 fornext_step3649;
|
|
uint8 fornext_step_negative3649;
|
|
byte_element_struct *byte_element_3650=NULL;
|
|
if (!byte_element_3650){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3650=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3650=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3651=NULL;
|
|
if (!byte_element_3651){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3651=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3651=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|