1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-12 16:55:14 +00:00
QB64-PE/internal/source/data149.txt
2024-01-20 16:04:21 +00:00

23 lines
952 B
Plaintext

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