# HG changeset patch
# User Bruno Haible <bruno@clisp.org>
# Date 1279008443 -7200
# Node ID abaeec5957d0243c093c27ffdb050e3430e63b56
# Parent  592d6086de3f9fb9ab24dbaefd73e2c237627aa0
strtod: Add safety check.

diff --git a/ChangeLog b/ChangeLog
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2010-07-13  Bruno Haible  <bruno@clisp.org>
+
+	strtod: Add safety check.
+	* lib/strtod.c (ldexp): Abort if this dummy replacement gets called.
+
 2010-07-12  Bruno Haible  <bruno@clisp.org>
 
 	Unify tests that set gl_cv_func_ldexpl_no_libm.
diff --git a/lib/strtod.c b/lib/strtod.c
--- a/lib/strtod.c
+++ b/lib/strtod.c
@@ -45,7 +45,12 @@
 
 #if !HAVE_LDEXP_IN_LIBC
  #define ldexp dummy_ldexp
- static double ldexp (double x, int exponent) { return x + exponent; }
+ /* A dummy definition that will never be invoked.  */
+ static double ldexp (double x _GL_UNUSED, int exponent _GL_UNUSED)
+ {
+   abort ();
+   return 0.0;
+ }
 #endif
 
 /* Return X * BASE**EXPONENT.  Return an extreme value and set errno