diff options
| author | Lukas Larsson <[email protected]> | 2010-10-12 10:37:41 +0200 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2011-02-17 17:25:12 +0100 |
| commit | 486455c2ecae11713fc8750a127caf2c853bedee (patch) | |
| tree | b2c77d8c81ccbf77c9b38237c698142878d8e7e6 /lib/mnesia/test/mnesia_frag_test.erl | |
| parent | 6261f06d39e990b45f08b79edebe7b18a6eb9f01 (diff) | |
| download | otp-486455c2ecae11713fc8750a127caf2c853bedee.tar.gz otp-486455c2ecae11713fc8750a127caf2c853bedee.tar.bz2 otp-486455c2ecae11713fc8750a127caf2c853bedee.zip | |
Update mnesia tests to conform with common_test standard
Diffstat (limited to 'lib/mnesia/test/mnesia_frag_test.erl')
| -rw-r--r-- | lib/mnesia/test/mnesia_frag_test.erl | 56 |
1 files changed, 20 insertions, 36 deletions
diff --git a/lib/mnesia/test/mnesia_frag_test.erl b/lib/mnesia/test/mnesia_frag_test.erl index 0008b69ad0..fa9dd17c76 100644 --- a/lib/mnesia/test/mnesia_frag_test.erl +++ b/lib/mnesia/test/mnesia_frag_test.erl @@ -37,34 +37,29 @@ end_per_testcase(Func, Conf) -> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -all(doc) -> - ["Verify the functionality of fragmented tables"]; -all(suite) -> - [ - light, - medium - ]. - -light(suite) -> - [ - nice, - evil - ]. - -medium(suite) -> - [ - consistency - ]. +all() -> +[{group, light}, {group, medium}]. + +groups() -> + [{light, [], [{group, nice}, {group, evil}]}, + {medium, [], [consistency]}, + {nice, [], + [nice_single, nice_multi, nice_access, iter_access]}, + {evil, [], + [evil_create, evil_delete, evil_change, evil_combine, + evil_loop, evil_delete_db_node]}]. + +init_per_group(_GroupName, Config) -> + Config. + +end_per_group(_GroupName, Config) -> + Config. + + + %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -nice(suite) -> - [ - nice_single, - nice_multi, - nice_access, - iter_access - ]. nice_single(suite) -> []; nice_single(Config) when is_list(Config) -> @@ -503,17 +498,6 @@ consistency(Config) when is_list(Config) -> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -evil(doc) -> - ["Evil coverage of fragmentation API."]; -evil(suite) -> - [ - evil_create, - evil_delete, - evil_change, - evil_combine, - evil_loop, - evil_delete_db_node - ]. evil_create(suite) -> []; evil_create(Config) when is_list(Config) -> |