update from quicklisp (usocket-0.6.0.1)