diff options
author | Björn Gustavsson <[email protected]> | 2015-01-21 12:21:18 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2015-01-26 13:09:29 +0100 |
commit | 3ebfb44a83fcfd506fe4e4925412a973a86474ed (patch) | |
tree | 8cbb6749513f7787d499909298cbfc98f849bf88 /lib/compiler/src/cerl_clauses.erl | |
parent | 1ef53ead19d5bd07caad4daa71b8fecf2fbcd2a6 (diff) | |
download | otp-3ebfb44a83fcfd506fe4e4925412a973a86474ed.tar.gz otp-3ebfb44a83fcfd506fe4e4925412a973a86474ed.tar.bz2 otp-3ebfb44a83fcfd506fe4e4925412a973a86474ed.zip |
cerl_clauses: Fix indentation
Diffstat (limited to 'lib/compiler/src/cerl_clauses.erl')
-rw-r--r-- | lib/compiler/src/cerl_clauses.erl | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/lib/compiler/src/cerl_clauses.erl b/lib/compiler/src/cerl_clauses.erl index 87bd47c08b..ef74c5b76f 100644 --- a/lib/compiler/src/cerl_clauses.erl +++ b/lib/compiler/src/cerl_clauses.erl @@ -354,29 +354,29 @@ match(P, E, Bs) -> {false, Bs} end end; - map -> - %% The most we can do is to say "definitely no match" if a - %% map pattern is matched against non-map data. - case E of - any -> - {false, Bs}; - _ -> - case type(E) of - literal -> - case is_map(concrete(E)) of - false -> - none; - true -> - {false, Bs} - end; - cons -> - none; - tuple -> - none; - _ -> - {false, Bs} - end - end; + map -> + %% The most we can do is to say "definitely no match" if a + %% map pattern is matched against non-map data. + case E of + any -> + {false, Bs}; + _ -> + case type(E) of + literal -> + case is_map(concrete(E)) of + false -> + none; + true -> + {false, Bs} + end; + cons -> + none; + tuple -> + none; + _ -> + {false, Bs} + end + end; _ -> match_1(P, E, Bs) end. |