gcc/testsuite/gcc.dg/vect/vect-early-break_94-pr113144.c

   1 /* { dg-do compile } */
   2 /* { dg-add-options vect_early_break } */
   3 /* { dg-require-effective-target vect_early_break } */
   4 /* { dg-require-effective-target vect_int } */
   5
   6 /* { dg-final { scan-tree-dump "LOOP VECTORIZED" "vect" } } */
   7
   8 long tar_atol256_max, tar_atol256_size, tar_atosl_min;
   9 char tar_atol256_s;
  10 void __errno_location();
  11
  12
  13 inline static long tar_atol256(long min) {
  14   char c;
  15   int sign;
  16   c = tar_atol256_s;
  17   sign = c;
  18   while (tar_atol256_size) {
  19     if (c != sign)
  20       return sign ? min : tar_atol256_max;
  21     c = tar_atol256_size--;
  22   }
  23   if ((c & 128) != (sign & 128))
  24     return sign ? min : tar_atol256_max;
  25   return 0;
  26 }
  27
  28 inline static long tar_atol(long min) {
  29   return tar_atol256(min);
  30 }
  31
  32 long tar_atosl() {
  33   long n = tar_atol(-1);
  34   if (tar_atosl_min) {
  35     __errno_location();
  36     return 0;
  37   }
  38   if (n > 0)
  39     return 0;
  40   return n;
  41 }