aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2016-04-26 09:29:14 +0200
committerBjörn Gustavsson <[email protected]>2016-04-27 14:43:05 +0200
commitac25ce01652888cd9b2e1f88ef68933a7cb87d79 (patch)
treecaf262049e783dee4bc8da555d63f3b4728e2497 /lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl
parent7b5ab41e80bf6042afc9542ad178927251d34f45 (diff)
downloadotp-ac25ce01652888cd9b2e1f88ef68933a7cb87d79.tar.gz
otp-ac25ce01652888cd9b2e1f88ef68933a7cb87d79.tar.bz2
otp-ac25ce01652888cd9b2e1f88ef68933a7cb87d79.zip
Move pattern-matching tests to match_SUITE
Diffstat (limited to 'lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl')
-rw-r--r--lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl37
1 files changed, 0 insertions, 37 deletions
diff --git a/lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl b/lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl
deleted file mode 100644
index bbacb7cf14..0000000000
--- a/lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl
+++ /dev/null
@@ -1,37 +0,0 @@
-%%
-%% %CopyrightBegin%
-%%
-%% Copyright Ericsson AB 2001-2016. All Rights Reserved.
-%%
-%% Licensed under the Apache License, Version 2.0 (the "License");
-%% you may not use this file except in compliance with the License.
-%% You may obtain a copy of the License at
-%%
-%% http://www.apache.org/licenses/LICENSE-2.0
-%%
-%% Unless required by applicable law or agreed to in writing, software
-%% distributed under the License is distributed on an "AS IS" BASIS,
-%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-%% See the License for the specific language governing permissions and
-%% limitations under the License.
-%%
-%% %CopyrightEnd%
-%%
--module(nested_tuples_in_case_expr).
--export([nested_tuples_in_case_expr/0,t/2]).
-
-nested_tuples_in_case_expr() ->
- ok.
-
-t(A, B) ->
- case {{element(1, A),element(2, B)},{element(2, A),element(2, B)}} of
- {Same,Same} -> ok;
- {{0,1},{up,X}} -> bar(X);
- {_,{X,_}} -> bar(X)
- end.
-
-bar(X) -> X.
-
-
-
-