aboutsummaryrefslogtreecommitdiffstats
path: root/lib/common_test
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2011-09-22 16:40:52 +0200
committerPeter Andersson <[email protected]>2011-09-23 12:24:55 +0200
commit178940b2184bb3cdaa79d9d51b09c54fbfe68300 (patch)
tree3062ab5be89fb081d48d70acf6d7847b7961fb64 /lib/common_test
parent57a84ad4a044a74b19d8b956121feb943bbd5b3a (diff)
downloadotp-178940b2184bb3cdaa79d9d51b09c54fbfe68300.tar.gz
otp-178940b2184bb3cdaa79d9d51b09c54fbfe68300.tar.bz2
otp-178940b2184bb3cdaa79d9d51b09c54fbfe68300.zip
Fix crash when CTHook init fails
Diffstat (limited to 'lib/common_test')
-rw-r--r--lib/common_test/src/ct_util.erl6
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/common_test/src/ct_util.erl b/lib/common_test/src/ct_util.erl
index f393ea103d..3b6ad6f98d 100644
--- a/lib/common_test/src/ct_util.erl
+++ b/lib/common_test/src/ct_util.erl
@@ -182,7 +182,11 @@ do_start(Parent,Mode,LogDir) ->
%% Initialize ct_hooks
try ct_hooks:init(Opts) of
ok ->
- Parent ! {self(),started}
+ Parent ! {self(),started};
+ {fail,CTHReason} ->
+ ct_logs:tc_print('Suite Callback',CTHReason,[]),
+ self() ! {{stop,{self(),{user_error,CTHReason}}},
+ {Parent,make_ref()}}
catch
_:CTHReason ->
ct_logs:tc_print('Suite Callback',CTHReason,[]),