anchor.diff:  	  seq=0     %% sequence to expect in reply
   	}).
   
  --record(state, 
  +-record(state,
   	{
   	  port,
   	  link_list  = [] :: [#link {}],
  
positive.code: 
  enq_request(Call, From, State) ->
      Tmr = erlang:start_timer(?REQUEST_TMO, self(), request_timeout),
      R = #request { tmr  = Tmr, 
  		   call = Call,
  		   from = From
  		 },
      Q = State#state.request_queue ++ [R],
      State#state { request_queue = Q }.
      
  dispatch_command(State) when State#state.request =:= undefined ->
      case State#state.request_queue of
  	[R=#request { call = {get,What,Fam,Flags,Attrs} } | Q ] ->
  
negative.code:     Name = proplists:get_value(label, As, ""),
      case lists:keytake(Addr, #addr.addr, State#state.addr_list) of
  	false ->
  	    ?log(warning, "Warning addr=~w not found", [Addr]),
  	    State;
  	{value,Y,Ys} ->
  	    As1 = dict:to_list(Y#addr.attr),
  