4
%% Copyright Ericsson AB 1997-2009. All Rights Reserved.
4
%% Copyright Ericsson AB 1997-2011. All Rights Reserved.
6
6
%% The contents of this file are subject to the Erlang Public License,
7
7
%% Version 1.1, (the "License"); you may not use this file except in
20
20
-module(list_bif_SUITE).
21
-include("test_server.hrl").
21
-include_lib("test_server/include/test_server.hrl").
23
-export([all/1,init_per_testcase/2,fin_per_testcase/2]).
23
-export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1,
24
init_per_group/2,end_per_group/2,
25
init_per_testcase/2,end_per_testcase/2]).
24
26
-export([hd_test/1,tl_test/1,t_length/1,t_list_to_pid/1,
25
27
t_list_to_float/1,t_list_to_integer/1]).
29
[hd_test,tl_test,t_length,t_list_to_pid,t_list_to_float,t_list_to_integer].
30
suite() -> [{ct_hooks,[ts_install_cth]}].
33
[hd_test, tl_test, t_length, t_list_to_pid,
34
t_list_to_float, t_list_to_integer].
39
init_per_suite(Config) ->
42
end_per_suite(_Config) ->
45
init_per_group(_GroupName, Config) ->
48
end_per_group(_GroupName, Config) ->
31
52
init_per_testcase(_Case, Config) ->
32
53
?line Dog = test_server:timetrap(test_server:seconds(60)),
33
54
[{watchdog,Dog}|Config].
35
fin_per_testcase(_Case, Config) ->
56
end_per_testcase(_Case, Config) ->
36
57
Dog = ?config(watchdog, Config),
37
58
test_server:timetrap_cancel(Dog),