diff options
| author | Lukas Larsson <[email protected]> | 2011-09-27 12:03:04 +0200 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2011-09-29 17:31:29 +0200 |
| commit | 22a3818adb4e3433d7ab9f34e0ade06fdf10d8d6 (patch) | |
| tree | f5752407c273e7774b91d3622a980f14c3d09eed | |
| parent | a176db06b4de2354a385813409a3340c85c3b341 (diff) | |
| download | otp-22a3818adb4e3433d7ab9f34e0ade06fdf10d8d6.tar.gz otp-22a3818adb4e3433d7ab9f34e0ade06fdf10d8d6.tar.bz2 otp-22a3818adb4e3433d7ab9f34e0ade06fdf10d8d6.zip | |
Skip getaddr_v6 test if on the ipv4_only host
| -rw-r--r-- | lib/kernel/test/inet_SUITE.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/kernel/test/inet_SUITE.erl b/lib/kernel/test/inet_SUITE.erl index 1bb173a3ac..aaa20b7398 100644 --- a/lib/kernel/test/inet_SUITE.erl +++ b/lib/kernel/test/inet_SUITE.erl @@ -294,7 +294,7 @@ t_getaddr_v6(Config) when is_list(Config) -> ?line {Name,FullName,IPStr,_IP,_,IP_46_Str,IP46} = ct:get_config(test_host_ipv4_only), case {inet:getaddr(IP_46_Str, inet6),inet:getaddr(Name, inet6)} of - {{ok,IP46},{ok,_}} -> + {{ok,IP46},{ok,V4Addr}} when V4Addr /= {0,0,0,0,0,0,0,1} -> %% Since we suceeded in parsing an IPv6 address string and %% look up the name, this computer fully supports IPv6. ?line {ok,IP46} = inet:getaddr(IP46, inet6), |