From b113c12c350c29a0f7f06fba12f06d86e79de1f4 Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Wed, 28 Jul 1999 22:39:04 +0000 Subject: [PATCH] Update. 1999-07-28 Ulrich Drepper * misc/efgcvt.c: Use IEEE 854 formula to compute the number of digits to print. * misc/efgcvt_r.c: Likewise. * misc/qefgcvt.c: Likewise. * misc/qefgcvt_r.c: Likewise. * misc/tst-efgcvt.c: Remove one test which cannot reliably be run anymore. --- ChangeLog | 10 ++++++++++ misc/efgcvt.c | 10 ++++++++-- misc/efgcvt_r.c | 7 ++++++- misc/qefgcvt.c | 11 +++++++++-- misc/qefgcvt_r.c | 9 ++++++++- misc/tst-efgcvt.c | 1 - stdlib/mbtowc.c | 2 +- stdlib/wctomb.c | 2 +- 8 files changed, 43 insertions(+), 9 deletions(-) diff --git a/ChangeLog b/ChangeLog index c0fc7c0ab5..a087ab7639 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,13 @@ +1999-07-28 Ulrich Drepper + + * misc/efgcvt.c: Use IEEE 854 formula to compute the number of digits + to print. + * misc/efgcvt_r.c: Likewise. + * misc/qefgcvt.c: Likewise. + * misc/qefgcvt_r.c: Likewise. + * misc/tst-efgcvt.c: Remove one test which cannot reliably be run + anymore. + 1999-07-27 Andreas Jaeger * manual/math.texi (FP Function Optimization): Mention drawbacks. diff --git a/misc/efgcvt.c b/misc/efgcvt.c index 9348914ff2..dc711c63dc 100644 --- a/misc/efgcvt.c +++ b/misc/efgcvt.c @@ -17,6 +17,7 @@ write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ +#include #include #include #include @@ -29,8 +30,13 @@ # define FLOAT_FMT_FLAG /* Actually we have to write (DBL_DIG + log10 (DBL_MAX_10_EXP)) but we don't have log10 available in the preprocessor. */ -# define MAXDIG (DBL_DIG + 3) -# define NDIGIT_MAX DBL_DIG +# define MAXDIG (NDIGIT_MAX + 3) +# if DBL_MANT_DIG == 53 +# define NDIGIT_MAX 17 +# else +/* See IEEE 854 5.6, table 2 for this formula. */ +# define NDIGIT_MAX (lrint (ceil (M_LN2 / M_LN10 * DBL_MANT_DIG + 1.0))) +# endif #endif #define APPEND(a, b) APPEND2 (a, b) diff --git a/misc/efgcvt_r.c b/misc/efgcvt_r.c index 944fe4cc98..d73fd22f70 100644 --- a/misc/efgcvt_r.c +++ b/misc/efgcvt_r.c @@ -30,7 +30,12 @@ # define FUNC_PREFIX # define FLOAT_FMT_FLAG # define FLOAT_NAME_EXT -# define NDIGIT_MAX DBL_DIG +# if DBL_MANT_DIG == 53 +# define NDIGIT_MAX 17 +# else +/* See IEEE 854 5.6, table 2 for this formula. */ +# define NDIGIT_MAX (lrint (ceil (M_LN2 / M_LN10 * DBL_MANT_DIG + 1.0))) +# endif #endif #define APPEND(a, b) APPEND2 (a, b) diff --git a/misc/qefgcvt.c b/misc/qefgcvt.c index af65fc1688..faf788aa5d 100644 --- a/misc/qefgcvt.c +++ b/misc/qefgcvt.c @@ -17,13 +17,20 @@ write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ +#include + #define FLOAT_TYPE long double #define FUNC_PREFIX q #define FLOAT_FMT_FLAG "L" /* Actually we have to write (LDBL_DIG + log10 (LDBL_MAX_10_EXP)) but we don't have log10 available in the preprocessor. Since we cannot assume anything on the used `long double' format be generous. */ -#define MAXDIG (LDBL_DIG + 12) -#define NDIGIT_MAX LDBL_DIG +#define MAXDIG (NDIGIT_MAX + 12) +#if LDBL_MANT_DIG == 64 +# define NDIGIT_MAX 21 +#else +/* See IEEE 854 5.6, table 2 for this formula. */ +# define NDIGIT_MAX (lrint (ceil (M_LN2 / M_LN10 * LDBL_MANT_DIG + 1.0))) +#endif #include "efgcvt.c" diff --git a/misc/qefgcvt_r.c b/misc/qefgcvt_r.c index 012ab54acc..5ff8110e3b 100644 --- a/misc/qefgcvt_r.c +++ b/misc/qefgcvt_r.c @@ -18,10 +18,17 @@ write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ +#include + #define FLOAT_TYPE long double #define FUNC_PREFIX q #define FLOAT_FMT_FLAG "L" #define FLOAT_NAME_EXT l -# define NDIGIT_MAX LDBL_DIG +#if LDBL_MANT_DIG == 64 +# define NDIGIT_MAX 21 +#else +/* See IEEE 854 5.6, table 2 for this formula. */ +# define NDIGIT_MAX (lrint (ceil (M_LN2 / M_LN10 * LDBL_MANT_DIG + 1.0))) +#endif #include "efgcvt_r.c" diff --git a/misc/tst-efgcvt.c b/misc/tst-efgcvt.c index d0ebd0d863..cfbaa21cb1 100644 --- a/misc/tst-efgcvt.c +++ b/misc/tst-efgcvt.c @@ -56,7 +56,6 @@ static testcase ecvt_tests[] = { 123.01, -4, 3, "" }, { 126.71, -4, 3, "" }, { 0.0, 4, 1, "0000" }, - { 92.0, 16, 2, "920000000000000" }, /* -1.0 is end marker. */ { -1.0, 0, 0, "" } }; diff --git a/stdlib/mbtowc.c b/stdlib/mbtowc.c index aeac2ce0b8..cba34d32a4 100644 --- a/stdlib/mbtowc.c +++ b/stdlib/mbtowc.c @@ -48,7 +48,7 @@ mbtowc (wchar_t *pwc, const char *s, size_t n) /* This is an extension in the Unix standard which does not directly violate ISO C. */ - memset (&__no_r_state, '\0', siyeof __no_r_state); + memset (&__no_r_state, '\0', sizeof __no_r_state); result = __wcsmbs_gconv_fcts.towc->__stateful; } diff --git a/stdlib/wctomb.c b/stdlib/wctomb.c index 757e6adaad..174bbf46c2 100644 --- a/stdlib/wctomb.c +++ b/stdlib/wctomb.c @@ -44,7 +44,7 @@ wctomb (char *s, wchar_t wchar) /* This is an extension in the Unix standard which does not directly violate ISO C. */ - memset (&__no_r_state, '\0', siyeof __no_r_state); + memset (&__no_r_state, '\0', sizeof __no_r_state); return __wcsmbs_gconv_fcts.tomb->__stateful; } -- 2.43.5