[ruby-dev:24378] Enumerable#sort_by causes core dump

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

% ./ruby -e '
arr = (1..100).map {|i| i.to_s }
$res = arr.sort_by {|v|
  callcc {|k| $k = k } if !$k && v == "100"
  if $res
    $res.map! {|vv| Values[vv] }
  end
  v
}
$res.inspect
$k.call
'
-e:10: [BUG] Segmentation fault
ruby 1.9.0 (2004-09-30) [i686-linux]

zsh: abort (core dumped)  ./ruby -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 -e 
arr = (1..100).map {|i| i.to_s }
$res = arr.sort_by {|v|
  callcc {|'.
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
#0  0x4009e721 in kill () from /lib/libc.so.6
(gdb) bt
#0  0x4009e721 in kill () from /lib/libc.so.6
#1  0x4009e4c5 in raise () from /lib/libc.so.6
#2  0x4009f9e8 in abort () from /lib/libc.so.6
#3  0x080d1f86 in rb_bug (fmt=0x0) at error.c:214
#4  0x080aff92 in sigsegv (sig=11) at signal.c:446
#5  <signal handler called>
#6  0x401a5074 in __after_morecore_hook () from /lib/libc.so.6
#7  0x080b27b7 in st_lookup (table=0x401a5084, key=3169, value=0xbfffec88) at st.c:258
#8  0x08054133 in search_method (klass=1075466372, id=3169, origin=0xbfffecb4) at eval.c:380
#9  0x08054189 in rb_get_method_body (klassp=0xbfffed10, idp=0xbfffecf4, noexp=0xbfffecf8) at eval.c:401
#10 0x0805e38a in rb_call (klass=1075466372, recv=1075466380, mid=3169, argc=0, argv=0x0, scope=1) at eval.c:5706
#11 0x0805e7b4 in rb_funcall (recv=1075466380, mid=1075466364, n=0) at ruby.h:635
#12 0x08085fc6 in rb_inspect (obj=1075466364) at object.c:345
#13 0x080c5481 in inspect_ary (ary=1075603536) at array.c:1546
#14 0x080c51e8 in inspect_call (arg=0x401a5084) at array.c:1465
#15 0x0805d509 in rb_ensure (b_proc=0x80c51d0 <inspect_call>, data1=3221221024, e_proc=0x80c52d0 <inspect_ensure>, 
    data2=1075603536) at eval.c:5177
#16 0x080c538f in rb_protect_inspect (func=0x80c53e0 <inspect_ary>, obj=1075603536, arg=0) at array.c:1522
#17 0x080c5536 in rb_ary_inspect (ary=1075603536) at array.c:1569
#18 0x08069f71 in call_cfunc (func=0x80c54e0 <rb_ary_inspect>, recv=1075603536, len=1075466372, argc=135286808, argv=0x0)
    at eval.c:5371
#19 0x0805e187 in rb_call0 (klass=1075647616, recv=1075603536, id=3169, oid=1075466364, argc=0, argv=0x0, body=0x401d137c, 
    nosuper=0) at eval.c:5509
#20 0x0805e438 in rb_call (klass=1075647616, recv=1075603536, mid=3169, argc=0, argv=0x0, scope=0) at eval.c:5730
#21 0x08059368 in rb_eval (self=1075673496, n=0x401a507c) at ruby.h:635
#22 0x080558fb in ruby_exec () at eval.c:1458
#23 0x08055940 in ruby_run () at eval.c:1484
#24 0x08053a05 in main (argc=1075466364, argv=0x401a507c, envp=0xbffff8e4) at main.c:38
(gdb) 
-- 
[田中 哲][たなか あきら][Tanaka Akira]