diff --git a/test/ibrowse_test_server.erl b/test/ibrowse_test_server.erl index 3ba7c67..631e93a 100644 --- a/test/ibrowse_test_server.erl +++ b/test/ibrowse_test_server.erl @@ -76,11 +76,22 @@ do_listen(ssl, Port, Opts) -> application:start(ssl), ssl:listen(Port, Opts). +-ifdef(OTP_RELEASE). + +do_accept(tcp, Listen_sock) -> + gen_tcp:accept(Listen_sock, ?ACCEPT_TIMEOUT_MS); +do_accept(ssl, Listen_sock) -> + ssl:handshake(Listen_sock, ?ACCEPT_TIMEOUT_MS). + +-else. + do_accept(tcp, Listen_sock) -> gen_tcp:accept(Listen_sock, ?ACCEPT_TIMEOUT_MS); do_accept(ssl, Listen_sock) -> ssl:ssl_accept(Listen_sock, ?ACCEPT_TIMEOUT_MS). +-endif. + accept_loop(Sock, Sock_type) -> case do_accept(Sock_type, Sock) of {ok, Conn} ->