QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-01 12:40:36 +00:00
Code Issues Releases Wiki Activity

Update internal/source

Browse source
This commit is contained in:
Autobuild Process 2021-06-20 03:06:54 +00:00
parent 6181fe54e4
commit 22134a4c83
11 changed files with 47858 additions and 45922 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
internal/source/clear.txt
View file

@ -1897,12 +1897,12 @@ __ARRAY_LONG_UDTENEXT[6]=0;
__ARRAY_LONG_UDTENEXT[0]=(ptrszint)nothingvalue;
}
}
memset((void*)__UDT_ID,0,2861);
memset((void*)__UDT_ID,0,2869);
*__LONG_IDN=0;
*__LONG_IDS_MAX=0;
if (__ARRAY_UDT_IDS[2]&1){
if (__ARRAY_UDT_IDS[2]&2){
memset((void*)(__ARRAY_UDT_IDS[0]),0,__ARRAY_UDT_IDS[5]*2861);
memset((void*)(__ARRAY_UDT_IDS[0]),0,__ARRAY_UDT_IDS[5]*2869);
}else{
if (__ARRAY_UDT_IDS[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDS[0]));
@ -1964,7 +1964,7 @@ __ARRAY_INTEGER_ARRAYELEMENTSLIST[6]=0;
__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]=(ptrszint)nothingvalue;
}
}
memset((void*)__UDT_CLEARIDDATA,0,2861);
memset((void*)__UDT_CLEARIDDATA,0,2869);
*__LONG_ISSTRING=0;
*__LONG_ISFLOAT=0;
*__LONG_ISUNSIGNED=0;
@ -2191,7 +2191,7 @@ __ARRAY_LONG_CONTROLREF[0]=(ptrszint)nothingvalue;
}
*__INTEGER64_I2=0;
*__INTEGER64_I=0;
memset((void*)__UDT_ID2,0,2861);
memset((void*)__UDT_ID2,0,2869);
if (__ARRAY_LONG_SFIDLIST[2]&1){
if (__ARRAY_LONG_SFIDLIST[2]&2){
memset((void*)(__ARRAY_LONG_SFIDLIST[0]),0,__ARRAY_LONG_SFIDLIST[5]*4);

5
internal/source/data14.txt
View file

@ -14,8 +14,9 @@ qbs *_FUNC_EVALUATEFUNC_STRING_A=NULL;
if (!_FUNC_EVALUATEFUNC_STRING_A)_FUNC_EVALUATEFUNC_STRING_A=qbs_new(0,0);
void *_FUNC_EVALUATEFUNC_UDT_ID2=NULL;
if(_FUNC_EVALUATEFUNC_UDT_ID2==NULL){
_FUNC_EVALUATEFUNC_UDT_ID2=(void*)mem_static_malloc(2861);
memset(_FUNC_EVALUATEFUNC_UDT_ID2,0,2861);
_FUNC_EVALUATEFUNC_UDT_ID2=(void*)mem_static_malloc(2869);
memset(_FUNC_EVALUATEFUNC_UDT_ID2,0,2869);
*(qbs**)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+ 2861) = qbs_new(0,0);
}
qbs *_FUNC_EVALUATEFUNC_STRING_N=NULL;
if (!_FUNC_EVALUATEFUNC_STRING_N)_FUNC_EVALUATEFUNC_STRING_N=qbs_new(0,0);

5
internal/source/data39.txt
View file

@ -42,8 +42,9 @@ int64 fornext_step2896;
uint8 fornext_step_negative2896;
void *_FUNC_SEPERATEARGS_UDT_ID2=NULL;
if(_FUNC_SEPERATEARGS_UDT_ID2==NULL){
_FUNC_SEPERATEARGS_UDT_ID2=(void*)mem_static_malloc(2861);
memset(_FUNC_SEPERATEARGS_UDT_ID2,0,2861);
_FUNC_SEPERATEARGS_UDT_ID2=(void*)mem_static_malloc(2869);
memset(_FUNC_SEPERATEARGS_UDT_ID2,0,2869);
*(qbs**)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+ 2861) = qbs_new(0,0);
}
qbs *_FUNC_SEPERATEARGS_STRING_S=NULL;
if (!_FUNC_SEPERATEARGS_STRING_S)_FUNC_SEPERATEARGS_STRING_S=qbs_new(0,0);

