| Index: gcc/gcc/testsuite/gfortran.dg/array_constructor_22.f90
|
| diff --git a/gcc/gcc/testsuite/gfortran.dg/array_constructor_22.f90 b/gcc/gcc/testsuite/gfortran.dg/array_constructor_22.f90
|
| index d29039a80e6a4362cf2d76ffc29b1c1854580be2..0dcdaea68c1a1aed01432ee6a27badf73ade8e1c 100644
|
| --- a/gcc/gcc/testsuite/gfortran.dg/array_constructor_22.f90
|
| +++ b/gcc/gcc/testsuite/gfortran.dg/array_constructor_22.f90
|
| @@ -7,7 +7,7 @@ module test
|
| function my_string(x)
|
| integer i
|
| real, intent(in) :: x(:)
|
| - character(0) h4(1:minval([(1,i=1,0)],1))
|
| + character(0) h4(1:minval([(1,i=1,0)],1)) ! { dg-warning "will be executed zero times" }
|
| character(0) sv1(size(x,1):size(h4))
|
| character(0) sv2(2*lbound(sv1,1):size(h4))
|
| character(lbound(sv2,1)-3) my_string
|
|
|