nvptx, libgfortran: Switch out of "minimal" mode
[official-gcc.git] / gcc / testsuite / gfortran.dg / logical_assignment_1.f90
blobe3c14f5b3929ea19d88d9f53f96adf58f8f91bee
1 ! { dg-do compile }
2 ! PR 79312 - assigning a logical value to a real
3 ! is invalid.
4 ! Test case by John Harper.
5 program emptyarray5
6 implicit none
7 real a(0)
8 a = [logical::] ! { dg-error "Cannot convert LOGICAL" }
9 print *,size(a)
10 end program emptyarray5