PR tree-optimization/86415 - strlen() not folded for substrings within constant arrays

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr77694.f90

! { dg-do compile }
! { dg-options -O }
program p
   logical x(2), y(2)
   x = .true.
   y = .nt. x   ! { dg-error "Unknown operator" }
end