diff options
| -rw-r--r-- | ChangeLog | 14 | ||||
| -rw-r--r-- | stdlib/Makefile | 2 | ||||
| -rw-r--r-- | stdlib/bug-strtod.c | 94 |
3 files changed, 109 insertions, 1 deletions
@@ -1,9 +1,23 @@ +2001-02-07 Ulrich Drepper <drepper@redhat.com> + + * 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 <aj@suse.de> * posix/bug-regex1.c: Include <wchar.h> for fwide. 2001-02-06 Ulrich Drepper <drepper@redhat.com> + * 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 <isamu@yamato.ibm.com>. + * posix/regex.c: Fix a cast in the code for bracket handling which caused 8-bit uncleanliness. Patch by Michal Jaegermann <michal@ellpspace.math.ualberta.ca>. 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 <drepper@redhat.com>, 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 <stdio.h> +#include <stdlib.h> +#include <string.h> + + +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; +} |