diff options
author | Björn Gustavsson <[email protected]> | 2016-09-05 11:43:38 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2016-09-05 11:43:38 +0200 |
commit | b501396623e80a798fba94a428646461aabe6796 (patch) | |
tree | d426e3b61718b3e641553cd70157c986b99e5251 /lib/stdlib/test/erl_lint_SUITE.erl | |
parent | 727f08889ab2096b540d466858ded1271bf261a8 (diff) | |
parent | 0baa07cdf2754748bbc2d969bf83f08c0976fb78 (diff) | |
download | otp-b501396623e80a798fba94a428646461aabe6796.tar.gz otp-b501396623e80a798fba94a428646461aabe6796.tar.bz2 otp-b501396623e80a798fba94a428646461aabe6796.zip |
Merge branch 'bjorn/lc-overridden-bif/OTP-13690'
* bjorn/lc-overridden-bif/OTP-13690:
Fix overridden BIFs
Don't crash when obsolete guard overrides local function
Diffstat (limited to 'lib/stdlib/test/erl_lint_SUITE.erl')
-rw-r--r-- | lib/stdlib/test/erl_lint_SUITE.erl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lib/stdlib/test/erl_lint_SUITE.erl b/lib/stdlib/test/erl_lint_SUITE.erl index d916eb3eef..4ee3950882 100644 --- a/lib/stdlib/test/erl_lint_SUITE.erl +++ b/lib/stdlib/test/erl_lint_SUITE.erl @@ -1554,7 +1554,15 @@ guard(Config) when is_list(Config) -> [], {errors,[{1,erl_lint,illegal_guard_expr}, {2,erl_lint,illegal_guard_expr}], - []}} + []}}, + {guard10, + <<"is_port(_) -> false. + t(P) when port(P) -> ok. + ">>, + [], + {error, + [{2,erl_lint,{obsolete_guard_overridden,port}}], + [{2,erl_lint,{obsolete_guard,{port,1}}}]}} ], [] = run(Config, Ts1), ok. |