nvptx, libgfortran: Switch out of "minimal" mode
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr91641.f90
blob1970824a94653ddd04651a86b9a86e93324d30ae
1 ! { dg-do compile }
2 ! PR fortran/91641
3 ! Code conyributed by Gerhard Steinmetz
4 program p
5 real, pointer :: z(:)
6 print *, is_contiguous (null(z)) ! { dg-error "shall be an associated" }
7 end