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.

	* 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>.
This commit is contained in:
Ulrich Drepper 2001-02-07 08:31:01 +00:00
parent 55ae3aa64f
commit 5bfcc4d182
3 changed files with 109 additions and 1 deletions

View File

@ -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> 2001-02-07 Andreas Jaeger <aj@suse.de>
* posix/bug-regex1.c: Include <wchar.h> for fwide. * posix/bug-regex1.c: Include <wchar.h> for fwide.
2001-02-06 Ulrich Drepper <drepper@redhat.com> 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 * posix/regex.c: Fix a cast in the code for bracket handling which
caused 8-bit uncleanliness. caused 8-bit uncleanliness.
Patch by Michal Jaegermann <michal@ellpspace.math.ualberta.ca>. Patch by Michal Jaegermann <michal@ellpspace.math.ualberta.ca>.

View File

@ -54,7 +54,7 @@ test-srcs := tst-fmtmsg
tests := tst-strtol tst-strtod testmb testrand testsort testdiv \ tests := tst-strtol tst-strtod testmb testrand testsort testdiv \
test-canon test-canon2 tst-strtoll tst-environ \ test-canon test-canon2 tst-strtoll tst-environ \
tst-xpg-basename tst-random tst-bsearch tst-limits \ 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. # Several mpn functions from GNU MP are used by the strtod function.

94
stdlib/bug-strtod.c Normal file
View File

@ -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;
}