diff options
author | John Högberg <[email protected]> | 2019-05-24 15:47:37 +0200 |
---|---|---|
committer | John Högberg <[email protected]> | 2019-05-27 11:32:02 +0200 |
commit | 00dc96a9a0086e829e574b651b4a28155aa826df (patch) | |
tree | 83c34f5785dc7595c148848e5d646c42014c9a79 /lib/compiler/test | |
parent | d32991afaf3fc5f9f73e3e2448672bb9a1b80101 (diff) | |
download | otp-00dc96a9a0086e829e574b651b4a28155aa826df.tar.gz otp-00dc96a9a0086e829e574b651b4a28155aa826df.tar.bz2 otp-00dc96a9a0086e829e574b651b4a28155aa826df.zip |
compiler: Fix broken type for erlang:'++'/2
Diffstat (limited to 'lib/compiler/test')
-rw-r--r-- | lib/compiler/test/beam_type_SUITE.erl | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/lib/compiler/test/beam_type_SUITE.erl b/lib/compiler/test/beam_type_SUITE.erl index 882e281a44..0ddd91498e 100644 --- a/lib/compiler/test/beam_type_SUITE.erl +++ b/lib/compiler/test/beam_type_SUITE.erl @@ -24,7 +24,7 @@ integers/1,numbers/1,coverage/1,booleans/1,setelement/1, cons/1,tuple/1,record_float/1,binary_float/1,float_compare/1, arity_checks/1,elixir_binaries/1,find_best/1, - test_size/1,cover_lists_functions/1]). + test_size/1,cover_lists_functions/1,list_append/1]). suite() -> [{ct_hooks,[ts_install_cth]}]. @@ -47,7 +47,8 @@ groups() -> elixir_binaries, find_best, test_size, - cover_lists_functions + cover_lists_functions, + list_append ]}]. init_per_suite(Config) -> @@ -487,5 +488,11 @@ cover_lists_functions(Config) -> true = is_list(Zipped), ok. +list_append(_Config) -> + %% '++'/2 has a quirk where it returns the right-hand argument as-is when + %% the left-hand is []. + hello = id([]) ++ id(hello), + ok. + id(I) -> I. |