diff options
| author | Patrik Nyblom <[email protected]> | 2012-04-25 16:05:42 +0200 |
|---|---|---|
| committer | Patrik Nyblom <[email protected]> | 2012-05-04 11:47:32 +0200 |
| commit | ee6fbc1f57bb7ad7ae19f1978628fc5640bbeb7a (patch) | |
| tree | 2bbab9b3a467587482795c471e1c78c08b8bad30 /lib/kernel/test/gen_tcp_misc_SUITE.erl | |
| parent | 689ba6e5657867eb3efbcb9a2dbec4aa98ddac5d (diff) | |
| download | otp-ee6fbc1f57bb7ad7ae19f1978628fc5640bbeb7a.tar.gz otp-ee6fbc1f57bb7ad7ae19f1978628fc5640bbeb7a.tar.bz2 otp-ee6fbc1f57bb7ad7ae19f1978628fc5640bbeb7a.zip | |
Remove race in gen_tcp_misc_SUITE:otp_9389
Diffstat (limited to 'lib/kernel/test/gen_tcp_misc_SUITE.erl')
| -rw-r--r-- | lib/kernel/test/gen_tcp_misc_SUITE.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/kernel/test/gen_tcp_misc_SUITE.erl b/lib/kernel/test/gen_tcp_misc_SUITE.erl index c74a258af9..0c53b1e85b 100644 --- a/lib/kernel/test/gen_tcp_misc_SUITE.erl +++ b/lib/kernel/test/gen_tcp_misc_SUITE.erl @@ -2044,7 +2044,7 @@ send_timeout_active(Config) when is_list(Config) -> ?line {error,timeout} = Loop(fun() -> receive - {tcp, Sock, _Data} -> + {tcp, _Sock, _Data} -> inet:setopts(A, [{active, once}]), Res = gen_tcp:send(A,lists:duplicate(1000, $a)), %erlang:display(Res), @@ -2536,7 +2536,7 @@ otp_8102_do(LSocket, PortNum, {Bin,PType}) -> otp_9389(doc) -> ["Verify packet_size handles long HTTP header lines"]; otp_9389(suite) -> []; otp_9389(Config) when is_list(Config) -> - ?line {ok, LS} = gen_tcp:listen(0, []), + ?line {ok, LS} = gen_tcp:listen(0, [{active,false}]), ?line {ok, {_, PortNum}} = inet:sockname(LS), io:format("Listening on ~w with port number ~p\n", [LS, PortNum]), OrigLinkHdr = "/" ++ string:chars($S, 8192), |