anchor.diff:      P2 = spawn(mktmofun(1200,Parent,LS)),
       P3 = spawn(mktmofun(1300,Parent,LS)),
       P4 = spawn(mktmofun(1400,Parent,LS)),
  -    ?EXPECT_ACCEPTS([{P1,{error,timeout}},{P2,{error,timeout}},
  -                     {P3,{error,timeout}},{P4,{error,timeout}}],infinity,2000).
  +    ok = ?EXPECT_ACCEPTS([{P1,{error,timeout}},{P2,{error,timeout}},
  +                          {P3,{error,timeout}},{P4,{error,timeout}}],infinity,2000).
   
   accept_timeouts_in_order2(suite) ->
       [];
  
positive.code:     ok = ?EXPECT_ACCEPTS([{P2,{ok,Port0}}] when is_port(Port0),infinity,100),
      ok = ?EXPECT_ACCEPTS([{P3,{error,timeout}}],infinity,2000),
      gen_tcp:connect("localhost",PortNo,[]),
      ?EXPECT_ACCEPTS([{P4,{ok,Port1}}] when is_port(Port1),infinity,100).
  
  killing_acceptor(suite) ->
      [];
  
negative.code:     Parent = self(),
      F = fun() -> Parent ! {accepted,self(),gen_tcp:accept(LS,1000)} end,
      P = spawn(F),
      ok = ?EXPECT_ACCEPTS([{P,{error,timeout}}],1,2000).
  
  accept_timeouts_in_order(suite) ->
      [];
  