[ruby-dev:22461] Re: ARGF.read(nil)

まつもと ゆきひろです

In message "[ruby-dev:22459] Re: ARGF.read(nil)"
    on 03/12/30, Tanaka Akira <[e-mail]> writes:

|% echo -n a > 1    
|% ruby -e 'p ARGF.read' 1 1
|"aa"
|% ruby -e 'p ARGF.read(nil)' 1 1
|"a"
|
|というように、ARGF.read と ARGF.read(nil) が異なるのは意図されているの
|でしょうか。

いいえ、[ruby-dev:22458],[ruby-dev:22459],[ruby-dev:22460]を
直したパッチは以下のようになります。試してみてください。

--- io.c	27 Dec 2003 00:43:23 -0000	1.251
+++ io.c	30 Dec 2003 10:58:17 -0000
@@ -61,3 +61,3 @@
 /* EMX has sys/param.h, but.. */
-#if defined(HAVE_SYS_PARAM_H) && !(defined(__EMX__) || defined(__HIUX_MPP__))
+#if defined(HAVE_SYS_PAAM_H) && !(defined(__EMX__) || defined(__HIUX_MPP__))
 # include <sys/param.h>
@@ -112,3 +112,3 @@ static int gets_lineno;
 static int init_p = 0, next_p = 0;
-static VALUE lineno;
+static VALUE lineno = INT2FIX(0);
 
@@ -3873,3 +3873,4 @@ rb_f_readline(argc, argv)
 
-    NEXT_ARGF_FORWARD();
+    if (!next_argv()) rb_eof_error();
+    ARGF_FORWARD();
     line = rb_f_gets(argc, argv);
@@ -4637,8 +4638,14 @@ argf_read(argc, argv)
 {
-    VALUE tmp, str;
+    VALUE tmp, str, length;
     long len = 0;
 
-    if (argc == 1 && !NIL_P(argv[0]))
+    rb_scan_args(argc, argv, "02", &length, &str);
+    if (!NIL_P(length)) {
 	len = NUM2LONG(argv[0]);
-    str = Qnil;
+    }
+    if (!NIL_P(str)) {
+	StringValue(str);
+	rb_str_resize(str,0);
+	argv[1] = Qnil;
+    }
 
@@ -4646,10 +4653,3 @@ argf_read(argc, argv)
     if (!next_argv()) {
-	if (NIL_P(str)) {
-	    VALUE length;
-
-	    rb_scan_args(argc, argv, "02", &length, &str);
-	    if (NIL_P(str)) return rb_str_new(0,0);
-	    StringValue(str);
-	    rb_str_resize(str,0);
-	}
+	if (NIL_P(str)) return rb_str_new(0,0);
 	return str;
@@ -4664,3 +4664,3 @@ argf_read(argc, argv)
     else rb_str_append(str, tmp);
-    if (NIL_P(tmp) || argc == 0) {
+    if (NIL_P(tmp) || NIL_P(argv[0])) {
 	if (next_p != -1) {
@@ -4671,3 +4671,3 @@ argf_read(argc, argv)
     }
-    else if (argc == 1) {
+    else if (argc >= 1) {
 	if (RSTRING(str)->len < len) {