diff options
author | Björn Gustavsson <[email protected]> | 2016-04-26 09:29:14 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2016-04-27 14:43:05 +0200 |
commit | ac25ce01652888cd9b2e1f88ef68933a7cb87d79 (patch) | |
tree | caf262049e783dee4bc8da555d63f3b4728e2497 /lib/compiler/test/compilation_SUITE_data/nested_tuples_in_case_expr.erl | |
parent | 7b5ab41e80bf6042afc9542ad178927251d34f45 (diff) | |
download | otp-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.erl | 37 |
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. - - - - |