brintos / llvm-project-archived public Read only

1!RUN: %python %S/test_errors.py %s %flang_fc12module m3 contains4  elemental real function f(x)5    real, intent(in) :: x6    f = x7  end8  subroutine s(a)9    real a(..)10    !ERROR: Assumed-rank array 'a' may not be used as an argument to an elemental procedure11    print *, f(a)12  end13end14