coarray_41.f90: Add "-latomic" option if libatomic_available.
[official-gcc.git] / gcc / testsuite / gfortran.dg / elemental_pointer_1.f90
blobb5d99611c78fa7aa33b0a85b312d4121e67ee1b8
1 ! { dg-do compile }
2 ! Tests the fix for pr20875.
3 ! Note 12.7.1 "For a function, the result shall be scalar and shall not have the POINTER attribute."
4 MODULE Test
5 CONTAINS
6 ELEMENTAL FUNCTION LL(I)
7 INTEGER, INTENT(IN) :: I
8 INTEGER :: LL
9 POINTER :: LL ! { dg-error " POINTER attribute conflicts with ELEMENTAL attribute" }
10 END FUNCTION LL
11 END MODULE Test