anchor.diff:  api_m_getnameinfo(#{name   := Name,
                       family := Domain,
                       ip     := IP}) ->
  +    i("Check name info for ~p with"
  +      "~n   Domain: ~p"
  +      "~n   IP:     ~p", [Name, Domain, IP]),
       SA = #{family => Domain,
              addr   => IP},
       try net:getnameinfo(SA) of
  
positive.code:     end.
  
  
  api_m_getnameinfo_verify(#{host := Name}, Name) ->
      ok;
  api_m_getnameinfo_verify(NameInfo, Name) ->
      ?FAIL({not_found, NameInfo, Name}).
  
  
  
negative.code: 
  
  api_m_getaddrinfo_verify([], Name, Domain, IP) ->
      i("No match found for ~p: "
        "~n   Domain:   ~p"
        "~n   IP:       ~p", [Name, Domain, IP]),
      ?FAIL({not_found, Name, Domain, IP});
  api_m_getaddrinfo_verify([#{family := Domain,
                              addr   := IP} = AddrInfo|_],
                           Name, Domain, IP) ->
      i("Found match for ~p: "
        "~n   AddrInfo: ~p"
        "~n   Domain:   ~p"
        "~n   IP:       ~p", [Name, AddrInfo, Domain, IP]),
      ok;
  api_m_getaddrinfo_verify([AddrInfo|AddrInfos], Name, Domain, IP) ->
      i("AddrInfo: ~p"
        "~n   does not match: "
        "~n      Domain: ~p"
        "~n      IP:     ~p", [AddrInfo, Domain, IP]),
      api_m_getaddrinfo_verify(AddrInfos, Name, Domain, IP).
  
  
  