kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* numeric.c (flo_to_s): keeps enough precision for round trip.

Browse source 
[ruby-core:22325]


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@22783 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2009-03-05 09:36:39 +00:00
parent e691ba3bac
commit 9b52ae2e64
2 changed files with 10 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
ChangeLog
View file

@ -1,3 +1,8 @@
Thu Mar 5 18:36:38 2009 Nobuyoshi Nakada <nobu@ruby-lang.org>
* numeric.c (flo_to_s): keeps enough precision for round trip.
[ruby-core:22325]
Thu Mar 5 16:56:14 2009 Nobuyoshi Nakada <nobu@ruby-lang.org> Thu Mar 5 16:56:14 2009 Nobuyoshi Nakada <nobu@ruby-lang.org>
* lib/tmpdir.rb (Dir.tmpdir): not use USERPROFILE, and ignores * lib/tmpdir.rb (Dir.tmpdir): not use USERPROFILE, and ignores

8
numeric.c
View file

@ -521,7 +521,9 @@ rb_float_new(double d)
static VALUE static VALUE
flo_to_s(VALUE flt) flo_to_s(VALUE flt)
{ {
char buf[32]; enum {decimal_mant = DBL_MANT_DIG-DBL_DIG};
enum {float_dig = DBL_DIG+2};
char buf[float_dig + (decimal_mant + CHAR_BIT - 1) / CHAR_BIT + 10];
double value = RFLOAT_VALUE(flt); double value = RFLOAT_VALUE(flt);
char *p, *e; char *p, *e;
@ -530,12 +532,12 @@ flo_to_s(VALUE flt)
else if(isnan(value)) else if(isnan(value))
return rb_usascii_str_new2("NaN"); return rb_usascii_str_new2("NaN");
snprintf(buf, sizeof(buf), "%#.15g", value); /* ensure to print decimal point */ snprintf(buf, sizeof(buf), "%#.*g", float_dig, value); /* ensure to print decimal point */
if (!(e = strchr(buf, 'e'))) { if (!(e = strchr(buf, 'e'))) {
e = buf + strlen(buf); e = buf + strlen(buf);
} }
if (!ISDIGIT(e[-1])) { /* reformat if ended with decimal point (ex 111111111111111.) */ if (!ISDIGIT(e[-1])) { /* reformat if ended with decimal point (ex 111111111111111.) */
snprintf(buf, sizeof(buf), "%#.14e", value); snprintf(buf, sizeof(buf), "%#.*e", float_dig - 1, value);
if (!(e = strchr(buf, 'e'))) { if (!(e = strchr(buf, 'e'))) {
e = buf + strlen(buf); e = buf + strlen(buf);
} }