diff options
| author | Patrik Nyblom <[email protected]> | 2010-09-21 17:00:58 +0200 |
|---|---|---|
| committer | Patrik Nyblom <[email protected]> | 2010-09-21 17:00:58 +0200 |
| commit | ea7a57a175e58a72231111a5bd612035379e8283 (patch) | |
| tree | 041f79365be259a89e4c0bf9ef9814e6147d0237 | |
| parent | dc7d2319691fa599717c066460cce53ce97b6b18 (diff) | |
| download | otp-ea7a57a175e58a72231111a5bd612035379e8283.tar.gz otp-ea7a57a175e58a72231111a5bd612035379e8283.tar.bz2 otp-ea7a57a175e58a72231111a5bd612035379e8283.zip | |
Teach gen_udp_SUITE:connect testcase about econnreset on Windows
| -rw-r--r-- | lib/kernel/test/gen_udp_SUITE.erl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/kernel/test/gen_udp_SUITE.erl b/lib/kernel/test/gen_udp_SUITE.erl index bbdfbd3cb0..2ff1d7210a 100644 --- a/lib/kernel/test/gen_udp_SUITE.erl +++ b/lib/kernel/test/gen_udp_SUITE.erl @@ -423,7 +423,11 @@ connect(Config) when is_list(Config) -> ?line ok = gen_udp:close(S1), ?line ok = gen_udp:connect(S2, Addr, P1), ?line ok = gen_udp:send(S2, <<16#deadbeef:32>>), - ?line {error,econnrefused} = gen_udp:recv(S2, 0, 5), + ?line ok = case gen_udp:recv(S2, 0, 5) of + {error,econnrefused} -> ok; + {error,econnreset} -> ok; + Other -> Other + end, ok. implicit_inet6(Config) when is_list(Config) -> |