1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-03 15:51:20 +00:00
QB64-PE/internal/source/data128.txt

20 lines
836 B
Plaintext
Raw Normal View History

2021-09-19 23:10:34 +00:00
qbs*oldstr3924=NULL;
2021-07-21 21:30:49 +00:00
if(_SUB_INILOAD_STRING_FILE->tmp||_SUB_INILOAD_STRING_FILE->fixed||_SUB_INILOAD_STRING_FILE->readonly){
2021-09-19 23:10:34 +00:00
oldstr3924=_SUB_INILOAD_STRING_FILE;
if (oldstr3924->cmem_descriptor){
_SUB_INILOAD_STRING_FILE=qbs_new_cmem(oldstr3924->len,0);
2021-07-21 21:30:49 +00:00
}else{
2021-09-19 23:10:34 +00:00
_SUB_INILOAD_STRING_FILE=qbs_new(oldstr3924->len,0);
2021-02-08 14:42:20 +00:00
}
2021-09-19 23:10:34 +00:00
memcpy(_SUB_INILOAD_STRING_FILE->chr,oldstr3924->chr,oldstr3924->len);
2021-02-08 14:42:20 +00:00
}
2021-07-21 21:30:49 +00:00
int16 *_SUB_INILOAD_INTEGER_FILENUM=NULL;
if(_SUB_INILOAD_INTEGER_FILENUM==NULL){
_SUB_INILOAD_INTEGER_FILENUM=(int16*)mem_static_malloc(2);
*_SUB_INILOAD_INTEGER_FILENUM=0;
2021-02-08 14:42:20 +00:00
}
2021-09-19 23:10:34 +00:00
byte_element_struct *byte_element_3925=NULL;
if (!byte_element_3925){
if ((mem_static_pointer+=12)<mem_static_limit) byte_element_3925=(byte_element_struct*)(mem_static_pointer-12); else byte_element_3925=(byte_element_struct*)mem_static_malloc(12);
2021-02-08 14:42:20 +00:00
}