From: "akira yamada / やまだあきら" <akira@...>
Date: 2001-09-07T12:31:40+09:00
Subject: [ruby-list:31321] Re: ruby 1.6.5 preview2


Fri, 7 Sep 2001 12:09:26 +0900 頃の
   Mail-Count: 31319
      Subject: [ruby-list:31319] Re: ruby 1.6.5 preview2   
についてのお話にて やまだは言いました… 
(あ == やまだ あきら)

In article 31318, <20010907030438.60A2C3546D@rb.arika.org>
あ> 
あ> rubiconにかけたらTestFloatのdivmodのところでささりました. 
あ> 
あ>   $ ruby -ve 'p 13.0.divmod(-4.0)'
あ>   ruby 1.6.5 (2001-09-06) [i386-linux]
あ> 
あ> ここでC-cもきかなくなります. 

In article 31319, <20010907030925.8EA5B3546D@rb.arika.org>
あ> TestFloadでもう一つありました. 
あ> -1.23456.to_sで同様に(?)反応がなくなります. 

同様というより, どちらもFloat#to_sみたいですね. 
マイナス数値がわたされるとダメみたいです. こんなんですかね?

Index: numeric.c
===================================================================
RCS file: /home/akira/cvs/ruby-src/cvs/ruby/numeric.c,v
retrieving revision 1.20.2.4
diff -u -r1.20.2.4 numeric.c
--- numeric.c	3 Sep 2001 05:29:18 -0000	1.20.2.4
+++ numeric.c	7 Sep 2001 03:27:56 -0000
@@ -210,6 +210,7 @@
     char buf[24];
     char *fmt = "%.10g";
     double value = RFLOAT(flt)->value;
+    double avalue = fabs(value);
     double d1, d2;
 
     if (isinf(value))
@@ -217,14 +218,14 @@
     else if(isnan(value))
 	return rb_str_new2("NaN");
 
-    if (value < 1.0e-3) {
-	d1 = value;
+    if (avalue < 1.0e-3) {
+	d1 = avalue;
 	while (d1 < 1.0) d1 *= 10.0;
 	d1 = modf(d1, &d2);
 	if (d1 == 0) fmt = "%.1e";
     }    
-    else if (value >= 1.0e10) {
-	d1 = value;
+    else if (avalue >= 1.0e10) {
+	d1 = avalue;
 	while (d1 > 10.0) d1 /= 10.0;
 	d1 = modf(d1, &d2);
 	if (d1 == 0) fmt = "%.1e";

このdiffとってて思い出したんですが
前に言った(ような気がする)これ(↓)はどうでしょうか?

Index: Makefile.in
===================================================================
RCS file: /home/akira/cvs/ruby-src/cvs/ruby/Makefile.in,v
retrieving revision 1.17.2.4
diff -u -r1.17.2.4 Makefile.in
--- Makefile.in	8 May 2001 08:29:51 -0000	1.17.2.4
+++ Makefile.in	2 Aug 2001 05:12:43 -0000
@@ -121,7 +121,7 @@
 		@rm -f parse.c
 		@rm -f lex.c
 
-test:		miniruby$(EXEEXT)
+test:		miniruby$(EXEEXT) rbconfig.rb
 		@./miniruby$(EXEEXT) $(srcdir)/rubytest.rb
 
 rbconfig.rb:	miniruby$(EXEEXT) $(srcdir)/mkconfig.rb config.status

-- 
 やまだ あきら <URL:http://arika.org/ruby/>
 (akira@arika.org, akira@ruby-lang.org, 
  akira@debian.org or akira@linux.or.jp)