OpenADFortTk (including Open64 and OpenAnalysis references)
|
Go to the source code of this file.
Classes | |
union | _dval |
union | _ldblval |
Macros | |
#define | SIGNBIT(X) (((_dval *)&(X))->fparts.sign) |
#define | EXPONENT(X) (((_dval *)&(X))->fparts.exp) |
#define | MAXCOUNT 34 |
#define | c_a_to_q __c_a_to_q |
#define | MAXDIGITS 34 |
#define | HI (value.fwords.hi) /* top 64b of 124b integer */ |
#define | LO (value.fwords.lo) /* bottom 60b of 124b integer */ |
Functions | |
void | c_qtenscale (_ldblval *, INT32, INT32 *) |
QUAD | c_a_to_q (char *str, INT *p_err) |
static QUAD | c_atoq (char *buffer, INT32 ndigit, INT32 exp) |
Variables | |
static char * | source_file = __FILE__ |
#define c_a_to_q __c_a_to_q |
Definition at line 110 of file c_a_to_q.c.
#define EXPONENT | ( | X) | (((_dval *)&(X))->fparts.exp) |
Definition at line 94 of file c_a_to_q.c.
Referenced by c_atoq().
#define MAXCOUNT 34 |
Definition at line 95 of file c_a_to_q.c.
#define MAXDIGITS 34 |
Definition at line 112 of file c_a_to_q.c.
Referenced by c_a_to_q().
#define SIGNBIT | ( | X) | (((_dval *)&(X))->fparts.sign) |
Definition at line 93 of file c_a_to_q.c.
Referenced by c_atoq().
Definition at line 255 of file c_a_to_q.c.
References c_qtenscale(), _dval::d, EXPONENT, QUAD::hi, _ldblval::hi, HI, QUAD::lo, _ldblval::lo, LO, _ldblval::qparts, and SIGNBIT.
Referenced by c_a_to_q().
|
static |
Definition at line 49 of file c_a_to_q.c.