Common Lisp : Slime listen

swank-gray.lisp の stream-listen がバッファしか見ていないのが原因。
バッファが空なら
(listen (swank::current-socket-io))
とか
(mailbox.queue (mailbox mp:*current-process*))
を呼びしてやればいい。

でも
zui > read-char
1


1
CL-USER> ; No value
CL-USER> ここで Enter キーを押した。
(#\Newline)
zui >
みたになってしまう。