FreeBASIC
0.91.0
Main Page
Data Structures
Files
File List
Globals
data_readstr.c
Go to the documentation of this file.
1
/* read stmt for strings */
2
3
#include "
fb.h
"
4
5
FBCALL
void
fb_DataReadStr
(
void
*dst, ssize_t dst_size,
int
fillrem )
6
{
7
FB_LOCK
();
8
9
if
(
__fb_data_ptr
) {
10
if
(
__fb_data_ptr
->
len
==
FB_DATATYPE_OFS
) {
11
/* !!!WRITEME!!! */
12
}
else
if
(
__fb_data_ptr
->
len
&
FB_DATATYPE_WSTR
) {
13
fb_WstrAssignToA
( dst, dst_size,
__fb_data_ptr
->
wstr
, fillrem );
14
}
else
{
15
fb_StrAssign
( dst, dst_size,
__fb_data_ptr
->
zstr
, 0, fillrem );
16
}
17
}
else
{
18
/* no more DATA, return empty string */
19
fb_StrAssign
( dst, dst_size,
""
, 0, fillrem );
20
}
21
22
fb_DataNext
( );
23
24
FB_UNLOCK
();
25
}
rtlib
data_readstr.c
Generated on Thu Jan 23 2014 19:40:07 for FreeBASIC by
1.8.4