File 0575-ssl-Correct-test-cases.patch of Package erlang
From 129fceb1276d32eb7c671829d2537ca31ce935dc Mon Sep 17 00:00:00 2001
From: Ingela Anderton Andin <ingela@erlang.org>
Date: Tue, 29 Oct 2019 12:18:28 +0100
Subject: [PATCH] ssl: Correct test cases
The same process should do all sends, but it should be a
different process from the one receiving
---
lib/ssl/test/ssl_packet_SUITE.erl | 7 ++-----
1 file changed, 2 insertions(+), 5 deletions(-)
diff --git a/lib/ssl/test/ssl_packet_SUITE.erl b/lib/ssl/test/ssl_packet_SUITE.erl
index 1ee9d4b21f..b7060fa136 100644
--- a/lib/ssl/test/ssl_packet_SUITE.erl
+++ b/lib/ssl/test/ssl_packet_SUITE.erl
@@ -2174,9 +2174,7 @@ client_packet_decode(Socket, [Head | Tail] = Packet) ->
client_packet_decode(Socket, [Head], Tail, Packet).
client_packet_decode(Socket, P1, P2, Packet) ->
- ct:log("Packet: ~p ~n", [Packet]),
- spawn(fun() -> ssl:send(Socket, P1) end),
- spawn(fun() -> ssl:send(Socket, P2) end),
+ spawn(fun() -> ssl:send(Socket, P1), ssl:send(Socket, P2) end),
receive
{ssl, Socket, Packet} -> ok;
Other1 -> exit({?LINE, Other1})
@@ -2267,8 +2265,7 @@ client_line_packet_decode(Socket, [Head | Tail] = Packet) ->
client_line_packet_decode(Socket, [Head], Tail, L1 ++ "\n", L2 ++ "\n").
client_line_packet_decode(Socket, P1, P2, L1, L2) ->
- spawn(fun() -> ssl:send(Socket, P1) end),
- spawn(fun() -> ssl:send(Socket, P2) end),
+ spawn(fun() -> ssl:send(Socket, P1), ssl:send(Socket, P2) end),
receive
{ssl, Socket, L1} -> ok;
Other1 -> exit({?LINE, Other1})
--
2.16.4