aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/test
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 /erts/emulator/test
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 'erts/emulator/test')
-rw-r--r--erts/emulator/test/exception_SUITE.erl11
1 files changed, 11 insertions, 0 deletions
diff --git a/erts/emulator/test/exception_SUITE.erl b/erts/emulator/test/exception_SUITE.erl
index 109cec25cb..09a7a87a9a 100644
--- a/erts/emulator/test/exception_SUITE.erl
+++ b/erts/emulator/test/exception_SUITE.erl
@@ -589,6 +589,13 @@ line_numbers(Config) when is_list(Config) ->
[{file,ModFile},{line,_}]}|_]}} =
(catch build_binary2(8, bad_binary)),
+ <<"abc",357:16>> = build_binary3(<<"abc">>),
+ {'EXIT',{badarg,[{?MODULE,build_binary3,1,
+ [{file,"bit_syntax.erl"},{line,72511}]},
+ {?MODULE,line_numbers,1,
+ [{file,ModFile},{line,_}]}|_]}} =
+ (catch build_binary3(no_binary)),
+
{'EXIT',{function_clause,
[{?MODULE,do_call_abs,[y,y],
[{file,"gc_bif.erl"},{line,18}]},
@@ -691,6 +698,10 @@ build_binary2(Size, Bin) -> %Line 72505
id(0), %Line 72506
<<7:Size,Bin/binary>>. %Line 72507
+build_binary3(Bin) -> %Line 72509
+ id(0), %Line 72510
+ <<Bin/binary,357:16>>. %Line 72511
+
-file("gc_bif.erl", 17).
do_call_abs(x, Arg) -> %Line 18
abs(Arg). %Line 19