Tatsuya BIZENN
bizen****@arthu*****
2005年 1月 6日 (木) 21:11:44 JST
備前と申します。
そもそも (make-server-sockets #f port) とした時にIPv4マップド
アドレスでlisten()したくないなと思ったのがきっかけで、添付の
ようなパッチを作ってみました。
(make-server-sockets addr port
:reuse-addr? #t
:sock-init (lambda (sock addr)
(when (or (not addr) (eq? (sockaddr-family addr)
'inet6))
(socket-setsockopt sock |IPPROTO_IPV6| |IPV6_V6ONLY|
1))))
みたいな感じで使えます。一応提案させていただきます。
--
備前 達矢
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: net.scm.diff
型: application/octet-stream
サイズ: 2084 バイト
説明: 無し
下载