File 0203-kernel-test-Tweaked-the-global-sys-monitor... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 0203-kernel-test-Tweaked-the-global-sys-monitor.patch of Package erlang (Revision e1f10e83284c40c0723d62272451c182)

Currently displaying revision e1f10e83284c40c0723d62272451c182 , Show latest

From 23c929c6245e37fb3ccc8f0098bd48b05b2e27c1 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Thu, 3 Jun 2021 09:24:36 +0200
Subject: [PATCH 3/4] [kernel|test] Tweaked the global sys monitor

---
 lib/kernel/test/kernel_test_global_sys_monitor.erl | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/lib/kernel/test/kernel_test_global_sys_monitor.erl b/lib/kernel/test/kernel_test_global_sys_monitor.erl
index 43d4ab1334..6a352ab0aa 100644
--- a/lib/kernel/test/kernel_test_global_sys_monitor.erl
+++ b/lib/kernel/test/kernel_test_global_sys_monitor.erl
@@ -22,7 +22,7 @@
 
 -export([start/0, stop/0,
          reset_events/0,
-         events/0,
+         events/0, events/1,
          log/1]).
 -export([timestamp/0, format_timestamp/1]).
 -export([init/1]).
@@ -48,7 +48,11 @@ reset_events() ->
     call(reset_events, ?TIMEOUT).
 
 events() ->
-    call(events, ?TIMEOUT).
+    events(infinity).
+
+events(Timeout) when (Timeout =:= infinity) orelse
+                     (is_integer(Timeout) andalso (Timeout > 0)) ->
+    call(events, Timeout).
 
 log(Event) ->
     cast({node(), Event}).
@@ -239,7 +243,7 @@ call(Req, Timeout1, Timeout2) ->
                     NamePid when is_pid(NamePid) ->
                         receive
                             {?MODULE, Ref, Rep} ->
-                                Rep
+                                exit(Rep)
                         after Timeout2 ->
                                 {error, timeout}
                         end
-- 
2.26.2

Places

File 0203-kernel-test-Tweaked-the-global-sys-monitor.patch of Package erlang (Revision e1f10e83284c40c0723d62272451c182)

Places