diff options
author | Hans Bolinder <[email protected]> | 2016-01-11 13:55:31 +0100 |
---|---|---|
committer | Hans Bolinder <[email protected]> | 2016-01-13 09:36:02 +0100 |
commit | 82d5a5cecd0a3a5f4b9446bf0703873a812c6ede (patch) | |
tree | 75caa65c1929111f8d959a4038f1ad1534f46bd0 /lib/stdlib/src/erl_lint.erl | |
parent | 1c12fa5bee26e3a46dfeff4e1e261b14915fa0fa (diff) | |
download | otp-82d5a5cecd0a3a5f4b9446bf0703873a812c6ede.tar.gz otp-82d5a5cecd0a3a5f4b9446bf0703873a812c6ede.tar.bz2 otp-82d5a5cecd0a3a5f4b9446bf0703873a812c6ede.zip |
stdlib: Fix linter crash due to missing -module declaration
The Erlang Code Linter no longer crashes if there is a -deprecated()
attribute but no -module() declaration.
See also ERL-62 at bugs.erlang.org.
Diffstat (limited to 'lib/stdlib/src/erl_lint.erl')
-rw-r--r-- | lib/stdlib/src/erl_lint.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/stdlib/src/erl_lint.erl b/lib/stdlib/src/erl_lint.erl index 5678e7eebe..e940ad6956 100644 --- a/lib/stdlib/src/erl_lint.erl +++ b/lib/stdlib/src/erl_lint.erl @@ -2,7 +2,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1996-2015. All Rights Reserved. +%% Copyright Ericsson AB 1996-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. @@ -100,7 +100,7 @@ value_option(Flag, Default, On, OnVal, Off, OffVal, Opts) -> %% 'called' and 'exports' contain {Line, {Function, Arity}}, %% the other function collections contain {Function, Arity}. -record(lint, {state=start :: 'start' | 'attribute' | 'function', - module=[], %Module + module='', %Module behaviour=[], %Behaviour exports=gb_sets:empty() :: gb_sets:set(fa()),%Exports imports=[] :: [fa()], %Imports, an orddict() @@ -729,7 +729,7 @@ start_state(Form, St) -> %% attribute_state(Form, State) -> %% State' -attribute_state({attribute,_L,module,_M}, #lint{module=[]}=St) -> +attribute_state({attribute,_L,module,_M}, #lint{module=''}=St) -> St; attribute_state({attribute,L,module,_M}, St) -> add_error(L, redefine_module, St); |