1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 05:34:47 +00:00
QB64-PE/internal/source/data151.txt
2024-06-26 12:49:17 +00:00

22 lines
952 B
Text

qbs*oldstr3893=NULL;
if(_SUB_FINDINNERPARENS_STRING_EXP->tmp||_SUB_FINDINNERPARENS_STRING_EXP->fixed||_SUB_FINDINNERPARENS_STRING_EXP->readonly){
oldstr3893=_SUB_FINDINNERPARENS_STRING_EXP;
if (oldstr3893->cmem_descriptor){
_SUB_FINDINNERPARENS_STRING_EXP=qbs_new_cmem(oldstr3893->len,0);
}else{
_SUB_FINDINNERPARENS_STRING_EXP=qbs_new(oldstr3893->len,0);
}
memcpy(_SUB_FINDINNERPARENS_STRING_EXP->chr,oldstr3893->chr,oldstr3893->len);
}
int32 *_SUB_FINDINNERPARENS_LONG_STRINDEX=NULL;
if(_SUB_FINDINNERPARENS_LONG_STRINDEX==NULL){
_SUB_FINDINNERPARENS_LONG_STRINDEX=(int32*)mem_static_malloc(4);
*_SUB_FINDINNERPARENS_LONG_STRINDEX=0;
}
int32 *_SUB_FINDINNERPARENS_LONG_PAREN=NULL;
if(_SUB_FINDINNERPARENS_LONG_PAREN==NULL){
_SUB_FINDINNERPARENS_LONG_PAREN=(int32*)mem_static_malloc(4);
*_SUB_FINDINNERPARENS_LONG_PAREN=0;
}
qbs *_SUB_FINDINNERPARENS_STRING_ELE=NULL;
if (!_SUB_FINDINNERPARENS_STRING_ELE)_SUB_FINDINNERPARENS_STRING_ELE=qbs_new(0,0);