1 ! RUN: %python %S/test_errors.py %s %flang_fc1
2 ! Check for C1546 and 18.3.6
4 ! ERROR: 'test1' may not have both the BIND(C) and ELEMENTAL attributes
5 elemental
subroutine test1() bind(c
)
8 subroutine test3(x
) bind(c
)
9 ! ERROR: VALUE attribute may not apply to an array in a BIND(C) procedure
10 integer, value
:: x(100)
