* process.c (proc_setgroups): check if the argument lenght is

modified. fixed: [ruby-dev:25285] git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@7642 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
brentr · Dec 23, 2004 · 4cc9a70 · 4cc9a70
1 parent cdc5bd3
commit 4cc9a70
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/ChangeLog b/ChangeLog
@@ -1,3 +1,8 @@
+Thu Dec 23 23:36:28 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* process.c (proc_setgroups): check if the argument lenght is
+	  modified.  fixed: [ruby-dev:25285]
+
 Thu Dec 23 13:13:33 2004  Hidetoshi NAGAI  <nagai@ai.kyutech.ac.jp>
 
 	* ext/tcltklib/tcltklib.c: define TclTkLib::COMPILE_INFO and

diff --git a/process.c b/process.c
@@ -2464,7 +2464,7 @@ proc_setgroups(VALUE obj, VALUE ary)
 
     groups = ALLOCA_N(gid_t, ngroups);
 
-    for (i = 0; i < ngroups; i++) {
+    for (i = 0; i < ngroups && i < RARRAY(ary)->len; i++) {
         VALUE g = RARRAY(ary)->ptr[i];
 
 	if (FIXNUM_P(g)) {