X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fdata.c;h=310d76ab0132a55fdad4c6b84dd017cdd518e065;hb=d443d8d3ebaddf96e67d47841583087402cabf34;hp=0fe0f098cb82da69b59b8aa02afe5d3cf9905b92;hpb=a71e0987b7080176e0046b0b0ed72a9a70e2571d;p=chise%2Fxemacs-chise.git

diff --git a/src/data.c b/src/data.c
index 0fe0f09..310d76a 100644
--- a/src/data.c
+++ b/src/data.c
@@ -26,7 +26,6 @@ Boston, MA 02111-1307, USA.  */
 
 #include <config.h>
 #include "lisp.h"
-#include <stddef.h>
 
 #include "buffer.h"
 #include "bytecode.h"
@@ -1069,7 +1068,7 @@ Floating point numbers always use base 10.
     p++;
 
 #ifdef LISP_FLOAT_TYPE
-  if (isfloat_string (p))
+  if (isfloat_string (p) && b == 10)
     return make_float (atof (p));
 #endif /* LISP_FLOAT_TYPE */