hppa64: Fix fmt_f_default_field_width_3.f90 and fmt_g_default_field_width_3.f90
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr19936_1.f90
blob440c1d9d7026ed3f564ddb2d7c549e0bf8e6bf07
1 ! { dg-do compile }
2 program pr19936_1
3 integer, parameter :: i=4
4 print *,(/(i,i=1,4)/) ! { dg-error "variable definition context" }
5 end program pr19936_1