22
22
%% Tests receive after.
24
-include("test_server.hrl").
24
-include_lib("test_server/include/test_server.hrl").
26
-export([all/1, t_after/1, receive_after/1, receive_after_big/1,
26
-export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1,
27
init_per_group/2,end_per_group/2,
28
t_after/1, receive_after/1, receive_after_big/1,
27
29
receive_after_errors/1, receive_var_zero/1, receive_zero/1,
28
30
multi_timeout/1, receive_after_32bit/1]).
30
-export([init_per_testcase/2, fin_per_testcase/2]).
32
-export([init_per_testcase/2, end_per_testcase/2]).
32
34
%% Internal exports.
34
36
-export([timeout_g/0]).
37
[t_after, receive_after, receive_after_big, receive_after_errors,
38
receive_var_zero, receive_zero, multi_timeout, receive_after_32bit].
38
suite() -> [{ct_hooks,[ts_install_cth]}].
41
[t_after, receive_after, receive_after_big,
42
receive_after_errors, receive_var_zero, receive_zero,
43
multi_timeout, receive_after_32bit].
48
init_per_suite(Config) ->
51
end_per_suite(_Config) ->
54
init_per_group(_GroupName, Config) ->
57
end_per_group(_GroupName, Config) ->
40
61
init_per_testcase(Func, Config) when is_atom(Func), is_list(Config) ->
41
62
Dog=?t:timetrap(?t:minutes(3)),
42
63
[{watchdog, Dog}|Config].
44
fin_per_testcase(_Func, Config) ->
65
end_per_testcase(_Func, Config) ->
45
66
Dog=?config(watchdog, Config),
46
67
?t:timetrap_cancel(Dog).