anchor.diff:      put(action, send),
       Ret = Action(),
       put(action, sent),
  -    put(sent,   N+1),
  +    N2 = N + 1,
  +    put(sent,   N2),
       case Ret of
   	ok ->
   	    receive after 1 -> ok end,
   	    timeout_sink_loop(Action, N+1);
   	Other ->
               ?P("[sink-loop] action result (~w): "
  -               "~n   ~p", [N+1, Other]),
  -	    Other
  +               "~n   ~p", [N2, Other]),
  +	    {Other, N2}
       end.
        
   has_superfluous_schedulers() ->
  
positive.code: 			Err
  		end
  	end,
      {error,timeout} = timeout_sink_loop(F),
      unlink(Mad),
      exit(Mad, kill),
      flush(),
  
negative.code:                                           Self ! Res,
                                            Res
                                    end,
                             {{error, timeout}, _} = timeout_sink_loop(Send)
                     end),
      Diff = get_max_diff(),
      ?P("Max time for send: ~p",[Diff]),
  