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.erl | |
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.erl')
-rw-r--r-- | lib/common_test/test/ct_groups_test_2_SUITE.erl | 24 |
1 files changed, 22 insertions, 2 deletions
diff --git a/lib/common_test/test/ct_groups_test_2_SUITE.erl b/lib/common_test/test/ct_groups_test_2_SUITE.erl index 43a2b86602..ee901bf608 100644 --- a/lib/common_test/test/ct_groups_test_2_SUITE.erl +++ b/lib/common_test/test/ct_groups_test_2_SUITE.erl @@ -124,7 +124,7 @@ empty_group(Config) when is_list(Config) -> Suite = filename:join(DataDir, "groups_2/groups_22_SUITE"), {Opts,ERPid} = setup([{suite,Suite}, - {group,[test_group_8,test_group_9]}], + {group,[test_group_8,test_group_9,test_group_10]}], Config), ok = ct_test_support:run(Opts, Config), Events = ct_test_support:get_events(ERPid, Config), @@ -282,4 +282,24 @@ test_events(repeat_1) -> ]; test_events(empty_group) -> - []. + [{?eh,start_logging,{'DEF','RUNDIR'}}, + {?eh,test_start,{'DEF',{'START_TIME','LOGDIR'}}}, + {?eh,start_info,{1,1,1}}, + {?eh,tc_start,{groups_22_SUITE,init_per_suite}}, + {?eh,tc_done,{groups_22_SUITE,init_per_suite,ok}}, + [{?eh,tc_start, + {groups_22_SUITE,{init_per_group,test_group_8,[]}}}, + {?eh,tc_done, + {groups_22_SUITE,{init_per_group,test_group_8,[]},ok}}, + {?eh,tc_start,{groups_22_SUITE,testcase_8}}, + {?eh,tc_done,{groups_22_SUITE,testcase_8,ok}}, + {?eh,test_stats,{1,0,{0,0}}}, + {?eh,tc_start, + {groups_22_SUITE,{end_per_group,test_group_8,[]}}}, + {?eh,tc_done, + {groups_22_SUITE,{end_per_group,test_group_8,[]},ok}}], + {?eh,tc_start,{groups_22_SUITE,end_per_suite}}, + {?eh,tc_done,{groups_22_SUITE,end_per_suite,init}}, + {?eh,test_done,{'DEF','STOP_TIME'}}, + {?eh,stop_logging,[]} + ]. |