mirror of
https://github.com/QB64Official/qb64.git
synced 2024-09-15 23:13:58 +00:00
235 lines
10 KiB
Text
235 lines
10 KiB
Text
qbs*oldstr3605=NULL;
|
|
if(_SUB_PREPARSE_STRING_E->tmp||_SUB_PREPARSE_STRING_E->fixed||_SUB_PREPARSE_STRING_E->readonly){
|
|
oldstr3605=_SUB_PREPARSE_STRING_E;
|
|
if (oldstr3605->cmem_descriptor){
|
|
_SUB_PREPARSE_STRING_E=qbs_new_cmem(oldstr3605->len,0);
|
|
}else{
|
|
_SUB_PREPARSE_STRING_E=qbs_new(oldstr3605->len,0);
|
|
}
|
|
memcpy(_SUB_PREPARSE_STRING_E->chr,oldstr3605->chr,oldstr3605->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_value3607;
|
|
int64 fornext_finalvalue3607;
|
|
int64 fornext_step3607;
|
|
uint8 fornext_step_negative3607;
|
|
byte_element_struct *byte_element_3608=NULL;
|
|
if (!byte_element_3608){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3608=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3608=(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;
|
|
}
|
|
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_value3612;
|
|
int64 fornext_finalvalue3612;
|
|
int64 fornext_step3612;
|
|
uint8 fornext_step_negative3612;
|
|
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_value3614;
|
|
int64 fornext_finalvalue3614;
|
|
int64 fornext_step3614;
|
|
uint8 fornext_step_negative3614;
|
|
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_3616=NULL;
|
|
if (!byte_element_3616){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3616=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3616=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
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);
|
|
}
|
|
byte_element_struct *byte_element_3618=NULL;
|
|
if (!byte_element_3618){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3618=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3618=(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_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_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_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_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_value3623;
|
|
int64 fornext_finalvalue3623;
|
|
int64 fornext_step3623;
|
|
uint8 fornext_step_negative3623;
|
|
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_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);
|
|
}
|
|
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_3627=NULL;
|
|
if (!byte_element_3627){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3627=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3627=(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_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);
|
|
}
|
|
byte_element_struct *byte_element_3634=NULL;
|
|
if (!byte_element_3634){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3634=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3634=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3636=NULL;
|
|
if (!byte_element_3636){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3636=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3636=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
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);
|
|
}
|
|
byte_element_struct *byte_element_3641=NULL;
|
|
if (!byte_element_3641){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3641=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3641=(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_value3646;
|
|
int64 fornext_finalvalue3646;
|
|
int64 fornext_step3646;
|
|
uint8 fornext_step_negative3646;
|
|
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);
|
|
}
|
|
byte_element_struct *byte_element_3648=NULL;
|
|
if (!byte_element_3648){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3648=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3648=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3653;
|
|
int64 fornext_finalvalue3653;
|
|
int64 fornext_step3653;
|
|
uint8 fornext_step_negative3653;
|
|
byte_element_struct *byte_element_3654=NULL;
|
|
if (!byte_element_3654){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3654=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3654=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3655=NULL;
|
|
if (!byte_element_3655){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3655=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3655=(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_value3657;
|
|
int64 fornext_finalvalue3657;
|
|
int64 fornext_step3657;
|
|
uint8 fornext_step_negative3657;
|
|
byte_element_struct *byte_element_3658=NULL;
|
|
if (!byte_element_3658){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3658=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3658=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3659=NULL;
|
|
if (!byte_element_3659){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3659=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3659=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|