anchor.diff:  				       end;
   				  ({do_lookup, _, _, _}) ->
   				       true
  -			       end),
  -	    io:format("Filtered~n");
  +			       end);
   
   	{notify_requester, Caller, Name, Addresses} ->
  +	    io:format("Notifying ~p for ~p: ~p~n", [Caller, Name, Addresses]),
   	    Caller ! {lookup, Name, Addresses}
       end,
       ?MODULE:main(LookupQueue, Results).
  
positive.code: 			 {inet6, []} -> true;
  			 {inet6, [{Name, _, nil}]} -> true;
  			 {inet6, _} -> false
  		      end,
  	    io:format("DoSend: ~p~n", [DoSend]),
  	    if
  		DoSend ->
  		    {Inet, Inet6} = case Family of
  
negative.code: -module(dns).
  -export([start/0, start/1, lookup/1, test/0]).
  -export([run/1, main/2, do_lookup/2]).
  
  start() ->
      start(100). % Default LookupInterval is 100ms
  
  start(LookupInterval) ->
      Pid = spawn_link(?MODULE, run, [LookupInterval]),
      case (catch register(dns, Pid)) of
  	{'EXIT', _} ->
  	    exit(Pid, kill),
  	    cannot_register;
  	_ ->
  	    ok
      end.
  
  % Caller will receive {lookup, Name, [Addresses]}
  lookup(Name) ->
      dns ! {self(), lookup, Name}.
  
  
  run(LookupInterval) ->
      dbg:tpl(?MODULE,[{'_',[],[{message,{return_trace}}]}]),
      % {Name, Inet4 | pending, Inet6 | pending}
      Results = ets:new(dns_results, []),
      % {do_lookup, Caller, Name, Family}
  