aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2010-09-23 09:35:34 +0200
committerBjörn Gustavsson <[email protected]>2010-09-23 09:35:34 +0200
commitd0c538e3dd5072ad0227553f5dd7dcdc2e6c3288 (patch)
tree9953e399c5e437247350fcfcc4d8b743169f49ea /lib/compiler/test
parentdc7d2319691fa599717c066460cce53ce97b6b18 (diff)
downloadotp-d0c538e3dd5072ad0227553f5dd7dcdc2e6c3288.tar.gz
otp-d0c538e3dd5072ad0227553f5dd7dcdc2e6c3288.tar.bz2
otp-d0c538e3dd5072ad0227553f5dd7dcdc2e6c3288.zip
Fix compiler crash when constructing zero-size binary segments
Code such as foo(A) -> <<A:0>>. would cause a compiler crash.
Diffstat (limited to 'lib/compiler/test')
-rw-r--r--lib/compiler/test/bs_construct_SUITE.erl4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/compiler/test/bs_construct_SUITE.erl b/lib/compiler/test/bs_construct_SUITE.erl
index 1862a28bbe..dfe4301791 100644
--- a/lib/compiler/test/bs_construct_SUITE.erl
+++ b/lib/compiler/test/bs_construct_SUITE.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2004-2009. All Rights Reserved.
+%% Copyright Ericsson AB 2004-2010. All Rights Reserved.
%%
%% The contents of this file are subject to the Erlang Public License,
%% Version 1.1, (the "License"); you may not use this file except in
@@ -66,6 +66,8 @@ id(I) -> I.
l(I_13, I_big1, I_16, Bin) ->
[
+ ?T(<<I_13:0>>,
+ []),
?T(<<-43>>,
[256-43]),
?T(<<4:4,7:4>>,