mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-20 04:24:48 +00:00
Automatic update of ./internal/source
This commit is contained in:
github-actions[bot]
parent
737d3b76fa
commit
8cee66e18d
3 changed files with 320 additions and 289 deletions
|
|
@ -1,32 +1,32 @@
|
|||
/home/runner/work/QB64pe/QB64pe/source/qb64pe.ico
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/version.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/settings.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/constants.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/extensions/opengl/opengl_global.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/ini-manager/ini.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/simplebuffer.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/sb_qb64pe_extension.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/const_eval.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/give_error.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/type.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/ide_global.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/wiki/wiki_global.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/syntax_highlighter_list.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/IDEsettings.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/hash.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/subs_functions.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/strings.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/file.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/build.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/elements.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/extensions/opengl/opengl_methods.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/ini-manager/ini.bm
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/simplebuffer.bm
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/sb_qb64pe_extension.bm
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/const_eval.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/hash.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/type.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/give_error.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/ide_methods.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/wiki/wiki_methods.bas
|
||||
/home/runner/work/QB64pe/QB64pe/internal/support/vwatch/vwatch_stub.bm
|
||||
ICON: /home/runner/work/QB64pe/QB64pe/source/qb64pe.ico
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/global/version.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/global/settings.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/global/constants.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/subs_functions/extensions/opengl/opengl_global.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/ini-manager/ini.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/simplebuffer.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/sb_qb64pe_extension.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/const_eval.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/give_error.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/type.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/ide/ide_global.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/ide/wiki/wiki_global.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/subs_functions/syntax_highlighter_list.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/global/IDEsettings.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/hash.bi
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/subs_functions/subs_functions.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/strings.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/file.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/build.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/elements.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/subs_functions/extensions/opengl/opengl_methods.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/ini-manager/ini.bm
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/simplebuffer.bm
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/sb_qb64pe_extension.bm
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/const_eval.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/hash.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/type.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/utilities/give_error.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/ide/ide_methods.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/source/ide/wiki/wiki_methods.bas
|
||||
INCL: /home/runner/work/QB64pe/QB64pe/internal/support/vwatch/vwatch_stub.bm
|
||||
|
|
|
|||
31
internal/source/incone.txt
Normal file
31
internal/source/incone.txt
Normal file
|
|
@ -0,0 +1,31 @@
|
|||
/home/runner/work/QB64pe/QB64pe/source/global/version.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/settings.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/constants.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/extensions/opengl/opengl_global.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/ini-manager/ini.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/simplebuffer.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/sb_qb64pe_extension.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/const_eval.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/give_error.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/type.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/ide_global.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/wiki/wiki_global.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/syntax_highlighter_list.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/global/IDEsettings.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/hash.bi
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/subs_functions.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/strings.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/file.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/build.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/elements.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/subs_functions/extensions/opengl/opengl_methods.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/ini-manager/ini.bm
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/simplebuffer.bm
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/s-buffer/sb_qb64pe_extension.bm
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/const_eval.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/hash.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/type.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/utilities/give_error.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/ide_methods.bas
|
||||
/home/runner/work/QB64pe/QB64pe/source/ide/wiki/wiki_methods.bas
|
||||
/home/runner/work/QB64pe/QB64pe/internal/support/vwatch/vwatch_stub.bm
|
||||
|
|
@ -10444,343 +10444,249 @@ if(!qbevent)break;evnt(1609);}while(r);
|
|||
S_2350:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,__STRING_WHOLELINE->len))||new_error){
|
||||
if(qbevent){evnt(1611);if(r)goto S_2350;}
|
||||
S_2351:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_ucase(qbs__trim(__STRING_WHOLELINE)),qbs_new_txt_len("$NOPREFIX",9))))||new_error){
|
||||
if(qbevent){evnt(1613);if(r)goto S_2351;}
|
||||
do{
|
||||
*__LONG_QB64PREFIX_SET_DESIREDSTATE= 1 ;
|
||||
if(!qbevent)break;evnt(1614);}while(r);
|
||||
S_2353:;
|
||||
if ((-(*__LONG_QB64PREFIX_SET== 0 ))||new_error){
|
||||
if(qbevent){evnt(1615);if(r)goto S_2353;}
|
||||
S_2354:;
|
||||
if ((-(*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS== 0 ))||new_error){
|
||||
if(qbevent){evnt(1616);if(r)goto S_2354;}
|
||||
do{
|
||||
*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS=*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS+ 1 ;
|
||||
if(!qbevent)break;evnt(1617);}while(r);
|
||||
do{
|
||||
goto LABEL_DO_RECOMPILE;
|
||||
if(!qbevent)break;evnt(1618);}while(r);
|
||||
}
|
||||
}
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_WHOLELINE,FUNC_LINEFORMAT(__STRING_WHOLELINE));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1623);}while(r);
|
||||
S_2361:;
|
||||
if ((*__LONG_ERROR_HAPPENED)||new_error){
|
||||
if(qbevent){evnt(1624);if(r)goto S_2361;}
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1624);}while(r);
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_ltrim(qbs_rtrim(qbs_ucase(__STRING_WHOLESTV))));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1627);}while(r);
|
||||
S_2365:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$COLOR:0",8))))||new_error){
|
||||
if(qbevent){evnt(1629);if(r)goto S_2365;}
|
||||
S_2366:;
|
||||
if ((*__LONG_QB64PREFIX_SET)||new_error){
|
||||
if(qbevent){evnt(1630);if(r)goto S_2366;}
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color0_noprefix.bi",18)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1631);}while(r);
|
||||
}else{
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color0.bi",9)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1633);}while(r);
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1635);}while(r);
|
||||
}
|
||||
S_2373:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$COLOR:32",9))))||new_error){
|
||||
if(qbevent){evnt(1638);if(r)goto S_2373;}
|
||||
S_2374:;
|
||||
if ((*__LONG_QB64PREFIX_SET)||new_error){
|
||||
if(qbevent){evnt(1639);if(r)goto S_2374;}
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color32_noprefix.bi",19)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1640);}while(r);
|
||||
}else{
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color32.bi",10)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1642);}while(r);
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1644);}while(r);
|
||||
}
|
||||
S_2381:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$DEBUG",6))))||new_error){
|
||||
if(qbevent){evnt(1647);if(r)goto S_2381;}
|
||||
do{
|
||||
*__LONG_VWATCHDESIREDSTATE= 1 ;
|
||||
if(!qbevent)break;evnt(1648);}while(r);
|
||||
S_2383:;
|
||||
if ((-(*__LONG_VWATCHON== 0 ))||new_error){
|
||||
if(qbevent){evnt(1649);if(r)goto S_2383;}
|
||||
S_2384:;
|
||||
if ((-(*__LONG_VWATCHRECOMPILEATTEMPTS== 0 ))||new_error){
|
||||
if(qbevent){evnt(1650);if(r)goto S_2384;}
|
||||
do{
|
||||
*__LONG_VWATCHRECOMPILEATTEMPTS=*__LONG_VWATCHRECOMPILEATTEMPTS+ 1 ;
|
||||
if(!qbevent)break;evnt(1652);}while(r);
|
||||
do{
|
||||
goto LABEL_DO_RECOMPILE;
|
||||
if(!qbevent)break;evnt(1653);}while(r);
|
||||
}else{
|
||||
}
|
||||
}
|
||||
}
|
||||
S_2391:;
|
||||
if(!qbevent)break;evnt(1613);}while(r);
|
||||
S_2352:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 4 ),qbs_new_txt_len("$IF ",4))))||new_error){
|
||||
if(qbevent){evnt(1660);if(r)goto S_2391;}
|
||||
S_2392:;
|
||||
if(qbevent){evnt(1616);if(r)goto S_2352;}
|
||||
S_2353:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_TEMP, 5 ),qbs_new_txt_len(" THEN",5))))||new_error){
|
||||
if(qbevent){evnt(1661);if(r)goto S_2392;}
|
||||
if(qbevent){evnt(1617);if(r)goto S_2353;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$IF without THEN",16));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1661);}while(r);
|
||||
if(!qbevent)break;evnt(1617);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1661);}while(r);
|
||||
if(!qbevent)break;evnt(1617);}while(r);
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 4 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1662);}while(r);
|
||||
if(!qbevent)break;evnt(1618);}while(r);
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_rtrim(qbs_left(__STRING_TEMP,__STRING_TEMP->len- 4 )));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1663);}while(r);
|
||||
if(!qbevent)break;evnt(1619);}while(r);
|
||||
do{
|
||||
*__LONG_TEMP=func_instr(NULL,__STRING_TEMP,qbs_new_txt_len("=",1),0);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1664);}while(r);
|
||||
if(!qbevent)break;evnt(1620);}while(r);
|
||||
do{
|
||||
*__INTEGER_EXECCOUNTER=*__INTEGER_EXECCOUNTER+ 1 ;
|
||||
if(!qbevent)break;evnt(1665);}while(r);
|
||||
if(!qbevent)break;evnt(1621);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ;
|
||||
if(!qbevent)break;evnt(1666);}while(r);
|
||||
if(!qbevent)break;evnt(1622);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]= 1 ;
|
||||
if(!qbevent)break;evnt(1667);}while(r);
|
||||
if(!qbevent)break;evnt(1623);}while(r);
|
||||
do{
|
||||
*__LONG_RESULT=FUNC_EVALPREIF(__STRING_TEMP,__STRING_A);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1668);}while(r);
|
||||
S_2403:;
|
||||
if(!qbevent)break;evnt(1624);}while(r);
|
||||
S_2364:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A,qbs_new_txt_len("",0))))||new_error){
|
||||
if(qbevent){evnt(1669);if(r)goto S_2403;}
|
||||
if(qbevent){evnt(1625);if(r)goto S_2364;}
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1669);}while(r);
|
||||
if(!qbevent)break;evnt(1625);}while(r);
|
||||
}
|
||||
S_2406:;
|
||||
S_2367:;
|
||||
if ((-(*__LONG_RESULT!= 0 ))||new_error){
|
||||
if(qbevent){evnt(1670);if(r)goto S_2406;}
|
||||
if(qbevent){evnt(1626);if(r)goto S_2367;}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])];
|
||||
if(!qbevent)break;evnt(1671);}while(r);
|
||||
S_2408:;
|
||||
if(!qbevent)break;evnt(1627);}while(r);
|
||||
S_2369:;
|
||||
if ((-(((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]== 0 ))||new_error){
|
||||
if(qbevent){evnt(1672);if(r)goto S_2408;}
|
||||
if(qbevent){evnt(1628);if(r)goto S_2369;}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 4 ;
|
||||
if(!qbevent)break;evnt(1672);}while(r);
|
||||
if(!qbevent)break;evnt(1628);}while(r);
|
||||
}
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1674);}while(r);
|
||||
if(!qbevent)break;evnt(1630);}while(r);
|
||||
}
|
||||
S_2414:;
|
||||
S_2375:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$ELSE",5))))||new_error){
|
||||
if(qbevent){evnt(1677);if(r)goto S_2414;}
|
||||
S_2415:;
|
||||
if(qbevent){evnt(1633);if(r)goto S_2375;}
|
||||
S_2376:;
|
||||
if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){
|
||||
if(qbevent){evnt(1678);if(r)goto S_2415;}
|
||||
if(qbevent){evnt(1634);if(r)goto S_2376;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$ELSE without $IF",17));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1678);}while(r);
|
||||
if(!qbevent)break;evnt(1634);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1678);}while(r);
|
||||
if(!qbevent)break;evnt(1634);}while(r);
|
||||
}
|
||||
S_2419:;
|
||||
S_2380:;
|
||||
if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 2 )||new_error){
|
||||
if(qbevent){evnt(1679);if(r)goto S_2419;}
|
||||
if(qbevent){evnt(1635);if(r)goto S_2380;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$IF block already has $ELSE statement in it",43));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1679);}while(r);
|
||||
if(!qbevent)break;evnt(1635);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1679);}while(r);
|
||||
if(!qbevent)break;evnt(1635);}while(r);
|
||||
}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 2 ;
|
||||
if(!qbevent)break;evnt(1680);}while(r);
|
||||
S_2424:;
|
||||
if(!qbevent)break;evnt(1636);}while(r);
|
||||
S_2385:;
|
||||
if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 4 )||new_error){
|
||||
if(qbevent){evnt(1681);if(r)goto S_2424;}
|
||||
if(qbevent){evnt(1637);if(r)goto S_2385;}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ;
|
||||
if(!qbevent)break;evnt(1682);}while(r);
|
||||
if(!qbevent)break;evnt(1638);}while(r);
|
||||
}else{
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])];
|
||||
if(!qbevent)break;evnt(1684);}while(r);
|
||||
if(!qbevent)break;evnt(1640);}while(r);
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1686);}while(r);
|
||||
if(!qbevent)break;evnt(1642);}while(r);
|
||||
}
|
||||
S_2431:;
|
||||
S_2392:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 5 ),qbs_new_txt_len("$ELSE",5))))||new_error){
|
||||
if(qbevent){evnt(1689);if(r)goto S_2431;}
|
||||
if(qbevent){evnt(1645);if(r)goto S_2392;}
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 6 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1690);}while(r);
|
||||
S_2433:;
|
||||
if(!qbevent)break;evnt(1646);}while(r);
|
||||
S_2394:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 3 ),qbs_new_txt_len("IF ",3))))||new_error){
|
||||
if(qbevent){evnt(1691);if(r)goto S_2433;}
|
||||
S_2434:;
|
||||
if(qbevent){evnt(1647);if(r)goto S_2394;}
|
||||
S_2395:;
|
||||
if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){
|
||||
if(qbevent){evnt(1692);if(r)goto S_2434;}
|
||||
if(qbevent){evnt(1648);if(r)goto S_2395;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF without $IF",20));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1692);}while(r);
|
||||
if(!qbevent)break;evnt(1648);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1692);}while(r);
|
||||
if(!qbevent)break;evnt(1648);}while(r);
|
||||
}
|
||||
S_2438:;
|
||||
S_2399:;
|
||||
if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 2 )||new_error){
|
||||
if(qbevent){evnt(1693);if(r)goto S_2438;}
|
||||
if(qbevent){evnt(1649);if(r)goto S_2399;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF cannot follow $ELSE",28));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1693);}while(r);
|
||||
if(!qbevent)break;evnt(1649);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1693);}while(r);
|
||||
if(!qbevent)break;evnt(1649);}while(r);
|
||||
}
|
||||
S_2442:;
|
||||
S_2403:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(qbs_right(__STRING_TEMP, 5 ),qbs_new_txt_len(" THEN",5))))||new_error){
|
||||
if(qbevent){evnt(1694);if(r)goto S_2442;}
|
||||
if(qbevent){evnt(1650);if(r)goto S_2403;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$ELSE IF without THEN",21));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1694);}while(r);
|
||||
if(!qbevent)break;evnt(1650);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1694);}while(r);
|
||||
if(!qbevent)break;evnt(1650);}while(r);
|
||||
}
|
||||
S_2446:;
|
||||
S_2407:;
|
||||
if ((((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]& 4 )||new_error){
|
||||
if(qbevent){evnt(1695);if(r)goto S_2446;}
|
||||
if(qbevent){evnt(1651);if(r)goto S_2407;}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]= -1 ;
|
||||
if(!qbevent)break;evnt(1696);}while(r);
|
||||
if(!qbevent)break;evnt(1652);}while(r);
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1697);}while(r);
|
||||
if(!qbevent)break;evnt(1653);}while(r);
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 3 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1699);}while(r);
|
||||
if(!qbevent)break;evnt(1655);}while(r);
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_rtrim(qbs_left(__STRING_TEMP,__STRING_TEMP->len- 4 )));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1700);}while(r);
|
||||
if(!qbevent)break;evnt(1656);}while(r);
|
||||
do{
|
||||
*__LONG_RESULT=FUNC_EVALPREIF(__STRING_TEMP,__STRING_A);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1701);}while(r);
|
||||
S_2453:;
|
||||
if(!qbevent)break;evnt(1657);}while(r);
|
||||
S_2414:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_A,qbs_new_txt_len("",0))))||new_error){
|
||||
if(qbevent){evnt(1702);if(r)goto S_2453;}
|
||||
if(qbevent){evnt(1658);if(r)goto S_2414;}
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1702);}while(r);
|
||||
if(!qbevent)break;evnt(1658);}while(r);
|
||||
}
|
||||
S_2456:;
|
||||
S_2417:;
|
||||
if ((-(*__LONG_RESULT!= 0 ))||new_error){
|
||||
if(qbevent){evnt(1703);if(r)goto S_2456;}
|
||||
if(qbevent){evnt(1659);if(r)goto S_2417;}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[tmp_long]=((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER- 1 )-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])];
|
||||
if(!qbevent)break;evnt(1704);}while(r);
|
||||
S_2458:;
|
||||
if(!qbevent)break;evnt(1660);}while(r);
|
||||
S_2419:;
|
||||
if ((-(((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])]== 0 ))||new_error){
|
||||
if(qbevent){evnt(1705);if(r)goto S_2458;}
|
||||
if(qbevent){evnt(1661);if(r)goto S_2419;}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]=((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]| 4 ;
|
||||
if(!qbevent)break;evnt(1705);}while(r);
|
||||
if(!qbevent)break;evnt(1661);}while(r);
|
||||
}
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1707);}while(r);
|
||||
if(!qbevent)break;evnt(1663);}while(r);
|
||||
}
|
||||
}
|
||||
S_2465:;
|
||||
S_2426:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_TEMP,qbs_new_txt_len("$END IF",7)))|(qbs_equal(__STRING_TEMP,qbs_new_txt_len("$ENDIF",6)))))||new_error){
|
||||
if(qbevent){evnt(1711);if(r)goto S_2465;}
|
||||
S_2466:;
|
||||
if(qbevent){evnt(1667);if(r)goto S_2426;}
|
||||
S_2427:;
|
||||
if ((-(((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5])]== 0 ))||new_error){
|
||||
if(qbevent){evnt(1712);if(r)goto S_2466;}
|
||||
if(qbevent){evnt(1668);if(r)goto S_2427;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("$END IF without $IF",19));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1712);}while(r);
|
||||
if(!qbevent)break;evnt(1668);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1712);}while(r);
|
||||
if(!qbevent)break;evnt(1668);}while(r);
|
||||
}
|
||||
do{
|
||||
tmp_long=array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_BYTE_DEFINEELSE[4],__ARRAY_BYTE_DEFINEELSE[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_DEFINEELSE[0]))[tmp_long]= 0 ;
|
||||
if(!qbevent)break;evnt(1713);}while(r);
|
||||
if(!qbevent)break;evnt(1669);}while(r);
|
||||
do{
|
||||
*__INTEGER_EXECCOUNTER=*__INTEGER_EXECCOUNTER- 1 ;
|
||||
if(!qbevent)break;evnt(1714);}while(r);
|
||||
if(!qbevent)break;evnt(1670);}while(r);
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1715);}while(r);
|
||||
if(!qbevent)break;evnt(1671);}while(r);
|
||||
}
|
||||
S_2474:;
|
||||
S_2435:;
|
||||
if ((((int32*)(__ARRAY_LONG_EXECLEVEL[0]))[array_check((*__INTEGER_EXECCOUNTER)-__ARRAY_LONG_EXECLEVEL[4],__ARRAY_LONG_EXECLEVEL[5])])||new_error){
|
||||
if(qbevent){evnt(1718);if(r)goto S_2474;}
|
||||
S_2475:;
|
||||
if(qbevent){evnt(1674);if(r)goto S_2435;}
|
||||
S_2436:;
|
||||
while((!(-(*__LONG_LINENUMBER<func_ubound(__ARRAY_BYTE_INVALIDLINE,1,1))))||new_error){
|
||||
if(qbevent){evnt(1719);if(r)goto S_2475;}
|
||||
if(qbevent){evnt(1675);if(r)goto S_2436;}
|
||||
do{
|
||||
|
||||
if (__ARRAY_BYTE_INVALIDLINE[2]&2){
|
||||
|
|
@ -10820,108 +10726,191 @@ if (!__ARRAY_BYTE_INVALIDLINE[0]) error(257);
|
|||
}
|
||||
__ARRAY_BYTE_INVALIDLINE[2]|=1;
|
||||
}
|
||||
if(!qbevent)break;evnt(1720);}while(r);
|
||||
if(!qbevent)break;evnt(1676);}while(r);
|
||||
dl_continue_230:;
|
||||
}
|
||||
dl_exit_230:;
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_LINENUMBER)-__ARRAY_BYTE_INVALIDLINE[4],__ARRAY_BYTE_INVALIDLINE[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_INVALIDLINE[0]))[tmp_long]= -1 ;
|
||||
if(!qbevent)break;evnt(1723);}while(r);
|
||||
if(!qbevent)break;evnt(1679);}while(r);
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1724);}while(r);
|
||||
if(!qbevent)break;evnt(1680);}while(r);
|
||||
}
|
||||
S_2481:;
|
||||
S_2442:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$COLOR:0",8))))||new_error){
|
||||
if(qbevent){evnt(1683);if(r)goto S_2442;}
|
||||
S_2443:;
|
||||
if ((*__LONG_QB64PREFIX_SET)||new_error){
|
||||
if(qbevent){evnt(1684);if(r)goto S_2443;}
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color0_noprefix.bi",18)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1685);}while(r);
|
||||
}else{
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color0.bi",9)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1687);}while(r);
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1689);}while(r);
|
||||
}
|
||||
S_2450:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$COLOR:32",9))))||new_error){
|
||||
if(qbevent){evnt(1692);if(r)goto S_2450;}
|
||||
S_2451:;
|
||||
if ((*__LONG_QB64PREFIX_SET)||new_error){
|
||||
if(qbevent){evnt(1693);if(r)goto S_2451;}
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color32_noprefix.bi",19)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1694);}while(r);
|
||||
}else{
|
||||
do{
|
||||
qbs_set(__STRING_ADDMETAINCLUDE,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(FUNC_GETFILEPATH(func_command( 0 ,0|1)),qbs_new_txt_len("internal",8)),__STRING1_PATHSEP),qbs_new_txt_len("support",7)),__STRING1_PATHSEP),qbs_new_txt_len("color",5)),__STRING1_PATHSEP),qbs_new_txt_len("color32.bi",10)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1696);}while(r);
|
||||
}
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1698);}while(r);
|
||||
}
|
||||
S_2458:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$DEBUG",6))))||new_error){
|
||||
if(qbevent){evnt(1701);if(r)goto S_2458;}
|
||||
do{
|
||||
*__LONG_VWATCHDESIREDSTATE= 1 ;
|
||||
if(!qbevent)break;evnt(1702);}while(r);
|
||||
S_2460:;
|
||||
if ((-(*__LONG_VWATCHON== 0 ))||new_error){
|
||||
if(qbevent){evnt(1703);if(r)goto S_2460;}
|
||||
S_2461:;
|
||||
if ((-(*__LONG_VWATCHRECOMPILEATTEMPTS== 0 ))||new_error){
|
||||
if(qbevent){evnt(1704);if(r)goto S_2461;}
|
||||
do{
|
||||
*__LONG_VWATCHRECOMPILEATTEMPTS=*__LONG_VWATCHRECOMPILEATTEMPTS+ 1 ;
|
||||
if(!qbevent)break;evnt(1706);}while(r);
|
||||
do{
|
||||
goto LABEL_DO_RECOMPILE;
|
||||
if(!qbevent)break;evnt(1707);}while(r);
|
||||
}else{
|
||||
}
|
||||
}
|
||||
}
|
||||
S_2468:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TEMP,qbs_new_txt_len("$NOPREFIX",9))))||new_error){
|
||||
if(qbevent){evnt(1714);if(r)goto S_2468;}
|
||||
do{
|
||||
*__LONG_QB64PREFIX_SET_DESIREDSTATE= 1 ;
|
||||
if(!qbevent)break;evnt(1715);}while(r);
|
||||
S_2470:;
|
||||
if ((-(*__LONG_QB64PREFIX_SET== 0 ))||new_error){
|
||||
if(qbevent){evnt(1716);if(r)goto S_2470;}
|
||||
S_2471:;
|
||||
if ((-(*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS== 0 ))||new_error){
|
||||
if(qbevent){evnt(1717);if(r)goto S_2471;}
|
||||
do{
|
||||
*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS=*__LONG_QB64PREFIX_SET_RECOMPILEATTEMPTS+ 1 ;
|
||||
if(!qbevent)break;evnt(1718);}while(r);
|
||||
do{
|
||||
goto LABEL_DO_RECOMPILE;
|
||||
if(!qbevent)break;evnt(1719);}while(r);
|
||||
}
|
||||
}
|
||||
}
|
||||
S_2477:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 7 ),qbs_new_txt_len("$ERROR ",7))))||new_error){
|
||||
if(qbevent){evnt(1727);if(r)goto S_2481;}
|
||||
if(qbevent){evnt(1724);if(r)goto S_2477;}
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,FUNC_REMOVESTRINGENCLOSINGPAIR(qbs_ltrim(func_mid(__STRING_TEMP, 7 ,NULL,0)),qbs_new_txt_len("''",2)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1728);}while(r);
|
||||
if(!qbevent)break;evnt(1725);}while(r);
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Compilation check failed: ",26),__STRING_TEMP));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1729);}while(r);
|
||||
if(!qbevent)break;evnt(1726);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1730);}while(r);
|
||||
if(!qbevent)break;evnt(1727);}while(r);
|
||||
}
|
||||
S_2486:;
|
||||
S_2482:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 5 ),qbs_new_txt_len("$LET ",5))))||new_error){
|
||||
if(qbevent){evnt(1733);if(r)goto S_2486;}
|
||||
if(qbevent){evnt(1730);if(r)goto S_2482;}
|
||||
do{
|
||||
qbs_set(__STRING_TEMP,qbs_ltrim(func_mid(__STRING_TEMP, 5 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1734);}while(r);
|
||||
if(!qbevent)break;evnt(1731);}while(r);
|
||||
do{
|
||||
*__LONG_TEMP=func_instr(NULL,__STRING_TEMP,qbs_new_txt_len("=",1),0);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1736);}while(r);
|
||||
S_2489:;
|
||||
if(!qbevent)break;evnt(1733);}while(r);
|
||||
S_2485:;
|
||||
if ((-(*__LONG_TEMP== 0 ))||new_error){
|
||||
if(qbevent){evnt(1737);if(r)goto S_2489;}
|
||||
if(qbevent){evnt(1734);if(r)goto S_2485;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("Invalid Syntax. $LET <flag> = <value>",38));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1737);}while(r);
|
||||
if(!qbevent)break;evnt(1734);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1737);}while(r);
|
||||
if(!qbevent)break;evnt(1734);}while(r);
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_L,qbs_rtrim(qbs_left(__STRING_TEMP,*__LONG_TEMP- 1 )));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1738);}while(r);
|
||||
if(!qbevent)break;evnt(1735);}while(r);
|
||||
do{
|
||||
qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_TEMP,*__LONG_TEMP+ 1 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1738);}while(r);
|
||||
S_2495:;
|
||||
if(!qbevent)break;evnt(1735);}while(r);
|
||||
S_2491:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,-(FUNC_VALIDNAME(__STRING_L)== 0 )))||new_error){
|
||||
if(qbevent){evnt(1740);if(r)goto S_2495;}
|
||||
if(qbevent){evnt(1737);if(r)goto S_2491;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("Invalid flag name",17));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1740);}while(r);
|
||||
if(!qbevent)break;evnt(1737);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1740);}while(r);
|
||||
if(!qbevent)break;evnt(1737);}while(r);
|
||||
}
|
||||
S_2499:;
|
||||
S_2495:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_R, 1 ),func_chr( 34 ))))||new_error){
|
||||
if(qbevent){evnt(1741);if(r)goto S_2499;}
|
||||
if(qbevent){evnt(1738);if(r)goto S_2495;}
|
||||
do{
|
||||
qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_R, 2 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1741);}while(r);
|
||||
if(!qbevent)break;evnt(1738);}while(r);
|
||||
}
|
||||
S_2502:;
|
||||
S_2498:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_right(__STRING_R, 1 ),func_chr( 34 ))))||new_error){
|
||||
if(qbevent){evnt(1742);if(r)goto S_2502;}
|
||||
if(qbevent){evnt(1739);if(r)goto S_2498;}
|
||||
do{
|
||||
qbs_set(__STRING_R,qbs_rtrim(qbs_left(__STRING_R,__STRING_R->len- 1 )));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1742);}while(r);
|
||||
if(!qbevent)break;evnt(1739);}while(r);
|
||||
}
|
||||
S_2505:;
|
||||
S_2501:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_R, 1 ),qbs_new_txt_len("-",1))))||new_error){
|
||||
if(qbevent){evnt(1743);if(r)goto S_2505;}
|
||||
if(qbevent){evnt(1740);if(r)goto S_2501;}
|
||||
do{
|
||||
qbs_set(__STRING_R1,qbs_new_txt_len("-",1));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1744);}while(r);
|
||||
if(!qbevent)break;evnt(1741);}while(r);
|
||||
do{
|
||||
qbs_set(__STRING_R,qbs_ltrim(func_mid(__STRING_R, 2 ,NULL,0)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1745);}while(r);
|
||||
if(!qbevent)break;evnt(1742);}while(r);
|
||||
}else{
|
||||
do{
|
||||
qbs_set(__STRING_R1,qbs_new_txt_len("",0));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1747);}while(r);
|
||||
if(!qbevent)break;evnt(1744);}while(r);
|
||||
}
|
||||
S_2511:;
|
||||
S_2507:;
|
||||
fornext_value233= 1 ;
|
||||
fornext_finalvalue233=__STRING_R->len;
|
||||
fornext_step233= 1 ;
|
||||
|
|
@ -10939,46 +10928,46 @@ if (fornext_value233<fornext_finalvalue233) break;
|
|||
if (fornext_value233>fornext_finalvalue233) break;
|
||||
}
|
||||
fornext_error233:;
|
||||
if(qbevent){evnt(1750);if(r)goto S_2511;}
|
||||
if(qbevent){evnt(1747);if(r)goto S_2507;}
|
||||
do{
|
||||
*__LONG_A=qbs_asc(__STRING_R,*__LONG_I);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1751);}while(r);
|
||||
S_2513:;
|
||||
if(qbevent){evnt(1752);if(r)goto S_2513;}
|
||||
S_2514:;
|
||||
if(!qbevent)break;evnt(1748);}while(r);
|
||||
S_2509:;
|
||||
if(qbevent){evnt(1749);if(r)goto S_2509;}
|
||||
S_2510:;
|
||||
if (((*__LONG_A==( 32 )))||new_error){
|
||||
if(qbevent){evnt(1753);if(r)goto S_2514;}
|
||||
if(qbevent){evnt(1750);if(r)goto S_2510;}
|
||||
sc_ec_1_end:;
|
||||
goto sc_235_end;
|
||||
}
|
||||
S_2515:;
|
||||
S_2511:;
|
||||
if (((*__LONG_A==( 46 )))||new_error){
|
||||
if(qbevent){evnt(1754);if(r)goto S_2515;}
|
||||
if(qbevent){evnt(1751);if(r)goto S_2511;}
|
||||
do{
|
||||
qbs_set(__STRING_R1,qbs_add(__STRING_R1,qbs_new_txt_len(".",1)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1755);}while(r);
|
||||
if(!qbevent)break;evnt(1752);}while(r);
|
||||
sc_ec_2_end:;
|
||||
goto sc_235_end;
|
||||
}
|
||||
S_2517:;
|
||||
S_2513:;
|
||||
if (((*__LONG_A<( 48 ))||(*__LONG_A>( 90 )))||new_error){
|
||||
if(qbevent){evnt(1756);if(r)goto S_2517;}
|
||||
if(qbevent){evnt(1753);if(r)goto S_2513;}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_new_txt_len("Invalid value",13));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1757);}while(r);
|
||||
if(!qbevent)break;evnt(1754);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1757);}while(r);
|
||||
if(!qbevent)break;evnt(1754);}while(r);
|
||||
sc_ec_3_end:;
|
||||
goto sc_235_end;
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_R1,qbs_add(__STRING_R1,func_chr(*__LONG_A)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1759);}while(r);
|
||||
if(!qbevent)break;evnt(1756);}while(r);
|
||||
sc_235_end:;
|
||||
fornext_continue_232:;
|
||||
}
|
||||
|
|
@ -10986,8 +10975,8 @@ fornext_exit_232:;
|
|||
do{
|
||||
qbs_set(__STRING_R,__STRING_R1);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1762);}while(r);
|
||||
S_2525:;
|
||||
if(!qbevent)break;evnt(1759);}while(r);
|
||||
S_2521:;
|
||||
fornext_value237= 8 ;
|
||||
fornext_finalvalue237=*__INTEGER_USERDEFINECOUNT;
|
||||
fornext_step237= 1 ;
|
||||
|
|
@ -11004,28 +10993,28 @@ if (fornext_value237<fornext_finalvalue237) break;
|
|||
if (fornext_value237>fornext_finalvalue237) break;
|
||||
}
|
||||
fornext_error237:;
|
||||
if(qbevent){evnt(1764);if(r)goto S_2525;}
|
||||
S_2526:;
|
||||
if(qbevent){evnt(1761);if(r)goto S_2521;}
|
||||
S_2522:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6]])),__STRING_L)))||new_error){
|
||||
if(qbevent){evnt(1765);if(r)goto S_2526;}
|
||||
if(qbevent){evnt(1762);if(r)goto S_2522;}
|
||||
do{
|
||||
tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__LONG_I)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6];
|
||||
if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),__STRING_R);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1765);}while(r);
|
||||
if(!qbevent)break;evnt(1762);}while(r);
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1765);}while(r);
|
||||
if(!qbevent)break;evnt(1762);}while(r);
|
||||
}
|
||||
fornext_continue_236:;
|
||||
}
|
||||
fornext_exit_236:;
|
||||
do{
|
||||
*__INTEGER_USERDEFINECOUNT=*__INTEGER_USERDEFINECOUNT+ 1 ;
|
||||
if(!qbevent)break;evnt(1768);}while(r);
|
||||
S_2532:;
|
||||
if(!qbevent)break;evnt(1765);}while(r);
|
||||
S_2528:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,-(*__INTEGER_USERDEFINECOUNT>func_ubound(__ARRAY_STRING_USERDEFINE, 2 ,2))))||new_error){
|
||||
if(qbevent){evnt(1769);if(r)goto S_2532;}
|
||||
if(qbevent){evnt(1766);if(r)goto S_2528;}
|
||||
do{
|
||||
|
||||
if (__ARRAY_STRING_USERDEFINE[2]&2){
|
||||
|
|
@ -11073,64 +11062,75 @@ while(tmp_long--) ((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long]=(uint64)qb
|
|||
}
|
||||
}
|
||||
}
|
||||
if(!qbevent)break;evnt(1770);}while(r);
|
||||
if(!qbevent)break;evnt(1767);}while(r);
|
||||
}
|
||||
do{
|
||||
tmp_long=array_check(( 0 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__INTEGER_USERDEFINECOUNT)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6];
|
||||
if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),__STRING_L);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1772);}while(r);
|
||||
if(!qbevent)break;evnt(1769);}while(r);
|
||||
do{
|
||||
tmp_long=array_check(( 1 )-__ARRAY_STRING_USERDEFINE[8],__ARRAY_STRING_USERDEFINE[9])+array_check((*__INTEGER_USERDEFINECOUNT)-__ARRAY_STRING_USERDEFINE[4],__ARRAY_STRING_USERDEFINE[5])*__ARRAY_STRING_USERDEFINE[6];
|
||||
if (!new_error) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_USERDEFINE[0]))[tmp_long])),__STRING_R);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1773);}while(r);
|
||||
if(!qbevent)break;evnt(1770);}while(r);
|
||||
do{
|
||||
goto LABEL_FINISHEDLINEPP;
|
||||
if(!qbevent)break;evnt(1774);}while(r);
|
||||
if(!qbevent)break;evnt(1771);}while(r);
|
||||
}
|
||||
S_2539:;
|
||||
S_2535:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(qbs_left(__STRING_TEMP, 10 ),qbs_new_txt_len("$UNSTABLE:",10))))||new_error){
|
||||
if(qbevent){evnt(1779);if(r)goto S_2539;}
|
||||
if(qbevent){evnt(1776);if(r)goto S_2535;}
|
||||
do{
|
||||
qbs_set(__STRING_TOKEN,qbs_ucase(qbs_ltrim(qbs_rtrim(func_mid(__STRING_TEMP, 11 ,NULL,0)))));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1780);}while(r);
|
||||
S_2541:;
|
||||
if(qbevent){evnt(1782);if(r)goto S_2541;}
|
||||
S_2542:;
|
||||
if(!qbevent)break;evnt(1777);}while(r);
|
||||
S_2537:;
|
||||
if(qbevent){evnt(1779);if(r)goto S_2537;}
|
||||
S_2538:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TOKEN,qbs_new_txt_len("MIDI",4))))||new_error){
|
||||
if(qbevent){evnt(1783);if(r)goto S_2542;}
|
||||
if(qbevent){evnt(1780);if(r)goto S_2538;}
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_UNSTABLE_MIDI)-__ARRAY_BYTE_UNSTABLEFLAGS[4],__ARRAY_BYTE_UNSTABLEFLAGS[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_UNSTABLEFLAGS[0]))[tmp_long]= -1 ;
|
||||
if(!qbevent)break;evnt(1784);}while(r);
|
||||
if(!qbevent)break;evnt(1781);}while(r);
|
||||
sc_ec_4_end:;
|
||||
goto sc_238_end;
|
||||
}
|
||||
S_2544:;
|
||||
S_2540:;
|
||||
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_TOKEN,qbs_new_txt_len("HTTP",4))))||new_error){
|
||||
if(qbevent){evnt(1786);if(r)goto S_2544;}
|
||||
if(qbevent){evnt(1783);if(r)goto S_2540;}
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_UNSTABLE_HTTP)-__ARRAY_BYTE_UNSTABLEFLAGS[4],__ARRAY_BYTE_UNSTABLEFLAGS[5]);
|
||||
if (!new_error) ((int8*)(__ARRAY_BYTE_UNSTABLEFLAGS[0]))[tmp_long]= -1 ;
|
||||
if(!qbevent)break;evnt(1787);}while(r);
|
||||
if(!qbevent)break;evnt(1784);}while(r);
|
||||
do{
|
||||
SUB_REGUNSTABLEHTTP();
|
||||
if(!qbevent)break;evnt(1788);}while(r);
|
||||
if(!qbevent)break;evnt(1785);}while(r);
|
||||
sc_ec_5_end:;
|
||||
goto sc_238_end;
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_A,qbs_add(qbs_new_txt_len("Unrecognized unstable flag ",27),FUNC_ADDQUOTES(__STRING_TOKEN)));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1791);}while(r);
|
||||
if(!qbevent)break;evnt(1788);}while(r);
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1792);}while(r);
|
||||
if(!qbevent)break;evnt(1789);}while(r);
|
||||
sc_238_end:;
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_WHOLELINE,FUNC_LINEFORMAT(__STRING_WHOLELINE));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1793);}while(r);
|
||||
S_2549:;
|
||||
if ((*__LONG_ERROR_HAPPENED)||new_error){
|
||||
if(qbevent){evnt(1794);if(r)goto S_2549;}
|
||||
do{
|
||||
goto LABEL_ERRMES;
|
||||
if(!qbevent)break;evnt(1794);}while(r);
|
||||
}
|
||||
do{
|
||||
qbs_set(__STRING_CWHOLELINE,__STRING_WHOLELINE);
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(1796);}while(r);
|
||||
|
|
|
|||
Loading…
Reference in a new issue