anchor.diff:      gen_utp:start().
   
   cleanup(_) ->
  -    gen_utp:stop().
  +    gen_utp:stop(),
  +    Check = fun(F) ->
  +                    case whereis(gen_utp) of
  +                        undefined -> ok;
  +                        _ -> F(F)
  +                    end
  +            end,
  +    Check(Check).
   
   listen_test_() ->
       {setup,
  
positive.code:      fun cleanup/1,
       fun (_) ->
               {inorder,
                [{"utp simple listen test",
                  ?_test(
                     begin
                         Ports = length(erlang:ports()),
  
negative.code:                                   end),
                         ok = simple_connect_client(Ref)
                     end)},
                 {"uTP simple send test",
                  ?_test(
                     begin
                         Self = self(),
  