2 files changed, 8 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 503e836089..8e45d74da0 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed May 12 16:02:43 2010  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* numeric.c (flo_to_s): fill lower zeros.
+
 Wed May 12 15:45:36 2010  NAKAMURA Usaku  <usa@ruby-lang.org>
 
 	* lib/rdoc/generator/ri.rb (generate): should load existing cache
diff --git a/numeric.c b/numeric.c
index f5e15d904d..23c54800ee 100644
--- a/numeric.c
+++ b/numeric.c
@@ -584,7 +584,11 @@ flo_to_s(VALUE flt)
 	    rb_str_cat(s, buf, digs + 1);
 	}
 	else if (decpt - digs < float_dig) {
+	    long len;
+	    char *ptr;
 	    rb_str_cat(s, buf, digs);
+	    rb_str_resize(s, (len = RSTRING_LEN(s)) + decpt - digs);
+	    memset(RSTRING_PTR(s) + len, '0', decpt - digs);
 	    rb_str_cat(s, ".0", 2);
 	}
 	else {