mirror of
https://github.com/QB64Official/qb64.git
synced 2024-08-31 00:40:17 +00:00
31 lines
966 B
Text
31 lines
966 B
Text
|
qbs*oldstr3310=NULL;
|
||
|
if(_SUB_HASHADD_STRING_A->tmp||_SUB_HASHADD_STRING_A->fixed||_SUB_HASHADD_STRING_A->readonly){
|
||
|
oldstr3310=_SUB_HASHADD_STRING_A;
|
||
|
if (oldstr3310->cmem_descriptor){
|
||
|
_SUB_HASHADD_STRING_A=qbs_new_cmem(oldstr3310->len,0);
|
||
|
}else{
|
||
|
_SUB_HASHADD_STRING_A=qbs_new(oldstr3310->len,0);
|
||
|
}
|
||
|
memcpy(_SUB_HASHADD_STRING_A->chr,oldstr3310->chr,oldstr3310->len);
|
||
|
}
|
||
|
int32 *_SUB_HASHADD_LONG_I=NULL;
|
||
|
if(_SUB_HASHADD_LONG_I==NULL){
|
||
|
_SUB_HASHADD_LONG_I=(int32*)mem_static_malloc(4);
|
||
|
*_SUB_HASHADD_LONG_I=0;
|
||
|
}
|
||
|
int32 *_SUB_HASHADD_LONG_X=NULL;
|
||
|
if(_SUB_HASHADD_LONG_X==NULL){
|
||
|
_SUB_HASHADD_LONG_X=(int32*)mem_static_malloc(4);
|
||
|
*_SUB_HASHADD_LONG_X=0;
|
||
|
}
|
||
|
int32 *_SUB_HASHADD_LONG_I2=NULL;
|
||
|
if(_SUB_HASHADD_LONG_I2==NULL){
|
||
|
_SUB_HASHADD_LONG_I2=(int32*)mem_static_malloc(4);
|
||
|
*_SUB_HASHADD_LONG_I2=0;
|
||
|
}
|
||
|
int32 *_SUB_HASHADD_LONG_I3=NULL;
|
||
|
if(_SUB_HASHADD_LONG_I3==NULL){
|
||
|
_SUB_HASHADD_LONG_I3=(int32*)mem_static_malloc(4);
|
||
|
*_SUB_HASHADD_LONG_I3=0;
|
||
|
}
|