From e86a5b765e72173090ff69c84941ee64ed8e236b Mon Sep 17 00:00:00 2001 From: Galleondragon Date: Mon, 15 Aug 2016 05:15:32 -0700 Subject: [PATCH] (Automated push) Update internal/source/* from qb64.bas --- internal/source/clear.txt | 1 + internal/source/data123.txt | 5 ++++ internal/source/data202.txt | 53 ++++++++++++++++++++---------------- internal/source/global.txt | 1 + internal/source/main.txt | 43 +++++++++++++++-------------- internal/source/maindata.txt | 4 +++ internal/source/regsf.txt | 2 +- 7 files changed, 63 insertions(+), 46 deletions(-) diff --git a/internal/source/clear.txt b/internal/source/clear.txt index ab210efe7..76be25bf6 100644 --- a/internal/source/clear.txt +++ b/internal/source/clear.txt @@ -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; diff --git a/internal/source/data123.txt b/internal/source/data123.txt index fa1527826..076ae04e1 100644 --- a/internal/source/data123.txt +++ b/internal/source/data123.txt @@ -31,6 +31,11 @@ byte_element_struct *byte_element_3665=NULL; if (!byte_element_3665){ if ((mem_static_pointer+=12)=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; diff --git a/internal/source/maindata.txt b/internal/source/maindata.txt index b77f90ac5..c18c8e394 100644 --- a/internal/source/maindata.txt +++ b/internal/source/maindata.txt @@ -2587,6 +2587,10 @@ byte_element_struct *byte_element_46=NULL; if (!byte_element_46){ if ((mem_static_pointer+=12)