[前][次][番号順一覧][スレッド一覧]

ruby-changes:15819

From: nobu <ko1@a...>
Date: Wed, 12 May 2010 16:03:09 +0900 (JST)
Subject: [ruby-changes:15819] Ruby:r27751 (trunk, ruby_1_9_2): * numeric.c (flo_to_s): fill lower zeros.

nobu	2010-05-12 16:02:45 +0900 (Wed, 12 May 2010)

  New Revision: 27751

  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=27751

  Log:
    * numeric.c (flo_to_s): fill lower zeros.

  Modified files:
    branches/ruby_1_9_2/ChangeLog
    branches/ruby_1_9_2/numeric.c
    trunk/ChangeLog
    trunk/numeric.c

Index: ChangeLog
===================================================================
--- ChangeLog	(revision 27750)
+++ ChangeLog	(revision 27751)
@@ -1,3 +1,7 @@
+Wed May 12 16:02:43 2010  Nobuyoshi Nakada  <nobu@r...>
+
+	* numeric.c (flo_to_s): fill lower zeros.
+
 Wed May 12 15:45:36 2010  NAKAMURA Usaku  <usa@r...>
 
 	* lib/rdoc/generator/ri.rb (generate): should load existing cache
Index: numeric.c
===================================================================
--- numeric.c	(revision 27750)
+++ numeric.c	(revision 27751)
@@ -584,7 +584,11 @@
 	    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 {
Index: ruby_1_9_2/ChangeLog
===================================================================
--- ruby_1_9_2/ChangeLog	(revision 27750)
+++ ruby_1_9_2/ChangeLog	(revision 27751)
@@ -1,3 +1,7 @@
+Wed May 12 16:02:43 2010  Nobuyoshi Nakada  <nobu@r...>
+
+	* numeric.c (flo_to_s): fill lower zeros.
+
 Wed May 12 15:50:20 2010  NAKAMURA Usaku  <usa@r...>
 
 	* lib/rdoc/generator/ri.rb (generate): should load existing cache
Index: ruby_1_9_2/numeric.c
===================================================================
--- ruby_1_9_2/numeric.c	(revision 27750)
+++ ruby_1_9_2/numeric.c	(revision 27751)
@@ -584,7 +584,11 @@
 	    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 {

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/

[前][次][番号順一覧][スレッド一覧]