nvptx, libgfortran: Switch out of "minimal" mode
[official-gcc.git] / gcc / testsuite / gfortran.dg / intrinsic_bounds_1.f90
bloba9586fb1d1215258acb00b00110d95943955a9f0
1 ! { dg-do compile }
2 ! PR 54633 - this used to be rejected
3 program main
4 integer :: x(minval((/1/),mask=(/.TRUE./)))
5 integer, parameter :: m = minval((/1/))
6 integer :: y(minval((/1/),mask=(/.TRUE./)))
7 end