diff options
author | Björn Gustavsson <[email protected]> | 2014-01-20 10:21:57 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2014-01-20 10:21:57 +0100 |
commit | e19b19ceeabff388fb53df46298a5c81f171a8bc (patch) | |
tree | a13c516005e67761b52ace632cac72449fdde874 | |
parent | 8cb7a4e36027c0c00d748d268688fd3d08fc20e4 (diff) | |
parent | 1dde3381ebb040095de87279e4f0e65927b7d824 (diff) | |
download | otp-e19b19ceeabff388fb53df46298a5c81f171a8bc.tar.gz otp-e19b19ceeabff388fb53df46298a5c81f171a8bc.tar.bz2 otp-e19b19ceeabff388fb53df46298a5c81f171a8bc.zip |
Merge branch 'bjorn/compiler/fix-lift-after/OTP-11580'
* bjorn/compiler/fix-lift-after/OTP-11580:
compiler: Silence false warning for unmatched return in 'after' clause
-rw-r--r-- | lib/compiler/src/v3_core.erl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/compiler/src/v3_core.erl b/lib/compiler/src/v3_core.erl index 321cf7af1c..a5f31f3844 100644 --- a/lib/compiler/src/v3_core.erl +++ b/lib/compiler/src/v3_core.erl @@ -563,7 +563,8 @@ expr({'try',L,Es0,[],[],As0}, St0) -> guard=[#c_literal{val=true}], body=As1}], fc=Fc}, - App = #iapply{anno=Lanno,op=#c_var{anno=LA,name={Name,0}},args=[]}, + App = #iapply{anno=#a{anno=[compiler_generated|LA]}, + op=#c_var{anno=LA,name={Name,0}},args=[]}, {Evs,Hs,St5} = try_after([App], St4), Try = #itry{anno=Lanno,args=Es1,vars=[V],body=[App,V],evars=Evs,handler=Hs}, Letrec = #iletrec{anno=Lanno,defs=[{{Name,0},Fun}], |