1! { dg-do compile } 2! PR fortran/31580 3! 4! Testcase contributed by Tobias Burnus <burnus AT gcc DOT gnu DOT org> 5! 6PROGRAM test 7 real :: a,b 8 if(a .nonex. b) stop ! { dg-error "Unknown operator" } 9end program 10