5
internal/source/data6.txt
View file

@ -14,8 +14,9 @@ qbs *_FUNC_ARRAYREFERENCE_STRING_IDNUMBER=NULL;
if (!_FUNC_ARRAYREFERENCE_STRING_IDNUMBER)_FUNC_ARRAYREFERENCE_STRING_IDNUMBER=qbs_new(0,0);
void *_FUNC_ARRAYREFERENCE_UDT_ID2=NULL;
if(_FUNC_ARRAYREFERENCE_UDT_ID2==NULL){
_FUNC_ARRAYREFERENCE_UDT_ID2=(void*)mem_static_malloc(2861);
memset(_FUNC_ARRAYREFERENCE_UDT_ID2,0,2861);
_FUNC_ARRAYREFERENCE_UDT_ID2=(void*)mem_static_malloc(2869);
memset(_FUNC_ARRAYREFERENCE_UDT_ID2,0,2869);
*(qbs**)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+ 2861) = qbs_new(0,0);
}
qbs *_FUNC_ARRAYREFERENCE_STRING_A=NULL;
if (!_FUNC_ARRAYREFERENCE_STRING_A)_FUNC_ARRAYREFERENCE_STRING_A=qbs_new(0,0);

1
internal/source/free14.txt
View file

@ -3,6 +3,7 @@ if(oldstr2438->fixed)qbs_set(oldstr2438,_FUNC_EVALUATEFUNC_STRING_A2);
qbs_free(_FUNC_EVALUATEFUNC_STRING_A2);
}
qbs_free(_FUNC_EVALUATEFUNC_STRING_A);
qbs_free(*((qbs**)(((char*)_FUNC_EVALUATEFUNC_UDT_ID2)+ 2861)));
qbs_free(_FUNC_EVALUATEFUNC_STRING_N);
qbs_free(_FUNC_EVALUATEFUNC_STRING_F);
qbs_free(_FUNC_EVALUATEFUNC_STRING_R);

1
internal/source/free39.txt
View file

@ -6,6 +6,7 @@ if(oldstr2890){
if(oldstr2890->fixed)qbs_set(oldstr2890,_FUNC_SEPERATEARGS_STRING_CA);
qbs_free(_FUNC_SEPERATEARGS_STRING_CA);
}
qbs_free(*((qbs**)(((char*)_FUNC_SEPERATEARGS_UDT_ID2)+ 2861)));
qbs_free(_FUNC_SEPERATEARGS_STRING_S);
qbs_free(_FUNC_SEPERATEARGS_STRING_S2);
if (_FUNC_SEPERATEARGS_ARRAY_LONG_BRANCHFORMATPOS[2]&1){

1
internal/source/free6.txt
View file

@ -3,6 +3,7 @@ if(oldstr2174->fixed)qbs_set(oldstr2174,_FUNC_ARRAYREFERENCE_STRING_INDEXES);
qbs_free(_FUNC_ARRAYREFERENCE_STRING_INDEXES);
}
qbs_free(_FUNC_ARRAYREFERENCE_STRING_IDNUMBER);
qbs_free(*((qbs**)(((char*)_FUNC_ARRAYREFERENCE_UDT_ID2)+ 2861)));
qbs_free(_FUNC_ARRAYREFERENCE_STRING_A);
qbs_free(_FUNC_ARRAYREFERENCE_STRING_N);
qbs_free(_FUNC_ARRAYREFERENCE_STRING_R);

2
internal/source/global.txt
View file

@ -6,7 +6,7 @@ char *g_tmp_udt_IDEDBOTYPE=(char*)malloc(85);
char *g_tmp_udt_USEDVARLIST=(char*)malloc(37);
char *g_tmp_udt_HASHLISTITEM=(char*)malloc(20);
char *g_tmp_udt_LABEL_TYPE=(char*)malloc(282);
char *g_tmp_udt_IDSTRUCT=(char*)malloc(2861);
char *g_tmp_udt_IDSTRUCT=(char*)malloc(2869);
char *g_tmp_udt_POSITION=(char*)malloc(12);
qbs *__STRING_VERSION=NULL;
qbs *__STRING_DEVCHANNEL=NULL;

