aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/examples/erl_id_trans.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2012-08-22 09:59:12 +0200
committerBjörn Gustavsson <[email protected]>2012-08-22 09:59:12 +0200
commit17a65ee1d0aaedc0d52b4d3ba97f64f7ec7fcfa4 (patch)
tree2070e8644760199831303af51b76fbe146b04b9b /lib/stdlib/examples/erl_id_trans.erl
parent2502f65bd14be4132a12c6fb7fd51c227603a017 (diff)
parentde7e01c958ff7c9e6da4034a53567a30a4ae5792 (diff)
downloadotp-17a65ee1d0aaedc0d52b4d3ba97f64f7ec7fcfa4.tar.gz
otp-17a65ee1d0aaedc0d52b4d3ba97f64f7ec7fcfa4.tar.bz2
otp-17a65ee1d0aaedc0d52b4d3ba97f64f7ec7fcfa4.zip
Merge branch 'bjorn/remove-tuple-funs/OTP-10170'
* bjorn/remove-tuple-funs/OTP-10170: Remove support for tuple funs
Diffstat (limited to 'lib/stdlib/examples/erl_id_trans.erl')
-rw-r--r--lib/stdlib/examples/erl_id_trans.erl9
1 files changed, 0 insertions, 9 deletions
diff --git a/lib/stdlib/examples/erl_id_trans.erl b/lib/stdlib/examples/erl_id_trans.erl
index 72e41d6473..34c6ecc394 100644
--- a/lib/stdlib/examples/erl_id_trans.erl
+++ b/lib/stdlib/examples/erl_id_trans.erl
@@ -283,15 +283,6 @@ gexpr({call,Line,{remote,La,{atom,Lb,erlang},{atom,Lc,F}},As0}) ->
true -> As1 = gexpr_list(As0),
{call,Line,{remote,La,{atom,Lb,erlang},{atom,Lc,F}},As1}
end;
-% Unfortunately, writing calls as {M,F}(...) is also allowed.
-gexpr({call,Line,{tuple,La,[{atom,Lb,erlang},{atom,Lc,F}]},As0}) ->
- case erl_internal:guard_bif(F, length(As0)) or
- erl_internal:arith_op(F, length(As0)) or
- erl_internal:comp_op(F, length(As0)) or
- erl_internal:bool_op(F, length(As0)) of
- true -> As1 = gexpr_list(As0),
- {call,Line,{tuple,La,[{atom,Lb,erlang},{atom,Lc,F}]},As1}
- end;
gexpr({bin,Line,Fs}) ->
Fs2 = pattern_grp(Fs),
{bin,Line,Fs2};