anchor.diff:  api_to_maccept_tcp6(doc) ->
       [];
   api_to_maccept_tcp6(_Config) when is_list(_Config) ->
  +    ?TT(?SECS(20)),
       tc_try(api_to_maccept_tcp4,
              fun() ->
                      not_yet_implemented(),
  
positive.code:            cmd  => fun(#{lsock := LSock}) ->
                             socket:listen(LSock)
                     end},
  
           #{desc => "announce ready",
             cmd  => fun(#{lsock := LSock, tester := Tester}) ->
                             ei("announcing port to tester (~p)", [Tester]),
                             Tester ! {ready, self(), LSock},
                             ok
                     end},
           #{desc => "await continue",
             cmd  => fun(#{tester := Tester} = _State) ->
                             receive
                                 {'DOWN', _, process, Tester, Reason} ->
                                     ee("Unexpected DOWN regarding tester ~p: "
                                        "~n   ~p", [Tester, Reason]),
                                     {error, {unexpected_exit, tester}};
                                 {continue, Tester} ->
                                     ok
                             end
                     end},
  
           %% *** The actual test part ***
           #{desc => "attempt to accept (without success)",
             cmd  => fun(#{lsock := LSock, timeout := To} = State) ->
                             Start = t(),
  
negative.code:          %% Start the prim-acceptor
           #{desc => "start prim-acceptor",
             cmd  => fun(#{prim_acceptor := Pid} = _State) ->
                             ev_start(Pid),
                             ok
                     end},
           #{desc => "await prim-acceptor ready (init)",
             cmd  => fun(#{prim_acceptor := Pid} = State) ->
                             {ok, Sock} = ev_await_ready(Pid, prim_acceptor, init),
                             {ok, State#{lsock => Sock}}
                     end},
  
           %% Start sec-acceptor-1
           #{desc => "start sec-acceptor 1",
             cmd  => fun(#{sec_acceptor1 := Pid, lsock := LSock} = _State) ->
                             ev_start(Pid, LSock),
                             ok
                     end},
           #{desc => "await sec-acceptor 1 ready (init)",
             cmd  => fun(#{sec_acceptor1 := Pid} = _State) ->
                             ev_await_ready(Pid, sec_acceptor1, init)
                     end},
  
           %% Start sec-acceptor-2
           #{desc => "start sec-acceptor 2",
             cmd  => fun(#{sec_acceptor2 := Pid, lsock := LSock} = _State) ->
                             ev_start(Pid, LSock),
                             ok
                     end},
           #{desc => "await sec-acceptor 2 ready (init)",
             cmd  => fun(#{sec_acceptor2 := Pid} = _State) ->
                             ev_await_ready(Pid, sec_acceptor2, init)
                     end},
  
           %% Activate the acceptor(s)
           #{desc => "active prim-acceptor",
             cmd  => fun(#{prim_acceptor := Pid} = _State) ->
                             ev_continue(Pid, accept),
                             ok
                     end},
           #{desc => "active sec-acceptor 1",
             cmd  => fun(#{sec_acceptor1 := Pid} = _State) ->
                             ev_continue(Pid, accept),
                             ok
                     end},
           #{desc => "active sec-acceptor 2",
             cmd  => fun(#{sec_acceptor2 := Pid} = _State) ->
                             ev_continue(Pid, accept),
                             ok
                     end},
  
           %% Await acceptor(s) completions
           #{desc => "await prim-acceptor ready (accept)",
             cmd  => fun(#{prim_acceptor := Pid} = _State) ->
                             ev_await_ready(Pid, prim_acceptor, accept)
                     end},
           #{desc => "await sec-acceptor 1 ready (accept)",
             cmd  => fun(#{sec_acceptor1 := Pid} = _State) ->
                             ev_await_ready(Pid, sec_acceptor1, accept)
                     end},
           #{desc => "await sec-acceptor 2 ready (accept)",
             cmd  => fun(#{sec_acceptor2 := Pid} = _State) ->
                             ev_await_ready(Pid, sec_acceptor2, accept)
                     end},
  
           %% Terminate
           #{desc => "order prim-acceptor to terminate",
             cmd  => fun(#{prim_acceptor := Pid} = _State) ->
                             ev_terminate(Pid),
                             ok
                     end},
           #{desc => "await prim-acceptor termination",
             cmd  => fun(#{prim_acceptor := Pid} = State) ->
                             ev_await_termination(Pid),
                             State1 = maps:remove(prim_acceptor, State),
                             {ok, State1}
                     end},
           #{desc => "order sec-acceptor 1 to terminate",
             cmd  => fun(#{sec_acceptor1 := Pid} = _State) ->
                             ev_terminate(Pid),
                             ok
                     end},
           #{desc => "await sec-acceptor 1 termination",
             cmd  => fun(#{sec_acceptor1 := Pid} = State) ->
                             ev_await_termination(Pid),
                             State1 = maps:remove(sec_acceptor1, State),
                             {ok, State1}
                     end},
           #{desc => "order sec-acceptor 2 to terminate",
             cmd  => fun(#{sec_acceptor2 := Pid} = _State) ->
                             ev_terminate(Pid),
                             ok
                     end},
           #{desc => "await sec-acceptor 2 termination",
             cmd  => fun(#{sec_acceptor2 := Pid} = State) ->
                             ev_await_termination(Pid),
                             State1 = maps:remove(sec_acceptor2, State),
                             {ok, State1}
                     end},
           
           %% *** We are done ***
  