anchor.diff:  	 parse_strict_address/1, ipv4_mapped_ipv6_address/1,
            simple_netns/1, simple_netns_open/1,
            add_del_host/1, add_del_host_v6/1,
  -         simple_bind_to_device/1, simple_bind_to_device_open/1]).
  -
  --export([get_hosts/1, get_ipv6_hosts/1, parse_hosts/1, parse_address/1,
  -	 kill_gethost/0, parallell_gethost/0, test_netns/0]).
  --export([init_per_testcase/2, end_per_testcase/2]).
  +         simple_bind_to_device/1, simple_bind_to_device_open/1
  +        ]).
  +
  +-export([
  +         get_hosts/1, get_ipv6_hosts/1, parse_hosts/1, parse_address/1,
  +	 kill_gethost/0, parallell_gethost/0, test_netns/0
  +        ]).
  +
  +
   
   suite() ->
  -    [{ct_hooks,[ts_install_cth]},
  -     {timetrap,{minutes,1}}].
  +    [
  +     {ct_hooks,[ts_install_cth]},
  +     {timetrap,{minutes,1}}
  +    ].
   
   all() -> 
  -    [t_gethostbyaddr, t_gethostbyname, t_getaddr,
  +    [
  +     t_gethostbyaddr, t_gethostbyname, t_getaddr,
        t_gethostbyaddr_v6, t_gethostbyname_v6, t_getaddr_v6,
        ipv4_to_ipv6, host_and_addr, {group, parse},
        t_gethostnative, gethostnative_parallell, cname_loop,
  
positive.code: 	    {skipped, "Native not only lookup metod"}
      end.
  
  gethostnative_control_1(Config,
  			#gethostnative_control{
  			   control_seq=Seq,
  			   control_interval=Interval,
  			   lookup_delay=Delay,
  			   lookup_count=Cnt,
  			   lookup_processes=N}) ->
      {ok, Hostname} = inet:gethostname(),
      {ok, _} = inet:gethostbyname(Hostname),
      Hosts =
  	[Hostname|[H || {_,H} <- get_hosts(Config)]
  	 ++[H++D || H <- ["www.","www1.","www2.",""],
  		    D <- ["erlang.org","erlang.se"]]
  	 ++[H++"cslab.ericsson.net" || H <- ["morgoth.","hades.","styx."]]],
      %% Spawn some processes to do parallel lookups while
      %% I repeatedly do inet_gethost_native:control/1.
      TrapExit = process_flag(trap_exit, true),
      gethostnative_control_2([undefined], Interval, Delay, Cnt, N, Hosts),
      io:format(
        "First intermission: now starting control sequence ~w\n",
        [Seq]),
      erlang:display(first_intermission),
      gethostnative_control_2(Seq, Interval, Delay, Cnt, N, Hosts),
      erlang:display(second_intermission),
      io:format(
        "Second intermission:  now stopping control sequence ~w\n",
        [Seq]),
      gethostnative_control_2([undefined], Interval, Delay, Cnt, N, Hosts),
      true = process_flag(trap_exit, TrapExit),
      ok.
  
  gethostnative_control_2(Seq, Interval, Delay, Cnt, N, Hosts) ->
  
negative.code: -include_lib("kernel/include/inet.hrl").
  -include_lib("kernel/src/inet_res.hrl").
  -include_lib("kernel/src/inet_dns.hrl").
  -include("gen_inet_test_lib.hrl").
  
  -export([
           all/0, suite/0, groups/0,
           init_per_suite/1, end_per_suite/1, 
  	 init_per_group/2, end_per_group/2,
           init_per_testcase/2, end_per_testcase/2,
  
  	 t_gethostbyaddr/0, t_gethostbyaddr/1,
  	 t_getaddr/0, t_getaddr/1,
  	 t_gethostbyname/0, t_gethostbyname/1,
  