Improve naming for test iterations & properties which are tested

[#146794925]

Author: gerhard

test/term_to_binary_compat_prop_SUITE.erl

@@ -23,6 +23,8 @@
 -include_lib("common_test/include/ct.hrl").
 -include_lib("proper/include/proper.hrl").
 
+-define(ITERATIONS_TO_RUN_UNTIL_CONFIDENT, 10000).
+
 all() ->
     [
         pre_3_6_11_works,
@@ -48,8 +50,9 @@ init_per_testcase(Testcase, Config) ->
 %% If this test fails - the erlang version is not supported in
 %% RabbitMQ-3.6.10 and earlier.
 pre_3_6_11_works(Config) ->
-    Fun = fun () -> prop_pre_3_6_11_works(Config) end,
-    rabbit_ct_proper_helpers:run_proper(Fun, [], 50000).
+    Property = fun () -> prop_pre_3_6_11_works(Config) end,
+    rabbit_ct_proper_helpers:run_proper(Property, [],
+                                        ?ITERATIONS_TO_RUN_UNTIL_CONFIDENT).
 
 prop_pre_3_6_11_works(_Config) ->
     ?FORALL(Term, any(),
@@ -60,21 +63,24 @@ prop_pre_3_6_11_works(_Config) ->
         end).
 
 term_to_binary_latin_atom(Config) ->
-    Fun = fun () -> prop_term_to_binary_latin_atom(Config) end,
-    rabbit_ct_proper_helpers:run_proper(Fun, [], 10000).
+    Property = fun () -> prop_term_to_binary_latin_atom(Config) end,
+    rabbit_ct_proper_helpers:run_proper(Property, [],
+                                        ?ITERATIONS_TO_RUN_UNTIL_CONFIDENT).
 
 prop_term_to_binary_latin_atom(_Config) ->
     ?FORALL(LatinString, list(integer(0, 255)),
         begin
             Length = length(LatinString),
             Atom = list_to_atom(LatinString),
             Binary = list_to_binary(LatinString),
-            <<131,100, Length:16, Binary/binary>> =:= term_to_binary_compat:term_to_binary_1(Atom)
+            <<131,100, Length:16, Binary/binary>> =:=
+                term_to_binary_compat:term_to_binary_1(Atom)
         end).
 
 queue_name_to_binary(Config) ->
-    Fun = fun () -> prop_queue_name_to_binary(Config) end,
-    rabbit_ct_proper_helpers:run_proper(Fun, [], 10000).
+    Property = fun () -> prop_queue_name_to_binary(Config) end,
+    rabbit_ct_proper_helpers:run_proper(Property, [],
+                                        ?ITERATIONS_TO_RUN_UNTIL_CONFIDENT).
 
 
 prop_queue_name_to_binary(_Config) ->