diff options
author | Björn Gustavsson <[email protected]> | 2014-03-05 12:53:39 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2014-03-05 12:53:39 +0100 |
commit | a15b25bbd09b91040ba92c65c287ad04b1bc2a30 (patch) | |
tree | 3253e2230f240210feb1c060387706babb0f24b3 /lib/compiler/test | |
parent | ab044b52bbe0217bc06c9b67cba7099c28176ee9 (diff) | |
parent | 1336d7879f9a722abda1fe8bc520953c5a079c79 (diff) | |
download | otp-a15b25bbd09b91040ba92c65c287ad04b1bc2a30.tar.gz otp-a15b25bbd09b91040ba92c65c287ad04b1bc2a30.tar.bz2 otp-a15b25bbd09b91040ba92c65c287ad04b1bc2a30.zip |
Merge branch 'nox/compiler/sys_core_fold-erlang-is_function-2'
* nox/compiler/sys_core_fold-erlang-is_function-2:
Do not mark all calls to erlang:is_function/2 as safe
Diffstat (limited to 'lib/compiler/test')
-rw-r--r-- | lib/compiler/test/guard_SUITE.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/compiler/test/guard_SUITE.erl b/lib/compiler/test/guard_SUITE.erl index a0a9bb7ddd..2d9e8d1ac0 100644 --- a/lib/compiler/test/guard_SUITE.erl +++ b/lib/compiler/test/guard_SUITE.erl @@ -1023,6 +1023,10 @@ is_function_2(Config) when is_list(Config) -> true = is_function(id(fun() -> ok end), 0), false = is_function(id(fun ?MODULE:all/1), 0), false = is_function(id(fun() -> ok end), 1), + {'EXIT',{badarg,_}} = + (catch is_function(id(fun() -> ok end), -1) orelse error), + {'EXIT',{badarg,_}} = + (catch is_function(id(fun() -> ok end), '') orelse error), F = fun(_) -> ok end, if |