1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-04 06:00:23 +00:00
QB64-PE/internal/source/free79.txt
2015-10-30 23:18:44 +11:00

55 lines
1.8 KiB
Plaintext

if(oldstr3191){
if(oldstr3191->fixed)qbs_set(oldstr3191,_FUNC_BTEN_STRING_INTOP);
qbs_free(_FUNC_BTEN_STRING_INTOP);
}
if(oldstr3192){
if(oldstr3192->fixed)qbs_set(oldstr3192,_FUNC_BTEN_STRING_OP);
qbs_free(_FUNC_BTEN_STRING_OP);
}
if(oldstr3193){
if(oldstr3193->fixed)qbs_set(oldstr3193,_FUNC_BTEN_STRING_INBOT);
qbs_free(_FUNC_BTEN_STRING_INBOT);
}
if (_FUNC_BTEN_ARRAY_LONG_RESULT[2]&1){
if (_FUNC_BTEN_ARRAY_LONG_RESULT[2]&4){
cmem_dynamic_free((uint8*)(_FUNC_BTEN_ARRAY_LONG_RESULT[0]));
}else{
free((void*)(_FUNC_BTEN_ARRAY_LONG_RESULT[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_BTEN_ARRAY_LONG_RESULT)[8] );
qbs_free(_FUNC_BTEN_STRING_RETSTR);
if (_FUNC_BTEN_ARRAY_LONG_TARRAY[2]&1){
if (_FUNC_BTEN_ARRAY_LONG_TARRAY[2]&4){
cmem_dynamic_free((uint8*)(_FUNC_BTEN_ARRAY_LONG_TARRAY[0]));
}else{
free((void*)(_FUNC_BTEN_ARRAY_LONG_TARRAY[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_BTEN_ARRAY_LONG_TARRAY)[8] );
if (_FUNC_BTEN_ARRAY_LONG_BARRAY[2]&1){
if (_FUNC_BTEN_ARRAY_LONG_BARRAY[2]&4){
cmem_dynamic_free((uint8*)(_FUNC_BTEN_ARRAY_LONG_BARRAY[0]));
}else{
free((void*)(_FUNC_BTEN_ARRAY_LONG_BARRAY[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_BTEN_ARRAY_LONG_BARRAY)[8] );
if (_FUNC_BTEN_ARRAY_DOUBLE_RESDBL[2]&1){
if (_FUNC_BTEN_ARRAY_DOUBLE_RESDBL[2]&4){
cmem_dynamic_free((uint8*)(_FUNC_BTEN_ARRAY_DOUBLE_RESDBL[0]));
}else{
free((void*)(_FUNC_BTEN_ARRAY_DOUBLE_RESDBL[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_BTEN_ARRAY_DOUBLE_RESDBL)[8] );
if (_FUNC_BTEN_ARRAY_LONG_IARRAY[2]&1){
if (_FUNC_BTEN_ARRAY_LONG_IARRAY[2]&4){
cmem_dynamic_free((uint8*)(_FUNC_BTEN_ARRAY_LONG_IARRAY[0]));
}else{
free((void*)(_FUNC_BTEN_ARRAY_LONG_IARRAY[0]));
}
}
free_mem_lock( (mem_lock*)((ptrszint*)_FUNC_BTEN_ARRAY_LONG_IARRAY)[8] );
qbs_free(_FUNC_BTEN_STRING_R);