mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-07 02:30:17 +00:00
235 lines
10 KiB
Text
235 lines
10 KiB
Text
qbs*oldstr3507=NULL;
|
|
if(_SUB_PREPARSE_STRING_E->tmp||_SUB_PREPARSE_STRING_E->fixed||_SUB_PREPARSE_STRING_E->readonly){
|
|
oldstr3507=_SUB_PREPARSE_STRING_E;
|
|
if (oldstr3507->cmem_descriptor){
|
|
_SUB_PREPARSE_STRING_E=qbs_new_cmem(oldstr3507->len,0);
|
|
}else{
|
|
_SUB_PREPARSE_STRING_E=qbs_new(oldstr3507->len,0);
|
|
}
|
|
memcpy(_SUB_PREPARSE_STRING_E->chr,oldstr3507->chr,oldstr3507->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_value3509;
|
|
int64 fornext_finalvalue3509;
|
|
int64 fornext_step3509;
|
|
uint8 fornext_step_negative3509;
|
|
byte_element_struct *byte_element_3510=NULL;
|
|
if (!byte_element_3510){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3510=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3510=(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_value3514;
|
|
int64 fornext_finalvalue3514;
|
|
int64 fornext_step3514;
|
|
uint8 fornext_step_negative3514;
|
|
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_value3516;
|
|
int64 fornext_finalvalue3516;
|
|
int64 fornext_step3516;
|
|
uint8 fornext_step_negative3516;
|
|
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_3518=NULL;
|
|
if (!byte_element_3518){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3518=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3518=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3519=NULL;
|
|
if (!byte_element_3519){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3519=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3519=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3520=NULL;
|
|
if (!byte_element_3520){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3520=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3520=(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_3521=NULL;
|
|
if (!byte_element_3521){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3521=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3521=(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_3523=NULL;
|
|
if (!byte_element_3523){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3523=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3523=(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_value3525;
|
|
int64 fornext_finalvalue3525;
|
|
int64 fornext_step3525;
|
|
uint8 fornext_step_negative3525;
|
|
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_3527=NULL;
|
|
if (!byte_element_3527){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3527=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3527=(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_3529=NULL;
|
|
if (!byte_element_3529){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3529=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3529=(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_value3532;
|
|
int64 fornext_finalvalue3532;
|
|
int64 fornext_step3532;
|
|
uint8 fornext_step_negative3532;
|
|
byte_element_struct *byte_element_3533=NULL;
|
|
if (!byte_element_3533){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3533=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3533=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3534=NULL;
|
|
if (!byte_element_3534){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3534=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3534=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3535=NULL;
|
|
if (!byte_element_3535){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3535=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3535=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3536=NULL;
|
|
if (!byte_element_3536){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3536=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3536=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3538=NULL;
|
|
if (!byte_element_3538){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3538=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3538=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3540;
|
|
int64 fornext_finalvalue3540;
|
|
int64 fornext_step3540;
|
|
uint8 fornext_step_negative3540;
|
|
byte_element_struct *byte_element_3541=NULL;
|
|
if (!byte_element_3541){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3541=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3541=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3542=NULL;
|
|
if (!byte_element_3542){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3542=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3542=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3543=NULL;
|
|
if (!byte_element_3543){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3543=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3543=(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_value3548;
|
|
int64 fornext_finalvalue3548;
|
|
int64 fornext_step3548;
|
|
uint8 fornext_step_negative3548;
|
|
byte_element_struct *byte_element_3549=NULL;
|
|
if (!byte_element_3549){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3549=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3549=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3550=NULL;
|
|
if (!byte_element_3550){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3550=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3550=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3555;
|
|
int64 fornext_finalvalue3555;
|
|
int64 fornext_step3555;
|
|
uint8 fornext_step_negative3555;
|
|
byte_element_struct *byte_element_3556=NULL;
|
|
if (!byte_element_3556){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3556=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3556=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3557=NULL;
|
|
if (!byte_element_3557){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3557=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3557=(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_value3559;
|
|
int64 fornext_finalvalue3559;
|
|
int64 fornext_step3559;
|
|
uint8 fornext_step_negative3559;
|
|
byte_element_struct *byte_element_3560=NULL;
|
|
if (!byte_element_3560){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3560=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3560=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_3561=NULL;
|
|
if (!byte_element_3561){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3561=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3561=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|