anchor.diff:  	  =:= tolower(inet_dns:rr(RR2b, domain))),
       %%
       %% lookup
  +    ?P("lookup"),
       [IP] = inet_res:lookup(Name, in, a, [{nameservers,[NS]},verbose]),
       [IP] = inet_res:lookup(NameC, in, a, [{nameservers,[NS]},verbose]),
       %%
       %% gethostbyname
  +    ?P("gethostbyname"),
       {ok,#hostent{h_addr_list=[IP]}} = inet_res:gethostbyname(Name),
       {ok,#hostent{h_addr_list=[IP]}} = inet_res:gethostbyname(NameC),
       %%
       %% getbyname
  +    ?P("getbyname"),
       {ok,#hostent{h_addr_list=[IP]}} = inet_res:getbyname(Name, a),
       {ok,#hostent{h_addr_list=[IP]}} = inet_res:getbyname(NameC, a),
  +    ?P("end"),
       ok.
  +
   
   %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   
   %% Lookup different records using resolve/2..4.
   resolve(Config) when is_list(Config) ->
  +    ?P("begin"),
       Class = in,
       NS = ns(Config),
       Domain = "otptest",
  
positive.code:     {ok,Msg1} = inet_dns:decode(Bin1),
      %% Now with scrambled case
      {ok,Msg1b} = inet_res:nslookup(NameC, in, a, [NS]),
      io:format("~p~n", [Msg1b]),
      [RR1b] = inet_dns:msg(Msg1b, anlist),
      IP = inet_dns:rr(RR1b, data),
      Bin1b = inet_dns:encode(Msg1b),
  
negative.code:     {ok,Msg} = inet_dns:decode(Buf),
      ok.
  
  
  %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
  %% Test EDNS and truncation.
  edns0(Config) when is_list(Config) ->
      ?P("begin"),
      NS = ns(Config),
      Domain = "otptest",
      Filler = "-5678901234567890123456789012345678.",
  