| ! RUN: %python %S/test_errors.py %s %flang_fc1 |
| !ERROR: Logical constant '.true.' may not be used as a defined operator |
| interface operator(.TRUE.) |
| !ERROR: Logical constant '.false.' may not be used as a defined operator |
| generic :: operator(.false.) => bar |
| interface operator(.foo.) |
| integer function foo(x, y) |
| logical, intent(in) :: x, y |
| logical function bar(x, y) |
| complex, intent(in) :: x, y |
| !ERROR: Intrinsic operator '.le.' may not be used as a defined operator |
| use m2, only: operator(.le.) => operator(.ge.) |
| !ERROR: Intrinsic operator '.not.' may not be used as a defined operator |
| use m2, only: operator(.not.) => operator(.foo.) |
| !ERROR: Logical constant '.true.' may not be used as a defined operator |
| use m2, only: operator(.true.) => operator(.foo.) |