gnu/dist/gcc4/gcc/testsuite/gcc.dg/debug/20020220-1.c

   1 /* PR debug/4461
   2    This testcase failed to link in Dwarf-2 because
   3    constant -4.0 in constant pool was never referenced by anything
   4    but Dwarf-2 location descriptor.  */
   5 /* { dg-do run } */
   6
   7 void __attribute__((noinline))
   8 foo (const char *x __attribute__((unused)),
   9      __complex__ long double y __attribute__((unused)),
  10      __complex__ long double z __attribute__((unused)))
  11 {
  12 }
  13
  14 void
  15 bar (void)
  16 {
  17   foo ("",
  18        __builtin_conjl (({ __complex__ long double r;
  19                            __real__ r = 3.0;
  20                            __imag__ r = -4.0;
  21                            r; })),
  22        ({ __complex__ long double s;
  23           __real__ s = 3.0;
  24           __imag__ s = 4.0;
  25           s; }));
  26 }
  27
  28 int main (void)
  29 {
  30   return 0;
  31 }