anchor.diff:  handle_messages([], NewState) ->
       {ok, NewState};
   handle_messages([Message|Rest], NewState) ->
  +    ?DEBUG("Receive: ~p~n", [Message]),
       case handle_message(Message, NewState) of
           {stop, Reason, State} ->
               {stop, Reason, State};
  
positive.code: 
  %%-----------------------------------------------------------------------------
  
  do_send(Msg, #?STATE{protocol = Protocol,
                       socket   = Socket} = _State) ->
      case of_protocol:encode(Msg) of
          {ok, EncodedMessage} ->
              of_driver_utils:send(Protocol, Socket, EncodedMessage);
          {error, Error} ->
              {error, Error}
  
negative.code:     R = [do_send(Msg, State) || Msg <- Msgs],
      {reply, R, State};
  handle_call(next_xid, _From, #?STATE{ xid = XID } = State) ->
      {XID, NewState} = next_xid(State),
      {reply, {ok, XID}, NewState};
  handle_call(pending_msgs, _From, State) -> %% ***DEBUG
      {reply,{ok, State#?STATE.pending_msgs}, State};
  handle_call(state, _From, State) ->
  