diff options
| author | Björn-Egil Dahlberg <[email protected]> | 2012-01-03 21:03:44 +0100 |
|---|---|---|
| committer | Björn-Egil Dahlberg <[email protected]> | 2012-01-03 21:03:44 +0100 |
| commit | 38ee7a20cfdc22ead35b4711a086babcf6b3069b (patch) | |
| tree | 752fc1da81ceca8f6ed59e91265f748731dc93f2 /lib/syntax_tools/src/erl_syntax.erl | |
| parent | fa809bb66a466c435edcdb704e40408fecad3683 (diff) | |
| download | otp-38ee7a20cfdc22ead35b4711a086babcf6b3069b.tar.gz otp-38ee7a20cfdc22ead35b4711a086babcf6b3069b.tar.bz2 otp-38ee7a20cfdc22ead35b4711a086babcf6b3069b.zip | |
syntax_tool: Add missing type information
Diffstat (limited to 'lib/syntax_tools/src/erl_syntax.erl')
| -rw-r--r-- | lib/syntax_tools/src/erl_syntax.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/syntax_tools/src/erl_syntax.erl b/lib/syntax_tools/src/erl_syntax.erl index 7f58fda519..4e2235d552 100644 --- a/lib/syntax_tools/src/erl_syntax.erl +++ b/lib/syntax_tools/src/erl_syntax.erl @@ -3523,7 +3523,10 @@ qualified_name_segments(Node) -> %% @see is_form/1 %% @see rule/2 --record(function, {name, clauses}). +-record(function, { + name :: atom(), + clauses :: list() + }). %% XXX: This one is problematic because there is a tuple with the same %% tag and size that comes from 'erl_parse' %% -record(function, {name :: syntaxTree(), clauses :: [syntaxTree()]}). @@ -6100,7 +6103,7 @@ implicit_fun_name(Node) -> arity_qualifier( set_pos(atom(Atom), Pos), set_pos(integer(Arity), Pos))); - {'fun', Pos, {function, Module, Atom, Arity}} -> + {'fun', _Pos, {function, Module, Atom, Arity}} -> %% New in R15: fun M:F/A. module_qualifier(Module, arity_qualifier(Atom, Arity)); Node1 -> |