mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-27 21:55:54 +00:00
233 lines
7.9 KiB
Plaintext
233 lines
7.9 KiB
Plaintext
int32 *_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_ALLOCARRAY==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_ALLOCARRAY=0;
|
|
}
|
|
qbs*oldstr2193=NULL;
|
|
if(_FUNC_ALLOCARRAY_STRING_N2->tmp||_FUNC_ALLOCARRAY_STRING_N2->fixed||_FUNC_ALLOCARRAY_STRING_N2->readonly){
|
|
oldstr2193=_FUNC_ALLOCARRAY_STRING_N2;
|
|
if (oldstr2193->cmem_descriptor){
|
|
_FUNC_ALLOCARRAY_STRING_N2=qbs_new_cmem(oldstr2193->len,0);
|
|
}else{
|
|
_FUNC_ALLOCARRAY_STRING_N2=qbs_new(oldstr2193->len,0);
|
|
}
|
|
memcpy(_FUNC_ALLOCARRAY_STRING_N2->chr,oldstr2193->chr,oldstr2193->len);
|
|
}
|
|
qbs*oldstr2194=NULL;
|
|
if(_FUNC_ALLOCARRAY_STRING_ELEMENTS->tmp||_FUNC_ALLOCARRAY_STRING_ELEMENTS->fixed||_FUNC_ALLOCARRAY_STRING_ELEMENTS->readonly){
|
|
oldstr2194=_FUNC_ALLOCARRAY_STRING_ELEMENTS;
|
|
if (oldstr2194->cmem_descriptor){
|
|
_FUNC_ALLOCARRAY_STRING_ELEMENTS=qbs_new_cmem(oldstr2194->len,0);
|
|
}else{
|
|
_FUNC_ALLOCARRAY_STRING_ELEMENTS=qbs_new(oldstr2194->len,0);
|
|
}
|
|
memcpy(_FUNC_ALLOCARRAY_STRING_ELEMENTS->chr,oldstr2194->chr,oldstr2194->len);
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_DIMSHAREDLAST=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_AUTOARY=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_AUTOARY==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_AUTOARY=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_AUTOARY=0;
|
|
}
|
|
qbs *_FUNC_ALLOCARRAY_STRING_F12=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_F12)_FUNC_ALLOCARRAY_STRING_F12=qbs_new(0,0);
|
|
qbs *_FUNC_ALLOCARRAY_STRING_E=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_E)_FUNC_ALLOCARRAY_STRING_E=qbs_new(0,0);
|
|
qbs *_FUNC_ALLOCARRAY_STRING_N=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_N)_FUNC_ALLOCARRAY_STRING_N=qbs_new(0,0);
|
|
int32 *_FUNC_ALLOCARRAY_LONG_STRINGARRAY=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_STRINGARRAY==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_STRINGARRAY=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_STRINGARRAY=0;
|
|
}
|
|
qbs *_FUNC_ALLOCARRAY_STRING_L=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_L)_FUNC_ALLOCARRAY_STRING_L=qbs_new(0,0);
|
|
int32 *_FUNC_ALLOCARRAY_LONG_UNDEFINED=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_UNDEFINED==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_UNDEFINED=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_UNDEFINED=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_NUME=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_NUME==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_NUME=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_NUME=0;
|
|
}
|
|
byte_element_struct *byte_element_2195=NULL;
|
|
if (!byte_element_2195){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2195=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2195=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2196=NULL;
|
|
if (!byte_element_2196){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2196=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2196=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_N=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_N==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_N=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_N=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_I=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_I==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_I=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_I=0;
|
|
}
|
|
int64 fornext_value2198;
|
|
int64 fornext_finalvalue2198;
|
|
int64 fornext_step2198;
|
|
uint8 fornext_step_negative2198;
|
|
qbs *_FUNC_ALLOCARRAY_STRING_E2=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_E2)_FUNC_ALLOCARRAY_STRING_E2=qbs_new(0,0);
|
|
int32 *_FUNC_ALLOCARRAY_LONG_B=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_B==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_B=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_B=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_DESCSTATIC=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_DESCSTATIC==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_DESCSTATIC=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_DESCSTATIC=0;
|
|
}
|
|
qbs *_FUNC_ALLOCARRAY_STRING_CR=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_CR)_FUNC_ALLOCARRAY_STRING_CR=qbs_new(0,0);
|
|
qbs *_FUNC_ALLOCARRAY_STRING_SD=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_SD)_FUNC_ALLOCARRAY_STRING_SD=qbs_new(0,0);
|
|
int32 *_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_CONSTDIMENSIONS=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_EI=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_EI==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_EI=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_EI=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_CURE=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_CURE==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_CURE=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_CURE=0;
|
|
}
|
|
qbs *_FUNC_ALLOCARRAY_STRING_E3=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_E3)_FUNC_ALLOCARRAY_STRING_E3=qbs_new(0,0);
|
|
qbs *_FUNC_ALLOCARRAY_STRING_E3BASE=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_E3BASE)_FUNC_ALLOCARRAY_STRING_E3BASE=qbs_new(0,0);
|
|
int64 fornext_value2201;
|
|
int64 fornext_finalvalue2201;
|
|
int64 fornext_step2201;
|
|
uint8 fornext_step_negative2201;
|
|
byte_element_struct *byte_element_2202=NULL;
|
|
if (!byte_element_2202){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2202=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2202=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
byte_element_struct *byte_element_2203=NULL;
|
|
if (!byte_element_2203){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2203=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2203=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_BASEGIVEN=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_BASEGIVEN==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_BASEGIVEN=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_BASEGIVEN=0;
|
|
}
|
|
int32 pass2204;
|
|
int32 pass2205;
|
|
int32 pass2206;
|
|
int32 pass2207;
|
|
int32 pass2208;
|
|
int32 pass2209;
|
|
byte_element_struct *byte_element_2210=NULL;
|
|
if (!byte_element_2210){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2210=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2210=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_CMEM=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_CMEM==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_CMEM=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_CMEM=0;
|
|
}
|
|
int32 *_FUNC_ALLOCARRAY_LONG_STATICARRAY=NULL;
|
|
if(_FUNC_ALLOCARRAY_LONG_STATICARRAY==NULL){
|
|
_FUNC_ALLOCARRAY_LONG_STATICARRAY=(int32*)mem_static_malloc(4);
|
|
*_FUNC_ALLOCARRAY_LONG_STATICARRAY=0;
|
|
}
|
|
qbs *_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT)_FUNC_ALLOCARRAY_STRING_BYTESPERELEMENT=qbs_new(0,0);
|
|
int16 pass2211;
|
|
int16 pass2212;
|
|
int32 pass2213;
|
|
int16 pass2214;
|
|
int16 pass2215;
|
|
int16 pass2216;
|
|
int32 pass2217;
|
|
qbs *_FUNC_ALLOCARRAY_STRING_SIZESTR=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_SIZESTR)_FUNC_ALLOCARRAY_STRING_SIZESTR=qbs_new(0,0);
|
|
int64 fornext_value2219;
|
|
int64 fornext_finalvalue2219;
|
|
int64 fornext_step2219;
|
|
uint8 fornext_step_negative2219;
|
|
int32 pass2220;
|
|
qbs *_FUNC_ALLOCARRAY_STRING_ELESIZESTR=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_ELESIZESTR)_FUNC_ALLOCARRAY_STRING_ELESIZESTR=qbs_new(0,0);
|
|
int16 pass2221;
|
|
int16 pass2222;
|
|
int16 pass2223;
|
|
int16 pass2224;
|
|
int16 pass2225;
|
|
int16 pass2226;
|
|
int16 pass2227;
|
|
int16 pass2228;
|
|
int16 pass2229;
|
|
int16 pass2230;
|
|
int16 pass2231;
|
|
int16 pass2232;
|
|
int16 pass2233;
|
|
int16 pass2234;
|
|
int16 pass2235;
|
|
int16 pass2236;
|
|
int32 pass2237;
|
|
qbs *_FUNC_ALLOCARRAY_STRING_ACC=NULL;
|
|
if (!_FUNC_ALLOCARRAY_STRING_ACC)_FUNC_ALLOCARRAY_STRING_ACC=qbs_new(0,0);
|
|
int16 pass2238;
|
|
int16 pass2239;
|
|
int16 pass2240;
|
|
int32 pass2241;
|
|
int32 pass2242;
|
|
int32 pass2243;
|
|
int32 pass2244;
|
|
int32 pass2245;
|
|
int16 pass2246;
|
|
int16 pass2247;
|
|
int16 pass2248;
|
|
int32 pass2249;
|
|
int16 pass2250;
|
|
int16 pass2251;
|
|
int16 pass2252;
|
|
int16 pass2253;
|
|
int16 pass2254;
|
|
int32 pass2255;
|
|
int16 pass2256;
|
|
int16 pass2257;
|
|
int16 pass2258;
|
|
int16 pass2259;
|
|
int16 pass2260;
|
|
int16 pass2261;
|
|
int16 pass2262;
|
|
int16 pass2263;
|
|
int32 pass2264;
|
|
int16 pass2265;
|
|
int16 pass2266;
|
|
int64 fornext_value2268;
|
|
int64 fornext_finalvalue2268;
|
|
int64 fornext_step2268;
|
|
uint8 fornext_step_negative2268;
|
|
int16 pass2269;
|
|
int16 pass2270;
|
|
int32 pass2271;
|
|
int16 pass2272;
|
|
int32 pass2273;
|
|
int16 pass2274;
|
|
int16 pass2275;
|
|
int16 pass2276;
|
|
int16 pass2277;
|
|
int16 pass2278;
|