93726
internal/source/main.txt
View file

File diff suppressed because it is too large Load diff

15
internal/source/maindata.txt
View file

@ -2390,8 +2390,9 @@ __ARRAY_LONG_UDTENEXT[6]=0;
__ARRAY_LONG_UDTENEXT[0]=(ptrszint)nothingvalue;
}
if(__UDT_ID==NULL){
__UDT_ID=(void*)mem_static_malloc(2861);
memset(__UDT_ID,0,2861);
__UDT_ID=(void*)mem_static_malloc(2869);
memset(__UDT_ID,0,2869);
*(qbs**)(((char*)__UDT_ID)+ 2861) = qbs_new(0,0);
}
if(__LONG_IDN==NULL){
__LONG_IDN=(int32*)mem_static_malloc(4);
@ -2446,8 +2447,9 @@ __ARRAY_INTEGER_ARRAYELEMENTSLIST[6]=0;
__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]=(ptrszint)nothingvalue;
}
if(__UDT_CLEARIDDATA==NULL){
__UDT_CLEARIDDATA=(void*)mem_static_malloc(2861);
memset(__UDT_CLEARIDDATA,0,2861);
__UDT_CLEARIDDATA=(void*)mem_static_malloc(2869);
memset(__UDT_CLEARIDDATA,0,2869);
*(qbs**)(((char*)__UDT_CLEARIDDATA)+ 2861) = qbs_new(0,0);
}
if(__LONG_ISSTRING==NULL){
__LONG_ISSTRING=(int32*)mem_static_malloc(4);
@ -2830,8 +2832,9 @@ static int64 fornext_finalvalue57;
static int64 fornext_step57;
static uint8 fornext_step_negative57;
if(__UDT_ID2==NULL){
__UDT_ID2=(void*)mem_static_malloc(2861);
memset(__UDT_ID2,0,2861);
__UDT_ID2=(void*)mem_static_malloc(2869);
memset(__UDT_ID2,0,2869);
*(qbs**)(((char*)__UDT_ID2)+ 2861) = qbs_new(0,0);
}
if (!__ARRAY_LONG_SFIDLIST){
__ARRAY_LONG_SFIDLIST=(ptrszint*)mem_static_malloc(9*ptrsz);

11
internal/source/mainfree.txt
View file

@ -751,13 +751,14 @@ free((void*)(__ARRAY_LONG_UDTENEXT[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_LONG_UDTENEXT)[8] );
qbs_free(*((qbs**)(((char*)__UDT_ID)+ 2861)));
if (__ARRAY_UDT_IDS[2]&1){
if (__ARRAY_UDT_IDS[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_UDT_IDS[0]));
}else{
tmp_long=__ARRAY_UDT_IDS[5];
while(tmp_long--) {
qbs_free(*(qbs**)(__ARRAY_UDT_IDS[0]+(22952/8+1-1)*tmp_long+ 2861));}
free((void*)(__ARRAY_UDT_IDS[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_UDT_IDS)[8] );
if (__ARRAY_INTEGER_CMEMLIST[2]&1){
if (__ARRAY_INTEGER_CMEMLIST[2]&4){
@ -783,6 +784,7 @@ free((void*)(__ARRAY_INTEGER_ARRAYELEMENTSLIST[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_INTEGER_ARRAYELEMENTSLIST)[8] );
qbs_free(*((qbs**)(((char*)__UDT_CLEARIDDATA)+ 2861)));
qbs_free(__STRING_SOURCEFILE);
qbs_free(__STRING_FILE);
qbs_free(__STRING_FINDIDSECONDARG);
@ -860,6 +862,7 @@ free((void*)(__ARRAY_LONG_CONTROLREF[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_LONG_CONTROLREF)[8] );
qbs_free(*((qbs**)(((char*)__UDT_ID2)+ 2861)));
if (__ARRAY_LONG_SFIDLIST[2]&1){
if (__ARRAY_LONG_SFIDLIST[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_LONG_SFIDLIST[0]));