aboutsummaryrefslogtreecommitdiffstats
path: root/lib/common_test/src/test_server_sup.erl
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2017-10-07 00:27:07 +0200
committerPeter Andersson <[email protected]>2017-10-25 17:28:55 +0200
commitca7eb97b48c523cf2eb26d610894f8e3057b7740 (patch)
tree9d50f2d34569e46f13f37f50924f54d2a31a8b8f /lib/common_test/src/test_server_sup.erl
parent2df013b5bfd714247570d9b4958b40f7559d35dd (diff)
downloadotp-ca7eb97b48c523cf2eb26d610894f8e3057b7740.tar.gz
otp-ca7eb97b48c523cf2eb26d610894f8e3057b7740.tar.bz2
otp-ca7eb97b48c523cf2eb26d610894f8e3057b7740.zip
Implement function that finds disposable test processes
Diffstat (limited to 'lib/common_test/src/test_server_sup.erl')
-rw-r--r--lib/common_test/src/test_server_sup.erl2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/common_test/src/test_server_sup.erl b/lib/common_test/src/test_server_sup.erl
index 5ab31e2087..6ddbf1ad27 100644
--- a/lib/common_test/src/test_server_sup.erl
+++ b/lib/common_test/src/test_server_sup.erl
@@ -56,6 +56,7 @@ timetrap(Timeout0, Scale, Pid) ->
timetrap(Timeout0, ReportTVal, Scale, Pid) ->
process_flag(priority, max),
+ ct_util:mark_process(),
Timeout = if not Scale -> Timeout0;
true -> test_server:timetrap_scale_factor() * Timeout0
end,
@@ -773,6 +774,7 @@ framework_call(Callback,Func,Args,DefaultReturn) ->
false ->
ok
end,
+ ct_util:mark_process(),
try apply(Mod,Func,Args) of
Result ->
Result