llvm/flang/test/Semantics/assign15.f90

! RUN: %python %S/test_errors.py %s %flang_fc1
! Test error location when assignment starts with macro expansion.

#define X_VAR x
program main
  real(4) :: x
  character(10) :: c
  !ERROR: No intrinsic or user-defined ASSIGNMENT(=) matches operand types REAL(4) and CHARACTER(KIND=1)
  X_VAR = c
  !ERROR: No intrinsic or user-defined ASSIGNMENT(=) matches operand types CHARACTER(KIND=1) and REAL(4)
  c = X_VAR
end