anchor.diff:  -define(TIMEOUT, 10000).
   -define(CLIENT_NUMBER, 3).
   -define(HIGH_CLIENT_NUMBER, 10).
  +-define(PAUSE_FOR_CLUSTERING, timer:sleep(5000)).
   
   %% ==================================================================
   %% common_test callbacks
  
positive.code:                    {servers, Servers},
                     {clients, Clients}]),
  
      %% Pause for clustering.
      timer:sleep(1000),
  
      %% Test on_down callback.
      [{_, _}, {_, _}, {_, Node3}, {_, Node4}] = Nodes,
  
negative.code:                 Self ! ok
          end
      end,
  
      CastReceiverPid = rpc:call(SecondName, erlang, spawn, [CastReceiverFun]),
  
      true = rpc:call(
          SecondName, erlang, register, [cast_receiver, CastReceiverPid]
      ),
  
      [{_, FirstName}, {_, SecondName} | _] = Nodes,
  
      ok = rpc:call(
          FirstName,
          partisan_gen_server,
          cast,
          [{partisan_test_server, SecondName}, {cast, cast_receiver}]
      ),
  
      receive
          ok ->
  