diff options
| author | Micael Karlberg <[email protected]> | 2018-12-14 19:14:43 +0100 |
|---|---|---|
| committer | Micael Karlberg <[email protected]> | 2018-12-18 12:16:24 +0100 |
| commit | 6781913e975e93a4a29d14e14794aae4526de9f7 (patch) | |
| tree | 3ce36a1a32fefaa391499de2247803a581900876 /erts/emulator/test/socket_test_ttest_tcp_server_socket.erl | |
| parent | 2f80f039958b4ec6ab3306df777b6b1a4872a495 (diff) | |
| download | otp-6781913e975e93a4a29d14e14794aae4526de9f7.tar.gz otp-6781913e975e93a4a29d14e14794aae4526de9f7.tar.bz2 otp-6781913e975e93a4a29d14e14794aae4526de9f7.zip | |
[socket-nif|test] Add test case based on the ttest modules
Added a (first) test case based on the ttest modules.
OTP-14831
Diffstat (limited to 'erts/emulator/test/socket_test_ttest_tcp_server_socket.erl')
| -rw-r--r-- | erts/emulator/test/socket_test_ttest_tcp_server_socket.erl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/erts/emulator/test/socket_test_ttest_tcp_server_socket.erl b/erts/emulator/test/socket_test_ttest_tcp_server_socket.erl index d62f4d86a6..c78c7111ce 100644 --- a/erts/emulator/test/socket_test_ttest_tcp_server_socket.erl +++ b/erts/emulator/test/socket_test_ttest_tcp_server_socket.erl @@ -31,7 +31,15 @@ -define(MOD(M), {?TRANSPORT_MOD, #{method => M}}). start_monitor(Method, Active) -> - socket_test_ttest_tcp_server:start_monitor(?MOD(Method), Active). + case socket_test_ttest_tcp_server:start_monitor(node(), + ?MOD(Method), + Active) of + {ok, {Pid, AddrPort}} -> + MRef = erlang:monitor(process, Pid), + {ok, {Pid, MRef, AddrPort}}; + {error, _} = ERROR -> + ERROR + end. stop(Pid) -> socket_test_ttest_tcp_server:stop(Pid). |