mirror of
https://github.com/QB64Official/qb64.git
synced 2024-09-02 11:00:16 +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*oldstr1960=NULL;
|
|
if(_FUNC_DIM2_STRING_VARNAME->tmp||_FUNC_DIM2_STRING_VARNAME->fixed||_FUNC_DIM2_STRING_VARNAME->readonly){
|
|
oldstr1960=_FUNC_DIM2_STRING_VARNAME;
|
|
if (oldstr1960->cmem_descriptor){
|
|
_FUNC_DIM2_STRING_VARNAME=qbs_new_cmem(oldstr1960->len,0);
|
|
}else{
|
|
_FUNC_DIM2_STRING_VARNAME=qbs_new(oldstr1960->len,0);
|
|
}
|
|
memcpy(_FUNC_DIM2_STRING_VARNAME->chr,oldstr1960->chr,oldstr1960->len);
|
|
}
|
|
qbs*oldstr1961=NULL;
|
|
if(_FUNC_DIM2_STRING_TYP2->tmp||_FUNC_DIM2_STRING_TYP2->fixed||_FUNC_DIM2_STRING_TYP2->readonly){
|
|
oldstr1961=_FUNC_DIM2_STRING_TYP2;
|
|
if (oldstr1961->cmem_descriptor){
|
|
_FUNC_DIM2_STRING_TYP2=qbs_new_cmem(oldstr1961->len,0);
|
|
}else{
|
|
_FUNC_DIM2_STRING_TYP2=qbs_new(oldstr1961->len,0);
|
|
}
|
|
memcpy(_FUNC_DIM2_STRING_TYP2->chr,oldstr1961->chr,oldstr1961->len);
|
|
}
|
|
qbs*oldstr1962=NULL;
|
|
if(_FUNC_DIM2_STRING_ELEMENTS->tmp||_FUNC_DIM2_STRING_ELEMENTS->fixed||_FUNC_DIM2_STRING_ELEMENTS->readonly){
|
|
oldstr1962=_FUNC_DIM2_STRING_ELEMENTS;
|
|
if (oldstr1962->cmem_descriptor){
|
|
_FUNC_DIM2_STRING_ELEMENTS=qbs_new_cmem(oldstr1962->len,0);
|
|
}else{
|
|
_FUNC_DIM2_STRING_ELEMENTS=qbs_new(oldstr1962->len,0);
|
|
}
|
|
memcpy(_FUNC_DIM2_STRING_ELEMENTS->chr,oldstr1962->chr,oldstr1962->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_1964=NULL;
|
|
if (!byte_element_1964){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1964=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1964=(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_value1966;
|
|
int64 fornext_finalvalue1966;
|
|
int64 fornext_step1966;
|
|
uint8 fornext_step_negative1966;
|
|
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_1968=NULL;
|
|
if (!byte_element_1968){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1968=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1968=(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 pass1969;
|
|
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_1981=NULL;
|
|
if (!byte_element_1981){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1981=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1981=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_1982=NULL;
|
|
if (!byte_element_1982){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1982=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1982=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
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);
|
|
}
|
|
qbs *_FUNC_DIM2_STRING_C=NULL;
|
|
if (!_FUNC_DIM2_STRING_C)_FUNC_DIM2_STRING_C=qbs_new(0,0);
|
|
byte_element_struct *byte_element_1984=NULL;
|
|
if (!byte_element_1984){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1984=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1984=(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_1986=NULL;
|
|
if (!byte_element_1986){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1986=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1986=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_1988=NULL;
|
|
if (!byte_element_1988){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_1988=(byte_element_struct*)(mem_static_pointer-12); else byte_element_1988=(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_2002=NULL;
|
|
if (!byte_element_2002){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2002=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2002=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2003;
|
|
byte_element_struct *byte_element_2009=NULL;
|
|
if (!byte_element_2009){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2009=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2009=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2010=NULL;
|
|
if (!byte_element_2010){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2010=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2010=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2011=NULL;
|
|
if (!byte_element_2011){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2011=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2011=(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_2013=NULL;
|
|
if (!byte_element_2013){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2013=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2013=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2014;
|
|
byte_element_struct *byte_element_2023=NULL;
|
|
if (!byte_element_2023){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2023=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2023=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2024;
|
|
byte_element_struct *byte_element_2034=NULL;
|
|
if (!byte_element_2034){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2034=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2034=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2035;
|
|
byte_element_struct *byte_element_2045=NULL;
|
|
if (!byte_element_2045){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2045=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2045=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2046;
|
|
int32 pass2050;
|
|
int32 pass2054;
|
|
byte_element_struct *byte_element_2058=NULL;
|
|
if (!byte_element_2058){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2058=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2058=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2059;
|
|
byte_element_struct *byte_element_2069=NULL;
|
|
if (!byte_element_2069){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2069=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2069=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2070;
|
|
byte_element_struct *byte_element_2080=NULL;
|
|
if (!byte_element_2080){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2080=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2080=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2081;
|
|
byte_element_struct *byte_element_2091=NULL;
|
|
if (!byte_element_2091){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2091=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2091=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2092;
|
|
byte_element_struct *byte_element_2102=NULL;
|
|
if (!byte_element_2102){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2102=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2102=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass2103;
|