anchor.diff:                 (return-from lookup-host-u16-vector-8
                    (make-host hostname
                               (list (make-address :ipv6 (copy-seq host)))))
  -               (deal-with-resolv-error retval host nil))))))))
  +               (manage-resolv-error retval host nil))))))))
   
   (defun make-address-from-addrinfo (ptr)
     (declare (type (alien (* (struct et::addrinfo)))
  
positive.code:                (return-from lookup-host-u8-vector-4
                   (make-host hostname
                              (list (make-address :ipv4 (copy-seq host)))))
                 (deal-with-resolv-error retval host nil))))))
  
      ((:ipv6 t)
       (with-alien ((sin6 (struct et::sockaddr-in6)))
  
negative.code:       (if (zerop retval)
            (return-from lookup-service-number
              (make-service service port-number protocol))
            (manage-resolv-error retval nil port-number)))))
  
  (defun lookup-service-name (port protocol)
    (multiple-value-bind (retval addrinfo)
  