aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2015-02-11 07:39:27 +0100
committerBjörn Gustavsson <[email protected]>2015-03-09 09:59:37 +0100
commit4f365a9b80bab48c4478a6910624244f88637bcb (patch)
tree6936c29ebfd2acf14d0a3e87075126364637dba1
parent03f79ba054b5509a05b164220f7d218d278298df (diff)
downloadotp-4f365a9b80bab48c4478a6910624244f88637bcb.tar.gz
otp-4f365a9b80bab48c4478a6910624244f88637bcb.tar.bz2
otp-4f365a9b80bab48c4478a6910624244f88637bcb.zip
sys_core_fold: Suppress compiler warnings when evaluating element/2
More aggressive optimizations that we plan to introduce could cause spurious compiler warnings.
-rw-r--r--lib/compiler/src/sys_core_fold.erl2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/compiler/src/sys_core_fold.erl b/lib/compiler/src/sys_core_fold.erl
index 8299c6a415..68272689c2 100644
--- a/lib/compiler/src/sys_core_fold.erl
+++ b/lib/compiler/src/sys_core_fold.erl
@@ -969,7 +969,7 @@ eval_element(Call, #c_literal{val=Pos}, Tuple, Types)
1 =< Pos, Pos =< length(Es) ->
El = lists:nth(Pos, Es),
try
- pat_to_expr(El)
+ cerl:set_ann(pat_to_expr(El), [compiler_generated])
catch
throw:impossible ->
Call