aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAnders Svensson <[email protected]>2015-07-18 14:09:53 +0200
committerAnders Svensson <[email protected]>2015-07-19 11:08:21 +0200
commit60031d6b3b9b5a328eed3f972ab6550173006e8d (patch)
treec9301e24813a50228dce97af7033f77f0a243370
parentf3fefbae24a2569a13b538d80d0e99129963ebef (diff)
downloadotp-60031d6b3b9b5a328eed3f972ab6550173006e8d.tar.gz
otp-60031d6b3b9b5a328eed3f972ab6550173006e8d.tar.bz2
otp-60031d6b3b9b5a328eed3f972ab6550173006e8d.zip
Add missing watchdog suite clause
The suite pretends to be gen_tcp-ish in configuring itself to diameter_tcp. The function close/1 can be called as a result.
-rw-r--r--lib/diameter/test/diameter_watchdog_SUITE.erl7
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/diameter/test/diameter_watchdog_SUITE.erl b/lib/diameter/test/diameter_watchdog_SUITE.erl
index f39e12686e..2520f3bc4c 100644
--- a/lib/diameter/test/diameter_watchdog_SUITE.erl
+++ b/lib/diameter/test/diameter_watchdog_SUITE.erl
@@ -48,7 +48,8 @@
accept/1,
connect/3,
send/2,
- setopts/2]).
+ setopts/2,
+ close/1]).
-include("diameter.hrl").
-include("diameter_ct.hrl").
@@ -420,7 +421,6 @@ suspect(TRef, false, SvcName, N) ->
%% abuse/1
abuse(F) ->
-
[] = run([[abuse, F, T] || T <- [listen, connect]]).
abuse(F, [_,_,_|_] = Args) ->
@@ -545,6 +545,9 @@ setopts(Sock, Opts) ->
send(Sock, Bin) ->
send(getr(config), Sock, Bin).
+close(Sock) ->
+ gen_tcp:close(Sock).
+
%% send/3
%% First outgoing message from a new transport process is CER/CEA.