diff options
| author | Björn Gustavsson <[email protected]> | 2012-05-02 16:16:04 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2012-05-02 16:23:41 +0200 |
| commit | 206cd51e03d286d4df7dc1ab52420b9457154369 (patch) | |
| tree | ef1e9fec6c848c2c780b0cc10e6e6438458bd3d6 /erts/test/otp_SUITE.erl | |
| parent | c2e3aaf3ae8025b19605b7db00fdeb4b11e0f1bd (diff) | |
| download | otp-206cd51e03d286d4df7dc1ab52420b9457154369.tar.gz otp-206cd51e03d286d4df7dc1ab52420b9457154369.tar.bz2 otp-206cd51e03d286d4df7dc1ab52420b9457154369.zip | |
otp_SUITE: Remove broken filtering of megaco calls
The call to the megaco_filter/1 function is broken. It will cause
a badmatch if the megaco_filter/1 would return a different list than
its argument. Since the test case has not failed, megaco_filter/1
has no effect and can be removed.
Diffstat (limited to 'erts/test/otp_SUITE.erl')
| -rw-r--r-- | erts/test/otp_SUITE.erl | 30 |
1 files changed, 0 insertions, 30 deletions
diff --git a/erts/test/otp_SUITE.erl b/erts/test/otp_SUITE.erl index 644b54f0e1..f531a3bfa6 100644 --- a/erts/test/otp_SUITE.erl +++ b/erts/test/otp_SUITE.erl @@ -89,7 +89,6 @@ undefined_functions(Config) when is_list(Config) -> ?line Undef2 = ssl_crypto_filter(Undef1), ?line Undef3 = edoc_filter(Undef2), ?line Undef = eunit_filter(Undef3), - ?line Undef = megaco_filter(Undef), case Undef of [] -> ok; @@ -173,35 +172,6 @@ eunit_filter(Undef) -> (_) -> true end, Undef). -megaco_filter(Undef) -> - %% Intentional calls to undefined functions. - filter(fun({{megaco_compact_text_encoder,encode_action_reply,3}, - {megaco_compact_text_encoder_v3,encode_action_reply,2}}) -> false; - ({{megaco_compact_text_encoder,encode_action_request,3}, - {megaco_compact_text_encoder_v3,encode_action_request,2}}) -> false; - ({{megaco_compact_text_encoder,encode_action_requests,3}, - {megaco_compact_text_encoder_v3,encode_action_requests,2}}) -> false; - ({{megaco_compact_text_encoder,encode_command_request,3}, - {megaco_compact_text_encoder_v3,encode_command_request,2}}) -> false; - ({{megaco_compact_text_encoder,encode_message,3}, - {megaco_compact_text_encoder_v3,encode_message,2}}) -> false; - ({{megaco_compact_text_encoder,encode_transaction,3}, - {megaco_compact_text_encoder_v3,encode_transaction,2}}) -> false; - ({{megaco_pretty_text_encoder,encode_action_reply,3}, - {megaco_pretty_text_encoder_v3,encode_action_reply,2}}) -> false; - ({{megaco_pretty_text_encoder,encode_action_request,3}, - {megaco_pretty_text_encoder_v3,encode_action_request,2}}) -> false; - ({{megaco_pretty_text_encoder,encode_action_requests,3}, - {megaco_pretty_text_encoder_v3,encode_action_requests,2}}) -> false; - ({{megaco_pretty_text_encoder,encode_command_request,3}, - {megaco_pretty_text_encoder_v3,encode_command_request,2}}) -> false; - ({{megaco_pretty_text_encoder,encode_message,3}, - {megaco_pretty_text_encoder_v3,encode_message,2}}) -> false; - ({{megaco_pretty_text_encoder,encode_transaction,3}, - {megaco_pretty_text_encoder_v3,encode_transaction,2}}) -> false; - (_) -> true - end, Undef). - deprecated_not_in_obsolete(Config) when is_list(Config) -> ?line Server = ?config(xref_server, Config), ?line {ok,DeprecatedFunctions} = xref:q(Server, "DF"), |