Actually use TestGroupOptions.sizeTests and ..

.. remove the hack in TestGroup which made it look like the recognition
was run thrice.

Author: ssiccha

gap/base/recognition.gi

@@ -978,7 +978,7 @@ InstallGlobalFunction( "GetCompositionTreeNode",
 
 RECOG.TestGroupOptions := rec(
       # Number of times to test whether the recognized size is right
-      sizeTests := 3,
+      sizeTests := 1,
 
       # Number of random elements in group to check
       # This is used both for the number of elements in the
@@ -1039,11 +1039,8 @@ RECOG.TestGroup := function(g,proj,size, optionlist...)
           if count = -1 then
               return fail;
           fi;
-      else
-          #Print("Test was OK!\n");
-          count := 3;   # worked!
       fi;
-  until count >= 3;
+  until count >= options.sizeTests;
   #View(ri);
   #Print("\n");
   count := 0;