[macruby-changes] [1765] MacRuby/branches/experimental/array.c

[source_changes at macosforge.org]

Revision: 1765
          http://trac.macosforge.org/projects/ruby/changeset/1765
Author:   lsansonetti at apple.com
Date:     2009-06-05 18:44:56 -0700 (Fri, 05 Jun 2009)
Log Message:
-----------
Array#fill: do nothing if the given length is negative

Modified Paths:
--------------
    MacRuby/branches/experimental/array.c

Modified: MacRuby/branches/experimental/array.c
===================================================================
--- MacRuby/branches/experimental/array.c	2009-06-06 01:35:30 UTC (rev 1764)
+++ MacRuby/branches/experimental/array.c	2009-06-06 01:44:56 UTC (rev 1765)
@@ -2204,10 +2204,12 @@
 	    if (beg < 0) beg = 0;
 	}
 	len = NIL_P(arg2) ? n - beg : NUM2LONG(arg2);
-	if (len < 0) rb_raise(rb_eIndexError, "negative length (%ld)", len);
 	break;
     }
     rb_ary_modify(ary);
+    if (len < 0) {
+	return ary;
+    }
     end = beg + len;
     if (end < 0) {
 	rb_raise(rb_eArgError, "argument too big");
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macruby-changes/attachments/20090605/1e1e8f41/attachment.html>