mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-19 15:35:01 +00:00
6e01fc8dce
Added new _STRCMP and _STRICMP commands for quick string comparisons. Cleaned up QB64 to finish removing the QUI (quick user insert) code and folders. Altered UCASE and LCASE routines to be faster in some situations for us.
84 lines
3.4 KiB
Text
84 lines
3.4 KiB
Text
int32 *_FUNC_IDE_LONG_IDE=NULL;
|
|
if(_FUNC_IDE_LONG_IDE==NULL){
|
|
_FUNC_IDE_LONG_IDE=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_IDE=0;
|
|
}
|
|
byte_element_struct *byte_element_3387=NULL;
|
|
if (!byte_element_3387){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3387=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3387=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_IDE_LONG_L=NULL;
|
|
if(_FUNC_IDE_LONG_L==NULL){
|
|
_FUNC_IDE_LONG_L=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_L=0;
|
|
}
|
|
byte_element_struct *byte_element_3388=NULL;
|
|
if (!byte_element_3388){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3388=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3388=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_IDE_LONG_I=NULL;
|
|
if(_FUNC_IDE_LONG_I==NULL){
|
|
_FUNC_IDE_LONG_I=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_I=0;
|
|
}
|
|
int64 fornext_value3390;
|
|
int64 fornext_finalvalue3390;
|
|
int64 fornext_step3390;
|
|
uint8 fornext_step_negative3390;
|
|
int32 *_FUNC_IDE_LONG_INDENT=NULL;
|
|
if(_FUNC_IDE_LONG_INDENT==NULL){
|
|
_FUNC_IDE_LONG_INDENT=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_INDENT=0;
|
|
}
|
|
byte_element_struct *byte_element_3391=NULL;
|
|
if (!byte_element_3391){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3391=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3391=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
qbs *_FUNC_IDE_STRING_LAYOUT2=NULL;
|
|
if (!_FUNC_IDE_STRING_LAYOUT2)_FUNC_IDE_STRING_LAYOUT2=qbs_new(0,0);
|
|
int32 *_FUNC_IDE_LONG_I2=NULL;
|
|
if(_FUNC_IDE_LONG_I2==NULL){
|
|
_FUNC_IDE_LONG_I2=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_I2=0;
|
|
}
|
|
int32 *_FUNC_IDE_LONG_IGNORESP=NULL;
|
|
if(_FUNC_IDE_LONG_IGNORESP==NULL){
|
|
_FUNC_IDE_LONG_IGNORESP=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_IGNORESP=0;
|
|
}
|
|
int64 fornext_value3393;
|
|
int64 fornext_finalvalue3393;
|
|
int64 fornext_step3393;
|
|
uint8 fornext_step_negative3393;
|
|
byte_element_struct *byte_element_3394=NULL;
|
|
if (!byte_element_3394){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3394=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3394=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 *_FUNC_IDE_LONG_A=NULL;
|
|
if(_FUNC_IDE_LONG_A==NULL){
|
|
_FUNC_IDE_LONG_A=(int32*)mem_static_malloc(4);
|
|
*_FUNC_IDE_LONG_A=0;
|
|
}
|
|
byte_element_struct *byte_element_3395=NULL;
|
|
if (!byte_element_3395){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3395=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3395=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3397;
|
|
int64 fornext_finalvalue3397;
|
|
int64 fornext_step3397;
|
|
uint8 fornext_step_negative3397;
|
|
qbs *_FUNC_IDE_STRING_INDENT=NULL;
|
|
if (!_FUNC_IDE_STRING_INDENT)_FUNC_IDE_STRING_INDENT=qbs_new(0,0);
|
|
byte_element_struct *byte_element_3398=NULL;
|
|
if (!byte_element_3398){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3398=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3398=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int64 fornext_value3400;
|
|
int64 fornext_finalvalue3400;
|
|
int64 fornext_step3400;
|
|
uint8 fornext_step_negative3400;
|
|
byte_element_struct *byte_element_3401=NULL;
|
|
if (!byte_element_3401){
|
|
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3401=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3401=(byte_element_struct*)mem_static_malloc(12);
|
|
}
|
|
int32 pass3402;
|