tests/test_I_mkf.cc

   1 #include "test_I.h"
   2
   3 int test_I_mask_field (int iterations)
   4 {
   5         int error = 0;
   6         int i;
   7         // Check against ash.
   8         for (i = iterations; i > 0; i--) {
   9                 cl_I a = testrandom_I();
  10                 sintL s = random32() % 1024;
  11                 sintL p = random32() % 1024;
  12                 ASSERT3(mask_field(a,cl_byte(s,p)) == logand(a,ash(ash(1,s)-1,p)), a,s,p);
  13         }
  14         return error;
  15 }