diff options
author | Peter Andersson <[email protected]> | 2017-10-07 00:27:07 +0200 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2017-10-25 17:28:55 +0200 |
commit | ca7eb97b48c523cf2eb26d610894f8e3057b7740 (patch) | |
tree | 9d50f2d34569e46f13f37f50924f54d2a31a8b8f /lib/common_test/src/test_server_sup.erl | |
parent | 2df013b5bfd714247570d9b4958b40f7559d35dd (diff) | |
download | otp-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.erl | 2 |
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 |