aboutsummaryrefslogtreecommitdiffstats
path: root/lib/common_test/src/test_server_ctrl.erl
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2017-10-06 14:22:25 +0200
committerPeter Andersson <[email protected]>2017-10-25 17:28:55 +0200
commit2df013b5bfd714247570d9b4958b40f7559d35dd (patch)
tree2c3f7208158de9b0b23617f906f402e5a6e3c326 /lib/common_test/src/test_server_ctrl.erl
parent70b6b32a9c7e3e3fca45fc3a0e11e2a5087a4660 (diff)
downloadotp-2df013b5bfd714247570d9b4958b40f7559d35dd.tar.gz
otp-2df013b5bfd714247570d9b4958b40f7559d35dd.tar.bz2
otp-2df013b5bfd714247570d9b4958b40f7559d35dd.zip
Tag Common Test system processes using process dictionary
Diffstat (limited to 'lib/common_test/src/test_server_ctrl.erl')
-rw-r--r--lib/common_test/src/test_server_ctrl.erl2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/common_test/src/test_server_ctrl.erl b/lib/common_test/src/test_server_ctrl.erl
index 71978c7267..701a45a517 100644
--- a/lib/common_test/src/test_server_ctrl.erl
+++ b/lib/common_test/src/test_server_ctrl.erl
@@ -1126,6 +1126,7 @@ init_tester(Mod, Func, Args, Dir, Name, {_,_,MinLev}=Levels,
RejectIoReqs, CreatePrivDir, TCCallback, ExtraTools) ->
process_flag(trap_exit, true),
_ = test_server_io:start_link(),
+ put(app, common_test),
put(test_server_name, Name),
put(test_server_dir, Dir),
put(test_server_total_time, 0),
@@ -3704,6 +3705,7 @@ run_test_case(Ref, Num, Mod, Func, Args, RunInit, TimetrapData, Mode) ->
spawn_link(
fun() ->
process_flag(trap_exit, true),
+ ct_util:mark_process(),
_ = [put(Key, Val) || {Key,Val} <- Dictionary],
set_io_buffering({tc,Main}),
run_test_case1(Ref, Num, Mod, Func, Args, RunInit,