1989-05-30 13:34:25 +00:00
|
|
|
/* $Header$ */
|
|
|
|
|
|
|
|
#ifndef NOFLOAT
|
|
|
|
|
1989-12-18 15:04:14 +00:00
|
|
|
#include "../stdlib/ext_fmt.h"
|
|
|
|
void _dbl_ext_cvt(double value, struct EXTEND *e);
|
|
|
|
char *_ext_str_cvt(struct EXTEND *e, int ndigit, int *decpt, int * sign, int ecvtflag);
|
|
|
|
|
|
|
|
static char *
|
|
|
|
cvt(long double value, int ndigit, int *decpt, int *sign, int ecvtflag)
|
|
|
|
{
|
|
|
|
struct EXTEND e;
|
|
|
|
|
|
|
|
_dbl_ext_cvt(value, &e);
|
|
|
|
return _ext_str_cvt(&e, ndigit, decpt, sign, ecvtflag);
|
|
|
|
}
|
1989-05-30 13:34:25 +00:00
|
|
|
|
|
|
|
char *
|
1989-06-26 10:37:05 +00:00
|
|
|
ecvt(long double value, int ndigit, int *decpt, int *sign)
|
1989-05-30 13:34:25 +00:00
|
|
|
{
|
1989-12-18 15:04:14 +00:00
|
|
|
|
1989-05-30 13:34:25 +00:00
|
|
|
return cvt(value, ndigit, decpt, sign, 1);
|
|
|
|
}
|
|
|
|
|
|
|
|
char *
|
1989-06-26 10:37:05 +00:00
|
|
|
fcvt(long double value, int ndigit, int *decpt, int *sign)
|
1989-05-30 13:34:25 +00:00
|
|
|
{
|
|
|
|
return cvt(value, ndigit, decpt, sign, 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif /* NOFLOAT */
|