mirror of
https://github.com/QB64Official/qb64.git
synced 2024-09-04 11:10:15 +00:00
241 lines
10 KiB
Text
241 lines
10 KiB
Text
int32 *_FUNC_DIM2_LONG_DIM2=NULL;
|
|
if(_FUNC_DIM2_LONG_DIM2==NULL){
|
|
_FUNC_DIM2_LONG_DIM2=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_DIM2=0;
|
|
}
|
|
qbs*oldstr1975=NULL;
|
|
if(_FUNC_DIM2_STRING_VARNAME->tmp||_FUNC_DIM2_STRING_VARNAME->fixed||_FUNC_DIM2_STRING_VARNAME->readonly){
|
|
oldstr1975=_FUNC_DIM2_STRING_VARNAME;
|
|
if (oldstr1975->cmem_descriptor){
|
|
_FUNC_DIM2_STRING_VARNAME=qbs_new_cmem(oldstr1975->len,0);
|
|
}else{
|
|
_FUNC_DIM2_STRING_VARNAME=qbs_new(oldstr1975->len,0);
|
|
}
|
|
memcpy(_FUNC_DIM2_STRING_VARNAME->chr,oldstr1975->chr,oldstr1975->len);
|
|
}
|
|
qbs*oldstr1976=NULL;
|
|
if(_FUNC_DIM2_STRING_TYP2->tmp||_FUNC_DIM2_STRING_TYP2->fixed||_FUNC_DIM2_STRING_TYP2->readonly){
|
|
oldstr1976=_FUNC_DIM2_STRING_TYP2;
|
|
if (oldstr1976->cmem_descriptor){
|
|
_FUNC_DIM2_STRING_TYP2=qbs_new_cmem(oldstr1976->len,0);
|
|
}else{
|
|
_FUNC_DIM2_STRING_TYP2=qbs_new(oldstr1976->len,0);
|
|
}
|
|
memcpy(_FUNC_DIM2_STRING_TYP2->chr,oldstr1976->chr,oldstr1976->len);
|
|
}
|
|
qbs*oldstr1977=NULL;
|
|
if(_FUNC_DIM2_STRING_ELEMENTS->tmp||_FUNC_DIM2_STRING_ELEMENTS->fixed||_FUNC_DIM2_STRING_ELEMENTS->readonly){
|
|
oldstr1977=_FUNC_DIM2_STRING_ELEMENTS;
|
|
if (oldstr1977->cmem_descriptor){
|
|
_FUNC_DIM2_STRING_ELEMENTS=qbs_new_cmem(oldstr1977->len,0);
|
|
}else{
|
|
_FUNC_DIM2_STRING_ELEMENTS=qbs_new(oldstr1977->len,0);
|
|
}
|
|
memcpy(_FUNC_DIM2_STRING_ELEMENTS->chr,oldstr1977->chr,oldstr1977->len);
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_TYP=NULL;
|
|
if (!_FUNC_DIM2_STRING_TYP)_FUNC_DIM2_STRING_TYP=qbs_new(0,0);
|
|
qbs *_FUNC_DIM2_STRING_CVARNAME=NULL;
|
|
if (!_FUNC_DIM2_STRING_CVARNAME)_FUNC_DIM2_STRING_CVARNAME=qbs_new(0,0);
|
|
qbs *_FUNC_DIM2_STRING_L=NULL;
|
|
if (!_FUNC_DIM2_STRING_L)_FUNC_DIM2_STRING_L=qbs_new(0,0);
|
|
int32 *_FUNC_DIM2_LONG_F=NULL;
|
|
if(_FUNC_DIM2_LONG_F==NULL){
|
|
_FUNC_DIM2_LONG_F=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_F=0;
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_SCOPE2=NULL;
|
|
if (!_FUNC_DIM2_STRING_SCOPE2)_FUNC_DIM2_STRING_SCOPE2=qbs_new(0,0);
|
|
byte_element_struct *byte_element_1979=NULL;
|
|
if (!byte_element_1979){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1979=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1979=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_I=NULL;
|
|
if(_FUNC_DIM2_LONG_I==NULL){
|
|
_FUNC_DIM2_LONG_I=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_I=0;
|
|
}
|
|
int64 fornext_value1981;
|
|
int64 fornext_finalvalue1981;
|
|
int64 fornext_step1981;
|
|
uint8 fornext_step_negative1981;
|
|
qbs *_FUNC_DIM2_STRING_N=NULL;
|
|
if (!_FUNC_DIM2_STRING_N)_FUNC_DIM2_STRING_N=qbs_new(0,0);
|
|
int32 *_FUNC_DIM2_LONG_TRY=NULL;
|
|
if(_FUNC_DIM2_LONG_TRY==NULL){
|
|
_FUNC_DIM2_LONG_TRY=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_TRY=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_BITS=NULL;
|
|
if(_FUNC_DIM2_LONG_BITS==NULL){
|
|
_FUNC_DIM2_LONG_BITS=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_BITS=0;
|
|
}
|
|
byte_element_struct *byte_element_1983=NULL;
|
|
if (!byte_element_1983){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1983=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1983=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_NUME=NULL;
|
|
if(_FUNC_DIM2_LONG_NUME==NULL){
|
|
_FUNC_DIM2_LONG_NUME=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_NUME=0;
|
|
}
|
|
int32 pass1984;
|
|
int32 *_FUNC_DIM2_LONG_BYTES=NULL;
|
|
if(_FUNC_DIM2_LONG_BYTES==NULL){
|
|
_FUNC_DIM2_LONG_BYTES=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_BYTES=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_UNSGN=NULL;
|
|
if(_FUNC_DIM2_LONG_UNSGN==NULL){
|
|
_FUNC_DIM2_LONG_UNSGN=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_UNSGN=0;
|
|
}
|
|
byte_element_struct *byte_element_1996=NULL;
|
|
if (!byte_element_1996){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1996=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1996=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_1997=NULL;
|
|
if (!byte_element_1997){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1997=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1997=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_1998=NULL;
|
|
if (!byte_element_1998){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1998=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1998=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_C=NULL;
|
|
if (!_FUNC_DIM2_STRING_C)_FUNC_DIM2_STRING_C=qbs_new(0,0);
|
|
byte_element_struct *byte_element_1999=NULL;
|
|
if (!byte_element_1999){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1999=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1999=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_HASHFOUND=NULL;
|
|
if(_FUNC_DIM2_LONG_HASHFOUND==NULL){
|
|
_FUNC_DIM2_LONG_HASHFOUND=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_HASHFOUND=0;
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_HASHNAME=NULL;
|
|
if (!_FUNC_DIM2_STRING_HASHNAME)_FUNC_DIM2_STRING_HASHNAME=qbs_new(0,0);
|
|
int32 *_FUNC_DIM2_LONG_HASHCHKFLAGS=NULL;
|
|
if(_FUNC_DIM2_LONG_HASHCHKFLAGS==NULL){
|
|
_FUNC_DIM2_LONG_HASHCHKFLAGS=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_HASHCHKFLAGS=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_HASHRES=NULL;
|
|
if(_FUNC_DIM2_LONG_HASHRES==NULL){
|
|
_FUNC_DIM2_LONG_HASHRES=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_HASHRES=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_HASHRESFLAGS=NULL;
|
|
if(_FUNC_DIM2_LONG_HASHRESFLAGS==NULL){
|
|
_FUNC_DIM2_LONG_HASHRESFLAGS=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_HASHRESFLAGS=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_HASHRESREF=NULL;
|
|
if(_FUNC_DIM2_LONG_HASHRESREF==NULL){
|
|
_FUNC_DIM2_LONG_HASHRESREF=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_HASHRESREF=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_I2=NULL;
|
|
if(_FUNC_DIM2_LONG_I2==NULL){
|
|
_FUNC_DIM2_LONG_I2=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_I2=0;
|
|
}
|
|
int32 *_FUNC_DIM2_LONG_T=NULL;
|
|
if(_FUNC_DIM2_LONG_T==NULL){
|
|
_FUNC_DIM2_LONG_T=(int32*)mem_static_malloc(4);
|
|
*_FUNC_DIM2_LONG_T=0;
|
|
}
|
|
long double *_FUNC_DIM2_FLOAT_V=NULL;
|
|
if(_FUNC_DIM2_FLOAT_V==NULL){
|
|
_FUNC_DIM2_FLOAT_V=(long double*)mem_static_malloc(32);
|
|
*_FUNC_DIM2_FLOAT_V=0;
|
|
}
|
|
int64 *_FUNC_DIM2_INTEGER64_V=NULL;
|
|
if(_FUNC_DIM2_INTEGER64_V==NULL){
|
|
_FUNC_DIM2_INTEGER64_V=(int64*)mem_static_malloc(8);
|
|
*_FUNC_DIM2_INTEGER64_V=0;
|
|
}
|
|
uint64 *_FUNC_DIM2_UINTEGER64_V=NULL;
|
|
if(_FUNC_DIM2_UINTEGER64_V==NULL){
|
|
_FUNC_DIM2_UINTEGER64_V=(uint64*)mem_static_malloc(8);
|
|
*_FUNC_DIM2_UINTEGER64_V=0;
|
|
}
|
|
byte_element_struct *byte_element_2001=NULL;
|
|
if (!byte_element_2001){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2001=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2001=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2003=NULL;
|
|
if (!byte_element_2003){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2003=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2003=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_O=NULL;
|
|
if (!_FUNC_DIM2_STRING_O)_FUNC_DIM2_STRING_O=qbs_new(0,0);
|
|
byte_element_struct *byte_element_2017=NULL;
|
|
if (!byte_element_2017){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2017=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2017=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2018;
|
|
byte_element_struct *byte_element_2024=NULL;
|
|
if (!byte_element_2024){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2024=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2024=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2025=NULL;
|
|
if (!byte_element_2025){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2025=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2025=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2026=NULL;
|
|
if (!byte_element_2026){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2026=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2026=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_CT=NULL;
|
|
if (!_FUNC_DIM2_STRING_CT)_FUNC_DIM2_STRING_CT=qbs_new(0,0);
|
|
qbs *_FUNC_DIM2_STRING_CMPS=NULL;
|
|
if (!_FUNC_DIM2_STRING_CMPS)_FUNC_DIM2_STRING_CMPS=qbs_new(0,0);
|
|
byte_element_struct *byte_element_2028=NULL;
|
|
if (!byte_element_2028){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2028=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2028=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2029;
|
|
byte_element_struct *byte_element_2038=NULL;
|
|
if (!byte_element_2038){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2038=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2038=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2039;
|
|
byte_element_struct *byte_element_2049=NULL;
|
|
if (!byte_element_2049){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2049=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2049=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2050;
|
|
byte_element_struct *byte_element_2060=NULL;
|
|
if (!byte_element_2060){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2060=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2060=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2061;
|
|
int32 pass2065;
|
|
int32 pass2069;
|
|
byte_element_struct *byte_element_2073=NULL;
|
|
if (!byte_element_2073){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2073=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2073=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2074;
|
|
byte_element_struct *byte_element_2084=NULL;
|
|
if (!byte_element_2084){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2084=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2084=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2085;
|
|
byte_element_struct *byte_element_2095=NULL;
|
|
if (!byte_element_2095){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2095=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2095=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2096;
|
|
byte_element_struct *byte_element_2106=NULL;
|
|
if (!byte_element_2106){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2106=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2106=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2107;
|
|
byte_element_struct *byte_element_2117=NULL;
|
|
if (!byte_element_2117){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2117=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2117=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2118;
|