QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-19 23:44:46 +00:00
Code Issues Releases Wiki Activity

Automatic update of ./internal/source

Browse source
This commit is contained in:
github-actions[bot] 2024-06-02 01:04:40 +00:00
parent 91eab72643
commit eff5f84e89
5 changed files with 61499 additions and 61873 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

32
internal/source/clear.txt
View file

@ -213,22 +213,6 @@ __ARRAY_LONG_UDTXSIZE[6]=0;
__ARRAY_LONG_UDTXSIZE[0]=(ptrszint)nothingvalue;
}
}
if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&1){
if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&2){
memset((void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]),0,__ARRAY_INTEGER_UDTXBYTEALIGN[5]*2);
}else{
if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]));
}else{
free((void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]));
}
__ARRAY_INTEGER_UDTXBYTEALIGN[2]^=1;
__ARRAY_INTEGER_UDTXBYTEALIGN[4]=2147483647;
__ARRAY_INTEGER_UDTXBYTEALIGN[5]=0;
__ARRAY_INTEGER_UDTXBYTEALIGN[6]=0;
__ARRAY_INTEGER_UDTXBYTEALIGN[0]=(ptrszint)nothingvalue;
}
}
if (__ARRAY_LONG_UDTXNEXT[2]&1){
if (__ARRAY_LONG_UDTXNEXT[2]&2){
memset((void*)(__ARRAY_LONG_UDTXNEXT[0]),0,__ARRAY_LONG_UDTXNEXT[5]*4);
@ -293,22 +277,6 @@ __ARRAY_STRING256_UDTECNAME[6]=0;
__ARRAY_STRING256_UDTECNAME[0]=(ptrszint)nothingvalue;
}
}
if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&1){
if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&2){
memset((void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]),0,__ARRAY_INTEGER_UDTEBYTEALIGN[5]*2);
}else{
if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]));
}else{
free((void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]));
}
__ARRAY_INTEGER_UDTEBYTEALIGN[2]^=1;
__ARRAY_INTEGER_UDTEBYTEALIGN[4]=2147483647;
__ARRAY_INTEGER_UDTEBYTEALIGN[5]=0;
__ARRAY_INTEGER_UDTEBYTEALIGN[6]=0;
__ARRAY_INTEGER_UDTEBYTEALIGN[0]=(ptrszint)nothingvalue;
}
}
if (__ARRAY_LONG_UDTESIZE[2]&1){
if (__ARRAY_LONG_UDTESIZE[2]&2){
memset((void*)(__ARRAY_LONG_UDTESIZE[0]),0,__ARRAY_LONG_UDTESIZE[5]*4);

2
internal/source/global.txt
View file

@ -88,12 +88,10 @@ int32 *__LONG_UDTTYPE=NULL;
ptrszint *__ARRAY_STRING256_UDTXNAME=NULL;
ptrszint *__ARRAY_STRING256_UDTXCNAME=NULL;
ptrszint *__ARRAY_LONG_UDTXSIZE=NULL;
ptrszint *__ARRAY_INTEGER_UDTXBYTEALIGN=NULL;
ptrszint *__ARRAY_LONG_UDTXNEXT=NULL;
ptrszint *__ARRAY_INTEGER_UDTXVARIABLE=NULL;
ptrszint *__ARRAY_STRING256_UDTENAME=NULL;
ptrszint *__ARRAY_STRING256_UDTECNAME=NULL;
ptrszint *__ARRAY_INTEGER_UDTEBYTEALIGN=NULL;
ptrszint *__ARRAY_LONG_UDTESIZE=NULL;
ptrszint *__ARRAY_LONG_UDTETYPE=NULL;
ptrszint *__ARRAY_LONG_UDTETYPESIZE=NULL;

123300
internal/source/main.txt
View file

File diff suppressed because it is too large Load diff

22
internal/source/maindata.txt
View file

@ -303,17 +303,6 @@ __ARRAY_LONG_UDTXSIZE[5]=0;
__ARRAY_LONG_UDTXSIZE[6]=0;
__ARRAY_LONG_UDTXSIZE[0]=(ptrszint)nothingvalue;
}
if (!__ARRAY_INTEGER_UDTXBYTEALIGN){
__ARRAY_INTEGER_UDTXBYTEALIGN=(ptrszint*)mem_static_malloc(9*ptrsz);
new_mem_lock();
mem_lock_tmp->type=4;
((ptrszint*)__ARRAY_INTEGER_UDTXBYTEALIGN)[8]=(ptrszint)mem_lock_tmp;
__ARRAY_INTEGER_UDTXBYTEALIGN[2]=0;
__ARRAY_INTEGER_UDTXBYTEALIGN[4]=2147483647;
__ARRAY_INTEGER_UDTXBYTEALIGN[5]=0;
__ARRAY_INTEGER_UDTXBYTEALIGN[6]=0;
__ARRAY_INTEGER_UDTXBYTEALIGN[0]=(ptrszint)nothingvalue;
}
if (!__ARRAY_LONG_UDTXNEXT){
__ARRAY_LONG_UDTXNEXT=(ptrszint*)mem_static_malloc(9*ptrsz);
new_mem_lock();
@ -358,17 +347,6 @@ __ARRAY_STRING256_UDTECNAME[5]=0;
__ARRAY_STRING256_UDTECNAME[6]=0;
__ARRAY_STRING256_UDTECNAME[0]=(ptrszint)nothingvalue;
}
if (!__ARRAY_INTEGER_UDTEBYTEALIGN){
__ARRAY_INTEGER_UDTEBYTEALIGN=(ptrszint*)mem_static_malloc(9*ptrsz);
new_mem_lock();
mem_lock_tmp->type=4;
((ptrszint*)__ARRAY_INTEGER_UDTEBYTEALIGN)[8]=(ptrszint)mem_lock_tmp;
__ARRAY_INTEGER_UDTEBYTEALIGN[2]=0;
__ARRAY_INTEGER_UDTEBYTEALIGN[4]=2147483647;
__ARRAY_INTEGER_UDTEBYTEALIGN[5]=0;
__ARRAY_INTEGER_UDTEBYTEALIGN[6]=0;
__ARRAY_INTEGER_UDTEBYTEALIGN[0]=(ptrszint)nothingvalue;
}
if (!__ARRAY_LONG_UDTESIZE){
__ARRAY_LONG_UDTESIZE=(ptrszint*)mem_static_malloc(9*ptrsz);
new_mem_lock();

16
internal/source/mainfree.txt
View file

@ -81,14 +81,6 @@ free((void*)(__ARRAY_LONG_UDTXSIZE[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_LONG_UDTXSIZE)[8] );
if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&1){
if (__ARRAY_INTEGER_UDTXBYTEALIGN[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]));
}else{
free((void*)(__ARRAY_INTEGER_UDTXBYTEALIGN[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_INTEGER_UDTXBYTEALIGN)[8] );
if (__ARRAY_LONG_UDTXNEXT[2]&1){
if (__ARRAY_LONG_UDTXNEXT[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTXNEXT[0]));
@ -121,14 +113,6 @@ free((void*)(__ARRAY_STRING256_UDTECNAME[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_STRING256_UDTECNAME)[8] );
if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&1){
if (__ARRAY_INTEGER_UDTEBYTEALIGN[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]));
}else{
free((void*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)__ARRAY_INTEGER_UDTEBYTEALIGN)[8] );
if (__ARRAY_LONG_UDTESIZE[2]&1){
if (__ARRAY_LONG_UDTESIZE[2]&4){
cmem_dynamic_free((uint8*)(__ARRAY_LONG_UDTESIZE[0]));