diff options
author | Peter Andersson <[email protected]> | 2011-04-18 21:47:47 +0200 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2011-04-28 22:43:54 +0200 |
commit | 17808ea01d04f25574aa627f2716704a09e59354 (patch) | |
tree | e813e8dcd08359e324f6c0207c467be876f563c3 /lib/common_test/test/ct_groups_test_2_SUITE_data | |
parent | b4c851d574b6e9ebd29ffd41b7ebd76b0912b7cf (diff) | |
download | otp-17808ea01d04f25574aa627f2716704a09e59354.tar.gz otp-17808ea01d04f25574aa627f2716704a09e59354.tar.bz2 otp-17808ea01d04f25574aa627f2716704a09e59354.zip |
Fix issues related to test case groups:
1. Allow empty group to be specified without generating an error.
2. Sort out potential problem with unnecessary call to delete_subs/2.
Diffstat (limited to 'lib/common_test/test/ct_groups_test_2_SUITE_data')
-rw-r--r-- | lib/common_test/test/ct_groups_test_2_SUITE_data/groups_2/groups_22_SUITE.erl | 25 |
1 files changed, 19 insertions, 6 deletions
diff --git a/lib/common_test/test/ct_groups_test_2_SUITE_data/groups_2/groups_22_SUITE.erl b/lib/common_test/test/ct_groups_test_2_SUITE_data/groups_2/groups_22_SUITE.erl index a41489e55c..14eb8769ad 100644 --- a/lib/common_test/test/ct_groups_test_2_SUITE_data/groups_2/groups_22_SUITE.erl +++ b/lib/common_test/test/ct_groups_test_2_SUITE_data/groups_2/groups_22_SUITE.erl @@ -52,8 +52,11 @@ groups() -> {test_group_7, [sequence], [testcase_7a,testcase_7b]}, - {test_group_8, [], [{group,test_group_9}]}, - {test_group_9, [], []} + {test_group_8, [], [{group, test_group_9}, testcase_8]}, + + {test_group_9, [], []}, + + {test_group_10, [], [{group, test_group_9}]} ]. all() -> @@ -65,7 +68,8 @@ all() -> testcase_3, {group, test_group_4}, {group, test_group_8}, - {group, test_group_9}]. + {group, test_group_9}, + {group, test_group_10}]. %% this func only for internal test purposes grs_and_tcs() -> @@ -74,7 +78,8 @@ grs_and_tcs() -> test_group_2, test_group_3, test_group_4, test_group_5, test_group_6, test_group_7, - test_group_8, test_group_9 + test_group_8, test_group_9, + test_group_10 ], [ testcase_1a, testcase_1b, testcase_1c, @@ -84,7 +89,8 @@ grs_and_tcs() -> testcase_3a, testcase_3b, testcase_3, testcase_5a, testcase_5b, - testcase_7a, testcase_7b + testcase_7a, testcase_7b, + testcase_8 ]}. %%-------------------------------------------------------------------- @@ -113,7 +119,10 @@ init_per_group(Group, Config) -> {test_group_4,[{name,test_group_4}]} -> ok; {test_group_5,[{name,test_group_5},parallel]} -> "parallel"; {test_group_6,[{name,test_group_6},parallel]} -> "parallel"; - {test_group_7,[{name,test_group_7},sequence]} -> "sequence" + {test_group_7,[{name,test_group_7},sequence]} -> "sequence"; + {test_group_8,[{name,test_group_8}]} -> ok; + {test_group_9,[{name,test_group_9}]} -> ok; + {test_group_10,[{name,test_group_10}]} -> ok end, {Grs,_} = grs_and_tcs(), case lists:member(Group, Grs) of @@ -318,3 +327,7 @@ testcase_7b(Config) -> undefined = ?config(testcase_7a,Config), testcase_7b = ?config(testcase_7b,Config), ok. +testcase_8() -> + []. +testcase_8(_Config) -> + ok. |