mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-01 12:40:36 +00:00
(Automated push) Update internal/source/* from qb64.bas
This commit is contained in:
parent
78d4b607bd
commit
dc1fca8e1c
|
@ -10,7 +10,7 @@ qbs_set(__STRING_VERSION,qbs_new_txt_len("1.1",3));
|
|||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(13,4,"version.bas");}while(r);
|
||||
do{
|
||||
qbs_set(__STRING_BUILDNUM,qbs_new_txt_len("20170721/56",11));
|
||||
qbs_set(__STRING_BUILDNUM,qbs_new_txt_len("20170802/57",11));
|
||||
qbs_cleanup(qbs_tmp_base,0);
|
||||
if(!qbevent)break;evnt(13,7,"version.bas");}while(r);
|
||||
do{
|
||||
|
@ -7607,7 +7607,7 @@ qbs_cleanup(qbs_tmp_base,0);
|
|||
if(!qbevent)break;evnt(1567);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_I)-__ARRAY_LONG_UDTXSIZE[4],__ARRAY_LONG_UDTXSIZE[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[tmp_long]=((*__LONG_PTRSZ* 4 )+(( 4 )* 2 )+(( 8 )* 1 ))* 8 ;
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_UDTXSIZE[0]))[tmp_long]=((*__LONG_PTRSZ* 5 )+(( 4 )* 1 )+(( 8 )* 1 ))* 8 ;
|
||||
if(!qbevent)break;evnt(1568);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_I)-__ARRAY_INTEGER_UDTXBYTEALIGN[4],__ARRAY_INTEGER_UDTXBYTEALIGN[5]);
|
||||
|
@ -7791,11 +7791,11 @@ if (!new_error) ((int16*)(__ARRAY_INTEGER_UDTEBYTEALIGN[0]))[tmp_long]= 1 ;
|
|||
if(!qbevent)break;evnt(1605);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_LONGTYPE;
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_UDTETYPE[0]))[tmp_long]=*__LONG_OFFSETTYPE;
|
||||
if(!qbevent)break;evnt(1606);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5]);
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]= 32 ;
|
||||
if (!new_error) ((int32*)(__ARRAY_LONG_UDTESIZE[0]))[tmp_long]=*__LONG_PTRSZ* 8 ;
|
||||
if(!qbevent)break;evnt(1606);}while(r);
|
||||
do{
|
||||
tmp_long=array_check((*__LONG_I2)-__ARRAY_LONG_UDTETYPESIZE[4],__ARRAY_LONG_UDTETYPESIZE[5]);
|
||||
|
|
Loading…
Reference in a new issue