QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-09-02 02:50:16 +00:00
Code Releases Wiki Activity
qb64/internal/source/data11.txt

258 lines
11 KiB
Text
Raw Normal View History

(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
int32 *_FUNC_DIM2_LONG_DIM2=NULL;
if(_FUNC_DIM2_LONG_DIM2==NULL){
_FUNC_DIM2_LONG_DIM2=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_DIM2=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
qbs*oldstr2168=NULL;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
if(_FUNC_DIM2_STRING_VARNAME->tmp||_FUNC_DIM2_STRING_VARNAME->fixed||_FUNC_DIM2_STRING_VARNAME->readonly){
Update internal/source
2020-01-15 03:17:45 +00:00
oldstr2168=_FUNC_DIM2_STRING_VARNAME;
if (oldstr2168->cmem_descriptor){
_FUNC_DIM2_STRING_VARNAME=qbs_new_cmem(oldstr2168->len,0);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}else{
Update internal/source
2020-01-15 03:17:45 +00:00
_FUNC_DIM2_STRING_VARNAME=qbs_new(oldstr2168->len,0);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
memcpy(_FUNC_DIM2_STRING_VARNAME->chr,oldstr2168->chr,oldstr2168->len);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
qbs*oldstr2169=NULL;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
if(_FUNC_DIM2_STRING_TYP2->tmp||_FUNC_DIM2_STRING_TYP2->fixed||_FUNC_DIM2_STRING_TYP2->readonly){
Update internal/source
2020-01-15 03:17:45 +00:00
oldstr2169=_FUNC_DIM2_STRING_TYP2;
if (oldstr2169->cmem_descriptor){
_FUNC_DIM2_STRING_TYP2=qbs_new_cmem(oldstr2169->len,0);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}else{
Update internal/source
2020-01-15 03:17:45 +00:00
_FUNC_DIM2_STRING_TYP2=qbs_new(oldstr2169->len,0);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
memcpy(_FUNC_DIM2_STRING_TYP2->chr,oldstr2169->chr,oldstr2169->len);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
qbs*oldstr2170=NULL;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
if(_FUNC_DIM2_STRING_ELEMENTS->tmp||_FUNC_DIM2_STRING_ELEMENTS->fixed||_FUNC_DIM2_STRING_ELEMENTS->readonly){
Update internal/source
2020-01-15 03:17:45 +00:00
oldstr2170=_FUNC_DIM2_STRING_ELEMENTS;
if (oldstr2170->cmem_descriptor){
_FUNC_DIM2_STRING_ELEMENTS=qbs_new_cmem(oldstr2170->len,0);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}else{
Update internal/source
2020-01-15 03:17:45 +00:00
_FUNC_DIM2_STRING_ELEMENTS=qbs_new(oldstr2170->len,0);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
memcpy(_FUNC_DIM2_STRING_ELEMENTS->chr,oldstr2170->chr,oldstr2170->len);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
qbs *_FUNC_DIM2_STRING_TYP=NULL;
if (!_FUNC_DIM2_STRING_TYP)_FUNC_DIM2_STRING_TYP=qbs_new(0,0);
qbs *_FUNC_DIM2_STRING_CVARNAME=NULL;
if (!_FUNC_DIM2_STRING_CVARNAME)_FUNC_DIM2_STRING_CVARNAME=qbs_new(0,0);
qbs *_FUNC_DIM2_STRING_L=NULL;
if (!_FUNC_DIM2_STRING_L)_FUNC_DIM2_STRING_L=qbs_new(0,0);
int32 *_FUNC_DIM2_LONG_F=NULL;
if(_FUNC_DIM2_LONG_F==NULL){
_FUNC_DIM2_LONG_F=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_F=0;
}
qbs *_FUNC_DIM2_STRING_SCOPE2=NULL;
if (!_FUNC_DIM2_STRING_SCOPE2)_FUNC_DIM2_STRING_SCOPE2=qbs_new(0,0);
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2172=NULL;
if (!byte_element_2172){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2172=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2172=(byte_element_struct*)mem_static_malloc(12);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
int32 *_FUNC_DIM2_LONG_I=NULL;
if(_FUNC_DIM2_LONG_I==NULL){
_FUNC_DIM2_LONG_I=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_I=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
int64 fornext_value2174;
int64 fornext_finalvalue2174;
int64 fornext_step2174;
uint8 fornext_step_negative2174;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
qbs *_FUNC_DIM2_STRING_N=NULL;
if (!_FUNC_DIM2_STRING_N)_FUNC_DIM2_STRING_N=qbs_new(0,0);
int32 *_FUNC_DIM2_LONG_TRY=NULL;
if(_FUNC_DIM2_LONG_TRY==NULL){
_FUNC_DIM2_LONG_TRY=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_TRY=0;
}
int32 *_FUNC_DIM2_LONG_BITS=NULL;
if(_FUNC_DIM2_LONG_BITS==NULL){
_FUNC_DIM2_LONG_BITS=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_BITS=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2176=NULL;
if (!byte_element_2176){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2176=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2176=(byte_element_struct*)mem_static_malloc(12);
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
}
int32 *_FUNC_DIM2_LONG_NUME=NULL;
if(_FUNC_DIM2_LONG_NUME==NULL){
_FUNC_DIM2_LONG_NUME=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_NUME=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
int32 pass2177;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
int32 *_FUNC_DIM2_LONG_BYTES=NULL;
if(_FUNC_DIM2_LONG_BYTES==NULL){
_FUNC_DIM2_LONG_BYTES=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_BYTES=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
int32 pass2188;
int32 pass2189;
int32 pass2190;
int32 pass2191;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
int32 *_FUNC_DIM2_LONG_UNSGN=NULL;
if(_FUNC_DIM2_LONG_UNSGN==NULL){
_FUNC_DIM2_LONG_UNSGN=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_UNSGN=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2193=NULL;
if (!byte_element_2193){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2193=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2193=(byte_element_struct*)mem_static_malloc(12);
Update internal/source
2020-01-04 12:49:17 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2194=NULL;
if (!byte_element_2194){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2194=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2194=(byte_element_struct*)mem_static_malloc(12);
Update internal/source
2020-01-04 12:49:17 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2195=NULL;
if (!byte_element_2195){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2195=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2195=(byte_element_struct*)mem_static_malloc(12);
Autobuild update [ci skip]
2019-03-31 23:29:05 +00:00
}
Update internal/source
2020-01-04 12:49:17 +00:00
qbs *_FUNC_DIM2_STRING_C=NULL;
if (!_FUNC_DIM2_STRING_C)_FUNC_DIM2_STRING_C=qbs_new(0,0);
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2196=NULL;
if (!byte_element_2196){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2196=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2196=(byte_element_struct*)mem_static_malloc(12);
Pushed changes to enhance the Windows Console Experience Window's CONSOLE support has been extended so that: CSRLIN support added. POS(0) support added. LOCATE support added. (Works with optional parameters.) COLOR support added. SCREEN support added to get both character and color information of any point on the console. tab() glitch fixed. (Which could cause an endless loop when printing with comma spaced text/numbers.) _WIDTH support added. _HEIGHT support added. WIDTH support added, with 2 new parameters added so we can set the buffer width and buffer height also. CLS support semi-added. (Doesn't accept colored backgrounds; it clears the screen black. I'm getting tired of working up console stuff which I probably won't ever use myself...) SLEEP support added. END support added so we now end with any keypress and not just enter. _CONSOLEINPUT added, so we can tell the difference in mouse and keyboard input. _CINP(toggle) support added, which allows us to get single character keystrokes from the console. _CONSOLEFONT FontName, FontSize support added, which allows us to change the font and font size we use for the console. _CONSOLECURSOR _SHOW|_HIDE, cursorsize support added, which allows us to show or hide the cursor in the console, and to change its size (from 0 to 100), as desired. New keyboard commands added: _CAPSLOCK -- returns 1 if caps lock is on, 0 if it isn't. _NUMLOCK -- as above, but for num lock _SCROLLOCK -- as above, but for scroll lock _TOGGLE_CAPSLOCK -- toggles the caps lock state for us. _TOGGLE_NUMLOCK -- same, but for num lock _TOGGLE_SCROLLOCK -- same, but for scroll lock
2019-08-27 23:52:02 +00:00
}
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
int32 *_FUNC_DIM2_LONG_HASHFOUND=NULL;
if(_FUNC_DIM2_LONG_HASHFOUND==NULL){
_FUNC_DIM2_LONG_HASHFOUND=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHFOUND=0;
}
qbs *_FUNC_DIM2_STRING_HASHNAME=NULL;
if (!_FUNC_DIM2_STRING_HASHNAME)_FUNC_DIM2_STRING_HASHNAME=qbs_new(0,0);
int32 *_FUNC_DIM2_LONG_HASHCHKFLAGS=NULL;
if(_FUNC_DIM2_LONG_HASHCHKFLAGS==NULL){
_FUNC_DIM2_LONG_HASHCHKFLAGS=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHCHKFLAGS=0;
}
int32 *_FUNC_DIM2_LONG_HASHRES=NULL;
if(_FUNC_DIM2_LONG_HASHRES==NULL){
_FUNC_DIM2_LONG_HASHRES=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHRES=0;
}
int32 *_FUNC_DIM2_LONG_HASHRESFLAGS=NULL;
if(_FUNC_DIM2_LONG_HASHRESFLAGS==NULL){
_FUNC_DIM2_LONG_HASHRESFLAGS=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHRESFLAGS=0;
}
int32 *_FUNC_DIM2_LONG_HASHRESREF=NULL;
if(_FUNC_DIM2_LONG_HASHRESREF==NULL){
_FUNC_DIM2_LONG_HASHRESREF=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_HASHRESREF=0;
}
int32 *_FUNC_DIM2_LONG_I2=NULL;
if(_FUNC_DIM2_LONG_I2==NULL){
_FUNC_DIM2_LONG_I2=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_I2=0;
}
int32 *_FUNC_DIM2_LONG_T=NULL;
if(_FUNC_DIM2_LONG_T==NULL){
_FUNC_DIM2_LONG_T=(int32*)mem_static_malloc(4);
*_FUNC_DIM2_LONG_T=0;
}
long double *_FUNC_DIM2_FLOAT_V=NULL;
if(_FUNC_DIM2_FLOAT_V==NULL){
_FUNC_DIM2_FLOAT_V=(long double*)mem_static_malloc(32);
*_FUNC_DIM2_FLOAT_V=0;
}
int64 *_FUNC_DIM2_INTEGER64_V=NULL;
if(_FUNC_DIM2_INTEGER64_V==NULL){
_FUNC_DIM2_INTEGER64_V=(int64*)mem_static_malloc(8);
*_FUNC_DIM2_INTEGER64_V=0;
}
uint64 *_FUNC_DIM2_UINTEGER64_V=NULL;
if(_FUNC_DIM2_UINTEGER64_V==NULL){
_FUNC_DIM2_UINTEGER64_V=(uint64*)mem_static_malloc(8);
*_FUNC_DIM2_UINTEGER64_V=0;
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2198=NULL;
if (!byte_element_2198){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2198=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2198=(byte_element_struct*)mem_static_malloc(12);
Update internal/source
2020-01-04 12:49:17 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2200=NULL;
if (!byte_element_2200){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2200=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2200=(byte_element_struct*)mem_static_malloc(12);
Autobuild update [ci skip]
2018-12-31 04:22:26 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
int32 pass2201;
(Automated push) Update internal/source/* from qb64.bas
2015-08-02 12:12:44 +00:00
qbs *_FUNC_DIM2_STRING_O=NULL;
if (!_FUNC_DIM2_STRING_O)_FUNC_DIM2_STRING_O=qbs_new(0,0);
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2215=NULL;
if (!byte_element_2215){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2215=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2215=(byte_element_struct*)mem_static_malloc(12);
Update internal/source
2020-01-04 12:49:17 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
int32 pass2216;
int32 pass2217;
byte_element_struct *byte_element_2223=NULL;
if (!byte_element_2223){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2223=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2223=(byte_element_struct*)mem_static_malloc(12);
Update internal/source
2020-01-04 12:49:17 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2224=NULL;
if (!byte_element_2224){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2224=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2224=(byte_element_struct*)mem_static_malloc(12);
Autobuild update [ci skip]
2019-03-31 23:29:05 +00:00
}
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2225=NULL;
if (!byte_element_2225){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2225=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2225=(byte_element_struct*)mem_static_malloc(12);
Pushed changes to enhance the Windows Console Experience Window's CONSOLE support has been extended so that: CSRLIN support added. POS(0) support added. LOCATE support added. (Works with optional parameters.) COLOR support added. SCREEN support added to get both character and color information of any point on the console. tab() glitch fixed. (Which could cause an endless loop when printing with comma spaced text/numbers.) _WIDTH support added. _HEIGHT support added. WIDTH support added, with 2 new parameters added so we can set the buffer width and buffer height also. CLS support semi-added. (Doesn't accept colored backgrounds; it clears the screen black. I'm getting tired of working up console stuff which I probably won't ever use myself...) SLEEP support added. END support added so we now end with any keypress and not just enter. _CONSOLEINPUT added, so we can tell the difference in mouse and keyboard input. _CINP(toggle) support added, which allows us to get single character keystrokes from the console. _CONSOLEFONT FontName, FontSize support added, which allows us to change the font and font size we use for the console. _CONSOLECURSOR _SHOW|_HIDE, cursorsize support added, which allows us to show or hide the cursor in the console, and to change its size (from 0 to 100), as desired. New keyboard commands added: _CAPSLOCK -- returns 1 if caps lock is on, 0 if it isn't. _NUMLOCK -- as above, but for num lock _SCROLLOCK -- as above, but for scroll lock _TOGGLE_CAPSLOCK -- toggles the caps lock state for us. _TOGGLE_NUMLOCK -- same, but for num lock _TOGGLE_SCROLLOCK -- same, but for scroll lock
2019-08-27 23:52:02 +00:00
}
Manually update internal/source
2020-01-02 08:10:56 +00:00
qbs *_FUNC_DIM2_STRING_CT=NULL;
if (!_FUNC_DIM2_STRING_CT)_FUNC_DIM2_STRING_CT=qbs_new(0,0);
qbs *_FUNC_DIM2_STRING_CMPS=NULL;
if (!_FUNC_DIM2_STRING_CMPS)_FUNC_DIM2_STRING_CMPS=qbs_new(0,0);
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2227=NULL;
if (!byte_element_2227){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2227=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2227=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2228;
int32 pass2229;
byte_element_struct *byte_element_2238=NULL;
if (!byte_element_2238){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2238=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2238=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2239;
int32 pass2240;
byte_element_struct *byte_element_2250=NULL;
if (!byte_element_2250){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2250=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2250=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2251;
int32 pass2252;
byte_element_struct *byte_element_2262=NULL;
if (!byte_element_2262){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2262=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2262=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2263;
int32 pass2264;
Update internal/source
2020-01-15 03:11:44 +00:00
int32 pass2268;
int32 pass2272;
Update internal/source
2020-01-15 03:17:45 +00:00
byte_element_struct *byte_element_2276=NULL;
if (!byte_element_2276){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2276=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2276=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2277;
int32 pass2278;
byte_element_struct *byte_element_2288=NULL;
if (!byte_element_2288){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2288=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2288=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2289;
int32 pass2290;
byte_element_struct *byte_element_2300=NULL;
if (!byte_element_2300){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2300=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2300=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2301;
int32 pass2302;
byte_element_struct *byte_element_2312=NULL;
if (!byte_element_2312){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2312=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2312=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2313;
int32 pass2314;
byte_element_struct *byte_element_2324=NULL;
if (!byte_element_2324){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_2324=(byte_element_struct*)(mem_static_pointer-12); else byte_element_2324=(byte_element_struct*)mem_static_malloc(12);
}
int32 pass2325;
int32 pass2326;
int8 pass2335;
Copy permalink