Fortran: Fix PR 47485.
[gcc.git] / gcc / testsuite / g++.dg / torture / pr94303.C
blob45b90a2249de32a1418f843296bd66e218b1d56e
1 // PR middle-end/94303
2 // { dg-do run }
4 struct A {
5   int d = 9;
6   A () = default;
7   A (int x) : d(x) {}
8   void foo () { if (d < 1) __builtin_abort (); }
9 };
11 A a[3] = { 1 };
13 int
14 main ()
16   a[2].foo ();