aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2013-02-19 14:09:34 +0100
committerPeter Andersson <[email protected]>2013-02-19 14:09:34 +0100
commite33534c42319768c7de5cc8b081c21eca134aed1 (patch)
tree4b1b17acc8fe9622b8f7c681a07a2bb85d16ac9b
parent1a0dde3554adf6ad30cb80ddc90d3ed1a8c8dbad (diff)
parent967eca90a73d4fc0516c99ef41a30c9e9cbbb0fa (diff)
downloadotp-e33534c42319768c7de5cc8b081c21eca134aed1.tar.gz
otp-e33534c42319768c7de5cc8b081c21eca134aed1.tar.bz2
otp-e33534c42319768c7de5cc8b081c21eca134aed1.zip
Merge remote branch 'origin/peppe/common_test/dialyzer_warnings'
* origin/peppe/common_test/dialyzer_warnings: Correct dialyzer warnings
-rw-r--r--lib/common_test/src/ct_testspec.erl15
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