diff options
| author | Björn Gustavsson <[email protected]> | 2016-05-23 08:40:23 +0200 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2016-05-23 08:40:23 +0200 |
| commit | d0554c760abc10f0c90348c8d3b63ca6110c6938 (patch) | |
| tree | 06d2ce826e524951002883329291c1dfa9c6199f /lib/compiler/test/beam_reorder_SUITE.erl | |
| parent | de114bb8523486c0174eb763b939fbdb34aa9421 (diff) | |
| parent | 69dd6018b7731becda651393b837639746aa63c7 (diff) | |
| download | otp-d0554c760abc10f0c90348c8d3b63ca6110c6938.tar.gz otp-d0554c760abc10f0c90348c8d3b63ca6110c6938.tar.bz2 otp-d0554c760abc10f0c90348c8d3b63ca6110c6938.zip | |
Merge branch 'bjorn/compiler/misc'
* bjorn/compiler/misc:
beam_bool_SUITE: Cover one more line
beam_utils_SUITE: Cover more lines in beam_utils
beam_reorder: Don't confuse beam_validator
beam_bool: Reject potentially unsafe optimization
v3_core: Don't depend on sys_core_fold for cleaning up
beam_type: Eliminate crash
beam_type: Correct handling of setelement/3
beam_validator: Handle cons literals better
beam_validator: Keep better track of tuple literals
Diffstat (limited to 'lib/compiler/test/beam_reorder_SUITE.erl')
| -rw-r--r-- | lib/compiler/test/beam_reorder_SUITE.erl | 16 |
1 files changed, 14 insertions, 2 deletions
diff --git a/lib/compiler/test/beam_reorder_SUITE.erl b/lib/compiler/test/beam_reorder_SUITE.erl index 4b2262f65b..ff31f2d3bd 100644 --- a/lib/compiler/test/beam_reorder_SUITE.erl +++ b/lib/compiler/test/beam_reorder_SUITE.erl @@ -21,7 +21,7 @@ -export([all/0,suite/0,groups/0,init_per_suite/1,end_per_suite/1, init_per_group/2,end_per_group/2, - alloc/1]). + alloc/1,confused_beam_validator/1]). suite() -> [{ct_hooks,[ts_install_cth]}]. @@ -31,7 +31,8 @@ all() -> groups() -> [{p,[parallel], - [alloc + [alloc, + confused_beam_validator ]}]. init_per_suite(Config) -> @@ -65,5 +66,16 @@ alloc_b(_U1, _U2, R) -> _ = id(0), Res. +confused_beam_validator(_Config) -> + {'EXIT',{{badmap,{any}},_}} = (catch efficient({any})), + ok. + +efficient({Var}=God) -> + id(God#{}), + catch + receive _ -> + Var + end. + id(I) -> I. |