aboutsummaryrefslogtreecommitdiffstats
path: root/erts
diff options
context:
space:
mode:
authorLukas Larsson <[email protected]>2010-12-06 16:48:31 +0100
committerLukas Larsson <[email protected]>2011-02-17 17:33:19 +0100
commit83f932257470f5ae01fc61130e997fdea0562653 (patch)
tree8a9eb98fd60c89e09dca5f858f76b1b318374524 /erts
parent19d5a0e59f9897361d18b3c8987561620a212f04 (diff)
downloadotp-83f932257470f5ae01fc61130e997fdea0562653.tar.gz
otp-83f932257470f5ae01fc61130e997fdea0562653.tar.bz2
otp-83f932257470f5ae01fc61130e997fdea0562653.zip
Add ts_install_scb to suite/0
Diffstat (limited to 'erts')
-rw-r--r--erts/emulator/test/a_SUITE.erl4
-rw-r--r--erts/emulator/test/after_SUITE.erl4
-rw-r--r--erts/emulator/test/alloc_SUITE.erl4
-rw-r--r--erts/emulator/test/beam_SUITE.erl4
-rw-r--r--erts/emulator/test/beam_literals_SUITE.erl4
-rw-r--r--erts/emulator/test/bif_SUITE.erl4
-rw-r--r--erts/emulator/test/big_SUITE.erl4
-rw-r--r--erts/emulator/test/binary_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_bincomp_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_bit_binaries_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_construct_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_match_bin_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_match_int_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_match_misc_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_match_tail_SUITE.erl4
-rw-r--r--erts/emulator/test/bs_utf_SUITE.erl4
-rw-r--r--erts/emulator/test/busy_port_SUITE.erl4
-rw-r--r--erts/emulator/test/call_trace_SUITE.erl4
-rw-r--r--erts/emulator/test/code_SUITE.erl4
-rw-r--r--erts/emulator/test/crypto_SUITE.erl4
-rw-r--r--erts/emulator/test/ddll_SUITE.erl4
-rw-r--r--erts/emulator/test/decode_packet_SUITE.erl4
-rw-r--r--erts/emulator/test/distribution_SUITE.erl4
-rw-r--r--erts/emulator/test/driver_SUITE.erl4
-rw-r--r--erts/emulator/test/efile_SUITE.erl4
-rw-r--r--erts/emulator/test/erl_drv_thread_SUITE.erl4
-rw-r--r--erts/emulator/test/erl_link_SUITE.erl4
-rw-r--r--erts/emulator/test/erts_debug_SUITE.erl6
-rw-r--r--erts/emulator/test/estone_SUITE.erl4
-rw-r--r--erts/emulator/test/evil_SUITE.erl4
-rw-r--r--erts/emulator/test/exception_SUITE.erl4
-rw-r--r--erts/emulator/test/float_SUITE.erl4
-rw-r--r--erts/emulator/test/fun_SUITE.erl4
-rw-r--r--erts/emulator/test/fun_r12_SUITE.erl4
-rw-r--r--erts/emulator/test/gc_SUITE.erl4
-rw-r--r--erts/emulator/test/guard_SUITE.erl4
-rw-r--r--erts/emulator/test/hash_SUITE.erl4
-rw-r--r--erts/emulator/test/hibernate_SUITE.erl4
-rw-r--r--erts/emulator/test/list_bif_SUITE.erl4
-rw-r--r--erts/emulator/test/match_spec_SUITE.erl6
-rw-r--r--erts/emulator/test/module_info_SUITE.erl4
-rw-r--r--erts/emulator/test/monitor_SUITE.erl4
-rw-r--r--erts/emulator/test/mtx_SUITE.erl4
-rw-r--r--erts/emulator/test/nested_SUITE.erl4
-rw-r--r--erts/emulator/test/nif_SUITE.erl6
-rw-r--r--erts/emulator/test/node_container_SUITE.erl4
-rw-r--r--erts/emulator/test/nofrag_SUITE.erl4
-rw-r--r--erts/emulator/test/num_bif_SUITE.erl4
-rw-r--r--erts/emulator/test/old_scheduler_SUITE.erl4
-rw-r--r--erts/emulator/test/op_SUITE.erl4
-rw-r--r--erts/emulator/test/port_SUITE.erl4
-rw-r--r--erts/emulator/test/port_bif_SUITE.erl4
-rw-r--r--erts/emulator/test/process_SUITE.erl4
-rw-r--r--erts/emulator/test/pseudoknot_SUITE.erl4
-rw-r--r--erts/emulator/test/receive_SUITE.erl4
-rw-r--r--erts/emulator/test/ref_SUITE.erl4
-rw-r--r--erts/emulator/test/register_SUITE.erl4
-rw-r--r--erts/emulator/test/save_calls_SUITE.erl4
-rw-r--r--erts/emulator/test/scheduler_SUITE.erl4
-rw-r--r--erts/emulator/test/send_term_SUITE.erl4
-rw-r--r--erts/emulator/test/sensitive_SUITE.erl4
-rw-r--r--erts/emulator/test/signal_SUITE.erl4
-rw-r--r--erts/emulator/test/statistics_SUITE.erl4
-rw-r--r--erts/emulator/test/system_info_SUITE.erl4
-rw-r--r--erts/emulator/test/system_profile_SUITE.erl4
-rw-r--r--erts/emulator/test/time_SUITE.erl4
-rw-r--r--erts/emulator/test/timer_bif_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_bif_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_call_count_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_call_time_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_local_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_meta_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_nif_SUITE.erl4
-rw-r--r--erts/emulator/test/trace_port_SUITE.erl4
-rw-r--r--erts/emulator/test/tuple_SUITE.erl4
-rw-r--r--erts/emulator/test/z_SUITE.erl4
-rw-r--r--erts/epmd/test/epmd_SUITE.erl4
-rw-r--r--erts/test/autoimport_SUITE.erl4
-rw-r--r--erts/test/erl_print_SUITE.erl4
-rw-r--r--erts/test/erlc_SUITE.erl4
-rw-r--r--erts/test/erlexec_SUITE.erl4
-rw-r--r--erts/test/ethread_SUITE.erl4
-rw-r--r--erts/test/install_SUITE.erl4
-rw-r--r--erts/test/nt_SUITE.erl4
-rw-r--r--erts/test/otp_SUITE.erl4
-rw-r--r--erts/test/run_erl_SUITE.erl4
-rw-r--r--erts/test/z_SUITE.erl4
88 files changed, 267 insertions, 91 deletions
diff --git a/erts/emulator/test/a_SUITE.erl b/erts/emulator/test/a_SUITE.erl
index c51f70a9e6..85166761cf 100644
--- a/erts/emulator/test/a_SUITE.erl
+++ b/erts/emulator/test/a_SUITE.erl
@@ -28,7 +28,9 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2, long_timers/1, pollset_size/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, long_timers/1, pollset_size/1]).
+
+suite() -> [{suite_callbacks,[ts_install_scb]}].
all() ->
[long_timers, pollset_size].
diff --git a/erts/emulator/test/after_SUITE.erl b/erts/emulator/test/after_SUITE.erl
index cde4a69a30..5748d6ee75 100644
--- a/erts/emulator/test/after_SUITE.erl
+++ b/erts/emulator/test/after_SUITE.erl
@@ -23,7 +23,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2, t_after/1, receive_after/1, receive_after_big/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, t_after/1, receive_after/1, receive_after_big/1,
receive_after_errors/1, receive_var_zero/1, receive_zero/1,
multi_timeout/1, receive_after_32bit/1]).
@@ -33,6 +33,8 @@
-export([timeout_g/0]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[t_after, receive_after, receive_after_big,
receive_after_errors, receive_var_zero, receive_zero,
diff --git a/erts/emulator/test/alloc_SUITE.erl b/erts/emulator/test/alloc_SUITE.erl
index 6614fb045b..ed7d6ede71 100644
--- a/erts/emulator/test/alloc_SUITE.erl
+++ b/erts/emulator/test/alloc_SUITE.erl
@@ -18,7 +18,7 @@
-module(alloc_SUITE).
-author('[email protected]').
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([basic/1,
coalesce/1,
@@ -35,6 +35,8 @@
-define(DEFAULT_TIMETRAP_SECS, 240).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic, coalesce, threads, realloc_copy, bucket_index,
bucket_mask, rbtree, mseg_clear_cache].
diff --git a/erts/emulator/test/beam_SUITE.erl b/erts/emulator/test/beam_SUITE.erl
index 5c5134c99d..416ca00aa4 100644
--- a/erts/emulator/test/beam_SUITE.erl
+++ b/erts/emulator/test/beam_SUITE.erl
@@ -19,7 +19,7 @@
-module(beam_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, packed_registers/1, apply_last/1, apply_last_bif/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, packed_registers/1, apply_last/1, apply_last_bif/1,
buildo_mucho/1, heap_sizes/1, big_lists/1, fconv/1,
select_val/1]).
@@ -27,6 +27,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[packed_registers, apply_last, apply_last_bif,
buildo_mucho, heap_sizes, big_lists, select_val].
diff --git a/erts/emulator/test/beam_literals_SUITE.erl b/erts/emulator/test/beam_literals_SUITE.erl
index 1ceb4ef552..622c8dbfac 100644
--- a/erts/emulator/test/beam_literals_SUITE.erl
+++ b/erts/emulator/test/beam_literals_SUITE.erl
@@ -18,7 +18,7 @@
%%
-module(beam_literals_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([putting/1, matching_smalls/1, matching_smalls_jt/1,
matching_bigs/1, matching_more_bigs/1,
matching_bigs_and_smalls/1, badmatch/1, case_clause/1,
@@ -28,6 +28,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[putting, matching_smalls, matching_smalls_jt,
matching_bigs, matching_more_bigs,
diff --git a/erts/emulator/test/bif_SUITE.erl b/erts/emulator/test/bif_SUITE.erl
index 03b5e84bfd..6dff106bd2 100644
--- a/erts/emulator/test/bif_SUITE.erl
+++ b/erts/emulator/test/bif_SUITE.erl
@@ -21,12 +21,14 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
types/1,
t_list_to_existing_atom/1,os_env/1,otp_7526/1,
binary_to_atom/1,binary_to_existing_atom/1,
atom_to_binary/1,min_max/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[types, t_list_to_existing_atom, os_env, otp_7526,
atom_to_binary, binary_to_atom, binary_to_existing_atom,
diff --git a/erts/emulator/test/big_SUITE.erl b/erts/emulator/test/big_SUITE.erl
index d9c1c5acb3..1d70c6c08f 100644
--- a/erts/emulator/test/big_SUITE.erl
+++ b/erts/emulator/test/big_SUITE.erl
@@ -19,7 +19,7 @@
-module(big_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([t_div/1, eq_28/1, eq_32/1, eq_big/1, eq_math/1, big_literals/1,
borders/1, negative/1, big_float_1/1, big_float_2/1,
shift_limit_1/1, powmod/1, system_limit/1, otp_6692/1]).
@@ -34,6 +34,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[t_div, eq_28, eq_32, eq_big, eq_math, big_literals,
borders, negative, {group, big_float}, shift_limit_1,
diff --git a/erts/emulator/test/binary_SUITE.erl b/erts/emulator/test/binary_SUITE.erl
index 92cb70ec63..e5e7162fe3 100644
--- a/erts/emulator/test/binary_SUITE.erl
+++ b/erts/emulator/test/binary_SUITE.erl
@@ -42,7 +42,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2,
copy_terms/1, conversions/1, deep_lists/1, deep_bitstr_lists/1,
bad_list_to_binary/1, bad_binary_to_list/1,
t_split_binary/1, bad_split/1, t_concat_binary/1,
@@ -61,6 +61,8 @@
%% Internal exports.
-export([sleeper/0]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[copy_terms, conversions, deep_lists, deep_bitstr_lists,
t_split_binary, bad_split, t_concat_binary,
diff --git a/erts/emulator/test/bs_bincomp_SUITE.erl b/erts/emulator/test/bs_bincomp_SUITE.erl
index 1dee587382..cb8be7aedf 100644
--- a/erts/emulator/test/bs_bincomp_SUITE.erl
+++ b/erts/emulator/test/bs_bincomp_SUITE.erl
@@ -22,12 +22,14 @@
-module(bs_bincomp_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
byte_aligned/1,bit_aligned/1,extended_byte_aligned/1,
extended_bit_aligned/1,mixed/1,tracing/1]).
-include_lib("common_test/include/ct.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[byte_aligned, bit_aligned, extended_byte_aligned,
extended_bit_aligned, mixed, tracing].
diff --git a/erts/emulator/test/bs_bit_binaries_SUITE.erl b/erts/emulator/test/bs_bit_binaries_SUITE.erl
index 40e085342f..357e606629 100644
--- a/erts/emulator/test/bs_bit_binaries_SUITE.erl
+++ b/erts/emulator/test/bs_bit_binaries_SUITE.erl
@@ -22,7 +22,7 @@
-module(bs_bit_binaries_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
misc/1,horrid_match/1,test_bitstr/1,test_bit_size/1,asymmetric_tests/1,
big_asymmetric_tests/1,binary_to_and_from_list/1,
big_binary_to_and_from_list/1,send_and_receive/1,
@@ -30,6 +30,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[misc, horrid_match, test_bitstr, test_bit_size,
asymmetric_tests, big_asymmetric_tests,
diff --git a/erts/emulator/test/bs_construct_SUITE.erl b/erts/emulator/test/bs_construct_SUITE.erl
index c1ad198df3..498c675b85 100644
--- a/erts/emulator/test/bs_construct_SUITE.erl
+++ b/erts/emulator/test/bs_construct_SUITE.erl
@@ -21,7 +21,7 @@
-module(bs_construct_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
test1/1, test2/1, test3/1, test4/1, test5/1, testf/1,
not_used/1, in_guard/1,
mem_leak/1, coerce_to_float/1, bjorn/1,
@@ -31,6 +31,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[test1, test2, test3, test4, test5, testf, not_used,
in_guard, mem_leak, coerce_to_float, bjorn,
diff --git a/erts/emulator/test/bs_match_bin_SUITE.erl b/erts/emulator/test/bs_match_bin_SUITE.erl
index e770875181..fef8d41298 100644
--- a/erts/emulator/test/bs_match_bin_SUITE.erl
+++ b/erts/emulator/test/bs_match_bin_SUITE.erl
@@ -19,10 +19,12 @@
-module(bs_match_bin_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,byte_split_binary/1,bit_split_binary/1,match_huge_bin/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,byte_split_binary/1,bit_split_binary/1,match_huge_bin/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[byte_split_binary, bit_split_binary, match_huge_bin].
diff --git a/erts/emulator/test/bs_match_int_SUITE.erl b/erts/emulator/test/bs_match_int_SUITE.erl
index b688e0ccaa..fe60c91a20 100644
--- a/erts/emulator/test/bs_match_int_SUITE.erl
+++ b/erts/emulator/test/bs_match_int_SUITE.erl
@@ -18,13 +18,15 @@
-module(bs_match_int_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,integer/1,signed_integer/1,dynamic/1,more_dynamic/1,mml/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,integer/1,signed_integer/1,dynamic/1,more_dynamic/1,mml/1,
match_huge_int/1,bignum/1,unaligned_32_bit/1]).
-include_lib("test_server/include/test_server.hrl").
-import(lists, [seq/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[integer, signed_integer, dynamic, more_dynamic, mml,
match_huge_int, bignum, unaligned_32_bit].
diff --git a/erts/emulator/test/bs_match_misc_SUITE.erl b/erts/emulator/test/bs_match_misc_SUITE.erl
index de1664aa04..07bfc92140 100644
--- a/erts/emulator/test/bs_match_misc_SUITE.erl
+++ b/erts/emulator/test/bs_match_misc_SUITE.erl
@@ -18,13 +18,15 @@
%%
-module(bs_match_misc_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,bound_var/1,bound_tail/1,t_float/1,little_float/1,sean/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,bound_var/1,bound_tail/1,t_float/1,little_float/1,sean/1,
kenneth/1,encode_binary/1,native/1,happi/1,
size_var/1,wiger/1,x0_context/1,huge_float_field/1,
writable_binary_matched/1,otp_7198/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[bound_var, bound_tail, t_float, little_float, sean,
kenneth, encode_binary, native, happi, size_var, wiger,
diff --git a/erts/emulator/test/bs_match_tail_SUITE.erl b/erts/emulator/test/bs_match_tail_SUITE.erl
index 6e1d589069..59157e413e 100644
--- a/erts/emulator/test/bs_match_tail_SUITE.erl
+++ b/erts/emulator/test/bs_match_tail_SUITE.erl
@@ -20,10 +20,12 @@
-module(bs_match_tail_SUITE).
-author('[email protected]').
--export([all/0,groups/0,init_per_group/2,end_per_group/2,aligned/1,unaligned/1,zero_tail/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,aligned/1,unaligned/1,zero_tail/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[aligned, unaligned, zero_tail].
diff --git a/erts/emulator/test/bs_utf_SUITE.erl b/erts/emulator/test/bs_utf_SUITE.erl
index 0e61952916..14f246ee2c 100644
--- a/erts/emulator/test/bs_utf_SUITE.erl
+++ b/erts/emulator/test/bs_utf_SUITE.erl
@@ -19,7 +19,7 @@
-module(bs_utf_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
utf8_roundtrip/1,utf16_roundtrip/1,utf32_roundtrip/1,
utf8_illegal_sequences/1,utf16_illegal_sequences/1,
utf32_illegal_sequences/1,
@@ -37,6 +37,8 @@ fin_per_testcase(_Func, Config) ->
Dog = ?config(watchdog, Config),
?t:timetrap_cancel(Dog).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[utf8_roundtrip, utf16_roundtrip, utf32_roundtrip,
utf8_illegal_sequences, utf16_illegal_sequences,
diff --git a/erts/emulator/test/busy_port_SUITE.erl b/erts/emulator/test/busy_port_SUITE.erl
index e4c7800310..f4a0bfde00 100644
--- a/erts/emulator/test/busy_port_SUITE.erl
+++ b/erts/emulator/test/busy_port_SUITE.erl
@@ -19,7 +19,7 @@
-module(busy_port_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, io_to_busy/1, message_order/1, send_3/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, io_to_busy/1, message_order/1, send_3/1,
system_monitor/1, no_trap_exit/1,
no_trap_exit_unlinked/1, trap_exit/1, multiple_writers/1,
hard_busy_driver/1, soft_busy_driver/1]).
@@ -29,6 +29,8 @@
%% Internal exports.
-export([init/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[io_to_busy, message_order, send_3, system_monitor,
no_trap_exit, no_trap_exit_unlinked, trap_exit,
diff --git a/erts/emulator/test/call_trace_SUITE.erl b/erts/emulator/test/call_trace_SUITE.erl
index b2b6144ba1..670e30e641 100644
--- a/erts/emulator/test/call_trace_SUITE.erl
+++ b/erts/emulator/test/call_trace_SUITE.erl
@@ -20,7 +20,7 @@
-module(call_trace_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
hipe/1,process_specs/1,basic/1,flags/1,errors/1,pam/1,change_pam/1,
return_trace/1,exception_trace/1,on_load/1,deep_exception/1,
exception_nocatch/1,bit_syntax/1]).
@@ -39,6 +39,8 @@
-define(P, 20).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
Common = [errors, on_load],
NotHipe = [process_specs, basic, flags, pam, change_pam,
diff --git a/erts/emulator/test/code_SUITE.erl b/erts/emulator/test/code_SUITE.erl
index beebab892f..38f426efd4 100644
--- a/erts/emulator/test/code_SUITE.erl
+++ b/erts/emulator/test/code_SUITE.erl
@@ -18,7 +18,7 @@
%%
-module(code_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
new_binary_types/1,t_check_process_code/1,t_check_process_code_ets/1,
external_fun/1,get_chunk/1,module_md5/1,make_stub/1,
make_stub_many_funs/1,constant_pools/1,
@@ -26,6 +26,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[new_binary_types, t_check_process_code,
t_check_process_code_ets, external_fun, get_chunk,
diff --git a/erts/emulator/test/crypto_SUITE.erl b/erts/emulator/test/crypto_SUITE.erl
index a1f6349cf5..e9cd41c312 100644
--- a/erts/emulator/test/crypto_SUITE.erl
+++ b/erts/emulator/test/crypto_SUITE.erl
@@ -21,10 +21,12 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
t_md5/1,t_md5_update/1,error/1,unaligned_context/1,random_lists/1,
misc_errors/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[t_md5, t_md5_update, error, unaligned_context,
random_lists, misc_errors].
diff --git a/erts/emulator/test/ddll_SUITE.erl b/erts/emulator/test/ddll_SUITE.erl
index 23b6013ff2..fd1eff5a1e 100644
--- a/erts/emulator/test/ddll_SUITE.erl
+++ b/erts/emulator/test/ddll_SUITE.erl
@@ -30,7 +30,7 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
--export([all/0,groups/0,init_per_group/2,end_per_group/2, ddll_test/1, errors/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, ddll_test/1, errors/1,
reference_count/1,
kill_port/1, dont_kill_port/1]).
-export([unload_on_process_exit/1, delayed_unload_with_ports/1,
@@ -52,6 +52,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[ddll_test, errors, reference_count, kill_port,
dont_kill_port, properties, load_and_unload,
diff --git a/erts/emulator/test/decode_packet_SUITE.erl b/erts/emulator/test/decode_packet_SUITE.erl
index 40bfbc6204..93b095206b 100644
--- a/erts/emulator/test/decode_packet_SUITE.erl
+++ b/erts/emulator/test/decode_packet_SUITE.erl
@@ -23,9 +23,11 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
basic/1, packet_size/1, neg/1, http/1, line/1, ssl/1, otp_8536/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic, packet_size, neg, http, line, ssl, otp_8536].
diff --git a/erts/emulator/test/distribution_SUITE.erl b/erts/emulator/test/distribution_SUITE.erl
index 8456bcec0e..93423fa952 100644
--- a/erts/emulator/test/distribution_SUITE.erl
+++ b/erts/emulator/test/distribution_SUITE.erl
@@ -24,7 +24,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
ping/1, bulk_send_small/1,
bulk_send_big/1, bulk_send_bigbig/1,
local_send_small/1, local_send_big/1,
@@ -53,6 +53,8 @@
dist_evil_parallel_receiver/0,
sendersender/4, sendersender2/4]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[ping, {group, bulk_send}, {group, local_send},
link_to_busy, exit_to_busy, lost_exit, link_to_dead,
diff --git a/erts/emulator/test/driver_SUITE.erl b/erts/emulator/test/driver_SUITE.erl
index 7f27536ee2..62a3fbcce2 100644
--- a/erts/emulator/test/driver_SUITE.erl
+++ b/erts/emulator/test/driver_SUITE.erl
@@ -27,7 +27,7 @@
%%% - queueing
-module(driver_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
init_per_testcase/2,
fin_per_testcase/2,
end_per_suite/1,
@@ -129,6 +129,8 @@ fin_per_testcase(Case, Config) ->
end_per_suite(_Config) ->
catch erts_debug:set_internal_state(available_internal_state, false).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[fun_to_port, outputv_echo, queue_echo, {group, timer},
driver_unloaded, io_ready_exit, use_fallback_pollset,
diff --git a/erts/emulator/test/efile_SUITE.erl b/erts/emulator/test/efile_SUITE.erl
index 1380f797a4..5b6b35ae32 100644
--- a/erts/emulator/test/efile_SUITE.erl
+++ b/erts/emulator/test/efile_SUITE.erl
@@ -17,11 +17,13 @@
%% %CopyrightEnd%
-module(efile_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([iter_max_files/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[iter_max_files].
diff --git a/erts/emulator/test/erl_drv_thread_SUITE.erl b/erts/emulator/test/erl_drv_thread_SUITE.erl
index 30b32dbcf7..685cbda728 100644
--- a/erts/emulator/test/erl_drv_thread_SUITE.erl
+++ b/erts/emulator/test/erl_drv_thread_SUITE.erl
@@ -19,7 +19,7 @@
-module(erl_drv_thread_SUITE).
-author('[email protected]').
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([basic/1, rwlock/1, tsd/1]).
@@ -27,6 +27,8 @@
-define(DEFAULT_TIMETRAP_SECS, 240).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic, rwlock, tsd].
diff --git a/erts/emulator/test/erl_link_SUITE.erl b/erts/emulator/test/erl_link_SUITE.erl
index 772c873d0b..1cb6eb2e39 100644
--- a/erts/emulator/test/erl_link_SUITE.erl
+++ b/erts/emulator/test/erl_link_SUITE.erl
@@ -30,7 +30,7 @@
%-define(line_trace, 1).
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
% Test cases
-export([links/1,
@@ -77,6 +77,8 @@
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[links, dist_links, monitor_nodes, process_monitors,
dist_process_monitors, busy_dist_port_monitor,
diff --git a/erts/emulator/test/erts_debug_SUITE.erl b/erts/emulator/test/erts_debug_SUITE.erl
index 741d22f531..fc68632e80 100644
--- a/erts/emulator/test/erts_debug_SUITE.erl
+++ b/erts/emulator/test/erts_debug_SUITE.erl
@@ -20,8 +20,10 @@
-module(erts_debug_SUITE).
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
- flat_size/1,flat_size_big/1,df/1,instructions/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+ flat_size/1,flat_size_big/1,df/1, instructions/1]).
+
+suite() -> [{suite_callbacks,[ts_install_scb]}].
all() ->
[flat_size, flat_size_big, df, instructions].
diff --git a/erts/emulator/test/estone_SUITE.erl b/erts/emulator/test/estone_SUITE.erl
index d5e8d78b47..66efeed331 100644
--- a/erts/emulator/test/estone_SUITE.erl
+++ b/erts/emulator/test/estone_SUITE.erl
@@ -18,7 +18,7 @@
-module(estone_SUITE).
%% Test functions
--export([all/0,groups/0,init_per_group/2,end_per_group/2,estone/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,estone/1]).
-export([init_per_testcase/2, fin_per_testcase/2]).
%% Internal exports for EStone tests
@@ -73,6 +73,8 @@ fin_per_testcase(_Case, Config) ->
?t:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[estone].
diff --git a/erts/emulator/test/evil_SUITE.erl b/erts/emulator/test/evil_SUITE.erl
index 38436c7fb7..1c75edc466 100644
--- a/erts/emulator/test/evil_SUITE.erl
+++ b/erts/emulator/test/evil_SUITE.erl
@@ -18,7 +18,7 @@
-module(evil_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
heap_frag/1,
encode_decode_ext/1,
decode_integer_ext/1,
@@ -32,6 +32,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[heap_frag, encode_decode_ext, decode_integer_ext,
decode_small_big_ext, decode_large_big_ext,
diff --git a/erts/emulator/test/exception_SUITE.erl b/erts/emulator/test/exception_SUITE.erl
index c501bc95ba..24252be176 100644
--- a/erts/emulator/test/exception_SUITE.erl
+++ b/erts/emulator/test/exception_SUITE.erl
@@ -19,7 +19,7 @@
-module(exception_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, badmatch/1, pending_errors/1, nil_arith/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, badmatch/1, pending_errors/1, nil_arith/1,
stacktrace/1, nested_stacktrace/1, raise/1, gunilla/1, per/1,
exception_with_heap_frag/1]).
@@ -28,6 +28,8 @@
-include_lib("test_server/include/test_server.hrl").
-import(lists, [foreach/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[badmatch, pending_errors, nil_arith, stacktrace,
nested_stacktrace, raise, gunilla, per,
diff --git a/erts/emulator/test/float_SUITE.erl b/erts/emulator/test/float_SUITE.erl
index 3dbc6aa1b5..46ff8ff192 100644
--- a/erts/emulator/test/float_SUITE.erl
+++ b/erts/emulator/test/float_SUITE.erl
@@ -21,7 +21,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
fpe/1,fp_drv/1,fp_drv_thread/1,denormalized/1,match/1,
bad_float_unpack/1]).
-export([otp_7178/1]).
@@ -35,6 +35,8 @@ fin_per_testcase(_Func, Config) ->
Dog = ?config(watchdog, Config),
?t:timetrap_cancel(Dog).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[fpe, fp_drv, fp_drv_thread, otp_7178, denormalized,
match, bad_float_unpack].
diff --git a/erts/emulator/test/fun_SUITE.erl b/erts/emulator/test/fun_SUITE.erl
index 25d189d906..b8be503b71 100644
--- a/erts/emulator/test/fun_SUITE.erl
+++ b/erts/emulator/test/fun_SUITE.erl
@@ -22,7 +22,7 @@
-define(default_timeout, ?t:minutes(1)).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
bad_apply/1,bad_fun_call/1,badarity/1,ext_badarity/1,
equality/1,ordering/1,
fun_to_port/1,t_hash/1,t_phash/1,t_phash2/1,md5/1,
@@ -34,6 +34,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[bad_apply, bad_fun_call, badarity, ext_badarity,
equality, ordering, fun_to_port, t_hash, t_phash,
diff --git a/erts/emulator/test/fun_r12_SUITE.erl b/erts/emulator/test/fun_r12_SUITE.erl
index bf928329d4..05fc1af4be 100644
--- a/erts/emulator/test/fun_r12_SUITE.erl
+++ b/erts/emulator/test/fun_r12_SUITE.erl
@@ -20,11 +20,13 @@
-module(fun_r12_SUITE).
-compile(r12).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,dist_old_release/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,dist_old_release/1]).
-define(default_timeout, ?t:minutes(1)).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[dist_old_release].
diff --git a/erts/emulator/test/gc_SUITE.erl b/erts/emulator/test/gc_SUITE.erl
index 1e5c3a67f7..1f944e79fa 100644
--- a/erts/emulator/test/gc_SUITE.erl
+++ b/erts/emulator/test/gc_SUITE.erl
@@ -22,12 +22,14 @@
-module(gc_SUITE).
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-define(default_timeout, ?t:minutes(10)).
-export([grow_heap/1, grow_stack/1, grow_stack_heap/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[grow_heap, grow_stack, grow_stack_heap].
diff --git a/erts/emulator/test/guard_SUITE.erl b/erts/emulator/test/guard_SUITE.erl
index 81ce24826e..b0f4530557 100644
--- a/erts/emulator/test/guard_SUITE.erl
+++ b/erts/emulator/test/guard_SUITE.erl
@@ -19,7 +19,7 @@
-module(guard_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, bad_arith/1, bad_tuple/1, test_heap_guards/1, guard_bifs/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, bad_arith/1, bad_tuple/1, test_heap_guards/1, guard_bifs/1,
type_tests/1,guard_bif_binary_part/1]).
-include_lib("test_server/include/test_server.hrl").
@@ -27,6 +27,8 @@
-export([init/3]).
-import(lists, [member/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[bad_arith, bad_tuple, test_heap_guards, guard_bifs,
type_tests, guard_bif_binary_part].
diff --git a/erts/emulator/test/hash_SUITE.erl b/erts/emulator/test/hash_SUITE.erl
index d5841b9e93..7dd4e23e9f 100644
--- a/erts/emulator/test/hash_SUITE.erl
+++ b/erts/emulator/test/hash_SUITE.erl
@@ -69,7 +69,7 @@ config(priv_dir,_) ->
".".
-else.
%% When run in test server.
--export([all/0,groups/0,init_per_group/2,end_per_group/2,test_basic/1,test_cmp/1,test_range/1,test_spread/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,test_basic/1,test_cmp/1,test_range/1,test_spread/1,
test_phash2/1,otp_5292/1,bit_level_binaries/1,otp_7127/1,
fin_per_testcase/2,init_per_testcase/2]).
init_per_testcase(_Case, Config) ->
@@ -80,6 +80,8 @@ fin_per_testcase(_Case, Config) ->
Dog=?config(watchdog, Config),
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[test_basic, test_cmp, test_range, test_spread,
test_phash2, otp_5292, bit_level_binaries, otp_7127].
diff --git a/erts/emulator/test/hibernate_SUITE.erl b/erts/emulator/test/hibernate_SUITE.erl
index f8c1816998..f6f553eb40 100644
--- a/erts/emulator/test/hibernate_SUITE.erl
+++ b/erts/emulator/test/hibernate_SUITE.erl
@@ -21,13 +21,15 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
basic/1,min_heap_size/1,bad_args/1,
messages_in_queue/1,undefined_mfa/1, no_heap/1]).
%% Used by test cases.
-export([basic_hibernator/1,messages_in_queue_restart/2, no_heap_loop/0]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic, min_heap_size, bad_args, messages_in_queue,
undefined_mfa, no_heap].
diff --git a/erts/emulator/test/list_bif_SUITE.erl b/erts/emulator/test/list_bif_SUITE.erl
index 3ecb2e8ba3..412b31c44c 100644
--- a/erts/emulator/test/list_bif_SUITE.erl
+++ b/erts/emulator/test/list_bif_SUITE.erl
@@ -20,11 +20,13 @@
-module(list_bif_SUITE).
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2]).
-export([hd_test/1,tl_test/1,t_length/1,t_list_to_pid/1,
t_list_to_float/1,t_list_to_integer/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[hd_test, tl_test, t_length, t_list_to_pid,
t_list_to_float, t_list_to_integer].
diff --git a/erts/emulator/test/match_spec_SUITE.erl b/erts/emulator/test/match_spec_SUITE.erl
index 6206da7a14..c475a1bb05 100644
--- a/erts/emulator/test/match_spec_SUITE.erl
+++ b/erts/emulator/test/match_spec_SUITE.erl
@@ -19,7 +19,7 @@
-module(match_spec_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, not_run/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, not_run/1]).
-export([test_1/1, test_2/1, test_3/1, bad_match_spec_bin/1,
trace_control_word/1, silent/1, silent_no_ms/1,
ms_trace2/1, ms_trace3/1, boxed_and_small/1,
@@ -29,7 +29,7 @@
-export([runner/2]).
-export([f1/1, f2/2, f3/2, fn/1, fn/2, fn/3]).
--export([do_boxed_and_small/0]).
+-export([do_boxed_and_small/0, suite/0]).
% This test suite assumes that tracing in general works. What we test is
% the match spec functionality.
@@ -47,6 +47,8 @@ fin_per_testcase(_Func, Config) ->
?t:timetrap_cancel(Dog).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(match_spec_SUITE) of
false ->
diff --git a/erts/emulator/test/module_info_SUITE.erl b/erts/emulator/test/module_info_SUITE.erl
index 4d87e07937..d881c02e4a 100644
--- a/erts/emulator/test/module_info_SUITE.erl
+++ b/erts/emulator/test/module_info_SUITE.erl
@@ -21,7 +21,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,end_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,end_per_testcase/2,
exports/1,functions/1,native/1]).
%%-compile(native).
@@ -29,6 +29,8 @@
%% Helper.
-export([native_proj/1,native_filter/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
modules().
diff --git a/erts/emulator/test/monitor_SUITE.erl b/erts/emulator/test/monitor_SUITE.erl
index 3ffa7a4079..ee2082991d 100644
--- a/erts/emulator/test/monitor_SUITE.erl
+++ b/erts/emulator/test/monitor_SUITE.erl
@@ -21,7 +21,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
case_1/1, case_1a/1, case_2/1, case_2a/1, mon_e_1/1, demon_e_1/1, demon_1/1,
demon_2/1, demon_3/1, demonitor_flush/1,
local_remove_monitor/1, remote_remove_monitor/1, mon_1/1, mon_2/1,
@@ -31,6 +31,8 @@
-export([y2/1, g/1, g0/0, g1/0, large_exit_sub/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[case_1, case_1a, case_2, case_2a, mon_e_1, demon_e_1,
demon_1, mon_1, mon_2, demon_2, demon_3,
diff --git a/erts/emulator/test/mtx_SUITE.erl b/erts/emulator/test/mtx_SUITE.erl
index ddeae9103a..806c0adfd5 100644
--- a/erts/emulator/test/mtx_SUITE.erl
+++ b/erts/emulator/test/mtx_SUITE.erl
@@ -28,7 +28,7 @@
-include_lib("common_test/include/ct.hrl").
--export([all/0,groups/0,
+-export([all/0,suite/0,groups/0,
init_per_group/2,end_per_group/2, init_per_suite/1,
end_per_suite/1, init_per_testcase/2, end_per_testcase/2]).
@@ -72,6 +72,8 @@ end_per_testcase(_Func, Config) ->
Dog = ?config(watchdog, Config),
?t:timetrap_cancel(Dog).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[long_rwlock, hammer_rwlock_check, hammer_rwlock,
hammer_tryrwlock_check, hammer_tryrwlock,
diff --git a/erts/emulator/test/nested_SUITE.erl b/erts/emulator/test/nested_SUITE.erl
index f817c18a17..a8b6018c45 100644
--- a/erts/emulator/test/nested_SUITE.erl
+++ b/erts/emulator/test/nested_SUITE.erl
@@ -19,10 +19,12 @@
-module(nested_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, case_in_case/1, case_in_after/1, catch_in_catch/1, bif_in_bif/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, case_in_case/1, case_in_after/1, catch_in_catch/1, bif_in_bif/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[case_in_case, case_in_after, catch_in_catch,
bif_in_bif].
diff --git a/erts/emulator/test/nif_SUITE.erl b/erts/emulator/test/nif_SUITE.erl
index e7f604bde6..991fbce96f 100644
--- a/erts/emulator/test/nif_SUITE.erl
+++ b/erts/emulator/test/nif_SUITE.erl
@@ -25,7 +25,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
%%init_per_testcase/2,
fin_per_testcase/2, basic/1, reload/1, upgrade/1, heap_frag/1,
types/1, many_args/1, binaries/1, get_string/1, get_atom/1, api_macros/1,
@@ -40,7 +40,7 @@
%% list_seq/1,type_test/0,tuple_2_list/1,is_identical/2,compare/2,
%% clone_bin/1,make_sub_bin/3,string_to_bin/2,atom_to_bin/2,macros/1,
%% tuple_2_list_and_tuple/1,iolist_2_bin/1,get_resource_type/1,alloc_resource/2,
-%% make_resource/1,get_resource/2,release_resource/1,last_resource_dtor_call/0,
+%% make_resource/1,get_resource/2,release_resource/1,last_resource_dtor_call/0, suite/0,
%% make_new_resource/2,make_new_resource_binary/1,send_list_seq/2,send_new_blob/2,
%% alloc_msgenv/0,clear_msgenv/1,grow_blob/2,send_blob/2,send_blob_thread/3,
%% join_send_thread/1]).
@@ -48,6 +48,8 @@
-define(nif_stub,nif_stub_error(?LINE)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic, reload, upgrade, heap_frag, types, many_args,
binaries, get_string, get_atom, api_macros, from_array,
diff --git a/erts/emulator/test/node_container_SUITE.erl b/erts/emulator/test/node_container_SUITE.erl
index 0b3ce6326d..ca90934421 100644
--- a/erts/emulator/test/node_container_SUITE.erl
+++ b/erts/emulator/test/node_container_SUITE.erl
@@ -32,7 +32,7 @@
-include_lib("test_server/include/test_server.hrl").
%-compile(export_all).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, end_per_suite/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, end_per_suite/1,
node_container_refc_check/1]).
-export([term_to_binary_to_term_eq/1,
@@ -55,6 +55,8 @@
-define(DEFAULT_TIMEOUT, ?t:minutes(10)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[term_to_binary_to_term_eq, round_trip_eq, cmp, ref_eq,
node_table_gc, dist_link_refc, dist_monitor_refc,
diff --git a/erts/emulator/test/nofrag_SUITE.erl b/erts/emulator/test/nofrag_SUITE.erl
index 3ddbc9d3ca..6898c7c75b 100644
--- a/erts/emulator/test/nofrag_SUITE.erl
+++ b/erts/emulator/test/nofrag_SUITE.erl
@@ -21,7 +21,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,end_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,end_per_testcase/2,
error_handler/1,error_handler_apply/1,
error_handler_fixed_apply/1,error_handler_fun/1,
error_handler_tuple_fun/1,
@@ -30,6 +30,8 @@
%% Exported functions for an error_handler module.
-export([undefined_function/3,undefined_lambda/3,breakpoint/3]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[error_handler, error_handler_apply,
error_handler_fixed_apply, error_handler_fun,
diff --git a/erts/emulator/test/num_bif_SUITE.erl b/erts/emulator/test/num_bif_SUITE.erl
index 1646ad8261..25f63f6fe1 100644
--- a/erts/emulator/test/num_bif_SUITE.erl
+++ b/erts/emulator/test/num_bif_SUITE.erl
@@ -31,12 +31,14 @@
%% round/1
%% trunc/1
--export([all/0,groups/0,init_per_group/2,end_per_group/2, t_abs/1, t_float/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, t_abs/1, t_float/1,
t_float_to_list/1, t_integer_to_list/1,
t_list_to_integer/1,
t_list_to_float_safe/1, t_list_to_float_risky/1,
t_round/1, t_trunc/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[t_abs, t_float, t_float_to_list, t_integer_to_list,
{group, t_list_to_float}, t_list_to_integer, t_round,
diff --git a/erts/emulator/test/old_scheduler_SUITE.erl b/erts/emulator/test/old_scheduler_SUITE.erl
index 77cfd39d7f..f8f62bd7b6 100644
--- a/erts/emulator/test/old_scheduler_SUITE.erl
+++ b/erts/emulator/test/old_scheduler_SUITE.erl
@@ -21,11 +21,13 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([equal/1, many_low/1, few_low/1, max/1, high/1]).
-define(default_timeout, ?t:minutes(11)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case catch erlang:system_info(modified_timing_level) of
Level when is_integer(Level) ->
diff --git a/erts/emulator/test/op_SUITE.erl b/erts/emulator/test/op_SUITE.erl
index 2a01e42b07..17929cfbd1 100644
--- a/erts/emulator/test/op_SUITE.erl
+++ b/erts/emulator/test/op_SUITE.erl
@@ -21,12 +21,14 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
bsl_bsr/1,logical/1,t_not/1,relop_simple/1,relop/1,complex_relop/1]).
-export([]).
-import(lists, [foldl/3,flatmap/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[bsl_bsr, logical, t_not, relop_simple, relop,
complex_relop].
diff --git a/erts/emulator/test/port_SUITE.erl b/erts/emulator/test/port_SUITE.erl
index 125f983b92..8315e2a9a6 100644
--- a/erts/emulator/test/port_SUITE.erl
+++ b/erts/emulator/test/port_SUITE.erl
@@ -73,7 +73,7 @@
%%
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2,
init_per_suite/1, end_per_suite/1,
stream_small/1, stream_big/1,
basic_ping/1, slow_writes/1, bad_packet/1, bad_port_messages/1,
@@ -101,6 +101,8 @@
-include_lib("test_server/include/test_server.hrl").
-include_lib("kernel/include/file.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[otp_6224, {group, stream}, basic_ping, slow_writes,
bad_packet, bad_port_messages, {group, options},
diff --git a/erts/emulator/test/port_bif_SUITE.erl b/erts/emulator/test/port_bif_SUITE.erl
index b22f9be3cb..32dc280956 100644
--- a/erts/emulator/test/port_bif_SUITE.erl
+++ b/erts/emulator/test/port_bif_SUITE.erl
@@ -20,7 +20,7 @@
-module(port_bif_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, command/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, command/1,
command_e_1/1, command_e_2/1, command_e_3/1, command_e_4/1,
port_info1/1, port_info2/1,
connect/1, control/1, echo_to_busy/1]).
@@ -31,6 +31,8 @@
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[command, {group, port_info}, connect, control,
echo_to_busy].
diff --git a/erts/emulator/test/process_SUITE.erl b/erts/emulator/test/process_SUITE.erl
index 4def835a37..d31a4fe954 100644
--- a/erts/emulator/test/process_SUITE.erl
+++ b/erts/emulator/test/process_SUITE.erl
@@ -29,7 +29,7 @@
-define(heap_binary_size, 64).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, spawn_with_binaries/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, spawn_with_binaries/1,
t_exit_1/1, t_exit_2_other/1, t_exit_2_other_normal/1,
self_exit/1, normal_suicide_exit/1, abnormal_suicide_exit/1,
t_exit_2_catch/1, trap_exit_badarg/1, trap_exit_badarg_in_bif/1,
@@ -56,6 +56,8 @@
-export([hangaround/2, processes_bif_test/0, do_processes/1,
processes_term_proc_list_test/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[spawn_with_binaries, t_exit_1, {group, t_exit_2},
trap_exit_badarg, trap_exit_badarg_in_bif,
diff --git a/erts/emulator/test/pseudoknot_SUITE.erl b/erts/emulator/test/pseudoknot_SUITE.erl
index 1fc1952278..8d7c88e49b 100644
--- a/erts/emulator/test/pseudoknot_SUITE.erl
+++ b/erts/emulator/test/pseudoknot_SUITE.erl
@@ -19,7 +19,9 @@
-module(pseudoknot_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,test/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,test/1]).
+
+suite() -> [{suite_callbacks,[ts_install_scb]}].
all() ->
[test].
diff --git a/erts/emulator/test/receive_SUITE.erl b/erts/emulator/test/receive_SUITE.erl
index a64fd8a8c5..faaa3a19ad 100644
--- a/erts/emulator/test/receive_SUITE.erl
+++ b/erts/emulator/test/receive_SUITE.erl
@@ -23,11 +23,13 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
call_with_huge_message_queue/1,receive_in_between/1]).
-export([init_per_testcase/2,fin_per_testcase/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[call_with_huge_message_queue, receive_in_between].
diff --git a/erts/emulator/test/ref_SUITE.erl b/erts/emulator/test/ref_SUITE.erl
index 79ac5cb860..6596cbda26 100644
--- a/erts/emulator/test/ref_SUITE.erl
+++ b/erts/emulator/test/ref_SUITE.erl
@@ -19,7 +19,7 @@
-module(ref_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2]).
-export([wrap_1/1]).
-export([loop_ref/1]).
@@ -35,6 +35,8 @@ fin_per_testcase(_, Config) ->
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[wrap_1].
diff --git a/erts/emulator/test/register_SUITE.erl b/erts/emulator/test/register_SUITE.erl
index 781aefea85..cfb1ce4f40 100644
--- a/erts/emulator/test/register_SUITE.erl
+++ b/erts/emulator/test/register_SUITE.erl
@@ -25,12 +25,14 @@
-include_lib("test_server/include/test_server.hrl").
%-compile(export_all).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([otp_8099/1]).
-define(DEFAULT_TIMEOUT, ?t:minutes(2)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[otp_8099].
diff --git a/erts/emulator/test/save_calls_SUITE.erl b/erts/emulator/test/save_calls_SUITE.erl
index 78ea982419..ae1a9e0b43 100644
--- a/erts/emulator/test/save_calls_SUITE.erl
+++ b/erts/emulator/test/save_calls_SUITE.erl
@@ -21,12 +21,14 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([save_calls_1/1,dont_break_reductions/1]).
-export([do_bopp/1, do_bipp/0, do_bepp/0]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[save_calls_1, dont_break_reductions].
diff --git a/erts/emulator/test/scheduler_SUITE.erl b/erts/emulator/test/scheduler_SUITE.erl
index 324b08f078..cc6fba2ff9 100644
--- a/erts/emulator/test/scheduler_SUITE.erl
+++ b/erts/emulator/test/scheduler_SUITE.erl
@@ -33,7 +33,7 @@
-include_lib("test_server/include/test_server.hrl").
%-compile(export_all).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, end_per_suite/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, end_per_suite/1]).
-export([equal/1,
few_low/1,
@@ -57,6 +57,8 @@
-define(MIN_SCHEDULER_TEST_TIMEOUT, ?t:minutes(1)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[equal, few_low, many_low, equal_with_part_time_high,
equal_with_part_time_max,
diff --git a/erts/emulator/test/send_term_SUITE.erl b/erts/emulator/test/send_term_SUITE.erl
index d898646f4b..5e33f9dae6 100644
--- a/erts/emulator/test/send_term_SUITE.erl
+++ b/erts/emulator/test/send_term_SUITE.erl
@@ -19,7 +19,7 @@
-module(send_term_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,basic/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,basic/1]).
-export([init_per_testcase/2,fin_per_testcase/2]).
-export([generate_external_terms_files/1]).
@@ -34,6 +34,8 @@ fin_per_testcase(_Func, Config) ->
Dog=?config(watchdog, Config),
?t:timetrap_cancel(Dog).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic].
diff --git a/erts/emulator/test/sensitive_SUITE.erl b/erts/emulator/test/sensitive_SUITE.erl
index 0a8c955361..8fab014f38 100644
--- a/erts/emulator/test/sensitive_SUITE.erl
+++ b/erts/emulator/test/sensitive_SUITE.erl
@@ -21,7 +21,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
stickiness/1,send_trace/1,recv_trace/1,proc_trace/1,call_trace/1,
meta_trace/1,running_trace/1,gc_trace/1,seq_trace/1,
t_process_info/1,t_process_display/1,save_calls/1]).
@@ -38,6 +38,8 @@ fin_per_testcase(Func, Config) when is_atom(Func), is_list(Config) ->
Dog = ?config(watchdog, Config),
?t:timetrap_cancel(Dog).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[stickiness, send_trace, recv_trace, proc_trace,
call_trace, meta_trace, running_trace, gc_trace,
diff --git a/erts/emulator/test/signal_SUITE.erl b/erts/emulator/test/signal_SUITE.erl
index fa330f8f1c..9ff1089453 100644
--- a/erts/emulator/test/signal_SUITE.erl
+++ b/erts/emulator/test/signal_SUITE.erl
@@ -31,7 +31,7 @@
%-define(line_trace, 1).
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
% Test cases
-export([xm_sig_order/1,
@@ -65,6 +65,8 @@ end_per_suite(_Config) ->
erts_debug:set_internal_state(not_running_optimization, true),
available_internal_state(false).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[xm_sig_order, pending_exit_unlink_process,
pending_exit_unlink_dist_process,
diff --git a/erts/emulator/test/statistics_SUITE.erl b/erts/emulator/test/statistics_SUITE.erl
index bbe659547b..75dedc1c7d 100644
--- a/erts/emulator/test/statistics_SUITE.erl
+++ b/erts/emulator/test/statistics_SUITE.erl
@@ -21,7 +21,7 @@
%% Tests the statistics/1 bif.
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
init_per_testcase/2,
fin_per_testcase/2,
wall_clock_zero_diff/1, wall_clock_update/1,
@@ -46,6 +46,8 @@ fin_per_testcase(_, Config) ->
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[{group, wall_clock}, {group, runtime}, reductions,
reductions_big, {group, run_queue}, garbage_collection,
diff --git a/erts/emulator/test/system_info_SUITE.erl b/erts/emulator/test/system_info_SUITE.erl
index 9cbc46659c..6bf405ccea 100644
--- a/erts/emulator/test/system_info_SUITE.erl
+++ b/erts/emulator/test/system_info_SUITE.erl
@@ -33,12 +33,14 @@
-include_lib("test_server/include/test_server.hrl").
%-compile(export_all).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([process_count/1, system_version/1, misc_smoke_tests/1, heap_size/1, wordsize/1]).
-define(DEFAULT_TIMEOUT, ?t:minutes(2)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[process_count, system_version, misc_smoke_tests,
heap_size, wordsize].
diff --git a/erts/emulator/test/system_profile_SUITE.erl b/erts/emulator/test/system_profile_SUITE.erl
index d5d15c91eb..785f132c4a 100644
--- a/erts/emulator/test/system_profile_SUITE.erl
+++ b/erts/emulator/test/system_profile_SUITE.erl
@@ -22,7 +22,7 @@
-module(system_profile_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,
system_profile_on_and_off/1,
runnable_procs/1,
runnable_ports/1,
@@ -45,6 +45,8 @@ fin_per_testcase(_Case, Config) ->
?t:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[system_profile_on_and_off, runnable_procs,
runnable_ports, scheduler].
diff --git a/erts/emulator/test/time_SUITE.erl b/erts/emulator/test/time_SUITE.erl
index 636abd288e..e826c9de63 100644
--- a/erts/emulator/test/time_SUITE.erl
+++ b/erts/emulator/test/time_SUITE.erl
@@ -29,7 +29,7 @@
%% now/0
%%
--export([all/0,groups/0,init_per_group/2,end_per_group/2, univ_to_local/1, local_to_univ/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, univ_to_local/1, local_to_univ/1,
bad_univ_to_local/1, bad_local_to_univ/1,
consistency/1,
now_unique/1, now_update/1, timestamp/1]).
@@ -54,6 +54,8 @@
-define(dst_timezone, 2).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[univ_to_local, local_to_univ, local_to_univ_utc,
bad_univ_to_local, bad_local_to_univ, consistency,
diff --git a/erts/emulator/test/timer_bif_SUITE.erl b/erts/emulator/test/timer_bif_SUITE.erl
index 157311d381..bd03297ad2 100644
--- a/erts/emulator/test/timer_bif_SUITE.erl
+++ b/erts/emulator/test/timer_bif_SUITE.erl
@@ -19,7 +19,7 @@
-module(timer_bif_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,end_per_suite/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,end_per_suite/1]).
-export([start_timer_1/1, send_after_1/1, send_after_2/1, send_after_3/1,
cancel_timer_1/1,
start_timer_big/1, send_after_big/1,
@@ -45,6 +45,8 @@ fin_per_testcase(_Case, Config) ->
end_per_suite(_Config) ->
catch erts_debug:set_internal_state(available_internal_state, false).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[start_timer_1, send_after_1, send_after_2,
cancel_timer_1, start_timer_e, send_after_e,
diff --git a/erts/emulator/test/trace_SUITE.erl b/erts/emulator/test/trace_SUITE.erl
index 1d453a3639..e9b569273a 100644
--- a/erts/emulator/test/trace_SUITE.erl
+++ b/erts/emulator/test/trace_SUITE.erl
@@ -23,7 +23,7 @@
%%% Tests the trace BIF.
%%%
--export([all/0,groups/0,init_per_group/2,end_per_group/2, receive_trace/1, self_send/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, receive_trace/1, self_send/1,
timeout_trace/1, send_trace/1,
procs_trace/1, dist_procs_trace/1,
suspend/1, mutual_suspend/1, suspend_exit/1, suspender_exit/1,
@@ -40,6 +40,8 @@
%%% Internal exports
-export([process/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[cpu_timestamp, receive_trace, self_send, timeout_trace,
send_trace, procs_trace, dist_procs_trace, suspend,
diff --git a/erts/emulator/test/trace_bif_SUITE.erl b/erts/emulator/test/trace_bif_SUITE.erl
index e2d9589b3b..ce7f07b650 100644
--- a/erts/emulator/test/trace_bif_SUITE.erl
+++ b/erts/emulator/test/trace_bif_SUITE.erl
@@ -21,13 +21,15 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([trace_bif/1, trace_bif_timestamp/1, trace_on_and_off/1, trace_bif_local/1,
trace_bif_timestamp_local/1, trace_bif_return/1, not_run/1,
trace_info_old_code/1]).
-export([bif_process/0]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(trace_bif_SUITE) of
true -> [not_run];
diff --git a/erts/emulator/test/trace_call_count_SUITE.erl b/erts/emulator/test/trace_call_count_SUITE.erl
index d3355a5364..5f4c7b1a0b 100644
--- a/erts/emulator/test/trace_call_count_SUITE.erl
+++ b/erts/emulator/test/trace_call_count_SUITE.erl
@@ -62,7 +62,7 @@ config(priv_dir,_) ->
".".
-else.
%% When run in test server.
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, not_run/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, not_run/1]).
-export([basic/1, on_and_off/1, info/1,
pause_and_restart/1, combo/1]).
@@ -78,6 +78,8 @@ fin_per_testcase(_Case, Config) ->
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(trace_call_count_SUITE) of
true -> [not_run];
diff --git a/erts/emulator/test/trace_call_time_SUITE.erl b/erts/emulator/test/trace_call_time_SUITE.erl
index 3b2e619123..12a9b0e7d9 100644
--- a/erts/emulator/test/trace_call_time_SUITE.erl
+++ b/erts/emulator/test/trace_call_time_SUITE.erl
@@ -60,7 +60,7 @@
-include_lib("test_server/include/test_server.hrl").
%% When run in test server.
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, not_run/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, not_run/1]).
-export([basic/1, on_and_off/1, info/1,
pause_and_restart/1, scheduling/1, called_function/1, combo/1, bif/1, nif/1]).
@@ -79,6 +79,8 @@ fin_per_testcase(_Case, Config) ->
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(trace_call_time_SUITE) of
true -> [not_run];
diff --git a/erts/emulator/test/trace_local_SUITE.erl b/erts/emulator/test/trace_local_SUITE.erl
index a417ca7769..92383baf4b 100644
--- a/erts/emulator/test/trace_local_SUITE.erl
+++ b/erts/emulator/test/trace_local_SUITE.erl
@@ -68,7 +68,7 @@ config(priv_dir,_) ->
%%% When run in test server %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
--export([all/0,groups/0,init_per_group/2,end_per_group/2, basic/1, bit_syntax/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, basic/1, bit_syntax/1,
return/1, on_and_off/1, stack_grow/1,info/1, delete/1,
exception/1, exception_apply/1,
exception_function/1, exception_apply_function/1,
@@ -89,6 +89,8 @@ fin_per_testcase(_Case, Config) ->
Dog=?config(watchdog, Config),
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(trace_local_SUITE) of
true -> [not_run];
diff --git a/erts/emulator/test/trace_meta_SUITE.erl b/erts/emulator/test/trace_meta_SUITE.erl
index 195696ca49..73b183b85c 100644
--- a/erts/emulator/test/trace_meta_SUITE.erl
+++ b/erts/emulator/test/trace_meta_SUITE.erl
@@ -65,7 +65,7 @@ config(priv_dir,_) ->
".".
-else.
%% When run in test server.
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, not_run/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2, not_run/1]).
-export([basic/1, return/1, on_and_off/1, stack_grow/1,
info/1, tracer/1, combo/1, nosilent/1]).
@@ -78,6 +78,8 @@ fin_per_testcase(_Case, Config) ->
Dog=?config(watchdog, Config),
test_server:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(trace_meta_SUITE) of
true -> [not_run];
diff --git a/erts/emulator/test/trace_nif_SUITE.erl b/erts/emulator/test/trace_nif_SUITE.erl
index 6a989fe295..79f445fec7 100644
--- a/erts/emulator/test/trace_nif_SUITE.erl
+++ b/erts/emulator/test/trace_nif_SUITE.erl
@@ -21,7 +21,7 @@
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2]).
-export([trace_nif/1,
trace_nif_timestamp/1,
trace_nif_local/1,
@@ -32,6 +32,8 @@
-export([nif_process/0, nif/0, nif/1]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case test_server:is_native(trace_nif_SUITE) of
true -> [not_run];
diff --git a/erts/emulator/test/trace_port_SUITE.erl b/erts/emulator/test/trace_port_SUITE.erl
index 114f62ccfe..b32015803b 100644
--- a/erts/emulator/test/trace_port_SUITE.erl
+++ b/erts/emulator/test/trace_port_SUITE.erl
@@ -20,7 +20,7 @@
-module(trace_port_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
call_trace/1,
return_trace/1,
send/1,
@@ -44,6 +44,8 @@ test_cases() ->
fake_schedule_after_getting_unlinked, gc,
default_tracer].
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
test_cases().
diff --git a/erts/emulator/test/tuple_SUITE.erl b/erts/emulator/test/tuple_SUITE.erl
index ac1d94774a..52ead630b9 100644
--- a/erts/emulator/test/tuple_SUITE.erl
+++ b/erts/emulator/test/tuple_SUITE.erl
@@ -17,7 +17,7 @@
%% %CopyrightEnd%
%%
-module(tuple_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, t_size/1, t_tuple_size/1, t_element/1, t_setelement/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, t_size/1, t_tuple_size/1, t_element/1, t_setelement/1,
t_list_to_tuple/1, t_tuple_to_list/1,
t_make_tuple_2/1, t_make_tuple_3/1, t_append_element/1,
build_and_match/1, tuple_with_case/1, tuple_in_guard/1]).
@@ -33,6 +33,8 @@
%% make_tuple/2
%%
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[build_and_match, t_size, t_tuple_size, t_list_to_tuple,
t_tuple_to_list, t_element, t_setelement,
diff --git a/erts/emulator/test/z_SUITE.erl b/erts/emulator/test/z_SUITE.erl
index 6dc2a962db..96db813039 100644
--- a/erts/emulator/test/z_SUITE.erl
+++ b/erts/emulator/test/z_SUITE.erl
@@ -32,7 +32,7 @@
-include_lib("test_server/include/test_server.hrl").
%-compile(export_all).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([schedulers_alive/1, node_container_refc_check/1,
long_timers/1, pollset_size/1,
@@ -40,6 +40,8 @@
-define(DEFAULT_TIMEOUT, ?t:minutes(5)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[schedulers_alive, node_container_refc_check,
long_timers, pollset_size, check_io_debug].
diff --git a/erts/epmd/test/epmd_SUITE.erl b/erts/epmd/test/epmd_SUITE.erl
index e45d574ac0..ff4c1a099b 100644
--- a/erts/epmd/test/epmd_SUITE.erl
+++ b/erts/epmd/test/epmd_SUITE.erl
@@ -35,7 +35,7 @@
-record(node_info, {port, node_type, prot, lvsn, hvsn, node_name, extra}).
% Test server specific exports
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export(
[
@@ -101,6 +101,8 @@
%% all/1
%%
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[register_name, register_names_1, register_names_2,
register_duplicate_name, get_port_nr, slow_get_port_nr,
diff --git a/erts/test/autoimport_SUITE.erl b/erts/test/autoimport_SUITE.erl
index cd37ef1374..eb23ef46b9 100644
--- a/erts/test/autoimport_SUITE.erl
+++ b/erts/test/autoimport_SUITE.erl
@@ -20,9 +20,11 @@
-module(autoimport_SUITE).
-include_lib("test_server/include/test_server.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,autoimports/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,autoimports/1]).
-define(TEST_TIMEOUT, ?t:seconds(180)).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[autoimports].
diff --git a/erts/test/erl_print_SUITE.erl b/erts/test/erl_print_SUITE.erl
index 5fd2bb5790..e598027885 100644
--- a/erts/test/erl_print_SUITE.erl
+++ b/erts/test/erl_print_SUITE.erl
@@ -32,12 +32,14 @@
-define(DEFAULT_TIMEOUT, ?t:minutes(10)).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([erlang_display/1, integer/1, float/1, string/1, character/1, snprintf/1, quote/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
test_cases().
diff --git a/erts/test/erlc_SUITE.erl b/erts/test/erlc_SUITE.erl
index efa9c84208..973fbad6e9 100644
--- a/erts/test/erlc_SUITE.erl
+++ b/erts/test/erlc_SUITE.erl
@@ -20,12 +20,14 @@
%% Tests the erlc command by compiling various types of files.
--export([all/0,groups/0,init_per_group/2,end_per_group/2, compile_erl/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, compile_erl/1,
compile_yecc/1, compile_script/1,
compile_mib/1, good_citizen/1, deep_cwd/1, arg_overflow/1]).
-include_lib("test_server/include/test_server.hrl").
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[compile_erl, compile_yecc, compile_script, compile_mib,
good_citizen, deep_cwd, arg_overflow].
diff --git a/erts/test/erlexec_SUITE.erl b/erts/test/erlexec_SUITE.erl
index 255caca4df..785c788603 100644
--- a/erts/test/erlexec_SUITE.erl
+++ b/erts/test/erlexec_SUITE.erl
@@ -31,7 +31,7 @@
-define(DEFAULT_TIMEOUT, ?t:minutes(1)).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([args_file/1, evil_args_file/1, env/1, args_file_env/1, otp_7461/1, otp_7461_remote/1, otp_8209/1, zdbbl_dist_buf_busy_limit/1]).
@@ -51,6 +51,8 @@ fin_per_testcase(_Case, Config) ->
?t:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[args_file, evil_args_file, env, args_file_env,
otp_7461, otp_8209, zdbbl_dist_buf_busy_limit].
diff --git a/erts/test/ethread_SUITE.erl b/erts/test/ethread_SUITE.erl
index 5e6d677c66..dfce951c80 100644
--- a/erts/test/ethread_SUITE.erl
+++ b/erts/test/ethread_SUITE.erl
@@ -31,7 +31,7 @@
-define(DEFAULT_TIMEOUT, ?t:minutes(10)).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([create_join_thread/1,
equal_tids/1,
@@ -54,6 +54,8 @@ tests() ->
cond_wait, broadcast, detached_thread,
max_threads, tsd, spinlock, rwspinlock, rwmutex, atomic].
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
tests().
diff --git a/erts/test/install_SUITE.erl b/erts/test/install_SUITE.erl
index 84892384aa..8797d62cfa 100644
--- a/erts/test/install_SUITE.erl
+++ b/erts/test/install_SUITE.erl
@@ -29,7 +29,7 @@
%-define(line_trace, 1).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_suite/1, end_per_suite/1,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_suite/1, end_per_suite/1,
init_per_testcase/2, fin_per_testcase/2]).
-export([bin_default/1,
@@ -75,6 +75,8 @@ dont_need_symlink_cases() ->
bin_unreasonable_path, 'bin white space',
bin_no_srcfile].
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
dont_need_symlink_cases() ++ need_symlink_cases().
diff --git a/erts/test/nt_SUITE.erl b/erts/test/nt_SUITE.erl
index 981a1c55f4..fc073067f1 100644
--- a/erts/test/nt_SUITE.erl
+++ b/erts/test/nt_SUITE.erl
@@ -22,7 +22,7 @@
-include_lib("test_server/include/test_server.hrl").
-include_lib("kernel/include/file.hrl").
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,nt/1,handle_eventlog/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,nt/1,handle_eventlog/2,
middleman/1,service_basic/1, service_env/1, user_env/1, synced/1,
service_prio/1,
logout/1, debug/1, restart/1, restart_always/1,stopaction/1,
@@ -31,6 +31,8 @@
-define(TEST_SERVICES, [1,2,3,4,5,6,7,8,9,10,11]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
case os:type() of
{win32, nt} ->
diff --git a/erts/test/otp_SUITE.erl b/erts/test/otp_SUITE.erl
index 15c56fd6ea..afc089408a 100644
--- a/erts/test/otp_SUITE.erl
+++ b/erts/test/otp_SUITE.erl
@@ -19,7 +19,7 @@
-module(otp_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_suite/1,end_per_suite/1]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_suite/1,end_per_suite/1]).
-export([undefined_functions/1,deprecated_not_in_obsolete/1,
obsolete_but_not_deprecated/1,call_to_deprecated/1,
call_to_size_1/1,strong_components/1]).
@@ -28,6 +28,8 @@
-import(lists, [filter/2,foldl/3,foreach/2]).
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[undefined_functions, deprecated_not_in_obsolete,
obsolete_but_not_deprecated, call_to_deprecated,
diff --git a/erts/test/run_erl_SUITE.erl b/erts/test/run_erl_SUITE.erl
index e4efd3075d..e541e884df 100644
--- a/erts/test/run_erl_SUITE.erl
+++ b/erts/test/run_erl_SUITE.erl
@@ -19,7 +19,7 @@
-module(run_erl_SUITE).
--export([all/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2,init_per_testcase/2,fin_per_testcase/2,
basic/1,heavy/1,heavier/1,defunct/1]).
-export([ping_me_back/1]).
@@ -34,6 +34,8 @@ fin_per_testcase(_Case, Config) ->
?t:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[basic, heavy, heavier, defunct].
diff --git a/erts/test/z_SUITE.erl b/erts/test/z_SUITE.erl
index 8126acb18d..8421982961 100644
--- a/erts/test/z_SUITE.erl
+++ b/erts/test/z_SUITE.erl
@@ -35,7 +35,7 @@
-define(DEFAULT_TIMEOUT, ?t:minutes(5)).
--export([all/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
+-export([all/0, suite/0,groups/0,init_per_group/2,end_per_group/2, init_per_testcase/2, fin_per_testcase/2]).
-export([search_for_core_files/1, core_files/1]).
@@ -51,6 +51,8 @@ fin_per_testcase(_Case, Config) ->
?t:timetrap_cancel(Dog),
ok.
+suite() -> [{suite_callbacks,[ts_install_scb]}].
+
all() ->
[core_files].