FreeBASIC
0.91.0
Main Page
Data Structures
Files
File List
Globals
file_input_short.c
Go to the documentation of this file.
1
/* input function for signed shorts */
2
3
#include "
fb.h
"
4
#include <math.h>
5
6
FBCALL
int
fb_InputShort
(
short
*dst )
7
{
8
char
buffer
[
FB_INPUT_MAXNUMERICLEN
+1];
9
ssize_t len;
10
int
isfp;
11
12
len =
fb_FileInputNextToken
( buffer,
FB_INPUT_MAXNUMERICLEN
,
FB_FALSE
, &isfp );
13
14
if
( isfp ==
FALSE
)
15
*dst = (short)
fb_hStr2Int
( buffer, len );
16
else
17
*dst = (short)rint(
fb_hStr2Double
( buffer, len ) );
18
19
return
fb_ErrorSetNum
(
FB_RTERROR_OK
);
20
}
rtlib
file_input_short.c
Generated on Thu Jan 23 2014 19:40:11 for FreeBASIC by
1.8.4