anchor.diff:      State = #state {loader = inet,
                       hosts = AL,
                       data = Tcp,
  -                    timeout = ?IDLE_TIMEOUT,
  -		    n_timeouts = ?N_TIMEOUTS,
  +                    timeout = ?INET_IDLE_TIMEOUT,
                       prim_state = PS},
       loop(State, Parent, []).
   
  
positive.code: inet_send_and_rcv(Msg, Tag, State) when State#state.data =:= noport ->
      {ok,Tcp} = find_master(State#state.hosts),     %% reconnect
      inet_send_and_rcv(Msg, Tag, State#state{data = Tcp,
  					    timeout = ?IDLE_TIMEOUT});
  inet_send_and_rcv(Msg, Tag, #state{data = Tcp, timeout = Timeout} = State) ->
      prim_inet:send(Tcp, term_to_binary(Msg)),
      receive
  
negative.code: efile_exit_port(State, _Port, _Reason) ->
      State.
  
  efile_timeout_handler(State, _Parent) ->
      prim_purge_cache(),
      State.
  
  %%% --------------------------------------------------------
  %%% Functions which handle inet prim_loader
  