1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-01 13:50:36 +00:00

(Automated push) Update internal/source/* from qb64.bas

This commit is contained in:
Galleondragon 2016-08-15 05:15:32 -07:00
parent 3f3016da6d
commit e86a5b765e
7 changed files with 63 additions and 46 deletions

View file

@ -2173,6 +2173,7 @@ __STRING_A3->len=0;
*__LONG_LASTLINE=0;
*__LONG_FIRSTLINE=0;
__STRING_F->len=0;
*__LONG_DUMMY=0;
__STRING_CURRENTDIR->len=0;
*__LONG_BU_DEPENDENCY_CONSOLE_ONLY=0;
*__LONG_CLOSEALL=0;

View file

@ -31,6 +31,11 @@ byte_element_struct *byte_element_3665=NULL;
if (!byte_element_3665){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3665=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3665=(byte_element_struct*)mem_static_malloc(12);
}
int32 *_FUNC_IDE2_LONG_DUMMY=NULL;
if(_FUNC_IDE2_LONG_DUMMY==NULL){
_FUNC_IDE2_LONG_DUMMY=(int32*)mem_static_malloc(4);
*_FUNC_IDE2_LONG_DUMMY=0;
}
int8 pass3669;
int32 *_FUNC_IDE2_LONG_BKPIDESYSTEM=NULL;
if(_FUNC_IDE2_LONG_BKPIDESYSTEM==NULL){

View file

@ -1,30 +1,35 @@
uint32 *_SUB_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=NULL;
if(_SUB_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR==NULL){
_SUB_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=(uint32*)mem_static_malloc(4);
*_SUB_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=0;
int32 *_FUNC_DARKENFGBG_LONG_DARKENFGBG=NULL;
if(_FUNC_DARKENFGBG_LONG_DARKENFGBG==NULL){
_FUNC_DARKENFGBG_LONG_DARKENFGBG=(int32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_LONG_DARKENFGBG=0;
}
uint32 *_SUB_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=NULL;
if(_SUB_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR==NULL){
_SUB_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=(uint32*)mem_static_malloc(4);
*_SUB_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=0;
uint32 *_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=NULL;
if(_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR==NULL){
_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=(uint32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=0;
}
uint32 *_SUB_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=NULL;
if(_SUB_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR==NULL){
_SUB_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=(uint32*)mem_static_malloc(4);
*_SUB_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=0;
uint32 *_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=NULL;
if(_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR==NULL){
_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=(uint32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=0;
}
uint32 *_SUB_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=NULL;
if(_SUB_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR==NULL){
_SUB_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=(uint32*)mem_static_malloc(4);
*_SUB_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=0;
uint32 *_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=NULL;
if(_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR==NULL){
_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=(uint32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=0;
}
uint32 *_SUB_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=NULL;
if(_SUB_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR==NULL){
_SUB_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=(uint32*)mem_static_malloc(4);
*_SUB_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=0;
uint32 *_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=NULL;
if(_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR==NULL){
_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=(uint32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=0;
}
uint32 *_SUB_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=NULL;
if(_SUB_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR==NULL){
_SUB_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=(uint32*)mem_static_malloc(4);
*_SUB_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=0;
uint32 *_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=NULL;
if(_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR==NULL){
_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=(uint32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=0;
}
uint32 *_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=NULL;
if(_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR==NULL){
_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=(uint32*)mem_static_malloc(4);
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=0;
}

View file

@ -511,6 +511,7 @@ int32 *__LONG_CONTINUELINEFROM=NULL;
int32 *__LONG_LASTLINE=NULL;
int32 *__LONG_FIRSTLINE=NULL;
qbs *__STRING_F=NULL;
int32 *__LONG_DUMMY=NULL;
qbs *__STRING_CURRENTDIR=NULL;
int32 *__LONG_BU_DEPENDENCY_CONSOLE_ONLY=NULL;
int32 *__LONG_CLOSEALL=NULL;

View file

@ -6062,7 +6062,7 @@ S_1238:;
if ((*__LONG_IDEMODE)||new_error){
if(qbevent){evnt(1117);if(r)goto S_1238;}
do{
SUB_DARKENFGBG(&(pass50= -1 ));
*__LONG_DUMMY=FUNC_DARKENFGBG(&(pass50= 1 ));
if(!qbevent)break;evnt(1119);}while(r);
do{
qbg_sub_color( 5 ,NULL,NULL,1);
@ -6171,7 +6171,7 @@ S_1276:;
if ((*__LONG_IDEMODE)||new_error){
if(qbevent){evnt(1141);if(r)goto S_1276;}
do{
SUB_DARKENFGBG(&(pass54= 0 ));
*__LONG_DUMMY=FUNC_DARKENFGBG(&(pass54= 0 ));
if(!qbevent)break;evnt(1143);}while(r);
}
do{
@ -48471,7 +48471,7 @@ S_13750:;
if ((*__LONG_IDEMODE)||new_error){
if(qbevent){evnt(11916);if(r)goto S_13750;}
do{
SUB_DARKENFGBG(&(pass1766= 0 ));
*__LONG_DUMMY=FUNC_DARKENFGBG(&(pass1766= 0 ));
if(!qbevent)break;evnt(11918);}while(r);
}
}
@ -49704,7 +49704,7 @@ S_14021:;
if ((*__LONG_IDEMODE)||new_error){
if(qbevent){evnt(12204);if(r)goto S_14021;}
do{
SUB_DARKENFGBG(&(pass1853= 0 ));
*__LONG_DUMMY=FUNC_DARKENFGBG(&(pass1853= 0 ));
if(!qbevent)break;evnt(12206);}while(r);
}
}
@ -119723,7 +119723,7 @@ do{
qbg_sub_locate(*__LONG_IDEWY- 3 , 2 ,NULL,NULL,NULL,3);
if(!qbevent)break;evnt(25051,188,"ide_methods.bas");}while(r);
do{
SUB_DARKENFGBG(&(pass3669= -1 ));
*_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass3669= 1 ));
if(!qbevent)break;evnt(25051,190,"ide_methods.bas");}while(r);
do{
*_FUNC_IDE2_LONG_BKPIDESYSTEM=*__LONG_IDESYSTEM;
@ -123736,7 +123736,7 @@ goto LABEL_SPECIALCHAR;
if(!qbevent)break;evnt(25051,1345,"ide_methods.bas");}while(r);
}
do{
SUB_DARKENFGBG(&(pass3851= -1 ));
*_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass3851= 1 ));
if(!qbevent)break;evnt(25051,1348,"ide_methods.bas");}while(r);
do{
*_FUNC_IDE2_LONG_BKPIDESYSTEM=*__LONG_IDESYSTEM;
@ -123788,7 +123788,7 @@ qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25051,1352,"ide_methods.bas");}while(r);
}else{
do{
SUB_DARKENFGBG(&(pass3854= -1 ));
*_FUNC_IDE2_LONG_DUMMY=FUNC_DARKENFGBG(&(pass3854= 1 ));
if(!qbevent)break;evnt(25051,1354,"ide_methods.bas");}while(r);
do{
*_FUNC_IDE2_LONG_BKPIDESYSTEM=*__LONG_IDESYSTEM;
@ -171613,7 +171613,7 @@ free_mem_lock(sf_mem_lock);
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
}
void SUB_DARKENFGBG(int8*_SUB_DARKENFGBG_BYTE_ACTION){
int32 FUNC_DARKENFGBG(int8*_FUNC_DARKENFGBG_BYTE_ACTION){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
@ -171627,43 +171627,43 @@ sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (new_error) goto exit_subfunc;
S_48636:;
if ((-(*_SUB_DARKENFGBG_BYTE_ACTION== -1 ))||new_error){
if ((-(*_FUNC_DARKENFGBG_BYTE_ACTION== 1 ))||new_error){
if(qbevent){evnt(25051,13990,"ide_methods.bas");if(r)goto S_48636;}
do{
*_SUB_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ));
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR)* 0.5E+0 ));
if(!qbevent)break;evnt(25051,13991,"ide_methods.bas");}while(r);
do{
*_SUB_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ));
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEBACKGROUNDCOLOR2)* 0.5E+0 ));
if(!qbevent)break;evnt(25051,13992,"ide_methods.bas");}while(r);
do{
*_SUB_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ));
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDETEXTCOLOR)* 0.5E+0 ));
if(!qbevent)break;evnt(25051,13993,"ide_methods.bas");}while(r);
do{
*_SUB_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ));
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDECOMMENTCOLOR)* 0.5E+0 ));
if(!qbevent)break;evnt(25051,13994,"ide_methods.bas");}while(r);
do{
*_SUB_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ));
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEMETACOMMANDCOLOR)* 0.5E+0 ));
if(!qbevent)break;evnt(25051,13995,"ide_methods.bas");}while(r);
do{
*_SUB_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ));
*_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR=func__rgb32(qbr(func__red32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ),qbr(func__green32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ),qbr(func__blue32(*__ULONG_IDEQUOTECOLOR)* 0.5E+0 ));
if(!qbevent)break;evnt(25051,13996,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 1 ,*_SUB_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR, 0 ,1);
sub__palettecolor( 1 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBGCOLOR, 0 ,1);
if(!qbevent)break;evnt(25051,13997,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 13 ,*_SUB_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR, 0 ,1);
sub__palettecolor( 13 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERFGCOLOR, 0 ,1);
if(!qbevent)break;evnt(25051,13998,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 6 ,*_SUB_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR, 0 ,1);
sub__palettecolor( 6 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERBG2COLOR, 0 ,1);
if(!qbevent)break;evnt(25051,13999,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 11 ,*_SUB_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR, 0 ,1);
sub__palettecolor( 11 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERCOMMENTCOLOR, 0 ,1);
if(!qbevent)break;evnt(25051,14000,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 10 ,*_SUB_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR, 0 ,1);
sub__palettecolor( 10 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERMETACOLOR, 0 ,1);
if(!qbevent)break;evnt(25051,14001,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 14 ,*_SUB_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR, 0 ,1);
sub__palettecolor( 14 ,*_FUNC_DARKENFGBG_ULONG_TEMPDARKERQUOTECOLOR, 0 ,1);
if(!qbevent)break;evnt(25051,14002,"ide_methods.bas");}while(r);
do{
sub__palettecolor( 5 ,func__rgb32( 255 , 255 , 255 ), 0 ,1);
@ -171693,6 +171693,7 @@ free_mem_lock(sf_mem_lock);
#include "free202.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
return *_FUNC_DARKENFGBG_LONG_DARKENFGBG;
}
void SUB_HIDEBRACKETHIGHLIGHT(){
qbs *tqbs;

View file

@ -2587,6 +2587,10 @@ byte_element_struct *byte_element_46=NULL;
if (!byte_element_46){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_46=(byte_element_struct*)(mem_static_pointer-12); else byte_element_46=(byte_element_struct*)mem_static_malloc(12);
}
if(__LONG_DUMMY==NULL){
__LONG_DUMMY=(int32*)mem_static_malloc(4);
*__LONG_DUMMY=0;
}
int8 pass50;
int8 pass54;
if (!__STRING_CURRENTDIR)__STRING_CURRENTDIR=qbs_new(0,0);

View file

@ -199,7 +199,7 @@ qbs* FUNC_FINDPROPOSEDTITLE();
qbs* FUNC_FINDCURRENTSF(int32*_FUNC_FINDCURRENTSF_LONG_WHICHLINE);
void SUB_ADDQUICKNAVHISTORY(int32*_SUB_ADDQUICKNAVHISTORY_LONG_LINENUMBER);
void SUB_UPDATEIDEINFO();
void SUB_DARKENFGBG(int8*_SUB_DARKENFGBG_BYTE_ACTION);
int32 FUNC_DARKENFGBG(int8*_FUNC_DARKENFGBG_BYTE_ACTION);
void SUB_HIDEBRACKETHIGHLIGHT();
void SUB_LOADCOLORSCHEMES();
qbs* FUNC_BACK2BACKNAME(qbs*_FUNC_BACK2BACKNAME_STRING_A);