1/* { dg-do compile } */
2/* { dg-options "-std=c89 -pedantic-errors" } */
3/* PR 23155
4   We should get two error messages, one about union cast
5   and the other about array access for non lvalues.  */
6
7
8union vx {short f[8]; int v;};
9int vec;
10
11void
12foo5 (int vec)
13{
14  ((union vx) vec).f[5] = 1; /* { dg-error "(forbids subscripting)|(forbids casts to union type)" } */
15}
16