File 1268-megaco-test-Be-more-careful-during-node-stop.patch of Package erlang

From f3ec8ee2ec6de987613c6aa61afc27283ca8d194 Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Fri, 4 Feb 2022 19:05:50 +0100
Subject: [PATCH] [megaco|test] Be more careful during node stop

Try to make sure the node actually stops, and also be more verbose.
---
 lib/megaco/test/megaco_test_lib.erl | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/lib/megaco/test/megaco_test_lib.erl b/lib/megaco/test/megaco_test_lib.erl
index ccd3a1c0d6..44ada551b2 100644
--- a/lib/megaco/test/megaco_test_lib.erl
+++ b/lib/megaco/test/megaco_test_lib.erl
@@ -2363,10 +2363,18 @@ stop_node(Node) ->
     rpc:call(Node, erlang, halt, []),
     receive
         {nodedown, Node} ->
+            p("node ~p stopped", [Node]),
             ok
     after 10000 ->
             e("failed stop node ~p", [Node]),
-            error
+            erlang:monitor_node(Node, false),
+            receive
+                {nodedown, Node} ->
+                    p("node ~p stopped after timeout (race)", [Node]),
+                    ok
+            after 0 ->
+                    error
+            end
     end.
 
 
-- 
2.34.1