80a54edc14
A BIND(C) interoperable procedure must have only interoperable dummy procedures. Differential Revision: https://reviews.llvm.org/D155488
6 lines
174 B
Fortran
6 lines
174 B
Fortran
! RUN: %python %S/test_errors.py %s %flang_fc1
|
|
!ERROR: A dummy procedure to an interoperable procedure must also be interoperable
|
|
subroutine subr(e) bind(c)
|
|
external e
|
|
end
|