anchor.diff:                     end},
            #{desc => "order (owner) start",
              cmd  => fun(#{owner := Pid} = _State) ->
  -                           Pid ! {start, self()},
  +                           ev_start(Pid),
                              ok
                      end},
            #{desc => "await (owner) ready",
  -           cmd  => fun(#{owner := Owner} = State) ->
  -                           receive
  -                               {'DOWN', _, process, Owner, Reason} ->
  -                                   ee("Unexpected DOWN regarding owner ~p: "
  -                                      "~n   ~p", [Owner, Reason]),
  -                                   {error, {unexpected_exit, owner}};
  -                               {ready, Owner, Sock} ->
  -                                   {ok, State#{sock => Sock}}
  -                           end
  +           cmd  => fun(#{owner := Pid} = State) ->
  +                           {ok, Sock} = ev_await_ready(Pid, owner, init),
  +                           {ok, State#{sock => Sock}}
                      end},
            #{desc => "verify owner as controlling-process",
  -           cmd  => fun(#{owner := Owner, sock := Sock} = _State) ->
  +           cmd  => fun(#{owner := Pid, sock := Sock} = _State) ->
                              case socket:getopt(Sock, otp, controlling_process) of
  -                               {ok, Owner} ->
  +                               {ok, Pid} ->
                                      ok;
                                  {ok, Other} ->
                                      {error, {unexpected_owner, Other}};
  
positive.code:                            end
                     end},
           #{desc => "bind to local address",
             cmd  => fun(#{lsock := LSock, lsa := LSA} = State) ->
                             case socket:bind(LSock, LSA) of
                                 {ok, Port} ->
                                     {ok, State#{lport => Port}};
  
negative.code:          %% *** Wait for start order part ***
           #{desc => "await start (from tester)",
             cmd  => fun(State) ->
                             Tester = ev_await_start(),
                             {ok, State#{tester => Tester}}
                     end},
  
           %% *** Init part ***
  