diff options
author | Peter Andersson <[email protected]> | 2013-02-18 01:43:53 +0100 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2013-02-18 01:43:53 +0100 |
commit | 967eca90a73d4fc0516c99ef41a30c9e9cbbb0fa (patch) | |
tree | 1e2d9ba7486e13c62f122cf8bc4c086a4392a9ad | |
parent | 499eef0cd693b2f96ec19148d2f6666c3df7d834 (diff) | |
download | otp-967eca90a73d4fc0516c99ef41a30c9e9cbbb0fa.tar.gz otp-967eca90a73d4fc0516c99ef41a30c9e9cbbb0fa.tar.bz2 otp-967eca90a73d4fc0516c99ef41a30c9e9cbbb0fa.zip |
Correct dialyzer warnings
-rw-r--r-- | lib/common_test/src/ct_testspec.erl | 15 |
1 files changed, 1 insertions, 14 deletions
diff --git a/lib/common_test/src/ct_testspec.erl b/lib/common_test/src/ct_testspec.erl index e341391a91..71b03c0ea6 100644 --- a/lib/common_test/src/ct_testspec.erl +++ b/lib/common_test/src/ct_testspec.erl @@ -1020,17 +1020,6 @@ add_tests([],Spec) -> % done %% check if it's a CT term that has bad format or if the user seems to %% have added something of his/her own, which we'll let pass if relaxed %% mode is enabled. -check_term(Atom) when is_atom(Atom) -> - Valid = valid_terms(), - case lists:member(Atom,Valid) of - true -> - valid; - false -> % ignore - case get(relaxed) of - true -> invalid; - false -> throw({error,{undefined_term_in_spec,Atom}}) - end - end; check_term(Term) when is_tuple(Term) -> Size = size(Term), [Name|_] = tuple_to_list(Term), @@ -1059,9 +1048,7 @@ check_term(Term) when is_tuple(Term) -> throw({error,{undefined_term_in_spec,Term}}) end end - end; -check_term(Other) -> - throw({error,{undefined_term_in_spec,Other}}). + end. %% specific data handling before saving in testspec record, e.g. %% converting relative paths to absolute for directories and files |