gcc/testsuite/gcc.dg/pr97459-5.c

   1 /* PR rtl-optimization/97459 */
   2 /* { dg-do run } */
   3 /* { dg-options "-O2" } */
   4 /* { dg-additional-options "-DEXPENSIVE" { target run_expensive_tests } } */
   5
   6 #ifdef __SIZEOF_INT128__
   7 typedef __uint128_t T;
   8 #else
   9 typedef unsigned long long T;
  10 #endif
  11
  12 T __attribute__((noipa)) foo (T x, T n, T *r) { *r = x % n; return x / n; }
  13 #define C(n) T __attribute__((noipa)) foo##n (T x, T *r) { *r = x % (n - 10000); return x / (n - 10000); }
  14
  15 #define C1(n) C(n##1) C(n##3) C(n##5) C(n##7) C(n##9)
  16 #define C2(n) C1(n##0) C1(n##1) C1(n##2) C1(n##3) C1(n##4) \
  17               C1(n##5) C1(n##6) C1(n##7) C1(n##8) C1(n##9)
  18 #ifdef EXPENSIVE
  19 #define C3(n) C2(n##0) C2(n##1) C2(n##2) C2(n##3) C2(n##4) \
  20               C2(n##5) C2(n##6) C2(n##7) C2(n##8) C2(n##9)
  21 #define C4(n) C3(n##0) C3(n##1) C3(n##2) C3(n##3) C3(n##4) \
  22               C3(n##5) C3(n##6) C3(n##7) C3(n##8) C3(n##9)
  23 #else
  24 #define C3(n) C2(n##0) C2(n##4) C2(n##9)
  25 #define C4(n) C3(n##0) C3(n##3) C3(n##7)
  26 #endif
  27 #define TESTS C4(1) C1(10010) C1(10012) C1(16144)
  28
  29 TESTS
  30
  31 struct S { T x; T (*foo) (T, T *); };
  32
  33 #undef C
  34 #define C(n) { n - 10000, foo##n },
  35
  36 struct S tests[] = {
  37 TESTS
  38   { 0, 0 }
  39 };
  40
  41 int
  42 main ()
  43 {
  44   int i, j, k;
  45   for (k = 0; tests[k].x; k++)
  46     for (i = 0; i < sizeof (T) * __CHAR_BIT__; i++)
  47       for (j = -5; j <= 5; j++)
  48         {
  49           T x = ((T) 1 << i) + j;
  50           T r1, r2;
  51           if (foo (x, tests[k].x, &r1) != tests[k].foo (x, &r2)
  52               || r1 != r2)
  53             __builtin_abort ();
  54         }
  55   return 0;
  56 }