1  /* { dg-do run { target fpic } } */
       2  /* { dg-options "-O2 -fpic" } */
       3  /* { dg-require-effective-target alloca } */
       4  
       5  extern void abort (void);
       6  extern void exit (int);
       7  
       8  void foo (char *x, const char *y, ...)
       9  {
      10  }
      11  
      12  double bar (const char *x, long y)
      13  {
      14    return 0.0;
      15  }
      16  
      17  typedef __SIZE_TYPE__ size_t;
      18  extern size_t strlen (const char *);
      19  
      20  double baz (const char *x)
      21  {
      22    if (x[0] != '\0')
      23      {
      24        char y[6 + strlen (x)];
      25        foo (y, "FOO", x);
      26        return bar (y, 0);
      27      }
      28  
      29    return (__extension__ ((union { unsigned __l __attribute__((__mode__(__SI__))); float __d; }) { __l: 0x3f800000UL }).__d);
      30  }
      31  
      32  int
      33  main ()
      34  {
      35    if (baz("") != 1.0)
      36      abort ();
      37    exit (0);
      38  }