C-g crashes Emacs 23

[Katsumi Yamaoka <yamaoka@xxxxxxx>]

こんにちは山岡です。

Emacs 23 (emacs-unicode-2) をクラッシュさせる方法を見つけたので
報告します。Fedora Core 5、Gcc 4.1.0 です。何か開発途中のものが
原因であれば無視して下さい。

(funcall (byte-compile (lambda nil (read-event))))

この式を eval して C-g をタイプすると、落ちます。単なる
(read-event) や (funcall (lambda nil (read-event))) では問題あり
ません。また Emacs 22 でも起きません (もっとも 22 では、また
puresize が足りなくなったみたいですが)。

;; Gnus が read-event を使ってキーを読んで条件分岐する場面で私は
;; C-g で止めてしまう癖があるらしく、今日は頻繁に遭遇しました。:)

#0  abort () at emacs.c:464
#1  0x0818b4e6 in Fbyte_code (bytestr=137987459, vector=139286988, maxdepth=8)
    at bytecode.c:1673
#2  0x081610fa in funcall_lambda (fun=141491244, nargs=0, 
    arg_vector=0xbffe9084) at eval.c:3169
#3  0x08161501 in Ffuncall (nargs=1, args=0xbffe9080) at eval.c:3039
#4  0x08160d65 in Feval (form=173621693) at eval.c:2286
#5  0x08161651 in Ffuncall (nargs=2, args=0xbffe9170) at eval.c:2982
#6  0x0818c81f in Fbyte_code (bytestr=136711307, vector=136711324, maxdepth=64)
    at bytecode.c:679
#7  0x081610fa in funcall_lambda (fun=136711268, nargs=1, 
    arg_vector=0xbffe92a4) at eval.c:3169
#8  0x08161501 in Ffuncall (nargs=2, args=0xbffe92a0) at eval.c:3039
#9  0x0818c81f in Fbyte_code (bytestr=136711803, vector=136711820, maxdepth=32)
    at bytecode.c:679
#10 0x081610fa in funcall_lambda (fun=136711764, nargs=1, 
    arg_vector=0xbffe93c4) at eval.c:3169
#11 0x08161501 in Ffuncall (nargs=2, args=0xbffe93c0) at eval.c:3039
#12 0x0818c81f in Fbyte_code (bytestr=136710051, vector=136710068, maxdepth=16)
    at bytecode.c:679
#13 0x081610fa in funcall_lambda (fun=136710020, nargs=0, 
    arg_vector=0xbffe94e4) at eval.c:3169
#14 0x08161501 in Ffuncall (nargs=1, args=0xbffe94e0) at eval.c:3039
#15 0x08162ee9 in apply1 (fn=142816753, arg=137562313) at eval.c:2723
#16 0x0815e6fb in Fcall_interactively (function=142816753, 
    record_flag=137562313, keys=137596796) at callint.c:408
#17 0x080fe933 in Fcommand_execute (cmd=142816753, record_flag=137562313, 
    keys=137562313, special=137562313) at keyboard.c:9781
#18 0x08109cf7 in command_loop_1 () at keyboard.c:1790
#19 0x08160132 in internal_condition_case (bfun=0x8109980 <command_loop_1>, 
    handlers=137600937, hfun=0x8104540 <cmd_error>) at eval.c:1469
#20 0x08103963 in command_loop_2 () at keyboard.c:1326
#21 0x081601ea in internal_catch (tag=137594921, 
    func=0x8103940 <command_loop_2>, arg=137562313) at eval.c:1210
#22 0x0810437c in command_loop () at keyboard.c:1305
#23 0x0810471a in recursive_edit_1 () at keyboard.c:1003
#24 0x08104807 in Frecursive_edit () at keyboard.c:1064
#25 0x080faaf2 in main (argc=3, argv=0xbffe9db4) at emacs.c:1814

Lisp Backtrace:
0x86efc2c PVEC_COMPILED
"funcall" (0x86efc2c)
"eval" (0xa5941bd)
"eval-last-sexp-1" (0x83308f9)
"eval-last-sexp" (0x83308f9)
"eval-print-last-sexp" (0x83308c9)
"call-interactively" (0x88335f1)