diff options
| author | Tobias Schlager <[email protected]> | 2014-02-18 12:33:31 +0100 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2014-02-24 11:02:14 +0100 |
| commit | 841addf5d64a3b4775cd1d0a5aa4bf04ec4ef95e (patch) | |
| tree | bc0150664c476b7bcee1e8d490e2eef5e5ec1dc3 /lib/mnesia/test/mnesia_SUITE.erl | |
| parent | e13698de39397b8adf774467ff4c9c9b8e22bd3a (diff) | |
| download | otp-841addf5d64a3b4775cd1d0a5aa4bf04ec4ef95e.tar.gz otp-841addf5d64a3b4775cd1d0a5aa4bf04ec4ef95e.tar.bz2 otp-841addf5d64a3b4775cd1d0a5aa4bf04ec4ef95e.zip | |
Add test suites performing app and appup file checks
Add the mentioned test suites for *all* library and touched
non-library applications.
Diffstat (limited to 'lib/mnesia/test/mnesia_SUITE.erl')
| -rw-r--r-- | lib/mnesia/test/mnesia_SUITE.erl | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/lib/mnesia/test/mnesia_SUITE.erl b/lib/mnesia/test/mnesia_SUITE.erl index e0004ecb51..921ebb71e9 100644 --- a/lib/mnesia/test/mnesia_SUITE.erl +++ b/lib/mnesia/test/mnesia_SUITE.erl @@ -21,6 +21,7 @@ -module(mnesia_SUITE). -author('[email protected]'). -compile([export_all]). +-include_lib("common_test/include/ct.hrl"). -include("mnesia_test_lib.hrl"). init_per_testcase(Func, Conf) -> @@ -50,7 +51,7 @@ suite() -> [{ct_hooks,[{ts_install_cth,[{nodenames,2}]}]}]. %% and do not involve the normal test machinery. all() -> - [{group, light}, {group, medium}, {group, heavy}, + [app, appup, {group, light}, {group, medium}, {group, heavy}, clean_up_suite]. groups() -> @@ -144,6 +145,18 @@ silly() -> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%% Test structure of the mnesia application resource file +app(Config) when is_list(Config) -> + ok = ?t:app_test(mnesia). + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +%% Test that all required versions have appup directives +appup(Config) when is_list(Config) -> + ok = ?t:appup_test(mnesia). + +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + clean_up_suite(doc) -> ["Not a test case only kills mnesia and nodes, that where" "started during the tests"]; clean_up_suite(suite) -> |