mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-09-09 14:00:17 +00:00
40 lines
1.4 KiB
Text
40 lines
1.4 KiB
Text
int16 *_FUNC_FILETOBUF_INTEGER_FILETOBUF=NULL;
|
|
if(_FUNC_FILETOBUF_INTEGER_FILETOBUF==NULL){
|
|
_FUNC_FILETOBUF_INTEGER_FILETOBUF=(int16*)mem_static_malloc(2);
|
|
*_FUNC_FILETOBUF_INTEGER_FILETOBUF=0;
|
|
}
|
|
qbs*oldstr3954=NULL;
|
|
if(_FUNC_FILETOBUF_STRING_FILESPEC->tmp||_FUNC_FILETOBUF_STRING_FILESPEC->fixed||_FUNC_FILETOBUF_STRING_FILESPEC->readonly){
|
|
oldstr3954=_FUNC_FILETOBUF_STRING_FILESPEC;
|
|
if (oldstr3954->cmem_descriptor){
|
|
_FUNC_FILETOBUF_STRING_FILESPEC=qbs_new_cmem(oldstr3954->len,0);
|
|
}else{
|
|
_FUNC_FILETOBUF_STRING_FILESPEC=qbs_new(oldstr3954->len,0);
|
|
}
|
|
memcpy(_FUNC_FILETOBUF_STRING_FILESPEC->chr,oldstr3954->chr,oldstr3954->len);
|
|
}
|
|
int16 *_FUNC_FILETOBUF_INTEGER_HAN=NULL;
|
|
if(_FUNC_FILETOBUF_INTEGER_HAN==NULL){
|
|
_FUNC_FILETOBUF_INTEGER_HAN=(int16*)mem_static_malloc(2);
|
|
*_FUNC_FILETOBUF_INTEGER_HAN=0;
|
|
}
|
|
int32 *_FUNC_FILETOBUF_LONG_BUF=NULL;
|
|
if(_FUNC_FILETOBUF_LONG_BUF==NULL){
|
|
_FUNC_FILETOBUF_LONG_BUF=(int32*)mem_static_malloc(4);
|
|
*_FUNC_FILETOBUF_LONG_BUF=0;
|
|
}
|
|
int16 *_FUNC_FILETOBUF_INTEGER_FF=NULL;
|
|
if(_FUNC_FILETOBUF_INTEGER_FF==NULL){
|
|
_FUNC_FILETOBUF_INTEGER_FF=(int16*)mem_static_malloc(2);
|
|
*_FUNC_FILETOBUF_INTEGER_FF=0;
|
|
}
|
|
int64 *_FUNC_FILETOBUF_INTEGER64_FL=NULL;
|
|
if(_FUNC_FILETOBUF_INTEGER64_FL==NULL){
|
|
_FUNC_FILETOBUF_INTEGER64_FL=(int64*)mem_static_malloc(8);
|
|
*_FUNC_FILETOBUF_INTEGER64_FL=0;
|
|
}
|
|
int32 *_FUNC_FILETOBUF_LONG_EXT=NULL;
|
|
if(_FUNC_FILETOBUF_LONG_EXT==NULL){
|
|
_FUNC_FILETOBUF_LONG_EXT=(int32*)mem_static_malloc(4);
|
|
*_FUNC_FILETOBUF_LONG_EXT=0;
|
|
}
|