diff --git a/ChangeLog b/ChangeLog
index b3b8ed562d..bd9a55644a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Mon Apr 21 21:59:48 2003  Nobuyoshi Nakada  <nobu.nokada@softhome.net>
+
+	* marshal.c: one more digit for decimal point.  [ruby-talk:69808]
+
 Mon Apr 21 21:25:59 2003  Nobuyoshi Nakada  <nobu.nokada@softhome.net>
 
 	* numeric.c (flo_is_finite_p): use finite() if available.
diff --git a/marshal.c b/marshal.c
index b6d5c07a23..68a516495f 100644
--- a/marshal.c
+++ b/marshal.c
@@ -222,7 +222,7 @@ load_mantissa(d, buf, len)
 #endif
 
 #ifdef DBL_DIG
-#define FLOAT_DIG (DBL_DIG+1)
+#define FLOAT_DIG (DBL_DIG+2)
 #else
 #define FLOAT_DIG 17
 #endif