mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-19 21:25:11 +00:00
31 lines
966 B
Text
31 lines
966 B
Text
|
qbs*oldstr3305=NULL;
|
||
|
if(_SUB_HASHADD_STRING_A->tmp||_SUB_HASHADD_STRING_A->fixed||_SUB_HASHADD_STRING_A->readonly){
|
||
|
oldstr3305=_SUB_HASHADD_STRING_A;
|
||
|
if (oldstr3305->cmem_descriptor){
|
||
|
_SUB_HASHADD_STRING_A=qbs_new_cmem(oldstr3305->len,0);
|
||
|
}else{
|
||
|
_SUB_HASHADD_STRING_A=qbs_new(oldstr3305->len,0);
|
||
|
}
|
||
|
memcpy(_SUB_HASHADD_STRING_A->chr,oldstr3305->chr,oldstr3305->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;
|
||
|
}
|