1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-05-12 12:00:13 +00:00
QB64-PE/internal/source/data150.txt
2024-04-10 17:52:08 +00:00

23 lines
952 B
Plaintext

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