1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-20 06:44:44 +00:00
QB64-PE/internal/source/data150.txt
2024-02-08 08:18:53 +00:00

22 lines
952 B
Text

qbs*oldstr3883=NULL;
if(_SUB_FINDINNERPARENS_STRING_EXP->tmp||_SUB_FINDINNERPARENS_STRING_EXP->fixed||_SUB_FINDINNERPARENS_STRING_EXP->readonly){
oldstr3883=_SUB_FINDINNERPARENS_STRING_EXP;
if (oldstr3883->cmem_descriptor){
_SUB_FINDINNERPARENS_STRING_EXP=qbs_new_cmem(oldstr3883->len,0);
}else{
_SUB_FINDINNERPARENS_STRING_EXP=qbs_new(oldstr3883->len,0);
}
memcpy(_SUB_FINDINNERPARENS_STRING_EXP->chr,oldstr3883->chr,oldstr3883->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);