diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2012-07-17 16:55:05 +0200 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2012-07-19 20:22:53 +0200 |
| commit | eae988281f641302a6d19166f77306d8a3210895 (patch) | |
| tree | b9db2b50397c3d380140ec53a63f21e00a39da37 /lib/kernel/test/gen_tcp_echo_SUITE.erl | |
| parent | c37a976174c298be456eff560031c31d89d598a1 (diff) | |
| download | otp-eae988281f641302a6d19166f77306d8a3210895.tar.gz otp-eae988281f641302a6d19166f77306d8a3210895.tar.bz2 otp-eae988281f641302a6d19166f77306d8a3210895.zip | |
kernel: Remove VxWorks from tests
Diffstat (limited to 'lib/kernel/test/gen_tcp_echo_SUITE.erl')
| -rw-r--r-- | lib/kernel/test/gen_tcp_echo_SUITE.erl | 25 |
1 files changed, 10 insertions, 15 deletions
diff --git a/lib/kernel/test/gen_tcp_echo_SUITE.erl b/lib/kernel/test/gen_tcp_echo_SUITE.erl index 5bbaeb02ad..94f95798a0 100644 --- a/lib/kernel/test/gen_tcp_echo_SUITE.erl +++ b/lib/kernel/test/gen_tcp_echo_SUITE.erl @@ -190,24 +190,19 @@ echo_test_1(SockOpts, EchoFun, Config0) -> ok. echo_packet(SockOpts, EchoFun, Opts) -> - ?line Type = - case lists:keysearch(type, 1, Opts) of - {value, {type, T}} -> - T; - _ -> - {value, {packet, T}} = lists:keysearch(packet, 1, SockOpts), - T - end, + Type = case lists:keysearch(type, 1, Opts) of + {value, {type, T}} -> + T; + _ -> + {value, {packet, T}} = lists:keysearch(packet, 1, SockOpts), + T + end, %% Connect to the echo server. - ?line EchoPort = ?config(echo_port, Opts), - ?line {ok, Echo} = gen_tcp:connect(localhost, EchoPort, SockOpts), + EchoPort = ?config(echo_port, Opts), + {ok, Echo} = gen_tcp:connect(localhost, EchoPort, SockOpts), - ?line SlowEcho = - case os:type() of - vxworks -> true; - _ -> lists:member(slow_echo, Opts) - end, + SlowEcho = lists:member(slow_echo, Opts), case Type of http -> |