anchor.diff:  %%           NewState        = state record()
   %%           NewBranchAction = atom(), ignore | tell_parent
   %%--------------------------------------------------------------------
  +act_on_new_sipstate(SipState, SipState, ignore, State) when is_atom(SipState), is_record(State, state) ->
  +    %% SipState has not changed
  +    {State, ignore};
  +act_on_new_sipstate(SipState, SipState, tell_parent, State) when is_atom(SipState), is_record(State, state) ->
  +    %% SipState has not changed
  +    {State, tell_parent};
   act_on_new_sipstate(OldSipState, NewSipState, BranchAction, State)
     when is_atom(OldSipState), is_atom(NewSipState), is_atom(BranchAction),
  -       BranchAction == ignore; BranchAction == tell_parent,
  -       is_record(State, state), OldSipState == NewSipState ->
  -    %% State has not changed
  -    {State, BranchAction};
  -act_on_new_sipstate(OldSipState, NewSipState, BranchAction, State)
  -  when is_atom(OldSipState), is_atom(NewSipState), is_atom(BranchAction),
  -       BranchAction == ignore; BranchAction == tell_parent,
  +       (BranchAction == ignore orelse BranchAction == tell_parent),
          is_record(State, state) ->
       %% State has changed
       act_on_new_sipstate2(NewSipState, BranchAction, State).
  
positive.code: 						    res_count = 0
  						   },
  
  
      %% handle_cast({cancel, Msg, ExtraHeaders}
      %%--------------------------------------------------------------------
  
negative.code:     autotest:mark(?LINE, "gen_server:cast() {sipmessage, ...} - 1.1"),
      SipMessage_State1 = #state{request   = Test_Request,
  			       sipstate  = calling,
  			       timerlist = siptimer:empty(),
  			       testing   = true
  			      },
      {noreply, SipMessage_State1_out} =
  	handle_cast({sipmessage, Test_Response, #siporigin{}, "testing"}, SipMessage_State1),
  