gcc/testsuite/gcc.dg/torture/bitint-56.c

   1 /* PR tree-optimization/113753 */
   2 /* { dg-do run { target bitint } } */
   3 /* { dg-options "-std=c23 -pedantic-errors" } */
   4 /* { dg-skip-if "" { ! run_expensive_tests }  { "*" } { "-O0" "-O2" } } */
   5 /* { dg-skip-if "" { ! run_expensive_tests } { "-flto" } { "" } } */
   6
   7 #if __BITINT_MAXWIDTH__ >= 129
   8 unsigned _BitInt(128)
   9 foo (unsigned u, unsigned _BitInt(128) a, unsigned _BitInt(128) b)
  10 {
  11   unsigned _BitInt(129) m = a % b;
  12   return u * m / u;
  13 }
  14 #endif
  15
  16 int
  17 main ()
  18 {
  19 #if __BITINT_MAXWIDTH__ >= 129
  20   if (foo (0xfa637c33, 0x37af7fe8b0000000000000000wb,
  21            0xfffffffff0000000000000000wb)
  22       != 0x16f7e93f6d726b38b38d0b753wb)
  23     __builtin_abort ();
  24 #endif
  25 }