Sign in
llvm
/
llvm-archive
/
2d92d8f3eda4630e3e80be62081ca797828d58e1
/
.
/
llvm-gcc-4.2
/
gcc
/
testsuite
/
gfortran.dg
/
logical_comp.f90
blob: a961b291c3a05a45fa0295fb5595b307918cbf8c [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR fortran
/
22503
!
Suggest
use
of appropriate comparison
operator
program foo
logical
::
b
b
=
b
.
eq
.
b
!
{
dg
-
error
".EQV. instead of .eq."
}
b
=
b
.
ne
.
b
!
{
dg
-
error
".NEQV. instead of .ne."
}
end
program