From 5bfcc4d18228731ffae61fed59321929fb0db76f Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Wed, 7 Feb 2001 08:31:01 +0000 Subject: [PATCH] Update. 2001-02-07 Ulrich Drepper * stdlib/strtod.c: Never stop prematurely reading digits before the decimal point is found. Compute exponent limit for negative exponents correctly. For numbers ending in all zeros eat the zeroes even before the decimal point if the exponent is negative [PR libc/2072]. * stdlib/Makefile (tests): Add bug-strtod. * stdlib/bug-strtod.c: New file. * posix/regex.c (regex_compile): Don't store pointer in wchar_t array. Store index. (compile_range): Handle index being passed, not pointer. Patch by Isamu Hasegawa . --- ChangeLog | 14 +++++++ stdlib/Makefile | 2 +- stdlib/bug-strtod.c | 94 +++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 109 insertions(+), 1 deletion(-) create mode 100644 stdlib/bug-strtod.c diff --git a/ChangeLog b/ChangeLog index d27dc24e96..ed4478c423 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,9 +1,23 @@ +2001-02-07 Ulrich Drepper + + * stdlib/strtod.c: Never stop prematurely reading digits before the + decimal point is found. Compute exponent limit for negative exponents + correctly. For numbers ending in all zeros eat the zeroes even before + the decimal point if the exponent is negative [PR libc/2072]. + * stdlib/Makefile (tests): Add bug-strtod. + * stdlib/bug-strtod.c: New file. + 2001-02-07 Andreas Jaeger * posix/bug-regex1.c: Include for fwide. 2001-02-06 Ulrich Drepper + * posix/regex.c (regex_compile): Don't store pointer in wchar_t array. + Store index. + (compile_range): Handle index being passed, not pointer. + Patch by Isamu Hasegawa . + * posix/regex.c: Fix a cast in the code for bracket handling which caused 8-bit uncleanliness. Patch by Michal Jaegermann . diff --git a/stdlib/Makefile b/stdlib/Makefile index df3b09e819..f875087065 100644 --- a/stdlib/Makefile +++ b/stdlib/Makefile @@ -54,7 +54,7 @@ test-srcs := tst-fmtmsg tests := tst-strtol tst-strtod testmb testrand testsort testdiv \ test-canon test-canon2 tst-strtoll tst-environ \ tst-xpg-basename tst-random tst-bsearch tst-limits \ - tst-rand48 + tst-rand48 bug-strtod # Several mpn functions from GNU MP are used by the strtod function. diff --git a/stdlib/bug-strtod.c b/stdlib/bug-strtod.c new file mode 100644 index 0000000000..c6c8643f4e --- /dev/null +++ b/stdlib/bug-strtod.c @@ -0,0 +1,94 @@ +/* Test to strtod etc for numbers like x000...0000.000e-nn. + This file is part of the GNU C Library. + Copyright (C) 2001 Free Software Foundation, Inc. + Contributed by Ulrich Drepper , 2001. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public License as + published by the Free Software Foundation; either version 2 of the + License, or (at your option) any later version. + + The GNU C Library is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with the GNU C Library; see the file COPYING.LIB. If not, + write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. */ + +#include +#include +#include + + +int +main (void) +{ + char buf[300]; + int cnt; + int result = 0; + + for (cnt = 0; cnt < 200; ++cnt) + { + ssize_t n; + float f; + + n = sprintf (buf, "%d", cnt); + memset (buf + n, '0', cnt); + sprintf (buf + n + cnt, ".000e-%d", cnt); + f = strtof (buf, NULL); + + if (f != (float) cnt) + { + printf ("strtof(\"%s\") failed for cnt == %d (%g instead of %g)\n", + buf, cnt, f, (float) cnt); + result = 1; + } + else + printf ("strtof() fine for cnt == %d\n", cnt); + } + + for (cnt = 0; cnt < 200; ++cnt) + { + ssize_t n; + double f; + + n = sprintf (buf, "%d", cnt); + memset (buf + n, '0', cnt); + sprintf (buf + n + cnt, ".000e-%d", cnt); + f = strtod (buf, NULL); + + if (f != (double) cnt) + { + printf ("strtod(\"%s\") failed for cnt == %d (%g instead of %g)\n", + buf, cnt, f, (double) cnt); + result = 1; + } + else + printf ("strtod() fine for cnt == %d\n", cnt); + } + + for (cnt = 0; cnt < 200; ++cnt) + { + ssize_t n; + long double f; + + n = sprintf (buf, "%d", cnt); + memset (buf + n, '0', cnt); + sprintf (buf + n + cnt, ".000e-%d", cnt); + f = strtold (buf, NULL); + + if (f != (long double) cnt) + { + printf ("strtold(\"%s\") failed for cnt == %d (%Lg instead of %Lg)\n", + buf, cnt, f, (long double) cnt); + result = 1; + } + else + printf ("strtold() fine for cnt == %d\n", cnt); + } + + return result; +}