diff options
| author | Björn Gustavsson <[email protected]> | 2012-01-04 10:59:51 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2012-01-26 10:53:07 +0100 |
| commit | 81812b34873a71ed7904456da864f426850cbe8a (patch) | |
| tree | 01d7c96e495ebee1e5f3d41405c5610d23295ab7 | |
| parent | 689b70d21bdcef4d031d15faa542d5671810dead (diff) | |
| download | otp-81812b34873a71ed7904456da864f426850cbe8a.tar.gz otp-81812b34873a71ed7904456da864f426850cbe8a.tar.bz2 otp-81812b34873a71ed7904456da864f426850cbe8a.zip | |
erl_lint: Remove handling of constant/1
| -rw-r--r-- | lib/stdlib/src/erl_lint.erl | 12 |
1 files changed, 3 insertions, 9 deletions
diff --git a/lib/stdlib/src/erl_lint.erl b/lib/stdlib/src/erl_lint.erl index cfbcf54d95..a1af0057ca 100644 --- a/lib/stdlib/src/erl_lint.erl +++ b/lib/stdlib/src/erl_lint.erl @@ -3436,17 +3436,11 @@ obsolete_guard({call,Line,{atom,Lr,F},As}, St0) -> false -> deprecated_function(Line, erlang, F, As, St0); true -> - St1 = case F of - constant -> - deprecated_function(Lr, erlang, is_constant, As, St0); - _ -> - St0 - end, - case is_warn_enabled(obsolete_guard, St1) of + case is_warn_enabled(obsolete_guard, St0) of true -> - add_warning(Lr,{obsolete_guard, {F, Arity}}, St1); + add_warning(Lr,{obsolete_guard, {F, Arity}}, St0); false -> - St1 + St0 end end; obsolete_guard(_G, St) -> |