Gauche > Archives > 2016/01/12

これらの状況に引っかかりました。
http://sourceforge.net/p/gauche/mailman/message/3065570/
http://chaton.practical-scheme.net/gauche/a/2011/11/08

(with-module gauche.net
  (set! ipv6-capable (guard (e ((is-a? e <system-error>) #f)
                               (else (raise e)))
                       (let ((s (make-socket AF_INET6 SOCK_STREAM)))
                         (socket-close s)
                         #t))))