diff options
author | Peter Andersson <[email protected]> | 2016-03-05 17:09:56 +0100 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2016-03-05 17:09:56 +0100 |
commit | 13051baf9f4844d4236f221311f03135144ade88 (patch) | |
tree | 85f41717ee56841d6c7fca08362226b6a0edb501 /lib/test_server/src/ts_install_cth.erl | |
parent | 3e720193641aa92d0082586ba64fc75cda32103c (diff) | |
download | otp-13051baf9f4844d4236f221311f03135144ade88.tar.gz otp-13051baf9f4844d4236f221311f03135144ade88.tar.bz2 otp-13051baf9f4844d4236f221311f03135144ade88.zip |
Add missing internal hook functions
Diffstat (limited to 'lib/test_server/src/ts_install_cth.erl')
-rw-r--r-- | lib/test_server/src/ts_install_cth.erl | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/lib/test_server/src/ts_install_cth.erl b/lib/test_server/src/ts_install_cth.erl index ec0d54ccde..0462e62611 100644 --- a/lib/test_server/src/ts_install_cth.erl +++ b/lib/test_server/src/ts_install_cth.erl @@ -41,6 +41,8 @@ -export([post_end_per_group/4]). -export([pre_init_per_testcase/3]). +-export([post_init_per_testcase/4]). +-export([pre_end_per_testcase/3]). -export([post_end_per_testcase/4]). -export([on_tc_fail/3]). @@ -181,7 +183,22 @@ post_end_per_group(_Group,_Config,Return,State) -> pre_init_per_testcase(_TC,Config,State) -> {add_node_name(Config, State), State}. +-spec post_init_per_testcase(TC :: atom(), + Config :: config(), + Return :: term(), + State :: #state{}) -> + {ok | skip_or_fail(), NewState :: #state{}}. +post_init_per_testcase(_TC,_Config,Return,State) -> + {Return, State}. + %% @doc Called after each test case. +-spec pre_end_per_testcase(TC :: atom(), + Config :: config(), + State :: #state{}) -> + {config() | skip_or_fail(), NewState :: #state{}}. +pre_end_per_testcase(_TC,Config,State) -> + {Config, State}. + -spec post_end_per_testcase(TC :: atom(), Config :: config(), Return :: term(), |