aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2011-02-15 12:58:41 +0100
committerBjörn Gustavsson <[email protected]>2011-08-16 08:58:49 +0200
commit29d734adaec35052ce153b05621babf9333bc651 (patch)
treef28fee458a5e1b2f05fb4baac10b19fdfcf8bfb1
parentfc3023bd5a1ed2825c7f4f5da61cfec45a50f675 (diff)
downloadotp-29d734adaec35052ce153b05621babf9333bc651.tar.gz
otp-29d734adaec35052ce153b05621babf9333bc651.tar.bz2
otp-29d734adaec35052ce153b05621babf9333bc651.zip
v3_kernel: Make sure that line number annotations are passed through
-rw-r--r--lib/compiler/src/v3_kernel.erl4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/compiler/src/v3_kernel.erl b/lib/compiler/src/v3_kernel.erl
index 0bbedf0207..4e06b464a4 100644
--- a/lib/compiler/src/v3_kernel.erl
+++ b/lib/compiler/src/v3_kernel.erl
@@ -247,7 +247,7 @@ expr(#c_var{anno=A,name={_Name,Arity}}=Fname, Sub, St) ->
%% instead of one for each occurrence as done now.
Vs = [#c_var{name=list_to_atom("V" ++ integer_to_list(V))} ||
V <- integers(1, Arity)],
- Fun = #c_fun{anno=A,vars=Vs,body=#c_apply{op=Fname,args=Vs}},
+ Fun = #c_fun{anno=A,vars=Vs,body=#c_apply{anno=A,op=Fname,args=Vs}},
expr(Fun, Sub, St);
expr(#c_var{anno=A,name=V}, Sub, St) ->
{#k_var{anno=A,name=get_vsub(V, Sub)},[],St};
@@ -291,7 +291,7 @@ expr(#c_binary{anno=A,segments=Cv}, Sub, St0) ->
Erl = #c_literal{val=erlang},
Name = #c_literal{val=error},
Args = [#c_literal{val=badarg}],
- Error = #c_call{module=Erl,name=Name,args=Args},
+ Error = #c_call{anno=A,module=Erl,name=Name,args=Args},
expr(Error, Sub, St0)
end;
expr(#c_fun{anno=A,vars=Cvs,body=Cb}, Sub0, #kern{ff=OldFF,func=Func}=St0) ->