File 0295-erts-Extend-fragment-latency-timeout.patch of Package erlang

From b78c05e5988ea652a23d6dde5d93523c5dcba001 Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Tue, 28 Apr 2020 10:32:21 +0200
Subject: [PATCH 12/14] erts: Extend fragment latency timeout

---
 erts/emulator/test/distribution_SUITE.erl | 23 ++++++++++++++++++-----
 1 file changed, 18 insertions(+), 5 deletions(-)

diff --git a/erts/emulator/test/distribution_SUITE.erl b/erts/emulator/test/distribution_SUITE.erl
index 17e3ff0127..65b580f12c 100644
--- a/erts/emulator/test/distribution_SUITE.erl
+++ b/erts/emulator/test/distribution_SUITE.erl
@@ -68,6 +68,10 @@
          message_latency_large_link_exit/1,
          message_latency_large_monitor_exit/1,
          message_latency_large_exit2/1,
+         message_latency_large_message/0,
+         message_latency_large_link_exit/0,
+         message_latency_large_monitor_exit/0,
+         message_latency_large_exit2/0,
          dist_entry_refc_race/1,
          system_limit/1]).
 
@@ -1409,7 +1413,6 @@ get_conflicting_unicode_atoms(CIX, N) ->
 %% kept as they continue to find bugs in the distribution implementation.
 message_latency_large_message(Config) when is_list(Config) ->
     measure_latency_large_message(?FUNCTION_NAME, fun(Dropper, Payload) -> Dropper ! Payload end).
-
 message_latency_large_exit2(Config) when is_list(Config) ->
     measure_latency_large_message(?FUNCTION_NAME, fun erlang:exit/2).
 
@@ -1417,10 +1420,20 @@ message_latency_large_link_exit(Config) when is_list(Config) ->
     message_latency_large_exit(?FUNCTION_NAME, fun erlang:link/1).
 
 message_latency_large_monitor_exit(Config) when is_list(Config) ->
-    message_latency_large_exit(?FUNCTION_NAME, fun(Dropper) ->
-                                                       Dropper ! {monitor, self()},
-                                                       receive ok -> ok end
-                                               end).
+    message_latency_large_exit(?FUNCTION_NAME,
+                               fun(Dropper) ->
+                                       Dropper ! {monitor, self()},
+                                       receive ok -> ok end
+                               end).
+
+message_latency_large_message() ->
+    [{timetrap, {minutes, 6}}].
+message_latency_large_exit2() ->
+    message_latency_large_message().
+message_latency_large_link_exit() ->
+    message_latency_large_message().
+message_latency_large_monitor_exit() ->
+    message_latency_large_message().
 
 message_latency_large_exit(Nodename, ReasonFun) ->
     measure_latency_large_message(
-- 
2.16.4

openSUSE Build Service is sponsored by