[ruby-dev:24847] DBM#[]= dumps core

次のようにすると core を吐きます。

% ./ruby -rdbm -e '
db = DBM.open("/tmp/db", 0600, DBM::NEWDB)
key = "a" * 0x20000
val = Object.new
class << val; self end.send(:define_method, :to_s) {
  key.replace ""
  "val"
}
db[key] = val
'
-e:9: [BUG] Segmentation fault
ruby 1.9.0 (2004-11-14) [i686-linux]

zsh: abort (core dumped)  ./ruby -rdbm -e 
% gdb ruby core 
GNU gdb 6.1-debian
Copyright 2004 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type "show copying" to see the conditions.
There is absolutely no warranty for GDB.  Type "show warranty" for details.
This GDB was configured as "i386-linux"...Using host libthread_db library "/lib/libthread_db.so.1".

Core was generated by `./ruby -rdbm -e 
db = DBM.open("/tmp/db", 0600, DBM::NEWDB)
key = "a" * 0x20000'.
Program terminated with signal 6, Aborted.
Reading symbols from /lib/libdl.so.2...done.
Loaded symbols for /lib/libdl.so.2
Reading symbols from /lib/libcrypt.so.1...done.
Loaded symbols for /lib/libcrypt.so.1
Reading symbols from /lib/libm.so.6...done.
Loaded symbols for /lib/libm.so.6
Reading symbols from /lib/libc.so.6...done.
Loaded symbols for /lib/libc.so.6
Reading symbols from /lib/ld-linux.so.2...done.
Loaded symbols for /lib/ld-linux.so.2
Reading symbols from /home/akr/ruby/head-ruby/lib/ruby/1.9/i686-linux/dbm.so...done.
Loaded symbols for /home/akr/ruby/head-ruby/lib/ruby/1.9/i686-linux/dbm.so
Reading symbols from /usr/lib/libgdbm_compat.so.3...done.
Loaded symbols for /usr/lib/libgdbm_compat.so.3
Reading symbols from /usr/lib/libgdbm.so.3...done.
Loaded symbols for /usr/lib/libgdbm.so.3
#0  0x4009e6b1 in kill () from /lib/libc.so.6
(gdb) bt
#0  0x4009e6b1 in kill () from /lib/libc.so.6
#1  0x4009e435 in raise () from /lib/libc.so.6
#2  0x4009f978 in abort () from /lib/libc.so.6
#3  0x080d53e6 in rb_bug (fmt=0x0) at error.c:214
#4  0x080b2452 in sigsegv (sig=11) at signal.c:446
#5  <signal handler called>
#6  0x401e6cf7 in _gdbm_hash () from /usr/lib/libgdbm.so.3
#7  0x401e6b04 in _gdbm_findkey () from /usr/lib/libgdbm.so.3
#8  0x401e4d4b in gdbm_store () from /usr/lib/libgdbm.so.3
#9  0x4001e2fe in dbm_store () from /usr/lib/libgdbm_compat.so.3
#10 0x4001a490 in fdbm_store (obj=135521024, keystr=131072, valstr=1075605436) at dbm.c:476
#11 0x0806a93a in call_cfunc (func=0x4001a3d0 <fdbm_store>, recv=1075605696, len=0, argc=131072, argv=0xbffff0e8)
    at eval.c:5374
#12 0x0805e887 in rb_call0 (klass=1075608556, recv=1075605696, id=334, oid=660471808, argc=2, argv=0xbffff0e8, 
    body=0x401c7a98, nosuper=0) at eval.c:5515
#13 0x0805eb38 in rb_call (klass=1075608556, recv=1075605696, mid=334, argc=2, argv=0xbffff0e8, scope=0) at eval.c:5736
#14 0x0805b379 in rb_eval (self=1075673536, n=0x275e0000) at ruby.h:634
#15 0x08055edd in ruby_exec_internal () at eval.c:1465
#16 0x08055ef6 in ruby_exec () at eval.c:1483
#17 0x08055f40 in ruby_run () at eval.c:1500
#18 0x08053f55 in main (argc=660471808, argv=0x275e0000, envp=0xbffff8c8) at main.c:38
(gdb) 
-- 
[田中 哲][たなか あきら][Tanaka Akira]