From a2dc97c82682abf532f6ab55d20dd3ece954ac40 Mon Sep 17 00:00:00 2001 From: Manolis Papadakis Date: Sun, 31 Mar 2013 14:39:51 -0700 Subject: [PATCH] Minor refactoring in a test --- test/proper_tests.erl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/test/proper_tests.erl b/test/proper_tests.erl index 44669476..8fc42f06 100644 --- a/test/proper_tests.erl +++ b/test/proper_tests.erl @@ -1100,13 +1100,14 @@ dollar_only_cp_test_() -> max_size_test() -> %% issue a call to load the test module and ensure the test exists - true = lists:member({prop_identity,0}, perf_max_size:module_info(exports)), + ?assert(lists:member({prop_identity,0}, + perf_max_size:module_info(exports))), %% run some tests with a small and a big max_size option {Ts,true} = timer:tc(fun() -> max_size_test_aux(42) end), {Tb,true} = timer:tc(fun() -> max_size_test_aux(16#ffffffff) end), %% ensure that the test with the big max_size option does not take %% much longer than the small one to complete - ?assertEqual(true, 2*Ts >= Tb). + ?assert(2*Ts >= Tb). max_size_test_aux(Size) -> proper:quickcheck(perf_max_size:prop_identity(), [5,{max_size,Size}]).