なかだです。

At Sat, 25 Sep 2004 02:26:49 +0900,
Tanaka Akira wrote in [ruby-dev:24335]:
> > 私のところでは起きません。ということは、[ruby-dev:24311]と同
> > 根なのかしら。コミットしてみますね。
> 
> いえ、状況はかわりません。
> ただ、boron で試すと、たしかに core を吐きませんね。
> 
> ... ゴミをひとけた増やすと boron でも落ちるようになりました。

単にエラーにするだけでOK?


Index: marshal.c =================================================================== RCS file: /cvs/ruby/src/ruby/marshal.c,v retrieving revision 1.115 diff -u -2 -p -r1.115 marshal.c --- marshal.c 17 Aug 2004 09:02:40 -0000 1.115 +++ marshal.c 27 Sep 2004 01:21:38 -0000 @@ -357,11 +357,15 @@ static void w_object _((VALUE,struct dum static int -hash_each(key, value, arg) +hash_each(key, value, arg, err) VALUE key, value; struct dump_call_arg *arg; + int err; { + if (err) { + rb_raise(rb_eRuntimeError, "hash modified during marshal dump"); + } w_object(key, arg->arg, arg->limit); w_object(value, arg->arg, arg->limit); - return ST_CONTINUE; + return ST_CHECK; }
-- --- 僕の前にBugはない。 --- 僕の後ろにBugはできる。 中田 伸悦