diff options
author | Björn-Egil Dahlberg <[email protected]> | 2012-01-04 18:23:38 +0100 |
---|---|---|
committer | Björn-Egil Dahlberg <[email protected]> | 2012-01-04 18:23:38 +0100 |
commit | f9ca630a95e1e2adb1b225bfb69e3101678183f3 (patch) | |
tree | f40c9b82bf851b7efdb9aaa88406747f60cb4822 /lib/syntax_tools/src | |
parent | 195be9a44f2481b9c575c8ad286f4d2278b831b3 (diff) | |
parent | d79b413adcf4c084df30f831486ba1f1ac504c5c (diff) | |
download | otp-f9ca630a95e1e2adb1b225bfb69e3101678183f3.tar.gz otp-f9ca630a95e1e2adb1b225bfb69e3101678183f3.tar.bz2 otp-f9ca630a95e1e2adb1b225bfb69e3101678183f3.zip |
Merge branch 'egil/fix-compiler-warnings' into maint
* egil/fix-compiler-warnings:
erts: Use re instead of regexp in testsuite
erts: Remove unused code in testsuites
orber: Use modern list guard in testsuite
orber: Ignore unused variable in orber_tb.erl
xmerl: Ignore unused variable in xmerl_uri.erl
syntax_tool: Add missing type information
hipe: Suppress warnings for unused variables
hipe: Add type information to cfg_info record
tools: Use literal formatting in erl_memory.c
asn1: Remove unused variable in asn1_erl_nif.c
ei: Remove unused variable in ei_format.c
erts: Add missing prototype to DRIVER_INIT
runtime_tools: Fix signedness in trace_ip_drv.c
to_erl: Remove compiler warnings
heart: Suppress compiler warnings
erts: Remove compiler warnings in inet_gethost.c
erts: Remove dead code in inet_gethost.c
erts: Remove dead code
Diffstat (limited to 'lib/syntax_tools/src')
-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 -> |