diff options
| author | Björn Gustavsson <[email protected]> | 2010-09-23 09:35:34 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2010-09-23 09:35:34 +0200 |
| commit | d0c538e3dd5072ad0227553f5dd7dcdc2e6c3288 (patch) | |
| tree | 9953e399c5e437247350fcfcc4d8b743169f49ea /lib/compiler/test | |
| parent | dc7d2319691fa599717c066460cce53ce97b6b18 (diff) | |
| download | otp-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.erl | 4 |
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>>, |