anchor.diff:      ?P("start connectors"),
       _  = [spawn(F2) || _ <- Ns],
       ?P("await accepts"),
  -    ok = ?EXPECT_ACCEPTS([{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}}],8,15000),
  +    ok = ?EXPECT_ACCEPTS([{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}}],NumActors,15000),
       ?P("await connects"),
       ok = ?EXPECT_CONNECTS([{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}},{_,{ok,_}}],1000),
       ?P("done"),
  
positive.code: 
  do_several_accepts_in_one_go(Config) ->
      ?P("create listen socket"),
      LS = case ?LISTEN(Config, 0,[]) of
               {ok, LSock} ->
                   LSock;
               {error, eaddrnotavail = Reason} ->
  
negative.code:          end,
      Parent = self(),
      {ok, PortNo} = inet:port(LS),
      F1 = fun() ->
  		 ?P("acceptor starting"),
  		 Parent ! {accepted,self(),gen_tcp:accept(LS)}
           end,
      F2 = fun() ->
  		 ?P("connector starting"),
  		 Parent ! {connected,self(),?CONNECT(Config, "localhost",PortNo,[])}
           end,
      Ns = lists:seq(1, NumActors),
      ?P("start acceptors"),
      _  = [spawn(F1) || _ <- Ns],
      ?P("await accept timeouts"),
  