From ca7eb97b48c523cf2eb26d610894f8e3057b7740 Mon Sep 17 00:00:00 2001
From: Peter Andersson <peppe@erlang.org>
Date: Sat, 7 Oct 2017 00:27:07 +0200
Subject: Implement function that finds disposable test processes

---
 lib/common_test/src/ct.erl | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'lib/common_test/src/ct.erl')

diff --git a/lib/common_test/src/ct.erl b/lib/common_test/src/ct.erl
index a12c0c9101..8289e8d9af 100644
--- a/lib/common_test/src/ct.erl
+++ b/lib/common_test/src/ct.erl
@@ -89,6 +89,8 @@
 -export([get_target_name/1]).
 -export([parse_table/1, listenv/1]).
 
+-export([get_test_processes/0]).
+
 %%----------------------------------------------------------------------
 %% Exported types
 %%----------------------------------------------------------------------
@@ -1474,3 +1476,13 @@ continue() ->
 %%%      in order to let the test case proceed.</p>
 continue(TestCase) -> 
     test_server:continue(TestCase).
+
+
+%%%-----------------------------------------------------------------
+%%% @spec get_test_processes() -> TestProcs
+%%%       TestProcs = [{Pid,GroupLeader}]
+%%%
+%%% @doc 
+%%%
+get_test_processes() ->
+    ct_util:get_test_processes().
-- 
cgit v1.2.3