mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-06-29 11:40:38 +00:00
Update internal/source
This commit is contained in:
parent
84873f88d8
commit
cd78160b44
|
@ -2048,8 +2048,6 @@ __ARRAY_STRING_DEFINEAZ[0]=(ptrszint)¬hingstring;
|
|||
*__LONG_STATEMENTN=0;
|
||||
*__LONG_EVERYCASENEWCASE=0;
|
||||
*__INTEGER_CONTROLLEVEL=0;
|
||||
*__INTEGER_SOFTCONTROLLEVEL=0;
|
||||
*__INTEGER_CONTROLLEVELLASTLINE=0;
|
||||
if (__ARRAY_INTEGER_CONTROLTYPE[2]&1){
|
||||
if (__ARRAY_INTEGER_CONTROLTYPE[2]&2){
|
||||
memset((void*)(__ARRAY_INTEGER_CONTROLTYPE[0]),0,__ARRAY_INTEGER_CONTROLTYPE[5]*2);
|
||||
|
|
|
@ -628,8 +628,6 @@ ptrszint *__ARRAY_STRING_DEFINEAZ=NULL;
|
|||
int32 *__LONG_STATEMENTN=NULL;
|
||||
int32 *__LONG_EVERYCASENEWCASE=NULL;
|
||||
int16 *__INTEGER_CONTROLLEVEL=NULL;
|
||||
int16 *__INTEGER_SOFTCONTROLLEVEL=NULL;
|
||||
int16 *__INTEGER_CONTROLLEVELLASTLINE=NULL;
|
||||
ptrszint *__ARRAY_INTEGER_CONTROLTYPE=NULL;
|
||||
ptrszint *__ARRAY_LONG_CONTROLID=NULL;
|
||||
ptrszint *__ARRAY_LONG_CONTROLVALUE=NULL;
|
||||
|
|
114734
internal/source/main.txt
114734
internal/source/main.txt
File diff suppressed because it is too large
Load diff
|
@ -2782,14 +2782,6 @@ if(__INTEGER_CONTROLLEVEL==NULL){
|
|||
__INTEGER_CONTROLLEVEL=(int16*)mem_static_malloc(2);
|
||||
*__INTEGER_CONTROLLEVEL=0;
|
||||
}
|
||||
if(__INTEGER_SOFTCONTROLLEVEL==NULL){
|
||||
__INTEGER_SOFTCONTROLLEVEL=(int16*)mem_static_malloc(2);
|
||||
*__INTEGER_SOFTCONTROLLEVEL=0;
|
||||
}
|
||||
if(__INTEGER_CONTROLLEVELLASTLINE==NULL){
|
||||
__INTEGER_CONTROLLEVELLASTLINE=(int16*)mem_static_malloc(2);
|
||||
*__INTEGER_CONTROLLEVELLASTLINE=0;
|
||||
}
|
||||
if (!__ARRAY_INTEGER_CONTROLTYPE){
|
||||
__ARRAY_INTEGER_CONTROLTYPE=(ptrszint*)mem_static_malloc(9*ptrsz);
|
||||
new_mem_lock();
|
||||
|
|
Loading…
Reference in a new issue