coarray_41.f90: Add "-latomic" option if libatomic_available.
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr77978_3.f90
blob0a3557be64a59e151141859d97cd79ca782cfd23
1 ! { dg-do compile }
2 ! { dg-options "-std=f2008" }
3 subroutine a1
4 integer, parameter :: i = -666
5 stop i
6 end subroutine a1
8 subroutine a2
9 stop -666
10 end subroutine a2
12 subroutine a3
13 integer, parameter :: i = 123456
14 stop i
15 end subroutine a3
17 subroutine a4
18 stop 123456
19 end subroutine a4
21 subroutine a5
22 stop merge(667,668,.true.)
23 end subroutine a5