From d78e98eeb00fbb250385e1aa99c23a74e5baed86 Mon Sep 17 00:00:00 2001 From: Luca Favatella Date: Tue, 17 Jun 2014 22:44:01 +0100 Subject: Refactor function in eunit using is_function/2 is_function/2 looks present since at least OTP R13B03, so the change shall not undermine running eunit on older versions of Erlang. This commit is only refactoring - it contains no functional changes. --- lib/eunit/src/eunit_data.erl | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) (limited to 'lib') diff --git a/lib/eunit/src/eunit_data.erl b/lib/eunit/src/eunit_data.erl index 0350f9bf6e..cbbc6fbc15 100644 --- a/lib/eunit/src/eunit_data.erl +++ b/lib/eunit/src/eunit_data.erl @@ -440,13 +440,8 @@ parse_function({M, F}) when is_atom(M), is_atom(F) -> parse_function(F) -> bad_test(F). -check_arity(F, N, T) when is_function(F) -> - case erlang:fun_info(F, arity) of - {arity, N} -> - ok; - _ -> - bad_test(T) - end; +check_arity(F, N, _) when is_function(F, N) -> + ok; check_arity(_, _, T) -> bad_test(T). -- cgit v1.2.3