mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-09 12:50:17 +00:00
46 lines
1.6 KiB
Text
46 lines
1.6 KiB
Text
int16 *_FUNC_OPENBUFFER_INTEGER_OPENBUFFER=NULL;
|
|
if(_FUNC_OPENBUFFER_INTEGER_OPENBUFFER==NULL){
|
|
_FUNC_OPENBUFFER_INTEGER_OPENBUFFER=(int16*)mem_static_malloc(2);
|
|
*_FUNC_OPENBUFFER_INTEGER_OPENBUFFER=0;
|
|
}
|
|
qbs*oldstr3934=NULL;
|
|
if(_FUNC_OPENBUFFER_STRING_SBMODE->tmp||_FUNC_OPENBUFFER_STRING_SBMODE->fixed||_FUNC_OPENBUFFER_STRING_SBMODE->readonly){
|
|
oldstr3934=_FUNC_OPENBUFFER_STRING_SBMODE;
|
|
if (oldstr3934->cmem_descriptor){
|
|
_FUNC_OPENBUFFER_STRING_SBMODE=qbs_new_cmem(oldstr3934->len,0);
|
|
}else{
|
|
_FUNC_OPENBUFFER_STRING_SBMODE=qbs_new(oldstr3934->len,0);
|
|
}
|
|
memcpy(_FUNC_OPENBUFFER_STRING_SBMODE->chr,oldstr3934->chr,oldstr3934->len);
|
|
}
|
|
qbs*oldstr3935=NULL;
|
|
if(_FUNC_OPENBUFFER_STRING_SBNAME->tmp||_FUNC_OPENBUFFER_STRING_SBNAME->fixed||_FUNC_OPENBUFFER_STRING_SBNAME->readonly){
|
|
oldstr3935=_FUNC_OPENBUFFER_STRING_SBNAME;
|
|
if (oldstr3935->cmem_descriptor){
|
|
_FUNC_OPENBUFFER_STRING_SBNAME=qbs_new_cmem(oldstr3935->len,0);
|
|
}else{
|
|
_FUNC_OPENBUFFER_STRING_SBNAME=qbs_new(oldstr3935->len,0);
|
|
}
|
|
memcpy(_FUNC_OPENBUFFER_STRING_SBNAME->chr,oldstr3935->chr,oldstr3935->len);
|
|
}
|
|
int16 *_FUNC_OPENBUFFER_INTEGER_BUF=NULL;
|
|
if(_FUNC_OPENBUFFER_INTEGER_BUF==NULL){
|
|
_FUNC_OPENBUFFER_INTEGER_BUF=(int16*)mem_static_malloc(2);
|
|
*_FUNC_OPENBUFFER_INTEGER_BUF=0;
|
|
}
|
|
int32 *_FUNC_OPENBUFFER_LONG_NUL=NULL;
|
|
if(_FUNC_OPENBUFFER_LONG_NUL==NULL){
|
|
_FUNC_OPENBUFFER_LONG_NUL=(int32*)mem_static_malloc(4);
|
|
*_FUNC_OPENBUFFER_LONG_NUL=0;
|
|
}
|
|
int32 fornext_value3937;
|
|
int32 fornext_finalvalue3937;
|
|
int32 fornext_step3937;
|
|
uint8 fornext_step_negative3937;
|
|
static qbs *sc_3938=qbs_new(0,0);
|
|
int32 pass3939;
|
|
int16 pass3940;
|
|
int32 pass3941;
|
|
int16 pass3942;
|
|
int32 pass3943;
|
|
int16 pass3944;
|