File 0578-kernel-test-gen-udp-Tweaked-connect-test-c... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 0578-kernel-test-gen-udp-Tweaked-connect-test-case.patch of Package erlang (Revision dcd1e7a9f13fcca568b5570b1faadc72)

Currently displaying revision dcd1e7a9f13fcca568b5570b1faadc72 , Show latest

From bad7038e89ffd1e74aafafc899284682fb370f68 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Fri, 25 Nov 2022 12:10:13 +0100
Subject: [PATCH 2/2] [kernel|test|gen-udp] Tweaked connect test case

Cosmetics
---
 lib/kernel/test/gen_udp_SUITE.erl | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/kernel/test/gen_udp_SUITE.erl b/lib/kernel/test/gen_udp_SUITE.erl
index 7e30ed66fb..6912541e26 100644
--- a/lib/kernel/test/gen_udp_SUITE.erl
+++ b/lib/kernel/test/gen_udp_SUITE.erl
@@ -1705,11 +1705,11 @@ do_connect(Config) when is_list(Config) ->
     ok = gen_udp:connect(S2, Addr, P1),
     ?P("try send on second socket"),
     ok = gen_udp:send(S2, <<16#deadbeef:32>>),
-    ?P("try recv on second socket - expect failure: "
-       "~n   ~p", [inet:info(S2)]),
+    ?P("try recv on second socket - expect failure when"
+       "~n   Socket Info: ~p", [inet:info(S2)]),
     ok = case gen_udp:recv(S2, 0, 500) of
-	     {error, econnrefused} -> ok;
-	     {error, econnreset}   -> ok;
+	     {error, econnrefused = R} -> ?P("expected failure: ~w", [R]), ok;
+	     {error, econnreset   = R} -> ?P("expected failure: ~w", [R]), ok;
 	     Other -> 
                  ?P("UNEXPECTED failure: ~p:"
                     "~n   ~p", [Other, inet:info(S2)]),
-- 
2.35.3

Places

File 0578-kernel-test-gen-udp-Tweaked-connect-test-case.patch of Package erlang (Revision dcd1e7a9f13fcca568b5570b1faadc72)

Places