File 0639-fun_SUITE-Make-refc-1-test-more-reliable.patch of Package erlang

From 2263ba94602fa204981254b143eb722bf8ab81b3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org>
Date: Thu, 11 Apr 2019 14:19:10 +0200
Subject: [PATCH 09/11] fun_SUITE: Make refc/1 test more reliable

Wait a little after to make sure that fun holding process to
complete its termination.
---
 erts/emulator/test/fun_SUITE.erl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/erts/emulator/test/fun_SUITE.erl b/erts/emulator/test/fun_SUITE.erl
index 7f6caa08f1..2cbde621ce 100644
--- a/erts/emulator/test/fun_SUITE.erl
+++ b/erts/emulator/test/fun_SUITE.erl
@@ -513,6 +513,8 @@ refc(Config) when is_list(Config) ->
 	Other -> ct:fail({unexpected,Other})
     end,
     process_flag(trap_exit, false),
+    %% Wait to make sure that the process has terminated completely.
+    receive after 1 -> ok end,
     {refc,3} = erlang:fun_info(F1, refc),
 
     %% Garbage collect. Only the F2 fun will be left.
-- 
2.16.4

openSUSE Build Service is sponsored by