aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/src
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2014-01-16 09:50:42 +0100
committerBjörn Gustavsson <[email protected]>2014-01-16 09:52:34 +0100
commit8c39400c7fb03f3dd7d9dbfb01c43e5e91d7086c (patch)
tree1cd77d5738a621b9b119e607619de9ea3ac2148c /lib/compiler/src
parent25237481ccccd3ddfa74582dc267632ad618ba30 (diff)
downloadotp-8c39400c7fb03f3dd7d9dbfb01c43e5e91d7086c.tar.gz
otp-8c39400c7fb03f3dd7d9dbfb01c43e5e91d7086c.tar.bz2
otp-8c39400c7fb03f3dd7d9dbfb01c43e5e91d7086c.zip
compiler: Correct line number in exception from binary construction
Reported-by: Stanislav Seletskiy
Diffstat (limited to 'lib/compiler/src')
-rw-r--r--lib/compiler/src/v3_codegen.erl3
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/compiler/src/v3_codegen.erl b/lib/compiler/src/v3_codegen.erl
index 6a13495523..f534500671 100644
--- a/lib/compiler/src/v3_codegen.erl
+++ b/lib/compiler/src/v3_codegen.erl
@@ -1466,10 +1466,11 @@ set_cg([{var,R}], Con, Le, Vdb, Bef, St) ->
cg_binary([{bs_put_binary,Fail,{atom,all},U,_Flags,Src}|PutCode],
Target, Temp, Fail, MaxRegs, Anno) ->
+ Line = line(Anno),
Live = cg_live(Target, MaxRegs),
SzCode = cg_bitstr_size(PutCode, Target, Temp, Fail, Live),
BinFlags = {field_flags,[]},
- Code = SzCode ++
+ Code = [Line|SzCode] ++
[case member(single_use, Anno) of
true ->
{bs_private_append,Fail,Target,U,Src,BinFlags,Target};