diff options
| author | Björn Gustavsson <[email protected]> | 2013-01-30 11:34:12 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2013-01-30 11:37:11 +0100 |
| commit | 440b3177995914ac1dd90a84b9f625ca72e8750a (patch) | |
| tree | bb36abda0255ccdeef3d9c9c76b8c3951946541e /lib/compiler/test | |
| parent | ece4c17d2288a3161c99519ae84cea530eec5bd5 (diff) | |
| download | otp-440b3177995914ac1dd90a84b9f625ca72e8750a.tar.gz otp-440b3177995914ac1dd90a84b9f625ca72e8750a.tar.bz2 otp-440b3177995914ac1dd90a84b9f625ca72e8750a.zip | |
Test setelement(1, not_a_tuple, NewValue)
Diffstat (limited to 'lib/compiler/test')
| -rw-r--r-- | lib/compiler/test/core_fold_SUITE.erl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/compiler/test/core_fold_SUITE.erl b/lib/compiler/test/core_fold_SUITE.erl index b905e9b126..c2a592f699 100644 --- a/lib/compiler/test/core_fold_SUITE.erl +++ b/lib/compiler/test/core_fold_SUITE.erl @@ -92,6 +92,9 @@ setelement(Config) when is_list(Config) -> ?line {'EXIT',{badarg,_}} = (catch setelement_crash({a,b,c,d,e,f})), ?line error = setelement_crash_2({a,b,c,d,e,f}, <<42>>), + + {'EXIT',{badarg,_}} = (catch setelement(1, not_a_tuple, New)), + ok. setelement_crash(Tuple) -> |