gcc/testsuite/gcc.dg/torture/pr116454-1.c

   1 /* { dg-do run } */
   2 /* { dg-additional-options "-ffast-math" } */
   3
   4 static int t = 0;
   5 _Complex float f()
   6 {
   7         t++;
   8         return 0;
   9 }
  10 int main() {
  11         t = 0;
  12         /* Would cause f() to be incorrectly invoked twice. */
  13         f() * 1j;
  14         if (t != 1)
  15           __builtin_abort();
  16 }