Fortran: Fix PR 47485.
[gcc.git] / gcc / testsuite / g++.dg / other / pr113617.C
blob0ee62c134e669fe107db711f7cc8c72ba61e44ad
1 // PR rtl-optimization/113617
2 // { dg-do link { target c++11 } }
3 // { dg-options "-O2" }
4 // { dg-additional-options "-fPIC" { target fpic } } */
5 // { dg-additional-options "-shared -DSHARED" { target shared } } */
6 // { dg-additional-sources pr113617-aux.cc }
8 #include "pr113617.h"
10 int z;
11 long xx1;
12 void corge() {
13   A<long long> a;
14   a.foo(xx1, 0);
17 typedef unsigned long int VV __attribute__((vector_size (2 * sizeof (long))));
18 VV vv;
19 __attribute__((noipa)) static void fn1 (void) {}
20 __attribute__((noipa)) static void fn2 (void) {}
22 void
23 fn3 ()
25   VV a = { (unsigned long) &fn1, (unsigned long) &fn2 };
26   vv = a;