Fix compilation failure with C++98 compilers
[official-gcc.git] / gcc / testsuite / gfortran.dg / assumed_rank_15.f90
blobefeb4a5f47b2aedf48e7c73b4bc90fa89091d151
1 ! { dg-do compile }
2 ! { dg-options "-fdec-structure" }
4 ! PR fortran/83184
7 structure /s/
8 integer n(..) /1/ ! { dg-error "must have an explicit shape" }
9 end structure
11 end