1 /* { dg-do compile } */
2 /* { dg-options "-std=c99 -pedantic-errors" } */
3 /* PR 23155
4    We should get one error messag, one about union cast. */
5 
6 
7 union vx {short f[8]; int v;};
8 int vec;
9 
10 void
foo5(int vec)11 foo5 (int vec)
12 {
13   ((union vx) vec).f[5] = 1; /* { dg-error "forbids casts to union type" } */
14 }
15