ieee_9.f90: XFAIL on arm*-*-gnueabi[hf].
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr77429.f90
blob0f9023794d77c67b7b7afa65523863339b774430
1 ! { dg-do compile }
2 program p
3 shape(1) = 0 ! { dg-error "expression in variable definition context" }
4 shape(1,2) = 0 ! { dg-error "expression in variable definition context" }
5 shape(1,2,3) = 0 ! { dg-error "Too many arguments in call" }
6 lbound([1]) = 0 ! { dg-error "expression in variable definition context" }
7 end