anchor.diff:  			  {P1,{error,timeout}},{P3,{error,timeout}},
   			  {P8,{error,timeout}},{P7,{error,timeout}}],infinity,2000).
   
  -%% Check that multi-accept timeouts behave correctly when mixed with successful timeouts.
  +%% Check that multi-accept timeouts behave correctly when
  +%% mixed with successful timeouts.
   accept_timeouts_mixed(Config) when is_list(Config) ->
  -    try do_accept_timeouts_mixed(Config)
  -    catch
  -        throw:{skip, _} = SKIP ->
  -            SKIP
  -    end.
  +    ?TC_TRY(accept_timeouts_mixed,
  +            fun() -> do_accept_timeouts_mixed(Config) end).
   
   do_accept_timeouts_mixed(Config) ->
       ?P("create listen socket"),
  
positive.code:         _  ->
              ok
      end,
      ?P("expect accept from 4 (~p) with success", [P4]),
      ok = ?EXPECT_ACCEPTS([{P4,{ok,Port1}}] when is_port(Port1),infinity,100),
      ?P("done"),
      ok.
  
  
negative.code:     exit({timeout_waiting_for_accepting,Proc});
  wait_until_accepting(Proc,N) ->
      case process_info(Proc,current_function) of
          {current_function, {prim_inet, accept0, 3}} ->
              case process_info(Proc, status) of
                  {status,waiting} -> 
                      ok;
                  _O1 ->
                      receive 
                      after 5 ->
                              wait_until_accepting(Proc, N-1)
                      end
              end;
          {current_function, {gen, do_call, 4}} ->
              case process_info(Proc, status) of
                  {status,waiting} -> 
                      ok;
                  _O1 ->
                      receive 
                      after 5 ->
                              wait_until_accepting(Proc, N-1)
                      end
              end;
          _O2 ->
              receive 
              after 5 ->
                      wait_until_accepting(Proc, N-1)
              end
      end.
  
  