anchor.diff:  				 h_addr_list = [IP_46]},
   	    HEnt_ = HEnt,
   	    check_elems([{HEnt#hostent.h_name,[IP_46_Str,IPStr]},
  -			 {HEnt#hostent.h_aliases,[[],Aliases]}]);
  +			 {HEnt#hostent.h_aliases,[[],Aliases,tl(Aliases)]}]);
   	{_,IP4to6Res} -> ok
       end,
       ok.
  
positive.code: 				   h_length = 16,
  				   h_addr_list = [IP6]},
  	    HEnt6_ = HEnt6,
  	    check_elems([{HEnt6#hostent.h_name,[Name6,FullName6]},
  			 {HEnt6#hostent.h_aliases,[[],Aliases6]}]),
  
  	    {_DName6, _DFullName6, DIPStr6, DIP6, _} =
  		ct:get_config(test_dummy_ipv6_host),
  
negative.code: 
      HEnt_ = HEnt,
      check_elems([{HEnt#hostent.h_name,[Name,FullName]},
  		 {HEnt#hostent.h_aliases,[[],Aliases,tl(Aliases)]}]),
      {ok,HEntF} = inet:gethostbyname(FullName),
      HEntF_ = HEntF#hostent{h_name = FullName,
  			   h_addrtype = inet,
  			   h_length = 4,
  			   h_addr_list = [IP]},
      HEntF_ = HEntF,
      check_elems([{HEnt#hostent.h_aliases,[[],Aliases,tl(Aliases)]}]),
      %%
      FullNameU = toupper(FullName),
      {ok,HEntU} = inet:gethostbyname(FullNameU),
  