Remove old autovect-branch by moving to "dead" directory.
[official-gcc.git] / old-autovect-branch / gcc / testsuite / gfortran.dg / logical_comp.f90
bloba961b291c3a05a45fa0295fb5595b307918cbf8c
1 ! { dg-do compile }
2 ! PR fortran/22503
3 ! Suggest use of appropriate comparison operator
5 program foo
6 logical :: b
7 b = b .eq. b ! { dg-error ".EQV. instead of .eq." }
8 b = b .ne. b ! { dg-error ".NEQV. instead of .ne." }
9 end program